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 var l144 = {name: "INDENT"};
2659 (function(){
2660     (l144).fvalue = (function(v286){
2661         ((v286)["fname"] = "INDENT");
2662         return v286;
2663     })((function (values){
2664         var v280= l5.value;
2665         for (var i = arguments.length-1; i>=1; i--)
2666             v280 = {car: arguments[i], cdr:
2667         v280};
2668         var i;
2669         return (function(){
2670             return (function(v281){
2671                 return (function(v282,v283,v284){
2672                     (l83.fvalue(pv, l72.fvalue(pv, v281)) !== l5.value ? (v282 = l135.fvalue(pv, v282, "    ")) : l5.value);
2673                     (function(){
2674                         return (function(){
2675                             while((function(){
2676                                 var x1 = v283;
2677                                 if (typeof x1 !== 'number') throw 'Not a number!';
2678                                 var x2 = v284;
2679                                 if (typeof x2 !== 'number') throw 'Not a number!';
2680                                 return (x1<x2?l4.value: l5.value);
2681                             })() !== l5.value){
2682                                 (function(v285){
2683                                     return (v282 = l135.fvalue(pv, v282, v285));
2684                                 })(((l81.fvalue(pv, (function(){
2685                                     var string = v281;
2686                                     var index = v283;
2687                                     if (typeof string != 'string')
2688                                         throw 'The value ' + string + ' is not a type string.';
2689                                     if (typeof index != 'number')
2690                                         throw 'The value ' + index + ' is not a type number.';
2691                                     return string.charCodeAt(index);
2692                                 })(), 10) !== l5.value ? ((function(){
2693                                     var x1 = v283;
2694                                     if (typeof x1 !== 'number') throw 'Not a number!';
2695                                     var x2 = l24.fvalue(pv, v284);
2696                                     if (typeof x2 !== 'number') throw 'Not a number!';
2697                                     return (x1<x2?l4.value: l5.value);
2698                                 })() !== l5.value ? l28.fvalue(pv, l81.fvalue(pv, (function(){
2699                                     var string = v281;
2700                                     var index = l23.fvalue(pv, v283);
2701                                     if (typeof string != 'string')
2702                                         throw 'The value ' + string + ' is not a type string.';
2703                                     if (typeof index != 'number')
2704                                         throw 'The value ' + index + ' is not a type number.';
2705                                     return string.charCodeAt(index);
2706                                 })(), 10)) : l5.value) : l5.value) !== l5.value ? l135.fvalue(pv, l99.fvalue(pv, 10), "    ") : l99.fvalue(pv, (function(){
2707                                     var string = v281;
2708                                     var index = v283;
2709                                     if (typeof string != 'string')
2710                                         throw 'The value ' + string + ' is not a type string.';
2711                                     if (typeof index != 'number')
2712                                         throw 'The value ' + index + ' is not a type number.';
2713                                     return string.charCodeAt(index);
2714                                 })())));
2715                                 (v283 = (function(){
2716                                     var x1 = v283;
2717                                     if (typeof x1 !== 'number') throw 'Not a number!';
2718                                     var x2 = 1;
2719                                     if (typeof x2 !== 'number') throw 'Not a number!';
2720                                     return x1+x2;
2721                                 })());
2722                             }return l5.value;
2723                         })();
2724                     })();
2725                     return v282;
2726                 })("",0,l72.fvalue(pv, v281));
2727             })(l137.fvalue(pv, v280));
2728         })();
2729     }));
2730     return l144;
2731 })();
2732 (function(){
2733     (l18).fvalue = (function(v290){
2734         ((v290)["fname"] = "INTEGER-TO-STRING");
2735         return v290;
2736     })((function (values,v287){
2737         checkArgs(arguments, 2);
2738         var i;
2739         return (function(){
2740             return (l25.fvalue(pv, v287) !== l5.value ? "0" : (l84.fvalue(pv, v287) !== l5.value ? l135.fvalue(values, "-", l18.fvalue(pv, (function(){
2741                 var x1 = 0;
2742                 if (typeof x1 !== 'number') throw 'Not a number!';
2743                 var x2 = v287;
2744                 if (typeof x2 !== 'number') throw 'Not a number!';
2745                 return x1-x2;
2746             })())) : (function(v288){
2747                 (function(){
2748                     return (function(){
2749                         while(l28.fvalue(pv, l25.fvalue(pv, v287)) !== l5.value){
2750                             (v288 = ({car: (function(){
2751                                 var x = v287;
2752                                 var y = 10;
2753                                 if (typeof x != 'number')
2754                                     throw 'The value ' + x + ' is not a type number.';
2755                                 if (typeof y != 'number')
2756                                     throw 'The value ' + y + ' is not a type number.';
2757                                 return x%y;
2758                             })(), cdr: v288}));
2759                             (v287 = l26.fvalue(pv, v287, 10));
2760                         }return l5.value;
2761                     })();
2762                 })();
2763                 return l139.fvalue(values, (function (values,v289){
2764                     checkArgs(arguments, 2);
2765                     var i;
2766                     return l99.fvalue(values, l94.fvalue(pv, v289));
2767                 }), v288);
2768             })(l5.value)));
2769         })();
2770     }));
2771     return l18;
2772 })();
2773 var l145 = {name: "JS!BOOL"};
2774 var l146 = {name: "LS-COMPILE"};
2775 (function(){
2776     (l145).fvalue = (function(v292){
2777         ((v292)["fname"] = "JS!BOOL");
2778         return v292;
2779     })((function (values,v291){
2780         checkArgs(arguments, 2);
2781         var i;
2782         return (function(){
2783             return l135.fvalue(values, "(", v291, "?", l146.fvalue(pv, l4.value), ": ", l146.fvalue(pv, l5.value), ")");
2784         })();
2785     }));
2786     return l145;
2787 })();
2788 var l147 = {name: "JS!SELFCALL"};
2789 l147;
2790 var l148 = {name: "PRIN1-TO-STRING"};
2791 var l149 = {name: "ESCAPE-STRING"};
2792 (function(){
2793     (l148).fvalue = (function(v301){
2794         ((v301)["fname"] = "PRIN1-TO-STRING");
2795         return v301;
2796     })((function (values,v293){
2797         checkArgs(arguments, 2);
2798         var i;
2799         return (function(){
2800             return (((function(){
2801                 var tmp = v293;
2802                 return (typeof tmp == 'object' && 'name' in tmp);
2803             })()?l4.value: l5.value) !== l5.value ? (function(){
2804                 var func = (function (values,v295,v296){
2805                     switch(arguments.length-1){
2806                     case 0:
2807                     v295=l5.value;
2808                     case 1:
2809                     v296=l5.value;
2810                     default: break;
2811                     }
2812                     var v294= l5.value;
2813                     for (var i = arguments.length-1; i>=3; i--)
2814                         v294 = {car: arguments[i], cdr:
2815                     v294};
2816                     var i;
2817                     return ((v296 !== l5.value ? ((v295 === v293)?l4.value: l5.value) : l5.value) !== l5.value ? (v293).name : (function(v297,v298){
2818                         return l135.fvalue(values, (l13.fvalue(pv, v297) !== l5.value ? "#" : (((v297 === l114.fvalue(pv, "KEYWORD"))?l4.value: l5.value) !== l5.value ? "" : l115.fvalue(pv, v297))), ":", v298);
2819                     })(l123.fvalue(pv, v293),(v293).name));
2820                 });
2821                 var args = [values];
2822                 return (function(){
2823                     var values = mv;
2824                     var vs;
2825                     vs = l127.fvalue(values, (v293).name, (function(){
2826                         var symbol = l124;
2827                         var value = symbol.value;
2828                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2829                         return value;
2830                     })());
2831                     if (typeof vs === 'object' && 'multiple-value' in vs)
2832                         args = args.concat(vs);
2833                     else
2834                         args.push(vs);
2835                     return func.apply(window, args);
2836                 })();
2837             })() : (l82.fvalue(pv, v293) !== l5.value ? l18.fvalue(values, v293) : (((typeof(v293) == "string")?l4.value: l5.value) !== l5.value ? l135.fvalue(values, "\"", l149.fvalue(pv, v293), "\"") : (((typeof v293 == 'function')?l4.value: l5.value) !== l5.value ? (function(v299){
2838                 return (v299 !== l5.value ? l135.fvalue(values, "#<FUNCTION ", v299, ">") : l135.fvalue(values, "#<FUNCTION>"));
2839             })((function(){
2840                 var tmp = (v293)["fname"];
2841                 return tmp == undefined? l5.value: tmp ;
2842             })()) : (l60.fvalue(pv, v293) !== l5.value ? l135.fvalue(values, "(", l138.fvalue(pv, l74.fvalue(pv, (function(){
2843                 var symbol = l148;
2844                 var func = symbol.fvalue;
2845                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2846                 return func;
2847             })(), l88.fvalue(pv, v293)), " "), (function(v300){
2848                 return (l13.fvalue(pv, (function(){
2849                     var tmp = v300;
2850                     return tmp === l5.value? l5.value: tmp.cdr;
2851                 })()) !== l5.value ? l148.fvalue(pv, (function(){
2852                     var tmp = v300;
2853                     return tmp === l5.value? l5.value: tmp.car;
2854                 })()) : l135.fvalue(pv, l148.fvalue(pv, (function(){
2855                     var tmp = v300;
2856                     return tmp === l5.value? l5.value: tmp.car;
2857                 })()), " . ", l148.fvalue(pv, (function(){
2858                     var tmp = v300;
2859                     return tmp === l5.value? l5.value: tmp.cdr;
2860                 })())));
2861             })(l87.fvalue(pv, v293)), ")") : (((function(){
2862                 var x = v293;
2863                 return typeof x === 'object' && 'length' in x;
2864             })()?l4.value: l5.value) !== l5.value ? l135.fvalue(values, "#", l148.fvalue(pv, l140.fvalue(pv, v293))) : (l113.fvalue(pv, v293) !== l5.value ? l135.fvalue(values, "#<PACKAGE ", l115.fvalue(pv, v293), ">") : l5.value)))))));
2865         })();
2866     }));
2867     return l148;
2868 })();
2869 (function(){
2870     (l103).fvalue = (function(v303){
2871         ((v303)["fname"] = "WRITE-LINE");
2872         return v303;
2873     })((function (values,v302){
2874         checkArgs(arguments, 2);
2875         var i;
2876         return (function(){
2877             (function(){
2878                 var x = v302;
2879                 if (typeof x != 'string')
2880                     throw 'The value ' + x + ' is not a type string.';
2881                 return lisp.write(x);
2882             })();
2883             (function(){
2884                 var x = (function(){
2885                     var symbol = l134;
2886                     var value = symbol.value;
2887                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2888                     return value;
2889                 })();
2890                 if (typeof x != 'string')
2891                     throw 'The value ' + x + ' is not a type string.';
2892                 return lisp.write(x);
2893             })();
2894             return v302;
2895         })();
2896     }));
2897     return l103;
2898 })();
2899 var l150 = {name: "WARN"};
2900 (function(){
2901     (l150).fvalue = (function(v305){
2902         ((v305)["fname"] = "WARN");
2903         return v305;
2904     })((function (values,v304){
2905         checkArgs(arguments, 2);
2906         var i;
2907         return (function(){
2908             (function(){
2909                 var x = "WARNING: ";
2910                 if (typeof x != 'string')
2911                     throw 'The value ' + x + ' is not a type string.';
2912                 return lisp.write(x);
2913             })();
2914             return l103.fvalue(values, v304);
2915         })();
2916     }));
2917     return l150;
2918 })();
2919 var l151 = {name: "PRINT"};
2920 (function(){
2921     (l151).fvalue = (function(v307){
2922         ((v307)["fname"] = "PRINT");
2923         return v307;
2924     })((function (values,v306){
2925         checkArgs(arguments, 2);
2926         var i;
2927         return (function(){
2928             l103.fvalue(pv, l148.fvalue(pv, v306));
2929             return v306;
2930         })();
2931     }));
2932     return l151;
2933 })();
2934 var l152 = {name: "MAKE-STRING-STREAM"};
2935 (function(){
2936     (l152).fvalue = (function(v309){
2937         ((v309)["fname"] = "MAKE-STRING-STREAM");
2938         return v309;
2939     })((function (values,v308){
2940         checkArgs(arguments, 2);
2941         var i;
2942         return (function(){
2943             return ({car: v308, cdr: 0});
2944         })();
2945     }));
2946     return l152;
2947 })();
2948 var l153 = {name: "%PEEK-CHAR"};
2949 (function(){
2950     (l153).fvalue = (function(v311){
2951         ((v311)["fname"] = "%PEEK-CHAR");
2952         return v311;
2953     })((function (values,v310){
2954         checkArgs(arguments, 2);
2955         var i;
2956         return (function(){
2957             return ((function(){
2958                 var x1 = (function(){
2959                     var tmp = v310;
2960                     return tmp === l5.value? l5.value: tmp.cdr;
2961                 })();
2962                 if (typeof x1 !== 'number') throw 'Not a number!';
2963                 var x2 = l72.fvalue(pv, (function(){
2964                     var tmp = v310;
2965                     return tmp === l5.value? l5.value: tmp.car;
2966                 })());
2967                 if (typeof x2 !== 'number') throw 'Not a number!';
2968                 return (x1<x2?l4.value: l5.value);
2969             })() !== l5.value ? (function(){
2970                 var string = (function(){
2971                     var tmp = v310;
2972                     return tmp === l5.value? l5.value: tmp.car;
2973                 })();
2974                 var index = (function(){
2975                     var tmp = v310;
2976                     return tmp === l5.value? l5.value: tmp.cdr;
2977                 })();
2978                 if (typeof string != 'string')
2979                     throw 'The value ' + string + ' is not a type string.';
2980                 if (typeof index != 'number')
2981                     throw 'The value ' + index + ' is not a type number.';
2982                 return string.charCodeAt(index);
2983             })() : l5.value);
2984         })();
2985     }));
2986     return l153;
2987 })();
2988 var l154 = {name: "%READ-CHAR"};
2989 (function(){
2990     (l154).fvalue = (function(v314){
2991         ((v314)["fname"] = "%READ-CHAR");
2992         return v314;
2993     })((function (values,v312){
2994         checkArgs(arguments, 2);
2995         var i;
2996         return (function(){
2997             return ((function(){
2998                 var x1 = (function(){
2999                     var tmp = v312;
3000                     return tmp === l5.value? l5.value: tmp.cdr;
3001                 })();
3002                 if (typeof x1 !== 'number') throw 'Not a number!';
3003                 var x2 = l72.fvalue(pv, (function(){
3004                     var tmp = v312;
3005                     return tmp === l5.value? l5.value: tmp.car;
3006                 })());
3007                 if (typeof x2 !== 'number') throw 'Not a number!';
3008                 return (x1<x2?l4.value: l5.value);
3009             })() !== l5.value ? (function(v313){
3010                 (function(){
3011                     var x = v312;
3012                     if (typeof x != 'object')
3013                         throw 'The value ' + x + ' is not a type object.';
3014                     return (x.cdr = l23.fvalue(pv, (function(){
3015                         var tmp = v312;
3016                         return tmp === l5.value? l5.value: tmp.cdr;
3017                     })()), x);
3018                 })();
3019                 return v313;
3020             })((function(){
3021                 var string = (function(){
3022                     var tmp = v312;
3023                     return tmp === l5.value? l5.value: tmp.car;
3024                 })();
3025                 var index = (function(){
3026                     var tmp = v312;
3027                     return tmp === l5.value? l5.value: tmp.cdr;
3028                 })();
3029                 if (typeof string != 'string')
3030                     throw 'The value ' + string + ' is not a type string.';
3031                 if (typeof index != 'number')
3032                     throw 'The value ' + index + ' is not a type number.';
3033                 return string.charCodeAt(index);
3034             })()) : l5.value);
3035         })();
3036     }));
3037     return l154;
3038 })();
3039 var l155 = {name: "WHITESPACEP"};
3040 (function(){
3041     (l155).fvalue = (function(v318){
3042         ((v318)["fname"] = "WHITESPACEP");
3043         return v318;
3044     })((function (values,v315){
3045         checkArgs(arguments, 2);
3046         var i;
3047         return (function(){
3048             return (function(v316){
3049                 return (v316 !== l5.value ? v316 : (function(v317){
3050                     return (v317 !== l5.value ? v317 : l81.fvalue(values, v315, 9));
3051                 })(l81.fvalue(pv, v315, 10)));
3052             })(l81.fvalue(pv, v315, 32));
3053         })();
3054     }));
3055     return l155;
3056 })();
3057 var l156 = {name: "SKIP-WHITESPACES"};
3058 (function(){
3059     (l156).fvalue = (function(v321){
3060         ((v321)["fname"] = "SKIP-WHITESPACES");
3061         return v321;
3062     })((function (values,v319){
3063         checkArgs(arguments, 2);
3064         var i;
3065         return (function(){
3066             return (function(v320){
3067                 (v320 = l153.fvalue(pv, v319));
3068                 return (function(){
3069                     return (function(){
3070                         while((v320 !== l5.value ? l155.fvalue(pv, v320) : l5.value) !== l5.value){
3071                             l154.fvalue(pv, v319);
3072                             (v320 = l153.fvalue(pv, v319));
3073                         }return l5.value;
3074                     })();
3075                 })();
3076             })(l5.value);
3077         })();
3078     }));
3079     return l156;
3080 })();
3081 var l157 = {name: "TERMINALP"};
3082 (function(){
3083     (l157).fvalue = (function(v326){
3084         ((v326)["fname"] = "TERMINALP");
3085         return v326;
3086     })((function (values,v322){
3087         checkArgs(arguments, 2);
3088         var i;
3089         return (function(){
3090             return (function(v323){
3091                 return (v323 !== l5.value ? v323 : (function(v324){
3092                     return (v324 !== l5.value ? v324 : (function(v325){
3093                         return (v325 !== l5.value ? v325 : l81.fvalue(values, 40, v322));
3094                     })(l81.fvalue(pv, 41, v322)));
3095                 })(l155.fvalue(pv, v322)));
3096             })(l13.fvalue(pv, v322));
3097         })();
3098     }));
3099     return l157;
3100 })();
3101 var l158 = {name: "READ-UNTIL"};
3102 (function(){
3103     (l158).fvalue = (function(v331){
3104         ((v331)["fname"] = "READ-UNTIL");
3105         return v331;
3106     })((function (values,v327,v328){
3107         checkArgs(arguments, 3);
3108         var i;
3109         return (function(){
3110             return (function(v329,v330){
3111                 (v330 = l153.fvalue(pv, v327));
3112                 (function(){
3113                     return (function(){
3114                         while((v330 !== l5.value ? l28.fvalue(pv, (v328)(pv, v330)) : l5.value) !== l5.value){
3115                             (v329 = l135.fvalue(pv, v329, l99.fvalue(pv, v330)));
3116                             l154.fvalue(pv, v327);
3117                             (v330 = l153.fvalue(pv, v327));
3118                         }return l5.value;
3119                     })();
3120                 })();
3121                 return v329;
3122             })("",l5.value);
3123         })();
3124     }));
3125     return l158;
3126 })();
3127 var l159 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
3128 (function(){
3129     (l159).fvalue = (function(v335){
3130         ((v335)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
3131         return v335;
3132     })((function (values,v332){
3133         checkArgs(arguments, 2);
3134         var i;
3135         return (function(){
3136             return (function(v333){
3137                 l156.fvalue(pv, v332);
3138                 (v333 = l153.fvalue(pv, v332));
3139                 return (function(){
3140                     return (function(){
3141                         while((v333 !== l5.value ? l81.fvalue(pv, v333, 59) : l5.value) !== l5.value){
3142                             l158.fvalue(pv, v332, (function (values,v334){
3143                                 checkArgs(arguments, 2);
3144                                 var i;
3145                                 return l81.fvalue(values, v334, 10);
3146                             }));
3147                             l156.fvalue(pv, v332);
3148                             (v333 = l153.fvalue(pv, v332));
3149                         }return l5.value;
3150                     })();
3151                 })();
3152             })(l5.value);
3153         })();
3154     }));
3155     return l159;
3156 })();
3157 var l160 = {name: "%READ-LIST"};
3158 var l161 = {name: "LS-READ"};
3159 (function(){
3160     (l160).fvalue = (function(v339){
3161         ((v339)["fname"] = "%READ-LIST");
3162         return v339;
3163     })((function (values,v336){
3164         checkArgs(arguments, 2);
3165         var i;
3166         return (function(){
3167             l159.fvalue(pv, v336);
3168             return (function(v337){
3169                 return (l13.fvalue(pv, v337) !== l5.value ? (function(){
3170                     throw "Unspected EOF";
3171                 })() : (l81.fvalue(pv, v337, 41) !== l5.value ? (function(){
3172                     l154.fvalue(pv, v336);
3173                     return l5.value;
3174                 })() : (l81.fvalue(pv, v337, 46) !== l5.value ? (function(){
3175                     l154.fvalue(pv, v336);
3176                     return (function(v338){
3177                         l159.fvalue(pv, v336);
3178                         (l81.fvalue(pv, l154.fvalue(pv, v336), 41) !== l5.value ? l5.value : (function(){
3179                             throw "')' was expected.";
3180                         })());
3181                         return v338;
3182                     })(l161.fvalue(pv, v336));
3183                 })() : ({car: l161.fvalue(pv, v336), cdr: l160.fvalue(pv, v336)}))));
3184             })(l153.fvalue(pv, v336));
3185         })();
3186     }));
3187     return l160;
3188 })();
3189 var l162 = {name: "READ-STRING"};
3190 (function(){
3191     (l162).fvalue = (function(v343){
3192         ((v343)["fname"] = "READ-STRING");
3193         return v343;
3194     })((function (values,v340){
3195         checkArgs(arguments, 2);
3196         var i;
3197         return (function(){
3198             return (function(v341,v342){
3199                 (v342 = l154.fvalue(pv, v340));
3200                 (function(){
3201                     return (function(){
3202                         while(l28.fvalue(pv, l27.fvalue(pv, v342, 34)) !== l5.value){
3203                             (l13.fvalue(pv, v342) !== l5.value ? (function(){
3204                                 throw "Unexpected EOF";
3205                             })() : l5.value);
3206                             (l27.fvalue(pv, v342, 92) !== l5.value ? (v342 = l154.fvalue(pv, v340)) : l5.value);
3207                             (v341 = l135.fvalue(pv, v341, l99.fvalue(pv, v342)));
3208                             (v342 = l154.fvalue(pv, v340));
3209                         }return l5.value;
3210                     })();
3211                 })();
3212                 return v341;
3213             })("",l5.value);
3214         })();
3215     }));
3216     return l162;
3217 })();
3218 var l163 = {name: "READ-SHARP"};
3219 (function(){
3220     (l163).fvalue = (function(v348){
3221         ((v348)["fname"] = "READ-SHARP");
3222         return v348;
3223     })((function (values,v344){
3224         checkArgs(arguments, 2);
3225         var i;
3226         return (function(){
3227             l154.fvalue(pv, v344);
3228             return (function(v345){
3229                 return (l27.fvalue(pv, v345, 39) !== l5.value ? l45.fvalue(values, l105, l161.fvalue(pv, v344)) : (l27.fvalue(pv, v345, 40) !== l5.value ? l141.fvalue(values, l160.fvalue(pv, v344)) : (l27.fvalue(pv, v345, 58) !== l5.value ? (function(){
3230                     var name = (function(){
3231                         var x = l158.fvalue(pv, v344, (function(){
3232                             var symbol = l157;
3233                             var func = symbol.fvalue;
3234                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3235                             return func;
3236                         })());
3237                         if (typeof x != 'string')
3238                             throw 'The value ' + x + ' is not a type string.';
3239                         return x.toUpperCase();
3240                     })();
3241                     if (typeof name != 'string')
3242                         throw 'The value ' + name + ' is not a type string.';
3243                     return ({name: name});
3244                 })() : (l27.fvalue(pv, v345, 92) !== l5.value ? (function(v346){
3245                     return (l100.fvalue(pv, v346, "space") !== l5.value ? l80.fvalue(values, 32) : (l100.fvalue(pv, v346, "tab") !== l5.value ? l80.fvalue(values, 9) : (l100.fvalue(pv, v346, "newline") !== l5.value ? l80.fvalue(values, 10) : l80.fvalue(values, (function(){
3246                         var string = v346;
3247                         var index = 0;
3248                         if (typeof string != 'string')
3249                             throw 'The value ' + string + ' is not a type string.';
3250                         if (typeof index != 'number')
3251                             throw 'The value ' + index + ' is not a type number.';
3252                         return string.charCodeAt(index);
3253                     })()))));
3254                 })(l135.fvalue(pv, l99.fvalue(pv, l154.fvalue(pv, v344)), l158.fvalue(pv, v344, (function(){
3255                     var symbol = l157;
3256                     var func = symbol.fvalue;
3257                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3258                     return func;
3259                 })()))) : (l27.fvalue(pv, v345, 43) !== l5.value ? (function(v347){
3260                     return (l100.fvalue(pv, v347, "common-lisp") !== l5.value ? (function(){
3261                         l161.fvalue(pv, v344);
3262                         return l161.fvalue(values, v344);
3263                     })() : (l100.fvalue(pv, v347, "ecmalisp") !== l5.value ? l161.fvalue(values, v344) : (function(){
3264                         throw "Unknown reader form.";
3265                     })()));
3266                 })(l158.fvalue(pv, v344, (function(){
3267                     var symbol = l157;
3268                     var func = symbol.fvalue;
3269                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3270                     return func;
3271                 })())) : (function(){
3272                     throw "ECASE expression failed.";
3273                 })())))));
3274             })(l154.fvalue(pv, v344));
3275         })();
3276     }));
3277     return l163;
3278 })();
3279 var l164 = {name: "READ-SYMBOL"};
3280 (function(){
3281     (l164).fvalue = (function(v356){
3282         ((v356)["fname"] = "READ-SYMBOL");
3283         return v356;
3284     })((function (values,v349){
3285         checkArgs(arguments, 2);
3286         var i;
3287         return (function(){
3288             return (function(v350,v351,v352,v353,v354){
3289                 (v354 = 0);
3290                 (function(){
3291                     return (function(){
3292                         while(((function(){
3293                             var x1 = v354;
3294                             if (typeof x1 !== 'number') throw 'Not a number!';
3295                             var x2 = v350;
3296                             if (typeof x2 !== 'number') throw 'Not a number!';
3297                             return (x1<x2?l4.value: l5.value);
3298                         })() !== l5.value ? l28.fvalue(pv, l81.fvalue(pv, (function(){
3299                             var string = v349;
3300                             var index = v354;
3301                             if (typeof string != 'string')
3302                                 throw 'The value ' + string + ' is not a type string.';
3303                             if (typeof index != 'number')
3304                                 throw 'The value ' + index + ' is not a type number.';
3305                             return string.charCodeAt(index);
3306                         })(), 58)) : l5.value) !== l5.value){
3307                             (v354 = (function(){
3308                                 var x1 = v354;
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                             })());
3314                         }return l5.value;
3315                     })();
3316                 })();
3317                 ((function(){
3318                     var x1 = v354;
3319                     if (typeof x1 !== 'number') throw 'Not a number!';
3320                     var x2 = v350;
3321                     if (typeof x2 !== 'number') throw 'Not a number!';
3322                     return (x1==x2?l4.value: l5.value);
3323                 })() !== l5.value ? (function(){
3324                     (v352 = v349);
3325                     (v351 = (function(){
3326                         var symbol = l124;
3327                         var value = symbol.value;
3328                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3329                         return value;
3330                     })());
3331                     return (v353 = l4.value);
3332                 })() : (function(){
3333                     (l25.fvalue(pv, v354) !== l5.value ? (v351 = "KEYWORD") : (v351 = (function(){
3334                         var x = l95.fvalue(pv, v349, 0, v354);
3335                         if (typeof x != 'string')
3336                             throw 'The value ' + x + ' is not a type string.';
3337                         return x.toUpperCase();
3338                     })()));
3339                     (v354 = (function(){
3340                         var x1 = v354;
3341                         if (typeof x1 !== 'number') throw 'Not a number!';
3342                         var x2 = 1;
3343                         if (typeof x2 !== 'number') throw 'Not a number!';
3344                         return x1+x2;
3345                     })());
3346                     (l81.fvalue(pv, (function(){
3347                         var string = v349;
3348                         var index = v354;
3349                         if (typeof string != 'string')
3350                             throw 'The value ' + string + ' is not a type string.';
3351                         if (typeof index != 'number')
3352                             throw 'The value ' + index + ' is not a type number.';
3353                         return string.charCodeAt(index);
3354                     })(), 58) !== l5.value ? (function(){
3355                         (v353 = l4.value);
3356                         return (v354 = (function(){
3357                             var x1 = v354;
3358                             if (typeof x1 !== 'number') throw 'Not a number!';
3359                             var x2 = 1;
3360                             if (typeof x2 !== 'number') throw 'Not a number!';
3361                             return x1+x2;
3362                         })());
3363                     })() : l5.value);
3364                     return (v352 = l95.fvalue(pv, v349, v354));
3365                 })());
3366                 (v352 = (function(){
3367                     var x = v352;
3368                     if (typeof x != 'string')
3369                         throw 'The value ' + x + ' is not a type string.';
3370                     return x.toUpperCase();
3371                 })());
3372                 (v351 = l114.fvalue(pv, v351));
3373                 return ((function(v355){
3374                     return (v355 !== l5.value ? v355 : ((v351 === l114.fvalue(pv, "KEYWORD"))?l4.value: l5.value));
3375                 })(v353) !== l5.value ? l131.fvalue(values, v352, v351) : l127.fvalue(values, v352, v351));
3376             })(l72.fvalue(pv, v349),l5.value,l5.value,l5.value,l5.value);
3377         })();
3378     }));
3379     return l164;
3380 })();
3381 var l165 = {name: "!PARSE-INTEGER"};
3382 (function(){
3383     (l165).fvalue = (function(v367){
3384         ((v367)["fname"] = "!PARSE-INTEGER");
3385         return v367;
3386     })((function (values,v357,v358){
3387         checkArgs(arguments, 3);
3388         var i;
3389         return (function(){
3390             return (function(){
3391                 try {
3392                     return (function(v359,v360,v361,v362){
3393                         (l25.fvalue(pv, v361) !== l5.value ? (function(){
3394                             var values = mv;
3395                             throw ({type: 'block', id: 141, values: values(l5.value, 0), message: 'Return from unknown block NIL.'})
3396                         })() : l5.value);
3397                         (function(v363){
3398                             return (l27.fvalue(pv, v363, 43) !== l5.value ? (v360 = (function(){
3399                                 var x1 = v360;
3400                                 if (typeof x1 !== 'number') throw 'Not a number!';
3401                                 var x2 = 1;
3402                                 if (typeof x2 !== 'number') throw 'Not a number!';
3403                                 return x1+x2;
3404                             })()) : (l27.fvalue(pv, v363, 45) !== l5.value ? (function(){
3405                                 (v362 = -1);
3406                                 return (v360 = (function(){
3407                                     var x1 = v360;
3408                                     if (typeof x1 !== 'number') throw 'Not a number!';
3409                                     var x2 = 1;
3410                                     if (typeof x2 !== 'number') throw 'Not a number!';
3411                                     return x1+x2;
3412                                 })());
3413                             })() : l5.value));
3414                         })((function(){
3415                             var string = v357;
3416                             var index = 0;
3417                             if (typeof string != 'string')
3418                                 throw 'The value ' + string + ' is not a type string.';
3419                             if (typeof index != 'number')
3420                                 throw 'The value ' + index + ' is not a type number.';
3421                             return string.charCodeAt(index);
3422                         })());
3423                         (((function(){
3424                             var x1 = v360;
3425                             if (typeof x1 !== 'number') throw 'Not a number!';
3426                             var x2 = v361;
3427                             if (typeof x2 !== 'number') throw 'Not a number!';
3428                             return (x1<x2?l4.value: l5.value);
3429                         })() !== l5.value ? (v359 = l93.fvalue(pv, (function(){
3430                             var string = v357;
3431                             var index = v360;
3432                             if (typeof string != 'string')
3433                                 throw 'The value ' + string + ' is not a type string.';
3434                             if (typeof index != 'number')
3435                                 throw 'The value ' + index + ' is not a type number.';
3436                             return string.charCodeAt(index);
3437                         })())) : l5.value) !== l5.value ? l5.value : (function(){
3438                             var values = mv;
3439                             throw ({type: 'block', id: 141, values: values(l5.value, v360), message: 'Return from unknown block NIL.'})
3440                         })());
3441                         (v360 = (function(){
3442                             var x1 = v360;
3443                             if (typeof x1 !== 'number') throw 'Not a number!';
3444                             var x2 = 1;
3445                             if (typeof x2 !== 'number') throw 'Not a number!';
3446                             return x1+x2;
3447                         })());
3448                         (function(){
3449                             try {
3450                                 return (function(){
3451                                     while((function(){
3452                                         var x1 = v360;
3453                                         if (typeof x1 !== 'number') throw 'Not a number!';
3454                                         var x2 = v361;
3455                                         if (typeof x2 !== 'number') throw 'Not a number!';
3456                                         return (x1<x2?l4.value: l5.value);
3457                                     })() !== l5.value){
3458                                         (function(v364){
3459                                             (v364 !== l5.value ? l5.value : (function(){
3460                                                 throw ({type: 'block', id: 142, values: l5.value, message: 'Return from unknown block NIL.'})
3461                                             })());
3462                                             (v359 = (function(){
3463                                                 var x1 = (function(){
3464                                                     var x1 = v359;
3465                                                     if (typeof x1 !== 'number') throw 'Not a number!';
3466                                                     var x2 = 10;
3467                                                     if (typeof x2 !== 'number') throw 'Not a number!';
3468                                                     return x1*x2;
3469                                                 })();
3470                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3471                                                 var x2 = v364;
3472                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3473                                                 return x1+x2;
3474                                             })());
3475                                             return (v360 = (function(){
3476                                                 var x1 = v360;
3477                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3478                                                 var x2 = 1;
3479                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3480                                                 return x1+x2;
3481                                             })());
3482                                         })(l93.fvalue(pv, (function(){
3483                                             var string = v357;
3484                                             var index = v360;
3485                                             if (typeof string != 'string')
3486                                                 throw 'The value ' + string + ' is not a type string.';
3487                                             if (typeof index != 'number')
3488                                                 throw 'The value ' + index + ' is not a type number.';
3489                                             return string.charCodeAt(index);
3490                                         })()));
3491                                     }return l5.value;
3492                                 })();
3493                             }
3494                             catch (cf){
3495                                 if (cf.type == 'block' && cf.id == 142)
3496                                     return cf.values;
3497                                 else
3498                                     throw cf;
3499                             }
3500                         })();
3501                         return ((function(v365){
3502                             return (v365 !== l5.value ? v365 : (function(v366){
3503                                 return (v366 !== l5.value ? v366 : l81.fvalue(pv, (function(){
3504                                     var string = v357;
3505                                     var index = v360;
3506                                     if (typeof string != 'string')
3507                                         throw 'The value ' + string + ' is not a type string.';
3508                                     if (typeof index != 'number')
3509                                         throw 'The value ' + index + ' is not a type number.';
3510                                     return string.charCodeAt(index);
3511                                 })(), 32));
3512                             })((function(){
3513                                 var x1 = v360;
3514                                 if (typeof x1 !== 'number') throw 'Not a number!';
3515                                 var x2 = v361;
3516                                 if (typeof x2 !== 'number') throw 'Not a number!';
3517                                 return (x1==x2?l4.value: l5.value);
3518                             })()));
3519                         })(v358) !== l5.value ? values((function(){
3520                             var x1 = v362;
3521                             if (typeof x1 !== 'number') throw 'Not a number!';
3522                             var x2 = v359;
3523                             if (typeof x2 !== 'number') throw 'Not a number!';
3524                             return x1*x2;
3525                         })(), v360) : values(l5.value, v360));
3526                     })(0,0,l72.fvalue(pv, v357),1);
3527                 }
3528                 catch (cf){
3529                     if (cf.type == 'block' && cf.id == 141)
3530                         return values.apply(this, forcemv(cf.values));
3531                     else
3532                         throw cf;
3533                 }
3534             })();
3535         })();
3536     }));
3537     return l165;
3538 })();
3539 var l166 = {name: "PARSE-INTEGER"};
3540 (function(){
3541     (l166).fvalue = (function(v369){
3542         ((v369)["fname"] = "PARSE-INTEGER");
3543         return v369;
3544     })((function (values,v368){
3545         checkArgs(arguments, 2);
3546         var i;
3547         return (function(){
3548             return l165.fvalue(values, v368, l5.value);
3549         })();
3550     }));
3551     return l166;
3552 })();
3553 var l167 = {name: "*EOF*"};
3554 (function(){
3555     (((l167.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l167).value = l17.fvalue(pv)));
3556     return l167;
3557 })();
3558 var l168 = {name: "QUOTE"};
3559 var l169 = {name: "BACKQUOTE"};
3560 var l170 = {name: "UNQUOTE-SPLICING"};
3561 var l171 = {name: "UNQUOTE"};
3562 (function(){
3563     (l161).fvalue = (function(v375){
3564         ((v375)["fname"] = "LS-READ");
3565         return v375;
3566     })((function (values,v370){
3567         checkArgs(arguments, 2);
3568         var i;
3569         return (function(){
3570             l159.fvalue(pv, v370);
3571             return (function(v371){
3572                 return ((function(v372){
3573                     return (v372 !== l5.value ? v372 : l81.fvalue(pv, v371, 41));
3574                 })(l13.fvalue(pv, v371)) !== l5.value ? (function(){
3575                     var symbol = l167;
3576                     var value = symbol.value;
3577                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3578                     return value;
3579                 })() : (l81.fvalue(pv, v371, 40) !== l5.value ? (function(){
3580                     l154.fvalue(pv, v370);
3581                     return l160.fvalue(values, v370);
3582                 })() : (l81.fvalue(pv, v371, 39) !== l5.value ? (function(){
3583                     l154.fvalue(pv, v370);
3584                     return l45.fvalue(values, l168, l161.fvalue(pv, v370));
3585                 })() : (l81.fvalue(pv, v371, 96) !== l5.value ? (function(){
3586                     l154.fvalue(pv, v370);
3587                     return l45.fvalue(values, l169, l161.fvalue(pv, v370));
3588                 })() : (l81.fvalue(pv, v371, 34) !== l5.value ? (function(){
3589                     l154.fvalue(pv, v370);
3590                     return l162.fvalue(values, v370);
3591                 })() : (l81.fvalue(pv, v371, 44) !== l5.value ? (function(){
3592                     l154.fvalue(pv, v370);
3593                     return (l27.fvalue(pv, l153.fvalue(pv, v370), 64) !== l5.value ? (function(){
3594                         l154.fvalue(pv, v370);
3595                         return l45.fvalue(values, l170, l161.fvalue(pv, v370));
3596                     })() : l45.fvalue(values, l171, l161.fvalue(pv, v370)));
3597                 })() : (l81.fvalue(pv, v371, 35) !== l5.value ? l163.fvalue(values, v370) : (function(v373){
3598                     return (function(v374){
3599                         return (v374 !== l5.value ? v374 : l164.fvalue(values, v373));
3600                     })(pv(l165.fvalue(pv, v373, l5.value)));
3601                 })(l158.fvalue(pv, v370, (function(){
3602                     var symbol = l157;
3603                     var func = symbol.fvalue;
3604                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3605                     return func;
3606                 })())))))))));
3607             })(l153.fvalue(pv, v370));
3608         })();
3609     }));
3610     return l161;
3611 })();
3612 var l172 = {name: "LS-READ-FROM-STRING"};
3613 (function(){
3614     (l172).fvalue = (function(v377){
3615         ((v377)["fname"] = "LS-READ-FROM-STRING");
3616         return v377;
3617     })((function (values,v376){
3618         checkArgs(arguments, 2);
3619         var i;
3620         return (function(){
3621             return l161.fvalue(values, l152.fvalue(pv, v376));
3622         })();
3623     }));
3624     return l172;
3625 })();
3626 var l173 = {name: "*MULTIPLE-VALUE-P*"};
3627 (function(){
3628     (((l173.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l173).value = l5.value));
3629     return l173;
3630 })();
3631 var l174 = {name: "MAKE-BINDING"};
3632 (function(){
3633     (l174).fvalue = (function(v382){
3634         ((v382)["fname"] = "MAKE-BINDING");
3635         return v382;
3636     })((function (values,v378,v379,v380,v381){
3637         checkArgsAtLeast(arguments, 4);
3638         checkArgsAtMost(arguments, 5);
3639         switch(arguments.length-1){
3640         case 3:
3641         v381=l5.value;
3642         default: break;
3643         }
3644         var i;
3645         return (function(){
3646             return l45.fvalue(values, v378, v379, v380, v381);
3647         })();
3648     }));
3649     return l174;
3650 })();
3651 var l175 = {name: "BINDING-NAME"};
3652 (function(){
3653     (l175).fvalue = (function(v384){
3654         ((v384)["fname"] = "BINDING-NAME");
3655         return v384;
3656     })((function (values,v383){
3657         checkArgs(arguments, 2);
3658         var i;
3659         return (function(){
3660             return l40.fvalue(values, v383);
3661         })();
3662     }));
3663     return l175;
3664 })();
3665 var l176 = {name: "BINDING-TYPE"};
3666 (function(){
3667     (l176).fvalue = (function(v386){
3668         ((v386)["fname"] = "BINDING-TYPE");
3669         return v386;
3670     })((function (values,v385){
3671         checkArgs(arguments, 2);
3672         var i;
3673         return (function(){
3674             return l41.fvalue(values, v385);
3675         })();
3676     }));
3677     return l176;
3678 })();
3679 var l177 = {name: "BINDING-VALUE"};
3680 (function(){
3681     (l177).fvalue = (function(v388){
3682         ((v388)["fname"] = "BINDING-VALUE");
3683         return v388;
3684     })((function (values,v387){
3685         checkArgs(arguments, 2);
3686         var i;
3687         return (function(){
3688             return l42.fvalue(values, v387);
3689         })();
3690     }));
3691     return l177;
3692 })();
3693 var l178 = {name: "BINDING-DECLARATIONS"};
3694 (function(){
3695     (l178).fvalue = (function(v390){
3696         ((v390)["fname"] = "BINDING-DECLARATIONS");
3697         return v390;
3698     })((function (values,v389){
3699         checkArgs(arguments, 2);
3700         var i;
3701         return (function(){
3702             return l43.fvalue(values, v389);
3703         })();
3704     }));
3705     return l178;
3706 })();
3707 var l179 = {name: "SET-BINDING-VALUE"};
3708 (function(){
3709     (l179).fvalue = (function(v393){
3710         ((v393)["fname"] = "SET-BINDING-VALUE");
3711         return v393;
3712     })((function (values,v391,v392){
3713         checkArgs(arguments, 3);
3714         var i;
3715         return (function(){
3716             return (function(){
3717                 var x = l36.fvalue(pv, v391);
3718                 if (typeof x != 'object')
3719                     throw 'The value ' + x + ' is not a type object.';
3720                 return (x.car = v392, x);
3721             })();
3722         })();
3723     }));
3724     return l179;
3725 })();
3726 var l180 = {name: "SET-BINDING-DECLARATIONS"};
3727 (function(){
3728     (l180).fvalue = (function(v396){
3729         ((v396)["fname"] = "SET-BINDING-DECLARATIONS");
3730         return v396;
3731     })((function (values,v394,v395){
3732         checkArgs(arguments, 3);
3733         var i;
3734         return (function(){
3735             return (function(){
3736                 var x = l38.fvalue(pv, v394);
3737                 if (typeof x != 'object')
3738                     throw 'The value ' + x + ' is not a type object.';
3739                 return (x.car = v395, x);
3740             })();
3741         })();
3742     }));
3743     return l180;
3744 })();
3745 var l181 = {name: "PUSH-BINDING-DECLARATION"};
3746 (function(){
3747     (l181).fvalue = (function(v399){
3748         ((v399)["fname"] = "PUSH-BINDING-DECLARATION");
3749         return v399;
3750     })((function (values,v397,v398){
3751         checkArgs(arguments, 3);
3752         var i;
3753         return (function(){
3754             return l180.fvalue(values, v398, ({car: v397, cdr: l178.fvalue(pv, v398)}));
3755         })();
3756     }));
3757     return l181;
3758 })();
3759 var l182 = {name: "MAKE-LEXENV"};
3760 (function(){
3761     (l182).fvalue = (function(v400){
3762         ((v400)["fname"] = "MAKE-LEXENV");
3763         return v400;
3764     })((function (values){
3765         checkArgsAtMost(arguments, 1);
3766         var i;
3767         return (function(){
3768             return l45.fvalue(values, l5.value, l5.value, l5.value, l5.value);
3769         })();
3770     }));
3771     return l182;
3772 })();
3773 var l183 = {name: "COPY-LEXENV"};
3774 (function(){
3775     (l183).fvalue = (function(v402){
3776         ((v402)["fname"] = "COPY-LEXENV");
3777         return v402;
3778     })((function (values,v401){
3779         checkArgs(arguments, 2);
3780         var i;
3781         return (function(){
3782             return l78.fvalue(values, v401);
3783         })();
3784     }));
3785     return l183;
3786 })();
3787 var l184 = {name: "PUSH-TO-LEXENV"};
3788 var l185 = {name: "BLOCK"};
3789 var l186 = {name: "GOTAG"};
3790 (function(){
3791     (l184).fvalue = (function(v407){
3792         ((v407)["fname"] = "PUSH-TO-LEXENV");
3793         return v407;
3794     })((function (values,v403,v404,v405){
3795         checkArgs(arguments, 4);
3796         var i;
3797         return (function(){
3798             return (function(v406){
3799                 return (l27.fvalue(pv, v406, l106) !== l5.value ? (function(){
3800                     var x = v404;
3801                     if (typeof x != 'object')
3802                         throw 'The value ' + x + ' is not a type object.';
3803                     return (x.car = ({car: v403, cdr: (function(){
3804                         var tmp = v404;
3805                         return tmp === l5.value? l5.value: tmp.car;
3806                     })()}), x);
3807                 })() : (l27.fvalue(pv, v406, l105) !== l5.value ? (function(){
3808                     var x = (function(){
3809                         var tmp = v404;
3810                         return tmp === l5.value? l5.value: tmp.cdr;
3811                     })();
3812                     if (typeof x != 'object')
3813                         throw 'The value ' + x + ' is not a type object.';
3814                     return (x.car = ({car: v403, cdr: l34.fvalue(pv, v404)}), x);
3815                 })() : (l27.fvalue(pv, v406, l185) !== l5.value ? (function(){
3816                     var x = l36.fvalue(pv, v404);
3817                     if (typeof x != 'object')
3818                         throw 'The value ' + x + ' is not a type object.';
3819                     return (x.car = ({car: v403, cdr: l37.fvalue(pv, v404)}), x);
3820                 })() : (l27.fvalue(pv, v406, l186) !== l5.value ? (function(){
3821                     var x = l38.fvalue(pv, v404);
3822                     if (typeof x != 'object')
3823                         throw 'The value ' + x + ' is not a type object.';
3824                     return (x.car = ({car: v403, cdr: l39.fvalue(pv, v404)}), x);
3825                 })() : (function(){
3826                     throw "ECASE expression failed.";
3827                 })()))));
3828             })(v405);
3829         })();
3830     }));
3831     return l184;
3832 })();
3833 var l187 = {name: "EXTEND-LEXENV"};
3834 (function(){
3835     (l187).fvalue = (function(v414){
3836         ((v414)["fname"] = "EXTEND-LEXENV");
3837         return v414;
3838     })((function (values,v408,v409,v410){
3839         checkArgs(arguments, 4);
3840         var i;
3841         return (function(){
3842             return (function(v411){
3843                 return (function(){
3844                     return (function(v412,v413){
3845                         (function(){
3846                             while(v412 !== l5.value){
3847                                 (v413 = (function(){
3848                                     var tmp = v412;
3849                                     return tmp === l5.value? l5.value: tmp.car;
3850                                 })());
3851                                 (function(){
3852                                     l184.fvalue(pv, v413, v411, v410);
3853                                     return l5.value;
3854                                 })();
3855                                 (v412 = (function(){
3856                                     var tmp = v412;
3857                                     return tmp === l5.value? l5.value: tmp.cdr;
3858                                 })());
3859                             }return l5.value;
3860                         })();
3861                         return v411;
3862                     })(l67.fvalue(pv, v408),l5.value);
3863                 })();
3864             })(l183.fvalue(pv, v409));
3865         })();
3866     }));
3867     return l187;
3868 })();
3869 var l188 = {name: "LOOKUP-IN-LEXENV"};
3870 (function(){
3871     (l188).fvalue = (function(v419){
3872         ((v419)["fname"] = "LOOKUP-IN-LEXENV");
3873         return v419;
3874     })((function (values,v415,v416,v417){
3875         checkArgs(arguments, 4);
3876         var i;
3877         return (function(){
3878             return l98.fvalue(values, v415, (function(v418){
3879                 return (l27.fvalue(pv, v418, l106) !== l5.value ? l40.fvalue(pv, v416) : (l27.fvalue(pv, v418, l105) !== l5.value ? l41.fvalue(pv, v416) : (l27.fvalue(pv, v418, l185) !== l5.value ? l42.fvalue(pv, v416) : (l27.fvalue(pv, v418, l186) !== l5.value ? l43.fvalue(pv, v416) : (function(){
3880                     throw "ECASE expression failed.";
3881                 })()))));
3882             })(v417));
3883         })();
3884     }));
3885     return l188;
3886 })();
3887 var l189 = {name: "*ENVIRONMENT*"};
3888 (function(){
3889     (((l189.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l189).value = l182.fvalue(pv)));
3890     return l189;
3891 })();
3892 var l190 = {name: "*VARIABLE-COUNTER*"};
3893 (function(){
3894     (((l190.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l190).value = 0));
3895     return l190;
3896 })();
3897 var l191 = {name: "GVARNAME"};
3898 (function(){
3899     (l191).fvalue = (function(v421){
3900         ((v421)["fname"] = "GVARNAME");
3901         return v421;
3902     })((function (values,v420){
3903         checkArgs(arguments, 2);
3904         var i;
3905         return (function(){
3906             return l135.fvalue(values, "v", l18.fvalue(pv, ((l190).value = (function(){
3907                 var x1 = (function(){
3908                     var symbol = l190;
3909                     var value = symbol.value;
3910                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3911                     return value;
3912                 })();
3913                 if (typeof x1 !== 'number') throw 'Not a number!';
3914                 var x2 = 1;
3915                 if (typeof x2 !== 'number') throw 'Not a number!';
3916                 return x1+x2;
3917             })())));
3918         })();
3919     }));
3920     return l191;
3921 })();
3922 var l192 = {name: "TRANSLATE-VARIABLE"};
3923 (function(){
3924     (l192).fvalue = (function(v423){
3925         ((v423)["fname"] = "TRANSLATE-VARIABLE");
3926         return v423;
3927     })((function (values,v422){
3928         checkArgs(arguments, 2);
3929         var i;
3930         return (function(){
3931             return l177.fvalue(values, l188.fvalue(pv, v422, (function(){
3932                 var symbol = l189;
3933                 var value = symbol.value;
3934                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3935                 return value;
3936             })(), l106));
3937         })();
3938     }));
3939     return l192;
3940 })();
3941 var l193 = {name: "EXTEND-LOCAL-ENV"};
3942 (function(){
3943     (l193).fvalue = (function(v429){
3944         ((v429)["fname"] = "EXTEND-LOCAL-ENV");
3945         return v429;
3946     })((function (values,v424){
3947         checkArgs(arguments, 2);
3948         var i;
3949         return (function(){
3950             return (function(v425){
3951                 return (function(){
3952                     return (function(v426,v427){
3953                         (function(){
3954                             while(v426 !== l5.value){
3955                                 (v427 = (function(){
3956                                     var tmp = v426;
3957                                     return tmp === l5.value? l5.value: tmp.car;
3958                                 })());
3959                                 (function(){
3960                                     (function(v428){
3961                                         return l184.fvalue(pv, v428, v425, l106);
3962                                     })(l174.fvalue(pv, v427, l106, l191.fvalue(pv, v427)));
3963                                     return l5.value;
3964                                 })();
3965                                 (v426 = (function(){
3966                                     var tmp = v426;
3967                                     return tmp === l5.value? l5.value: tmp.cdr;
3968                                 })());
3969                             }return l5.value;
3970                         })();
3971                         return v425;
3972                     })(v424,l5.value);
3973                 })();
3974             })(l183.fvalue(pv, (function(){
3975                 var symbol = l189;
3976                 var value = symbol.value;
3977                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3978                 return value;
3979             })()));
3980         })();
3981     }));
3982     return l193;
3983 })();
3984 var l194 = {name: "*TOPLEVEL-COMPILATIONS*"};
3985 (function(){
3986     (((l194.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l194).value = l5.value));
3987     return l194;
3988 })();
3989 var l195 = {name: "TOPLEVEL-COMPILATION"};
3990 (function(){
3991     (l195).fvalue = (function(v431){
3992         ((v431)["fname"] = "TOPLEVEL-COMPILATION");
3993         return v431;
3994     })((function (values,v430){
3995         checkArgs(arguments, 2);
3996         var i;
3997         return (function(){
3998             return ((l194).value = ({car: v430, cdr: (function(){
3999                 var symbol = l194;
4000                 var value = symbol.value;
4001                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4002                 return value;
4003             })()}));
4004         })();
4005     }));
4006     return l195;
4007 })();
4008 var l196 = {name: "NULL-OR-EMPTY-P"};
4009 (function(){
4010     (l196).fvalue = (function(v433){
4011         ((v433)["fname"] = "NULL-OR-EMPTY-P");
4012         return v433;
4013     })((function (values,v432){
4014         checkArgs(arguments, 2);
4015         var i;
4016         return (function(){
4017             return l25.fvalue(values, l72.fvalue(pv, v432));
4018         })();
4019     }));
4020     return l196;
4021 })();
4022 var l197 = {name: "GET-TOPLEVEL-COMPILATIONS"};
4023 (function(){
4024     (l197).fvalue = (function(v434){
4025         ((v434)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
4026         return v434;
4027     })((function (values){
4028         checkArgsAtMost(arguments, 1);
4029         var i;
4030         return (function(){
4031             return l67.fvalue(values, l91.fvalue(pv, (function(){
4032                 var symbol = l196;
4033                 var func = symbol.fvalue;
4034                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4035                 return func;
4036             })(), (function(){
4037                 var symbol = l194;
4038                 var value = symbol.value;
4039                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4040                 return value;
4041             })()));
4042         })();
4043     }));
4044     return l197;
4045 })();
4046 var l198 = {name: "%COMPILE-DEFMACRO"};
4047 var l199 = {name: "MACRO"};
4048 (function(){
4049     (l198).fvalue = (function(v437){
4050         ((v437)["fname"] = "%COMPILE-DEFMACRO");
4051         return v437;
4052     })((function (values,v435,v436){
4053         checkArgs(arguments, 3);
4054         var i;
4055         return (function(){
4056             l195.fvalue(pv, l146.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l168), l45.fvalue(pv, v435))));
4057             l184.fvalue(pv, l174.fvalue(pv, v435, l199, v436), (function(){
4058                 var symbol = l189;
4059                 var value = symbol.value;
4060                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4061                 return value;
4062             })(), l105);
4063             return v435;
4064         })();
4065     }));
4066     return l198;
4067 })();
4068 var l200 = {name: "GLOBAL-BINDING"};
4069 (function(){
4070     (l200).fvalue = (function(v443){
4071         ((v443)["fname"] = "GLOBAL-BINDING");
4072         return v443;
4073     })((function (values,v438,v439,v440){
4074         checkArgs(arguments, 4);
4075         var i;
4076         return (function(){
4077             return (function(v441){
4078                 return (v441 !== l5.value ? v441 : (function(v442){
4079                     l184.fvalue(pv, v442, (function(){
4080                         var symbol = l189;
4081                         var value = symbol.value;
4082                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4083                         return value;
4084                     })(), v440);
4085                     return v442;
4086                 })(l174.fvalue(pv, v438, v439, l5.value)));
4087             })(l188.fvalue(pv, v438, (function(){
4088                 var symbol = l189;
4089                 var value = symbol.value;
4090                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4091                 return value;
4092             })(), v440));
4093         })();
4094     }));
4095     return l200;
4096 })();
4097 var l201 = {name: "CLAIMP"};
4098 (function(){
4099     (l201).fvalue = (function(v448){
4100         ((v448)["fname"] = "CLAIMP");
4101         return v448;
4102     })((function (values,v444,v445,v446){
4103         checkArgs(arguments, 4);
4104         var i;
4105         return (function(){
4106             return (function(v447){
4107                 return (v447 !== l5.value ? l89.fvalue(values, v446, l178.fvalue(pv, v447)) : l5.value);
4108             })(l188.fvalue(pv, v444, (function(){
4109                 var symbol = l189;
4110                 var value = symbol.value;
4111                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4112                 return value;
4113             })(), v445));
4114         })();
4115     }));
4116     return l201;
4117 })();
4118 var l202 = {name: "!PROCLAIM"};
4119 var l203 = {name: "SPECIAL"};
4120 var l204 = {name: "NOTINLINE"};
4121 var l205 = {name: "CONSTANT"};
4122 (function(){
4123     (l202).fvalue = (function(v460){
4124         ((v460)["fname"] = "!PROCLAIM");
4125         return v460;
4126     })((function (values,v449){
4127         checkArgs(arguments, 2);
4128         var i;
4129         return (function(){
4130             return (function(v450){
4131                 return (l27.fvalue(pv, v450, l203) !== l5.value ? (function(){
4132                     return (function(v451,v452){
4133                         (function(){
4134                             while(v451 !== l5.value){
4135                                 (v452 = (function(){
4136                                     var tmp = v451;
4137                                     return tmp === l5.value? l5.value: tmp.car;
4138                                 })());
4139                                 (function(){
4140                                     (function(v453){
4141                                         return l181.fvalue(pv, l203, v453);
4142                                     })(l200.fvalue(pv, v452, l106, l106));
4143                                     return l5.value;
4144                                 })();
4145                                 (v451 = (function(){
4146                                     var tmp = v451;
4147                                     return tmp === l5.value? l5.value: tmp.cdr;
4148                                 })());
4149                             }return l5.value;
4150                         })();
4151                         return l5.value;
4152                     })((function(){
4153                         var tmp = v449;
4154                         return tmp === l5.value? l5.value: tmp.cdr;
4155                     })(),l5.value);
4156                 })() : (l27.fvalue(pv, v450, l204) !== l5.value ? (function(){
4157                     return (function(v454,v455){
4158                         (function(){
4159                             while(v454 !== l5.value){
4160                                 (v455 = (function(){
4161                                     var tmp = v454;
4162                                     return tmp === l5.value? l5.value: tmp.car;
4163                                 })());
4164                                 (function(){
4165                                     (function(v456){
4166                                         return l181.fvalue(pv, l204, v456);
4167                                     })(l200.fvalue(pv, v455, l105, l105));
4168                                     return l5.value;
4169                                 })();
4170                                 (v454 = (function(){
4171                                     var tmp = v454;
4172                                     return tmp === l5.value? l5.value: tmp.cdr;
4173                                 })());
4174                             }return l5.value;
4175                         })();
4176                         return l5.value;
4177                     })((function(){
4178                         var tmp = v449;
4179                         return tmp === l5.value? l5.value: tmp.cdr;
4180                     })(),l5.value);
4181                 })() : (l27.fvalue(pv, v450, l205) !== l5.value ? (function(){
4182                     return (function(v457,v458){
4183                         (function(){
4184                             while(v457 !== l5.value){
4185                                 (v458 = (function(){
4186                                     var tmp = v457;
4187                                     return tmp === l5.value? l5.value: tmp.car;
4188                                 })());
4189                                 (function(){
4190                                     (function(v459){
4191                                         return l181.fvalue(pv, l205, v459);
4192                                     })(l200.fvalue(pv, v458, l106, l106));
4193                                     return l5.value;
4194                                 })();
4195                                 (v457 = (function(){
4196                                     var tmp = v457;
4197                                     return tmp === l5.value? l5.value: tmp.cdr;
4198                                 })());
4199                             }return l5.value;
4200                         })();
4201                         return l5.value;
4202                     })((function(){
4203                         var tmp = v449;
4204                         return tmp === l5.value? l5.value: tmp.cdr;
4205                     })(),l5.value);
4206                 })() : l5.value)));
4207             })((function(){
4208                 var tmp = v449;
4209                 return tmp === l5.value? l5.value: tmp.car;
4210             })());
4211         })();
4212     }));
4213     return l202;
4214 })();
4215 var l206 = {name: "PROCLAIM"};
4216 (l206).fvalue = (function(){
4217     var symbol = l202;
4218     var func = symbol.fvalue;
4219     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4220     return func;
4221 })();
4222 var l207 = {name: "*COMPILATIONS*"};
4223 (function(){
4224     (((l207.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l207).value = l5.value));
4225     return l207;
4226 })();
4227 var l208 = {name: "DEFINE-COMPILATION"};
4228 l208;
4229 var l209 = {name: "IF"};
4230 ((l207).value = ({car: l45.fvalue(pv, l209, (function (values,v461,v462,v463){
4231     checkArgs(arguments, 4);
4232     var i;
4233     return (function(){
4234         return l135.fvalue(values, "(", l146.fvalue(pv, v461), " !== ", l146.fvalue(pv, l5.value), " ? ", l146.fvalue(pv, v462, (function(){
4235             var symbol = l173;
4236             var value = symbol.value;
4237             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4238             return value;
4239         })()), " : ", l146.fvalue(pv, v463, (function(){
4240             var symbol = l173;
4241             var value = symbol.value;
4242             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4243             return value;
4244         })()), ")");
4245     })();
4246 })), cdr: (function(){
4247     var symbol = l207;
4248     var value = symbol.value;
4249     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4250     return value;
4251 })()}));
4252 var l210 = {name: "*LAMBDA-LIST-KEYWORDS*"};
4253 var l211 = {name: "&OPTIONAL"};
4254 var l212 = {name: "&REST"};
4255 var l213 = {name: "&KEY"};
4256 var l214 = QIList(l211,l212,l213,l5);
4257 (function(){
4258     (((l210.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l210).value = l214));
4259     return l210;
4260 })();
4261 var l215 = {name: "LIST-UNTIL-KEYWORD"};
4262 (function(){
4263     (l215).fvalue = (function(v466){
4264         ((v466)["fname"] = "LIST-UNTIL-KEYWORD");
4265         return v466;
4266     })((function (values,v464){
4267         checkArgs(arguments, 2);
4268         var i;
4269         return (function(){
4270             return ((function(v465){
4271                 return (v465 !== l5.value ? v465 : l89.fvalue(pv, (function(){
4272                     var tmp = v464;
4273                     return tmp === l5.value? l5.value: tmp.car;
4274                 })(), (function(){
4275                     var symbol = l210;
4276                     var value = symbol.value;
4277                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4278                     return value;
4279                 })()));
4280             })(l13.fvalue(pv, v464)) !== l5.value ? l5.value : ({car: (function(){
4281                 var tmp = v464;
4282                 return tmp === l5.value? l5.value: tmp.car;
4283             })(), cdr: l215.fvalue(pv, (function(){
4284                 var tmp = v464;
4285                 return tmp === l5.value? l5.value: tmp.cdr;
4286             })())}));
4287         })();
4288     }));
4289     return l215;
4290 })();
4291 var l216 = {name: "LAMBDA-LIST-SECTION"};
4292 (function(){
4293     (l216).fvalue = (function(v469){
4294         ((v469)["fname"] = "LAMBDA-LIST-SECTION");
4295         return v469;
4296     })((function (values,v467,v468){
4297         checkArgs(arguments, 3);
4298         var i;
4299         return (function(){
4300             return l215.fvalue(values, (function(){
4301                 var tmp = l89.fvalue(pv, v467, v468);
4302                 return tmp === l5.value? l5.value: tmp.cdr;
4303             })());
4304         })();
4305     }));
4306     return l216;
4307 })();
4308 var l217 = {name: "LAMBDA-LIST-REQUIRED-ARGUMENTS"};
4309 (function(){
4310     (l217).fvalue = (function(v471){
4311         ((v471)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
4312         return v471;
4313     })((function (values,v470){
4314         checkArgs(arguments, 2);
4315         var i;
4316         return (function(){
4317             return l215.fvalue(values, v470);
4318         })();
4319     }));
4320     return l217;
4321 })();
4322 var l218 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"};
4323 (function(){
4324     (l218).fvalue = (function(v473){
4325         ((v473)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
4326         return v473;
4327     })((function (values,v472){
4328         checkArgs(arguments, 2);
4329         var i;
4330         return (function(){
4331             return l74.fvalue(values, (function(){
4332                 var symbol = l59;
4333                 var func = symbol.fvalue;
4334                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4335                 return func;
4336             })(), l216.fvalue(pv, l211, v472));
4337         })();
4338     }));
4339     return l218;
4340 })();
4341 var l219 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS"};
4342 (function(){
4343     (l219).fvalue = (function(v475){
4344         ((v475)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
4345         return v475;
4346     })((function (values,v474){
4347         checkArgs(arguments, 2);
4348         var i;
4349         return (function(){
4350             return l74.fvalue(values, (function(){
4351                 var symbol = l31;
4352                 var func = symbol.fvalue;
4353                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4354                 return func;
4355             })(), l218.fvalue(pv, v474));
4356         })();
4357     }));
4358     return l219;
4359 })();
4360 var l220 = {name: "LAMBDA-LIST-REST-ARGUMENT"};
4361 (function(){
4362     (l220).fvalue = (function(v478){
4363         ((v478)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
4364         return v478;
4365     })((function (values,v476){
4366         checkArgs(arguments, 2);
4367         var i;
4368         return (function(){
4369             return (function(v477){
4370                 ((function(){
4371                     var tmp = v477;
4372                     return tmp === l5.value? l5.value: tmp.cdr;
4373                 })() !== l5.value ? (function(){
4374                     throw "Bad lambda-list";
4375                 })() : l5.value);
4376                 return (function(){
4377                     var tmp = v477;
4378                     return tmp === l5.value? l5.value: tmp.car;
4379                 })();
4380             })(l216.fvalue(pv, l212, v476));
4381         })();
4382     }));
4383     return l220;
4384 })();
4385 var l221 = {name: "LAMBDA-LIST-KEYWORD-ARGUMENTS-CANONICAL"};
4386 (function(){
4387     (l221).fvalue = (function(v486){
4388         ((v486)["fname"] = "LAMBDA-LIST-KEYWORD-ARGUMENTS-CANONICAL");
4389         return v486;
4390     })((function (values,v479){
4391         checkArgs(arguments, 2);
4392         var i;
4393         return (function(){
4394             return (function(v485){
4395                 return l74.fvalue(values, v485, l216.fvalue(pv, l213, v479));
4396             })((function (values,v480){
4397                 checkArgs(arguments, 2);
4398                 var i;
4399                 return (function(){
4400                     var v481 = l59.fvalue(pv, v480);
4401                     var v482 = l34.fvalue(pv, v481);
4402                     var v483 = l5.value;
4403                     var v484 = l5.value;
4404                     (l60.fvalue(pv, (function(){
4405                         var tmp = v481;
4406                         return tmp === l5.value? l5.value: tmp.car;
4407                     })()) !== l5.value ? (v483 = l34.fvalue(pv, (function(){
4408                         var tmp = v481;
4409                         return tmp === l5.value? l5.value: tmp.car;
4410                     })()), v484 = (function(){
4411                         var tmp = (function(){
4412                             var tmp = v481;
4413                             return tmp === l5.value? l5.value: tmp.car;
4414                         })();
4415                         return tmp === l5.value? l5.value: tmp.car;
4416                     })()) : (v483 = (function(){
4417                         var tmp = v481;
4418                         return tmp === l5.value? l5.value: tmp.car;
4419                     })(), v484 = l131.fvalue(pv, ((function(){
4420                         var tmp = v481;
4421                         return tmp === l5.value? l5.value: tmp.car;
4422                     })()).name, "KEYWORD")));
4423                     return l65.fvalue(pv, l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, v484), l45.fvalue(pv, v483))), l45.fvalue(pv, v482));
4424                 })();
4425             }));
4426         })();
4427     }));
4428     return l221;
4429 })();
4430 var l222 = {name: "LAMBDA-LIST-KEYWORD-ARGUMENTS"};
4431 (function(){
4432     (l222).fvalue = (function(v489){
4433         ((v489)["fname"] = "LAMBDA-LIST-KEYWORD-ARGUMENTS");
4434         return v489;
4435     })((function (values,v487){
4436         checkArgs(arguments, 2);
4437         var i;
4438         return (function(){
4439             return l74.fvalue(values, (function (values,v488){
4440                 checkArgs(arguments, 2);
4441                 var i;
4442                 return l41.fvalue(values, l40.fvalue(pv, v488));
4443             }), l221.fvalue(pv, v487));
4444         })();
4445     }));
4446     return l222;
4447 })();
4448 var l223 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
4449 (function(){
4450     (l223).fvalue = (function(v492){
4451         ((v492)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
4452         return v492;
4453     })((function (values,v491){
4454         checkArgsAtLeast(arguments, 2);
4455         var v490= l5.value;
4456         for (var i = arguments.length-1; i>=2; i--)
4457             v490 = {car: arguments[i], cdr:
4458         v490};
4459         var i;
4460         return (function(){
4461             return (v491 !== l5.value ? l135.fvalue(values, "(function(){", (function(){
4462                 var symbol = l134;
4463                 var value = symbol.value;
4464                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4465                 return value;
4466             })(), l144.fvalue(pv, "var func = ", l137.fvalue(pv, v490), ";", (function(){
4467                 var symbol = l134;
4468                 var value = symbol.value;
4469                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4470                 return value;
4471             })(), "func.docstring = '", v491, "';", (function(){
4472                 var symbol = l134;
4473                 var value = symbol.value;
4474                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4475                 return value;
4476             })(), "return func;", (function(){
4477                 var symbol = l134;
4478                 var value = symbol.value;
4479                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4480                 return value;
4481             })()), "})()") : l137.fvalue(values, v490));
4482         })();
4483     }));
4484     return l223;
4485 })();
4486 var l224 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"};
4487 var l225 = {name: "N/A"};
4488 (function(){
4489     (l224).fvalue = (function(v498){
4490         ((v498)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT");
4491         return v498;
4492     })((function (values,v493,v494,v495){
4493         checkArgs(arguments, 4);
4494         var i;
4495         return (function(){
4496             return (function(v496,v497){
4497                 return (function(){
4498                     try {
4499                         (((function(){
4500                             var x1 = 1;
4501                             if (typeof x1 !== 'number') throw 'Not a number!';
4502                             var x2 = v496;
4503                             if (typeof x2 !== 'number') throw 'Not a number!';
4504                             return (x1<x2?l4.value: l5.value);
4505                         })() !== l5.value ? l27.fvalue(pv, v496, v497) : l5.value) !== l5.value ? (function(){
4506                             var values = mv;
4507                             throw ({type: 'block', id: 185, values: l135.fvalue(values, "checkArgs(arguments, ", l18.fvalue(pv, v496), ");", (function(){
4508                                 var symbol = l134;
4509                                 var value = symbol.value;
4510                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4511                                 return value;
4512                             })()), message: 'Return from unknown block NIL.'})
4513                         })() : l5.value);
4514                         return l135.fvalue(values, ((function(){
4515                             var x1 = 1;
4516                             if (typeof x1 !== 'number') throw 'Not a number!';
4517                             var x2 = v496;
4518                             if (typeof x2 !== 'number') throw 'Not a number!';
4519                             return (x1<x2?l4.value: l5.value);
4520                         })() !== l5.value ? l135.fvalue(pv, "checkArgsAtLeast(arguments, ", l18.fvalue(pv, v496), ");", (function(){
4521                             var symbol = l134;
4522                             var value = symbol.value;
4523                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4524                             return value;
4525                         })()) : ""), (((typeof (v497) == "number")?l4.value: l5.value) !== l5.value ? l135.fvalue(pv, "checkArgsAtMost(arguments, ", l18.fvalue(pv, v497), ");", (function(){
4526                             var symbol = l134;
4527                             var value = symbol.value;
4528                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4529                             return value;
4530                         })()) : ""));
4531                     }
4532                     catch (cf){
4533                         if (cf.type == 'block' && cf.id == 185)
4534                             return values.apply(this, forcemv(cf.values));
4535                         else
4536                             throw cf;
4537                     }
4538                 })();
4539             })(l23.fvalue(pv, v493),(v495 !== l5.value ? l225 : (function(){
4540                 var x1 = 1;
4541                 if (typeof x1 !== 'number') throw 'Not a number!';
4542                 var x2 = v493;
4543                 if (typeof x2 !== 'number') throw 'Not a number!';
4544                 var x3 = v494;
4545                 if (typeof x3 !== 'number') throw 'Not a number!';
4546                 return x1+x2+x3;
4547             })()));
4548         })();
4549     }));
4550     return l224;
4551 })();
4552 var l226 = {name: "COMPILE-LAMBDA-OPTIONAL"};
4553 (function(){
4554     (l226).fvalue = (function(v507){
4555         ((v507)["fname"] = "COMPILE-LAMBDA-OPTIONAL");
4556         return v507;
4557     })((function (values,v499){
4558         checkArgs(arguments, 2);
4559         var i;
4560         return (function(){
4561             return (function(){
4562                 var v500 = l219.fvalue(pv, v499);
4563                 var v501 = l72.fvalue(pv, l217.fvalue(pv, v499));
4564                 var v502 = l72.fvalue(pv, v500);
4565                 return (v500 !== l5.value ? l135.fvalue(values, "switch(arguments.length-1){", (function(){
4566                     var symbol = l134;
4567                     var value = symbol.value;
4568                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4569                     return value;
4570                 })(), (function(v503,v504,v505){
4571                     return (function(){
4572                         (function(){
4573                             return (function(){
4574                                 while((function(){
4575                                     var x1 = v505;
4576                                     if (typeof x1 !== 'number') throw 'Not a number!';
4577                                     var x2 = v502;
4578                                     if (typeof x2 !== 'number') throw 'Not a number!';
4579                                     return (x1<x2?l4.value: l5.value);
4580                                 })() !== l5.value){
4581                                     (function(v506){
4582                                         (v504 = ({car: l135.fvalue(pv, "case ", l18.fvalue(pv, (function(){
4583                                             var x1 = v505;
4584                                             if (typeof x1 !== 'number') throw 'Not a number!';
4585                                             var x2 = v501;
4586                                             if (typeof x2 !== 'number') throw 'Not a number!';
4587                                             return x1+x2;
4588                                         })()), ":", (function(){
4589                                             var symbol = l134;
4590                                             var value = symbol.value;
4591                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4592                                             return value;
4593                                         })(), l192.fvalue(pv, (function(){
4594                                             var tmp = v506;
4595                                             return tmp === l5.value? l5.value: tmp.car;
4596                                         })()), "=", l146.fvalue(pv, l34.fvalue(pv, v506)), ";", (function(){
4597                                             var symbol = l134;
4598                                             var value = symbol.value;
4599                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4600                                             return value;
4601                                         })()), cdr: v504}));
4602                                         return (v505 = (function(){
4603                                             var x1 = v505;
4604                                             if (typeof x1 !== 'number') throw 'Not a number!';
4605                                             var x2 = 1;
4606                                             if (typeof x2 !== 'number') throw 'Not a number!';
4607                                             return x1+x2;
4608                                         })());
4609                                     })(l86.fvalue(pv, v505, v503));
4610                                 }return l5.value;
4611                             })();
4612                         })();
4613                         (v504 = ({car: l135.fvalue(pv, "default: break;", (function(){
4614                             var symbol = l134;
4615                             var value = symbol.value;
4616                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4617                             return value;
4618                         })()), cdr: v504}));
4619                         return l137.fvalue(pv, l67.fvalue(pv, v504));
4620                     })();
4621                 })(l218.fvalue(pv, v499),l5.value,0), "}", (function(){
4622                     var symbol = l134;
4623                     var value = symbol.value;
4624                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4625                     return value;
4626                 })()) : "");
4627             })();
4628         })();
4629     }));
4630     return l226;
4631 })();
4632 var l227 = {name: "COMPILE-LAMBDA-REST"};
4633 (function(){
4634     (l227).fvalue = (function(v513){
4635         ((v513)["fname"] = "COMPILE-LAMBDA-REST");
4636         return v513;
4637     })((function (values,v508){
4638         checkArgs(arguments, 2);
4639         var i;
4640         return (function(){
4641             return (function(v509,v510,v511){
4642                 return (v511 !== l5.value ? (function(v512){
4643                     return l135.fvalue(values, "var ", v512, "= ", l146.fvalue(pv, l5.value), ";", (function(){
4644                         var symbol = l134;
4645                         var value = symbol.value;
4646                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4647                         return value;
4648                     })(), "for (var i = arguments.length-1; i>=", l18.fvalue(pv, (function(){
4649                         var x1 = 1;
4650                         if (typeof x1 !== 'number') throw 'Not a number!';
4651                         var x2 = v509;
4652                         if (typeof x2 !== 'number') throw 'Not a number!';
4653                         var x3 = v510;
4654                         if (typeof x3 !== 'number') throw 'Not a number!';
4655                         return x1+x2+x3;
4656                     })()), "; i--)", (function(){
4657                         var symbol = l134;
4658                         var value = symbol.value;
4659                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4660                         return value;
4661                     })(), l144.fvalue(pv, v512, " = ", "{car: arguments[i], cdr: "), v512, "};", (function(){
4662                         var symbol = l134;
4663                         var value = symbol.value;
4664                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4665                         return value;
4666                     })());
4667                 })(l192.fvalue(pv, v511)) : "");
4668             })(l72.fvalue(pv, l217.fvalue(pv, v508)),l72.fvalue(pv, l219.fvalue(pv, v508)),l220.fvalue(pv, v508));
4669         })();
4670     }));
4671     return l227;
4672 })();
4673 var l228 = {name: "COMPILE-LAMBDA-PARSE-KEYWORDS"};
4674 (function(){
4675     (l228).fvalue = (function(v523){
4676         ((v523)["fname"] = "COMPILE-LAMBDA-PARSE-KEYWORDS");
4677         return v523;
4678     })((function (values,v514){
4679         checkArgs(arguments, 2);
4680         var i;
4681         return (function(){
4682             return (function(v515,v516,v517){
4683                 return l135.fvalue(values, "var i;", (function(){
4684                     var symbol = l134;
4685                     var value = symbol.value;
4686                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4687                     return value;
4688                 })(), l139.fvalue(pv, (function (values,v518){
4689                     checkArgs(arguments, 2);
4690                     var i;
4691                     return (function(v519){
4692                         return l135.fvalue(values, "var ", l192.fvalue(pv, v519), "; ", (function(){
4693                             var symbol = l134;
4694                             var value = symbol.value;
4695                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4696                             return value;
4697                         })());
4698                     })(l41.fvalue(pv, (function(){
4699                         var tmp = v518;
4700                         return tmp === l5.value? l5.value: tmp.car;
4701                     })()));
4702                 }), v517), (function(v521){
4703                     return l139.fvalue(pv, v521, v517);
4704                 })((function (values,v520){
4705                     checkArgs(arguments, 2);
4706                     var i;
4707                     return l135.fvalue(values, "for (i=", l18.fvalue(pv, (function(){
4708                         var x1 = 1;
4709                         if (typeof x1 !== 'number') throw 'Not a number!';
4710                         var x2 = v515;
4711                         if (typeof x2 !== 'number') throw 'Not a number!';
4712                         var x3 = v516;
4713                         if (typeof x3 !== 'number') throw 'Not a number!';
4714                         return x1+x2+x3;
4715                     })()), "; i<arguments.length; i+=2){", (function(){
4716                         var symbol = l134;
4717                         var value = symbol.value;
4718                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4719                         return value;
4720                     })(), l144.fvalue(pv, "if (arguments[i] === ", l146.fvalue(pv, l33.fvalue(pv, v520)), "){", (function(){
4721                         var symbol = l134;
4722                         var value = symbol.value;
4723                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4724                         return value;
4725                     })(), l144.fvalue(pv, l192.fvalue(pv, l34.fvalue(pv, (function(){
4726                         var tmp = v520;
4727                         return tmp === l5.value? l5.value: tmp.car;
4728                     })())), " = arguments[i+1];", (function(){
4729                         var symbol = l134;
4730                         var value = symbol.value;
4731                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4732                         return value;
4733                     })(), "break;", (function(){
4734                         var symbol = l134;
4735                         var value = symbol.value;
4736                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4737                         return value;
4738                     })()), "}", (function(){
4739                         var symbol = l134;
4740                         var value = symbol.value;
4741                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4742                         return value;
4743                     })()), "}", (function(){
4744                         var symbol = l134;
4745                         var value = symbol.value;
4746                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4747                         return value;
4748                     })(), "if (i == arguments.length){", (function(){
4749                         var symbol = l134;
4750                         var value = symbol.value;
4751                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4752                         return value;
4753                     })(), l144.fvalue(pv, l192.fvalue(pv, l34.fvalue(pv, (function(){
4754                         var tmp = v520;
4755                         return tmp === l5.value? l5.value: tmp.car;
4756                     })())), " = ", l146.fvalue(pv, l34.fvalue(pv, v520)), ";", (function(){
4757                         var symbol = l134;
4758                         var value = symbol.value;
4759                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4760                         return value;
4761                     })()), "}", (function(){
4762                         var symbol = l134;
4763                         var value = symbol.value;
4764                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4765                         return value;
4766                     })());
4767                 })), (l13.fvalue(pv, v517) !== l5.value ? "" : l135.fvalue(pv, "for (i=", l18.fvalue(pv, (function(){
4768                     var x1 = 1;
4769                     if (typeof x1 !== 'number') throw 'Not a number!';
4770                     var x2 = v515;
4771                     if (typeof x2 !== 'number') throw 'Not a number!';
4772                     var x3 = v516;
4773                     if (typeof x3 !== 'number') throw 'Not a number!';
4774                     return x1+x2+x3;
4775                 })()), "; i<arguments.length; i+=2){", (function(){
4776                     var symbol = l134;
4777                     var value = symbol.value;
4778                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4779                     return value;
4780                 })(), l144.fvalue(pv, "if (", l137.fvalue(pv, l74.fvalue(pv, (function (values,v522){
4781                     checkArgs(arguments, 2);
4782                     var i;
4783                     return l135.fvalue(values, "arguments[i] !== ", l146.fvalue(pv, l33.fvalue(pv, v522)));
4784                 }), v517), " && "), ")", (function(){
4785                     var symbol = l134;
4786                     var value = symbol.value;
4787                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4788                     return value;
4789                 })(), l144.fvalue(pv, "throw 'Unknown keyword argument ' + arguments[i].name;", (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                 })())));
4800             })(l72.fvalue(pv, l217.fvalue(pv, v514)),l72.fvalue(pv, l219.fvalue(pv, v514)),l221.fvalue(pv, v514));
4801         })();
4802     }));
4803     return l228;
4804 })();
4805 var l229 = {name: "COMPILE-LAMBDA"};
4806 var l230 = {name: "LS-COMPILE-BLOCK"};
4807 (function(){
4808     (l229).fvalue = (function(v536){
4809         ((v536)["fname"] = "COMPILE-LAMBDA");
4810         return v536;
4811     })((function (values,v524,v525){
4812         checkArgs(arguments, 3);
4813         var i;
4814         return (function(){
4815             return (function(v526,v527,v528,v529,v530){
4816                 ((((typeof((function(){
4817                     var tmp = v525;
4818                     return tmp === l5.value? l5.value: tmp.car;
4819                 })()) == "string")?l4.value: l5.value) !== l5.value ? l28.fvalue(pv, l13.fvalue(pv, (function(){
4820                     var tmp = v525;
4821                     return tmp === l5.value? l5.value: tmp.cdr;
4822                 })())) : l5.value) !== l5.value ? (function(){
4823                     (v530 = (function(){
4824                         var tmp = v525;
4825                         return tmp === l5.value? l5.value: tmp.car;
4826                     })());
4827                     return (v525 = (function(){
4828                         var tmp = v525;
4829                         return tmp === l5.value? l5.value: tmp.cdr;
4830                     })());
4831                 })() : l5.value);
4832                 return (function(v531,v532,v533){
4833                     try {
4834                         var tmp;
4835                         tmp = l189.value;
4836                         l189.value = v533;
4837                         v533 = tmp;
4838                         return l223.fvalue(values, v530, "(function (", l137.fvalue(pv, ({car: "values", cdr: l74.fvalue(pv, (function(){
4839                             var symbol = l192;
4840                             var func = symbol.fvalue;
4841                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4842                             return func;
4843                         })(), l65.fvalue(pv, v526, v527))}), ","), "){", (function(){
4844                             var symbol = l134;
4845                             var value = symbol.value;
4846                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4847                             return value;
4848                         })(), l144.fvalue(pv, l224.fvalue(pv, v531, v532, (function(v534){
4849                             return (v534 !== l5.value ? v534 : v528);
4850                         })(v529)), l226.fvalue(pv, v524), l227.fvalue(pv, v524), l228.fvalue(pv, v524), (function(v535){
4851                             try {
4852                                 var tmp;
4853                                 tmp = l173.value;
4854                                 l173.value = v535;
4855                                 v535 = tmp;
4856                                 return l230.fvalue(pv, v525, l4.value);
4857                             }
4858                             finally {
4859                                 l173.value = v535;
4860                             }
4861                         })(l4.value)), "})");
4862                     }
4863                     finally {
4864                         l189.value = v533;
4865                     }
4866                 })(l72.fvalue(pv, v526),l72.fvalue(pv, v527),l193.fvalue(pv, l65.fvalue(pv, l59.fvalue(pv, v529), v526, v527, v528)));
4867             })(l217.fvalue(pv, v524),l219.fvalue(pv, v524),l222.fvalue(pv, v524),l220.fvalue(pv, v524),l5.value);
4868         })();
4869     }));
4870     return l229;
4871 })();
4872 var l231 = {name: "SETQ-PAIR"};
4873 var l232 = {name: "SET"};
4874 (function(){
4875     (l231).fvalue = (function(v540){
4876         ((v540)["fname"] = "SETQ-PAIR");
4877         return v540;
4878     })((function (values,v537,v538){
4879         checkArgs(arguments, 3);
4880         var i;
4881         return (function(){
4882             return (function(v539){
4883                 return ((((l176.fvalue(pv, v539) === l106)?l4.value: l5.value) !== l5.value ? (l28.fvalue(pv, l89.fvalue(pv, l203, l178.fvalue(pv, v539))) !== l5.value ? l28.fvalue(pv, l89.fvalue(pv, l205, l178.fvalue(pv, v539))) : l5.value) : l5.value) !== l5.value ? l135.fvalue(values, l177.fvalue(pv, v539), " = ", l146.fvalue(pv, v538)) : l146.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l232), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l168), l45.fvalue(pv, v537))), l45.fvalue(pv, v538))));
4884             })(l188.fvalue(pv, v537, (function(){
4885                 var symbol = l189;
4886                 var value = symbol.value;
4887                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4888                 return value;
4889             })(), l106));
4890         })();
4891     }));
4892     return l231;
4893 })();
4894 var l233 = {name: "SETQ"};
4895 ((l207).value = ({car: l45.fvalue(pv, l233, (function (values){
4896     var v541= l5.value;
4897     for (var i = arguments.length-1; i>=1; i--)
4898         v541 = {car: arguments[i], cdr:
4899     v541};
4900     var i;
4901     return (function(){
4902         return (function(v542){
4903             (function(){
4904                 try {
4905                     return (function(){
4906                         while(l4.value !== l5.value){
4907                             (l13.fvalue(pv, v541) !== l5.value ? (function(){
4908                                 throw ({type: 'block', id: 193, values: l5.value, message: 'Return from unknown block NIL.'})
4909                             })() : (l13.fvalue(pv, (function(){
4910                                 var tmp = v541;
4911                                 return tmp === l5.value? l5.value: tmp.cdr;
4912                             })()) !== l5.value ? (function(){
4913                                 throw "Odd paris in SETQ";
4914                             })() : (function(){
4915                                 (v542 = l135.fvalue(pv, v542, l135.fvalue(pv, l231.fvalue(pv, (function(){
4916                                     var tmp = v541;
4917                                     return tmp === l5.value? l5.value: tmp.car;
4918                                 })(), l34.fvalue(pv, v541)), (l13.fvalue(pv, l36.fvalue(pv, v541)) !== l5.value ? "" : ", "))));
4919                                 return (v541 = l36.fvalue(pv, v541));
4920                             })()));
4921                         }return l5.value;
4922                     })();
4923                 }
4924                 catch (cf){
4925                     if (cf.type == 'block' && cf.id == 193)
4926                         return cf.values;
4927                     else
4928                         throw cf;
4929                 }
4930             })();
4931             return l135.fvalue(values, "(", v542, ")");
4932         })("");
4933     })();
4934 })), cdr: (function(){
4935     var symbol = l207;
4936     var value = symbol.value;
4937     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4938     return value;
4939 })()}));
4940 var l234 = {name: "JS-VREF"};
4941 ((l207).value = ({car: l45.fvalue(pv, l234, (function (values,v543){
4942     checkArgs(arguments, 2);
4943     var i;
4944     return (function(){
4945         return v543;
4946     })();
4947 })), cdr: (function(){
4948     var symbol = l207;
4949     var value = symbol.value;
4950     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4951     return value;
4952 })()}));
4953 var l235 = {name: "JS-VSET"};
4954 ((l207).value = ({car: l45.fvalue(pv, l235, (function (values,v544,v545){
4955     checkArgs(arguments, 3);
4956     var i;
4957     return (function(){
4958         return l135.fvalue(values, "(", v544, " = ", l146.fvalue(pv, v545), ")");
4959     })();
4960 })), cdr: (function(){
4961     var symbol = l207;
4962     var value = symbol.value;
4963     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4964     return value;
4965 })()}));
4966 (function(){
4967     (l149).fvalue = (function(v552){
4968         ((v552)["fname"] = "ESCAPE-STRING");
4969         return v552;
4970     })((function (values,v546){
4971         checkArgs(arguments, 2);
4972         var i;
4973         return (function(){
4974             return (function(v547,v548,v549){
4975                 (function(){
4976                     return (function(){
4977                         while((function(){
4978                             var x1 = v548;
4979                             if (typeof x1 !== 'number') throw 'Not a number!';
4980                             var x2 = v549;
4981                             if (typeof x2 !== 'number') throw 'Not a number!';
4982                             return (x1<x2?l4.value: l5.value);
4983                         })() !== l5.value){
4984                             (function(v550){
4985                                 ((function(v551){
4986                                     return (v551 !== l5.value ? v551 : l81.fvalue(pv, v550, 92));
4987                                 })(l81.fvalue(pv, v550, 34)) !== l5.value ? (v547 = l135.fvalue(pv, v547, "\\")) : l5.value);
4988                                 (l81.fvalue(pv, v550, 10) !== l5.value ? (function(){
4989                                     (v547 = l135.fvalue(pv, v547, "\\"));
4990                                     return (v550 = 110);
4991                                 })() : l5.value);
4992                                 return (v547 = l135.fvalue(pv, v547, l99.fvalue(pv, v550)));
4993                             })((function(){
4994                                 var string = v546;
4995                                 var index = v548;
4996                                 if (typeof string != 'string')
4997                                     throw 'The value ' + string + ' is not a type string.';
4998                                 if (typeof index != 'number')
4999                                     throw 'The value ' + index + ' is not a type number.';
5000                                 return string.charCodeAt(index);
5001                             })());
5002                             (v548 = (function(){
5003                                 var x1 = v548;
5004                                 if (typeof x1 !== 'number') throw 'Not a number!';
5005                                 var x2 = 1;
5006                                 if (typeof x2 !== 'number') throw 'Not a number!';
5007                                 return x1+x2;
5008                             })());
5009                         }return l5.value;
5010                     })();
5011                 })();
5012                 return v547;
5013             })("",0,l72.fvalue(pv, v546));
5014         })();
5015     }));
5016     return l149;
5017 })();
5018 var l236 = {name: "*LITERAL-SYMBOLS*"};
5019 (function(){
5020     (((l236.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l236).value = l5.value));
5021     return l236;
5022 })();
5023 var l237 = {name: "*LITERAL-COUNTER*"};
5024 (function(){
5025     (((l237.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l237).value = 0));
5026     return l237;
5027 })();
5028 var l238 = {name: "GENLIT"};
5029 (function(){
5030     (l238).fvalue = (function(v553){
5031         ((v553)["fname"] = "GENLIT");
5032         return v553;
5033     })((function (values){
5034         checkArgsAtMost(arguments, 1);
5035         var i;
5036         return (function(){
5037             return l135.fvalue(values, "l", l18.fvalue(pv, ((l237).value = (function(){
5038                 var x1 = (function(){
5039                     var symbol = l237;
5040                     var value = symbol.value;
5041                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5042                     return value;
5043                 })();
5044                 if (typeof x1 !== 'number') throw 'Not a number!';
5045                 var x2 = 1;
5046                 if (typeof x2 !== 'number') throw 'Not a number!';
5047                 return x1+x2;
5048             })())));
5049         })();
5050     }));
5051     return l238;
5052 })();
5053 var l239 = {name: "LITERAL"};
5054 (function(){
5055     (l239).fvalue = (function(v568){
5056         ((v568)["fname"] = "LITERAL");
5057         return v568;
5058     })((function (values,v554,v555){
5059         checkArgsAtLeast(arguments, 2);
5060         checkArgsAtMost(arguments, 3);
5061         switch(arguments.length-1){
5062         case 1:
5063         v555=l5.value;
5064         default: break;
5065         }
5066         var i;
5067         return (function(){
5068             return (l82.fvalue(pv, v554) !== l5.value ? l18.fvalue(values, v554) : (((typeof(v554) == "string")?l4.value: l5.value) !== l5.value ? l135.fvalue(values, "\"", l149.fvalue(pv, v554), "\"") : (((function(){
5069                 var tmp = v554;
5070                 return (typeof tmp == 'object' && 'name' in tmp);
5071             })()?l4.value: l5.value) !== l5.value ? (function(v556){
5072                 return (v556 !== l5.value ? v556 : (function(v558,v559){
5073                     ((l236).value = ({car: ({car: v554, cdr: v558}), cdr: (function(){
5074                         var symbol = l236;
5075                         var value = symbol.value;
5076                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5077                         return value;
5078                     })()}));
5079                     l195.fvalue(pv, l135.fvalue(pv, "var ", v558, " = ", v559));
5080                     return v558;
5081                 })(l238.fvalue(pv),(function(v557){
5082                     return (l13.fvalue(pv, v557) !== l5.value ? l135.fvalue(pv, "{name: \"", l149.fvalue(pv, (v554).name), "\"}") : l146.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l131), l45.fvalue(pv, (v554).name), l45.fvalue(pv, l115.fvalue(pv, v557)))));
5083                 })(l123.fvalue(pv, v554))));
5084             })((function(){
5085                 var tmp = l98.fvalue(pv, v554, (function(){
5086                     var symbol = l236;
5087                     var value = symbol.value;
5088                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5089                     return value;
5090                 })());
5091                 return tmp === l5.value? l5.value: tmp.cdr;
5092             })()) : (((function(){
5093                 var tmp = v554;
5094                 return (typeof tmp == 'object' && 'car' in tmp);
5095             })()?l4.value: l5.value) !== l5.value ? (function(){
5096                 var v560 = l88.fvalue(pv, v554);
5097                 var v561 = l87.fvalue(pv, v554);
5098                 var v562 = l135.fvalue(pv, "QIList(", l138.fvalue(pv, l74.fvalue(pv, (function (values,v563){
5099                     checkArgs(arguments, 2);
5100                     var i;
5101                     return l239.fvalue(values, v563, l4.value);
5102                 }), v560), ","), l239.fvalue(pv, (function(){
5103                     var tmp = v561;
5104                     return tmp === l5.value? l5.value: tmp.car;
5105                 })(), l4.value), ",", l239.fvalue(pv, (function(){
5106                     var tmp = v561;
5107                     return tmp === l5.value? l5.value: tmp.cdr;
5108                 })(), l4.value), ")");
5109                 return (v555 !== l5.value ? v562 : (function(v564){
5110                     l195.fvalue(pv, l135.fvalue(pv, "var ", v564, " = ", v562));
5111                     return v564;
5112                 })(l238.fvalue(pv)));
5113             })() : (((function(){
5114                 var x = v554;
5115                 return typeof x === 'object' && 'length' in x;
5116             })()?l4.value: l5.value) !== l5.value ? (function(v565){
5117                 return (function(v566){
5118                     return (v555 !== l5.value ? v566 : (function(v567){
5119                         l195.fvalue(pv, l135.fvalue(pv, "var ", v567, " = ", v566));
5120                         return v567;
5121                     })(l238.fvalue(pv)));
5122                 })(l135.fvalue(pv, "[", l137.fvalue(pv, l74.fvalue(pv, (function(){
5123                     var symbol = l239;
5124                     var func = symbol.fvalue;
5125                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5126                     return func;
5127                 })(), v565), ", "), "]"));
5128             })(l140.fvalue(pv, v554)) : l5.value)))));
5129         })();
5130     }));
5131     return l239;
5132 })();
5133 ((l207).value = ({car: l45.fvalue(pv, l168, (function (values,v569){
5134     checkArgs(arguments, 2);
5135     var i;
5136     return (function(){
5137         return l239.fvalue(values, v569);
5138     })();
5139 })), cdr: (function(){
5140     var symbol = l207;
5141     var value = symbol.value;
5142     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5143     return value;
5144 })()}));
5145 var l240 = {name: "%WHILE"};
5146 ((l207).value = ({car: l45.fvalue(pv, l240, (function (values,v571){
5147     checkArgsAtLeast(arguments, 2);
5148     var v570= l5.value;
5149     for (var i = arguments.length-1; i>=2; i--)
5150         v570 = {car: arguments[i], cdr:
5151     v570};
5152     var i;
5153     return (function(){
5154         return l135.fvalue(values, "(function(){", (function(){
5155             var symbol = l134;
5156             var value = symbol.value;
5157             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5158             return value;
5159         })(), l144.fvalue(pv, "while(", l146.fvalue(pv, v571), " !== ", l146.fvalue(pv, l5.value), "){", (function(){
5160             var symbol = l134;
5161             var value = symbol.value;
5162             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5163             return value;
5164         })(), l144.fvalue(pv, l230.fvalue(pv, v570)), "}", "return ", l146.fvalue(pv, l5.value), ";", (function(){
5165             var symbol = l134;
5166             var value = symbol.value;
5167             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5168             return value;
5169         })()), "})()");
5170     })();
5171 })), cdr: (function(){
5172     var symbol = l207;
5173     var value = symbol.value;
5174     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5175     return value;
5176 })()}));
5177 var l241 = {name: "SYMBOL-FUNCTION"};
5178 ((l207).value = ({car: l45.fvalue(pv, l105, (function (values,v572){
5179     checkArgs(arguments, 2);
5180     var i;
5181     return (function(){
5182         return ((l60.fvalue(pv, v572) !== l5.value ? (((function(){
5183             var tmp = v572;
5184             return tmp === l5.value? l5.value: tmp.car;
5185         })() === l6)?l4.value: l5.value) : l5.value) !== l5.value ? l229.fvalue(values, l34.fvalue(pv, v572), l36.fvalue(pv, v572)) : (((function(){
5186             var tmp = v572;
5187             return (typeof tmp == 'object' && 'name' in tmp);
5188         })()?l4.value: l5.value) !== l5.value ? (function(v573){
5189             return (v573 !== l5.value ? l177.fvalue(values, v573) : l146.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l241), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l168), l45.fvalue(pv, v572))))));
5190         })(l188.fvalue(pv, v572, (function(){
5191             var symbol = l189;
5192             var value = symbol.value;
5193             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5194             return value;
5195         })(), l105)) : l5.value));
5196     })();
5197 })), cdr: (function(){
5198     var symbol = l207;
5199     var value = symbol.value;
5200     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5201     return value;
5202 })()}));
5203 var l242 = {name: "MAKE-FUNCTION-BINDING"};
5204 (function(){
5205     (l242).fvalue = (function(v575){
5206         ((v575)["fname"] = "MAKE-FUNCTION-BINDING");
5207         return v575;
5208     })((function (values,v574){
5209         checkArgs(arguments, 2);
5210         var i;
5211         return (function(){
5212             return l174.fvalue(values, v574, l105, l191.fvalue(pv, v574));
5213         })();
5214     }));
5215     return l242;
5216 })();
5217 var l243 = {name: "COMPILE-FUNCTION-DEFINITION"};
5218 (function(){
5219     (l243).fvalue = (function(v577){
5220         ((v577)["fname"] = "COMPILE-FUNCTION-DEFINITION");
5221         return v577;
5222     })((function (values,v576){
5223         checkArgs(arguments, 2);
5224         var i;
5225         return (function(){
5226             return l229.fvalue(values, (function(){
5227                 var tmp = v576;
5228                 return tmp === l5.value? l5.value: tmp.car;
5229             })(), (function(){
5230                 var tmp = v576;
5231                 return tmp === l5.value? l5.value: tmp.cdr;
5232             })());
5233         })();
5234     }));
5235     return l243;
5236 })();
5237 var l244 = {name: "TRANSLATE-FUNCTION"};
5238 (function(){
5239     (l244).fvalue = (function(v580){
5240         ((v580)["fname"] = "TRANSLATE-FUNCTION");
5241         return v580;
5242     })((function (values,v578){
5243         checkArgs(arguments, 2);
5244         var i;
5245         return (function(){
5246             return (function(v579){
5247                 return l177.fvalue(values, v579);
5248             })(l188.fvalue(pv, v578, (function(){
5249                 var symbol = l189;
5250                 var value = symbol.value;
5251                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5252                 return value;
5253             })(), l105));
5254         })();
5255     }));
5256     return l244;
5257 })();
5258 var l245 = {name: "FLET"};
5259 ((l207).value = ({car: l45.fvalue(pv, l245, (function (values,v582){
5260     checkArgsAtLeast(arguments, 2);
5261     var v581= l5.value;
5262     for (var i = arguments.length-1; i>=2; i--)
5263         v581 = {car: arguments[i], cdr:
5264     v581};
5265     var i;
5266     return (function(){
5267         return (function(){
5268             try {
5269                 var v587 = l189.value;
5270                 var v583 = l74.fvalue(pv, (function(){
5271                     var symbol = l31;
5272                     var func = symbol.fvalue;
5273                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5274                     return func;
5275                 })(), v582);
5276                 var v584 = l74.fvalue(pv, (function(){
5277                     var symbol = l32;
5278                     var func = symbol.fvalue;
5279                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5280                     return func;
5281                 })(), v582);
5282                 var v585 = l74.fvalue(pv, (function(){
5283                     var symbol = l243;
5284                     var func = symbol.fvalue;
5285                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5286                     return func;
5287                 })(), v584);
5288                 ((l189).value = l187.fvalue(pv, l74.fvalue(pv, (function(){
5289                     var symbol = l242;
5290                     var func = symbol.fvalue;
5291                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5292                     return func;
5293                 })(), v583), (function(){
5294                     var symbol = l189;
5295                     var value = symbol.value;
5296                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5297                     return value;
5298                 })(), l105));
5299                 return l135.fvalue(values, "(function(", l137.fvalue(pv, l74.fvalue(pv, (function(){
5300                     var symbol = l244;
5301                     var func = symbol.fvalue;
5302                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5303                     return func;
5304                 })(), v583), ","), "){", (function(){
5305                     var symbol = l134;
5306                     var value = symbol.value;
5307                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5308                     return value;
5309                 })(), (function(v586){
5310                     return l144.fvalue(pv, v586);
5311                 })(l230.fvalue(pv, v581, l4.value)), "})(", l137.fvalue(pv, v585, ","), ")");
5312             }
5313             finally {
5314                 l189.value = v587;
5315             }
5316         })();
5317     })();
5318 })), cdr: (function(){
5319     var symbol = l207;
5320     var value = symbol.value;
5321     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5322     return value;
5323 })()}));
5324 var l246 = {name: "LABELS"};
5325 ((l207).value = ({car: l45.fvalue(pv, l246, (function (values,v589){
5326     checkArgsAtLeast(arguments, 2);
5327     var v588= l5.value;
5328     for (var i = arguments.length-1; i>=2; i--)
5329         v588 = {car: arguments[i], cdr:
5330     v588};
5331     var i;
5332     return (function(){
5333         return (function(){
5334             try {
5335                 var v592 = l189.value;
5336                 var v590 = l74.fvalue(pv, (function(){
5337                     var symbol = l31;
5338                     var func = symbol.fvalue;
5339                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5340                     return func;
5341                 })(), v589);
5342                 ((l189).value = l187.fvalue(pv, l74.fvalue(pv, (function(){
5343                     var symbol = l242;
5344                     var func = symbol.fvalue;
5345                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5346                     return func;
5347                 })(), v590), (function(){
5348                     var symbol = l189;
5349                     var value = symbol.value;
5350                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5351                     return value;
5352                 })(), l105));
5353                 return l135.fvalue(values, "(function(){", (function(){
5354                     var symbol = l134;
5355                     var value = symbol.value;
5356                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5357                     return value;
5358                 })(), l144.fvalue(pv, l139.fvalue(pv, (function (values,v591){
5359                     checkArgs(arguments, 2);
5360                     var i;
5361                     return l135.fvalue(values, "var ", l244.fvalue(pv, (function(){
5362                         var tmp = v591;
5363                         return tmp === l5.value? l5.value: tmp.car;
5364                     })()), " = ", l229.fvalue(pv, l34.fvalue(pv, v591), l36.fvalue(pv, v591)), ";", (function(){
5365                         var symbol = l134;
5366                         var value = symbol.value;
5367                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5368                         return value;
5369                     })());
5370                 }), v589), l230.fvalue(pv, v588, l4.value)), "})()");
5371             }
5372             finally {
5373                 l189.value = v592;
5374             }
5375         })();
5376     })();
5377 })), cdr: (function(){
5378     var symbol = l207;
5379     var value = symbol.value;
5380     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5381     return value;
5382 })()}));
5383 var l247 = {name: "*COMPILING-FILE*"};
5384 (function(){
5385     (((l247.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l247).value = l5.value));
5386     return l247;
5387 })();
5388 var l248 = {name: "EVAL-WHEN-COMPILE"};
5389 var l249 = {name: "PROGN"};
5390 var l250 = {name: "EVAL"};
5391 ((l207).value = ({car: l45.fvalue(pv, l248, (function (values){
5392     var v593= l5.value;
5393     for (var i = arguments.length-1; i>=1; i--)
5394         v593 = {car: arguments[i], cdr:
5395     v593};
5396     var i;
5397     return (function(){
5398         return ((function(){
5399             var symbol = l247;
5400             var value = symbol.value;
5401             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5402             return value;
5403         })() !== l5.value ? (function(){
5404             l250.fvalue(pv, ({car: l249, cdr: v593}));
5405             return l5.value;
5406         })() : l146.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l249), v593)));
5407     })();
5408 })), cdr: (function(){
5409     var symbol = l207;
5410     var value = symbol.value;
5411     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5412     return value;
5413 })()}));
5414 var l251 = {name: "DEFINE-TRANSFORMATION"};
5415 l251;
5416 ((l207).value = ({car: l45.fvalue(pv, l249, (function (values){
5417     var v594= l5.value;
5418     for (var i = arguments.length-1; i>=1; i--)
5419         v594 = {car: arguments[i], cdr:
5420     v594};
5421     var i;
5422     return (function(){
5423         return (l13.fvalue(pv, (function(){
5424             var tmp = v594;
5425             return tmp === l5.value? l5.value: tmp.cdr;
5426         })()) !== l5.value ? l146.fvalue(values, (function(){
5427             var tmp = v594;
5428             return tmp === l5.value? l5.value: tmp.car;
5429         })(), (function(){
5430             var symbol = l173;
5431             var value = symbol.value;
5432             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5433             return value;
5434         })()) : l135.fvalue(values, "(function(){", (function(){
5435             var symbol = l134;
5436             var value = symbol.value;
5437             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5438             return value;
5439         })(), l144.fvalue(pv, l230.fvalue(pv, v594, l4.value)), "})()"));
5440     })();
5441 })), cdr: (function(){
5442     var symbol = l207;
5443     var value = symbol.value;
5444     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5445     return value;
5446 })()}));
5447 var l252 = {name: "SPECIAL-VARIABLE-P"};
5448 (function(){
5449     (l252).fvalue = (function(v596){
5450         ((v596)["fname"] = "SPECIAL-VARIABLE-P");
5451         return v596;
5452     })((function (values,v595){
5453         checkArgs(arguments, 2);
5454         var i;
5455         return (function(){
5456             return (l201.fvalue(pv, v595, l106, l203) !== l5.value ? l4.value : l5.value);
5457         })();
5458     }));
5459     return l252;
5460 })();
5461 var l253 = {name: "LET-BINDING-WRAPPER"};
5462 (function(){
5463     (l253).fvalue = (function(v603){
5464         ((v603)["fname"] = "LET-BINDING-WRAPPER");
5465         return v603;
5466     })((function (values,v597,v598){
5467         checkArgs(arguments, 3);
5468         var i;
5469         return (function(){
5470             try {
5471                 (l13.fvalue(pv, v597) !== l5.value ? (function(){
5472                     var values = mv;
5473                     throw ({type: 'block', id: 211, values: v598, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
5474                 })() : l5.value);
5475                 return l135.fvalue(values, "try {", (function(){
5476                     var symbol = l134;
5477                     var value = symbol.value;
5478                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5479                     return value;
5480                 })(), l144.fvalue(pv, "var tmp;", (function(){
5481                     var symbol = l134;
5482                     var value = symbol.value;
5483                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5484                     return value;
5485                 })(), l139.fvalue(pv, (function (values,v599){
5486                     checkArgs(arguments, 2);
5487                     var i;
5488                     return (function(v600){
5489                         return l135.fvalue(values, "tmp = ", v600, ".value;", (function(){
5490                             var symbol = l134;
5491                             var value = symbol.value;
5492                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5493                             return value;
5494                         })(), v600, ".value = ", (function(){
5495                             var tmp = v599;
5496                             return tmp === l5.value? l5.value: tmp.cdr;
5497                         })(), ";", (function(){
5498                             var symbol = l134;
5499                             var value = symbol.value;
5500                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5501                             return value;
5502                         })(), (function(){
5503                             var tmp = v599;
5504                             return tmp === l5.value? l5.value: tmp.cdr;
5505                         })(), " = tmp;", (function(){
5506                             var symbol = l134;
5507                             var value = symbol.value;
5508                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5509                             return value;
5510                         })());
5511                     })(l146.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l168), l45.fvalue(pv, (function(){
5512                         var tmp = v599;
5513                         return tmp === l5.value? l5.value: tmp.car;
5514                     })()))));
5515                 }), v597), v598, (function(){
5516                     var symbol = l134;
5517                     var value = symbol.value;
5518                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5519                     return value;
5520                 })()), "}", (function(){
5521                     var symbol = l134;
5522                     var value = symbol.value;
5523                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5524                     return value;
5525                 })(), "finally {", (function(){
5526                     var symbol = l134;
5527                     var value = symbol.value;
5528                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5529                     return value;
5530                 })(), l144.fvalue(pv, l139.fvalue(pv, (function (values,v601){
5531                     checkArgs(arguments, 2);
5532                     var i;
5533                     return (function(v602){
5534                         return l135.fvalue(values, v602, ".value", " = ", (function(){
5535                             var tmp = v601;
5536                             return tmp === l5.value? l5.value: tmp.cdr;
5537                         })(), ";", (function(){
5538                             var symbol = l134;
5539                             var value = symbol.value;
5540                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5541                             return value;
5542                         })());
5543                     })(l146.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l168), l45.fvalue(pv, (function(){
5544                         var tmp = v601;
5545                         return tmp === l5.value? l5.value: tmp.car;
5546                     })()))));
5547                 }), v597)), "}", (function(){
5548                     var symbol = l134;
5549                     var value = symbol.value;
5550                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5551                     return value;
5552                 })());
5553             }
5554             catch (cf){
5555                 if (cf.type == 'block' && cf.id == 211)
5556                     return values.apply(this, forcemv(cf.values));
5557                 else
5558                     throw cf;
5559             }
5560         })();
5561     }));
5562     return l253;
5563 })();
5564 var l254 = {name: "LET"};
5565 ((l207).value = ({car: l45.fvalue(pv, l254, (function (values,v605){
5566     checkArgsAtLeast(arguments, 2);
5567     var v604= l5.value;
5568     for (var i = arguments.length-1; i>=2; i--)
5569         v604 = {car: arguments[i], cdr:
5570     v604};
5571     var i;
5572     return (function(){
5573         return (function(){
5574             try {
5575                 var v613 = l189.value;
5576                 var v606 = l74.fvalue(pv, (function(){
5577                     var symbol = l59;
5578                     var func = symbol.fvalue;
5579                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5580                     return func;
5581                 })(), v605);
5582                 var v607 = l74.fvalue(pv, (function(){
5583                     var symbol = l40;
5584                     var func = symbol.fvalue;
5585                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5586                     return func;
5587                 })(), v606);
5588                 var v608 = l74.fvalue(pv, (function(){
5589                     var symbol = l146;
5590                     var func = symbol.fvalue;
5591                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5592                     return func;
5593                 })(), l74.fvalue(pv, (function(){
5594                     var symbol = l41;
5595                     var func = symbol.fvalue;
5596                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5597                     return func;
5598                 })(), v606));
5599                 ((l189).value = l193.fvalue(pv, l91.fvalue(pv, (function(){
5600                     var symbol = l252;
5601                     var func = symbol.fvalue;
5602                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5603                     return func;
5604                 })(), v607)));
5605                 var v609 = l5.value;
5606                 return l135.fvalue(values, "(function(", l137.fvalue(pv, l74.fvalue(pv, (function (values,v610){
5607                     checkArgs(arguments, 2);
5608                     var i;
5609                     return (l252.fvalue(pv, v610) !== l5.value ? (function(v611){
5610                         (v609 = ({car: ({car: v610, cdr: v611}), cdr: v609}));
5611                         return v611;
5612                     })(l191.fvalue(pv, v610)) : l192.fvalue(values, v610));
5613                 }), v607), ","), "){", (function(){
5614                     var symbol = l134;
5615                     var value = symbol.value;
5616                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5617                     return value;
5618                 })(), (function(v612){
5619                     return l144.fvalue(pv, l253.fvalue(pv, v609, v612));
5620                 })(l230.fvalue(pv, v604, l4.value)), "})(", l137.fvalue(pv, v608, ","), ")");
5621             }
5622             finally {
5623                 l189.value = v613;
5624             }
5625         })();
5626     })();
5627 })), cdr: (function(){
5628     var symbol = l207;
5629     var value = symbol.value;
5630     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5631     return value;
5632 })()}));
5633 var l255 = {name: "LET*-INITIALIZE-VALUE"};
5634 (function(){
5635     (l255).fvalue = (function(v620){
5636         ((v620)["fname"] = "LET*-INITIALIZE-VALUE");
5637         return v620;
5638     })((function (values,v614){
5639         checkArgs(arguments, 2);
5640         var i;
5641         return (function(){
5642             return (function(v615,v616){
5643                 return (l252.fvalue(pv, v615) !== l5.value ? l135.fvalue(values, l146.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l233), l45.fvalue(pv, v615), l45.fvalue(pv, v616))), ";", (function(){
5644                     var symbol = l134;
5645                     var value = symbol.value;
5646                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5647                     return value;
5648                 })()) : (function(){
5649                     var v617 = l191.fvalue(pv, v615);
5650                     var v618 = l174.fvalue(pv, v615, l106, v617);
5651                     return (function(v619){
5652                         l184.fvalue(pv, v618, (function(){
5653                             var symbol = l189;
5654                             var value = symbol.value;
5655                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5656                             return value;
5657                         })(), l106);
5658                         return v619;
5659                     })(l135.fvalue(pv, "var ", v617, " = ", l146.fvalue(pv, v616), ";", (function(){
5660                         var symbol = l134;
5661                         var value = symbol.value;
5662                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5663                         return value;
5664                     })()));
5665                 })());
5666             })(l40.fvalue(pv, v614),l41.fvalue(pv, v614));
5667         })();
5668     }));
5669     return l255;
5670 })();
5671 var l256 = {name: "LET*-BINDING-WRAPPER"};
5672 (function(){
5673     (l256).fvalue = (function(v629){
5674         ((v629)["fname"] = "LET*-BINDING-WRAPPER");
5675         return v629;
5676     })((function (values,v621,v622){
5677         checkArgs(arguments, 3);
5678         var i;
5679         return (function(){
5680             try {
5681                 (l13.fvalue(pv, v621) !== l5.value ? (function(){
5682                     var values = mv;
5683                     throw ({type: 'block', id: 214, values: v622, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
5684                 })() : l5.value);
5685                 return (function(v624){
5686                     return l135.fvalue(values, "try {", (function(){
5687                         var symbol = l134;
5688                         var value = symbol.value;
5689                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5690                         return value;
5691                     })(), l144.fvalue(pv, l139.fvalue(pv, (function (values,v625){
5692                         checkArgs(arguments, 2);
5693                         var i;
5694                         return (function(v626){
5695                             return l135.fvalue(values, "var ", (function(){
5696                                 var tmp = v625;
5697                                 return tmp === l5.value? l5.value: tmp.cdr;
5698                             })(), " = ", v626, ".value;", (function(){
5699                                 var symbol = l134;
5700                                 var value = symbol.value;
5701                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5702                                 return value;
5703                             })());
5704                         })(l146.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l168), l45.fvalue(pv, (function(){
5705                             var tmp = v625;
5706                             return tmp === l5.value? l5.value: tmp.car;
5707                         })()))));
5708                     }), v624), v622), "}", (function(){
5709                         var symbol = l134;
5710                         var value = symbol.value;
5711                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5712                         return value;
5713                     })(), "finally {", (function(){
5714                         var symbol = l134;
5715                         var value = symbol.value;
5716                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5717                         return value;
5718                     })(), l144.fvalue(pv, l139.fvalue(pv, (function (values,v627){
5719                         checkArgs(arguments, 2);
5720                         var i;
5721                         return (function(v628){
5722                             return l135.fvalue(values, v628, ".value", " = ", (function(){
5723                                 var tmp = v627;
5724                                 return tmp === l5.value? l5.value: tmp.cdr;
5725                             })(), ";", (function(){
5726                                 var symbol = l134;
5727                                 var value = symbol.value;
5728                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5729                                 return value;
5730                             })());
5731                         })(l146.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l168), l45.fvalue(pv, (function(){
5732                             var tmp = v627;
5733                             return tmp === l5.value? l5.value: tmp.car;
5734                         })()))));
5735                     }), v624)), "}", (function(){
5736                         var symbol = l134;
5737                         var value = symbol.value;
5738                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5739                         return value;
5740                     })());
5741                 })(l74.fvalue(pv, (function (values,v623){
5742                     checkArgs(arguments, 2);
5743                     var i;
5744                     return ({car: v623, cdr: l191.fvalue(pv, v623)});
5745                 }), l92.fvalue(pv, (function(){
5746                     var symbol = l252;
5747                     var func = symbol.fvalue;
5748                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5749                     return func;
5750                 })(), v621)));
5751             }
5752             catch (cf){
5753                 if (cf.type == 'block' && cf.id == 214)
5754                     return values.apply(this, forcemv(cf.values));
5755                 else
5756                     throw cf;
5757             }
5758         })();
5759     }));
5760     return l256;
5761 })();
5762 var l257 = {name: "LET*"};
5763 ((l207).value = ({car: l45.fvalue(pv, l257, (function (values,v631){
5764     checkArgsAtLeast(arguments, 2);
5765     var v630= l5.value;
5766     for (var i = arguments.length-1; i>=2; i--)
5767         v630 = {car: arguments[i], cdr:
5768     v630};
5769     var i;
5770     return (function(){
5771         return (function(v632,v633){
5772             try {
5773                 var tmp;
5774                 tmp = l189.value;
5775                 l189.value = v633;
5776                 v633 = tmp;
5777                 return l135.fvalue(values, "(function(){", (function(){
5778                     var symbol = l134;
5779                     var value = symbol.value;
5780                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5781                     return value;
5782                 })(), l144.fvalue(pv, (function(v634,v635){
5783                     return l256.fvalue(pv, v634, v635);
5784                 })(l92.fvalue(pv, (function(){
5785                     var symbol = l252;
5786                     var func = symbol.fvalue;
5787                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5788                     return func;
5789                 })(), l74.fvalue(pv, (function(){
5790                     var symbol = l40;
5791                     var func = symbol.fvalue;
5792                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5793                     return func;
5794                 })(), v632)),l135.fvalue(pv, l139.fvalue(pv, (function(){
5795                     var symbol = l255;
5796                     var func = symbol.fvalue;
5797                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5798                     return func;
5799                 })(), v632), l230.fvalue(pv, v630, l4.value)))), "})()");
5800             }
5801             finally {
5802                 l189.value = v633;
5803             }
5804         })(l74.fvalue(pv, (function(){
5805             var symbol = l59;
5806             var func = symbol.fvalue;
5807             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5808             return func;
5809         })(), v631),l183.fvalue(pv, (function(){
5810             var symbol = l189;
5811             var value = symbol.value;
5812             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5813             return value;
5814         })()));
5815     })();
5816 })), cdr: (function(){
5817     var symbol = l207;
5818     var value = symbol.value;
5819     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5820     return value;
5821 })()}));
5822 var l258 = {name: "*BLOCK-COUNTER*"};
5823 (function(){
5824     (((l258.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l258).value = 0));
5825     return l258;
5826 })();
5827 var l259 = {name: "MULTIPLE-VALUE"};
5828 var l260 = {name: "USED"};
5829 ((l207).value = ({car: l45.fvalue(pv, l185, (function (values,v637){
5830     checkArgsAtLeast(arguments, 2);
5831     var v636= l5.value;
5832     for (var i = arguments.length-1; i>=2; i--)
5833         v636 = {car: arguments[i], cdr:
5834     v636};
5835     var i;
5836     return (function(){
5837         return (function(){
5838             var v638 = l18.fvalue(pv, ((l258).value = (function(){
5839                 var x1 = (function(){
5840                     var symbol = l258;
5841                     var value = symbol.value;
5842                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5843                     return value;
5844                 })();
5845                 if (typeof x1 !== 'number') throw 'Not a number!';
5846                 var x2 = 1;
5847                 if (typeof x2 !== 'number') throw 'Not a number!';
5848                 return x1+x2;
5849             })()));
5850             var v639 = l174.fvalue(pv, v637, l185, v638);
5851             ((function(){
5852                 var symbol = l173;
5853                 var value = symbol.value;
5854                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5855                 return value;
5856             })() !== l5.value ? l181.fvalue(pv, l259, v639) : l5.value);
5857             return (function(){
5858                 try {
5859                     var v641 = l189.value;
5860                     ((l189).value = l187.fvalue(pv, l45.fvalue(pv, v639), (function(){
5861                         var symbol = l189;
5862                         var value = symbol.value;
5863                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5864                         return value;
5865                     })(), l185));
5866                     var v640 = l230.fvalue(pv, v636, l4.value);
5867                     return (l89.fvalue(pv, l260, l178.fvalue(pv, v639)) !== l5.value ? l135.fvalue(values, "(function(){", (function(){
5868                         var symbol = l134;
5869                         var value = symbol.value;
5870                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5871                         return value;
5872                     })(), l144.fvalue(pv, "try {", (function(){
5873                         var symbol = l134;
5874                         var value = symbol.value;
5875                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5876                         return value;
5877                     })(), l144.fvalue(pv, v640), "}", (function(){
5878                         var symbol = l134;
5879                         var value = symbol.value;
5880                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5881                         return value;
5882                     })(), "catch (cf){", (function(){
5883                         var symbol = l134;
5884                         var value = symbol.value;
5885                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5886                         return value;
5887                     })(), "    if (cf.type == 'block' && cf.id == ", v638, ")", (function(){
5888                         var symbol = l134;
5889                         var value = symbol.value;
5890                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5891                         return value;
5892                     })(), ((function(){
5893                         var symbol = l173;
5894                         var value = symbol.value;
5895                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5896                         return value;
5897                     })() !== l5.value ? "        return values.apply(this, forcemv(cf.values));" : "        return cf.values;"), (function(){
5898                         var symbol = l134;
5899                         var value = symbol.value;
5900                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5901                         return value;
5902                     })(), "    else", (function(){
5903                         var symbol = l134;
5904                         var value = symbol.value;
5905                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5906                         return value;
5907                     })(), "        throw cf;", (function(){
5908                         var symbol = l134;
5909                         var value = symbol.value;
5910                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5911                         return value;
5912                     })(), "}", (function(){
5913                         var symbol = l134;
5914                         var value = symbol.value;
5915                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5916                         return value;
5917                     })()), "})()") : l135.fvalue(values, "(function(){", (function(){
5918                         var symbol = l134;
5919                         var value = symbol.value;
5920                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5921                         return value;
5922                     })(), l144.fvalue(pv, v640), "})()"));
5923                 }
5924                 finally {
5925                     l189.value = v641;
5926                 }
5927             })();
5928         })();
5929     })();
5930 })), cdr: (function(){
5931     var symbol = l207;
5932     var value = symbol.value;
5933     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5934     return value;
5935 })()}));
5936 var l261 = {name: "RETURN-FROM"};
5937 ((l207).value = ({car: l45.fvalue(pv, l261, (function (values,v642,v643){
5938     checkArgsAtLeast(arguments, 2);
5939     checkArgsAtMost(arguments, 3);
5940     switch(arguments.length-1){
5941     case 1:
5942     v643=l5.value;
5943     default: break;
5944     }
5945     var i;
5946     return (function(){
5947         return (function(){
5948             var v644 = l188.fvalue(pv, v642, (function(){
5949                 var symbol = l189;
5950                 var value = symbol.value;
5951                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5952                 return value;
5953             })(), l185);
5954             var v645 = l89.fvalue(pv, l259, l178.fvalue(pv, v644));
5955             (l13.fvalue(pv, v644) !== l5.value ? (function(){
5956                 throw l135.fvalue(pv, "Unknown block `", (v642).name, "'.");
5957             })() : l5.value);
5958             l181.fvalue(pv, l260, v644);
5959             return l135.fvalue(values, "(function(){", (function(){
5960                 var symbol = l134;
5961                 var value = symbol.value;
5962                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5963                 return value;
5964             })(), l144.fvalue(pv, (v645 !== l5.value ? l135.fvalue(pv, "var values = mv;", (function(){
5965                 var symbol = l134;
5966                 var value = symbol.value;
5967                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5968                 return value;
5969             })()) : ""), "throw ({", "type: 'block', ", "id: ", l177.fvalue(pv, v644), ", ", "values: ", l146.fvalue(pv, v643, v645), ", ", "message: 'Return from unknown block ", (v642).name, ".'", "})"), "})()");
5970         })();
5971     })();
5972 })), cdr: (function(){
5973     var symbol = l207;
5974     var value = symbol.value;
5975     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5976     return value;
5977 })()}));
5978 var l262 = {name: "CATCH"};
5979 ((l207).value = ({car: l45.fvalue(pv, l262, (function (values,v647){
5980     checkArgsAtLeast(arguments, 2);
5981     var v646= l5.value;
5982     for (var i = arguments.length-1; i>=2; i--)
5983         v646 = {car: arguments[i], cdr:
5984     v646};
5985     var i;
5986     return (function(){
5987         return l135.fvalue(values, "(function(){", (function(){
5988             var symbol = l134;
5989             var value = symbol.value;
5990             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5991             return value;
5992         })(), l144.fvalue(pv, "var id = ", l146.fvalue(pv, v647), ";", (function(){
5993             var symbol = l134;
5994             var value = symbol.value;
5995             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5996             return value;
5997         })(), "try {", (function(){
5998             var symbol = l134;
5999             var value = symbol.value;
6000             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6001             return value;
6002         })(), l144.fvalue(pv, l230.fvalue(pv, v646, l4.value)), (function(){
6003             var symbol = l134;
6004             var value = symbol.value;
6005             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6006             return value;
6007         })(), "}", (function(){
6008             var symbol = l134;
6009             var value = symbol.value;
6010             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6011             return value;
6012         })(), "catch (cf){", (function(){
6013             var symbol = l134;
6014             var value = symbol.value;
6015             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6016             return value;
6017         })(), "    if (cf.type == 'catch' && cf.id == id)", (function(){
6018             var symbol = l134;
6019             var value = symbol.value;
6020             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6021             return value;
6022         })(), ((function(){
6023             var symbol = l173;
6024             var value = symbol.value;
6025             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6026             return value;
6027         })() !== l5.value ? "        return values.apply(this, forcemv(cf.values));" : "        return pv.apply(this, forcemv(cf.values));"), (function(){
6028             var symbol = l134;
6029             var value = symbol.value;
6030             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6031             return value;
6032         })(), "    else", (function(){
6033             var symbol = l134;
6034             var value = symbol.value;
6035             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6036             return value;
6037         })(), "        throw cf;", (function(){
6038             var symbol = l134;
6039             var value = symbol.value;
6040             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6041             return value;
6042         })(), "}", (function(){
6043             var symbol = l134;
6044             var value = symbol.value;
6045             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6046             return value;
6047         })()), "})()");
6048     })();
6049 })), cdr: (function(){
6050     var symbol = l207;
6051     var value = symbol.value;
6052     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6053     return value;
6054 })()}));
6055 var l263 = {name: "THROW"};
6056 ((l207).value = ({car: l45.fvalue(pv, l263, (function (values,v648,v649){
6057     checkArgs(arguments, 3);
6058     var i;
6059     return (function(){
6060         return l135.fvalue(values, "(function(){", (function(){
6061             var symbol = l134;
6062             var value = symbol.value;
6063             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6064             return value;
6065         })(), l144.fvalue(pv, "var values = mv;", (function(){
6066             var symbol = l134;
6067             var value = symbol.value;
6068             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6069             return value;
6070         })(), "throw ({", "type: 'catch', ", "id: ", l146.fvalue(pv, v648), ", ", "values: ", l146.fvalue(pv, v649, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
6071     })();
6072 })), cdr: (function(){
6073     var symbol = l207;
6074     var value = symbol.value;
6075     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6076     return value;
6077 })()}));
6078 var l264 = {name: "*TAGBODY-COUNTER*"};
6079 (function(){
6080     (((l264.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l264).value = 0));
6081     return l264;
6082 })();
6083 var l265 = {name: "*GO-TAG-COUNTER*"};
6084 (function(){
6085     (((l265.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l265).value = 0));
6086     return l265;
6087 })();
6088 var l266 = {name: "GO-TAG-P"};
6089 (function(){
6090     (l266).fvalue = (function(v652){
6091         ((v652)["fname"] = "GO-TAG-P");
6092         return v652;
6093     })((function (values,v650){
6094         checkArgs(arguments, 2);
6095         var i;
6096         return (function(){
6097             return (function(v651){
6098                 return (v651 !== l5.value ? v651 : ((function(){
6099                     var tmp = v650;
6100                     return (typeof tmp == 'object' && 'name' in tmp);
6101                 })()?l4.value: l5.value));
6102             })(l82.fvalue(pv, v650));
6103         })();
6104     }));
6105     return l266;
6106 })();
6107 var l267 = {name: "DECLARE-TAGBODY-TAGS"};
6108 (function(){
6109     (l267).fvalue = (function(v658){
6110         ((v658)["fname"] = "DECLARE-TAGBODY-TAGS");
6111         return v658;
6112     })((function (values,v653,v654){
6113         checkArgs(arguments, 3);
6114         var i;
6115         return (function(){
6116             return (function(v657){
6117                 return l187.fvalue(values, v657, (function(){
6118                     var symbol = l189;
6119                     var value = symbol.value;
6120                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6121                     return value;
6122                 })(), l186);
6123             })(l74.fvalue(pv, (function (values,v655){
6124                 checkArgs(arguments, 2);
6125                 var i;
6126                 return (function(v656){
6127                     return l174.fvalue(values, v655, l186, l45.fvalue(pv, v653, v656));
6128                 })(l18.fvalue(pv, ((l265).value = (function(){
6129                     var x1 = (function(){
6130                         var symbol = l265;
6131                         var value = symbol.value;
6132                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6133                         return value;
6134                     })();
6135                     if (typeof x1 !== 'number') throw 'Not a number!';
6136                     var x2 = 1;
6137                     if (typeof x2 !== 'number') throw 'Not a number!';
6138                     return x1+x2;
6139                 })())));
6140             }), l92.fvalue(pv, (function(){
6141                 var symbol = l266;
6142                 var func = symbol.fvalue;
6143                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6144                 return func;
6145             })(), v654)));
6146         })();
6147     }));
6148     return l267;
6149 })();
6150 var l268 = {name: "TAGBODY"};
6151 ((l207).value = ({car: l45.fvalue(pv, l268, (function (values){
6152     var v659= l5.value;
6153     for (var i = arguments.length-1; i>=1; i--)
6154         v659 = {car: arguments[i], cdr:
6155     v659};
6156     var i;
6157     return (function(){
6158         try {
6159             (l96.fvalue(pv, (function(){
6160                 var symbol = l266;
6161                 var func = symbol.fvalue;
6162                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6163                 return func;
6164             })(), v659) !== l5.value ? l5.value : (function(){
6165                 var values = mv;
6166                 throw ({type: 'block', id: 222, values: l146.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l249), v659, l45.fvalue(pv, l5))), message: 'Return from unknown block TAGBODY.'})
6167             })());
6168             (l266.fvalue(pv, (function(){
6169                 var tmp = v659;
6170                 return tmp === l5.value? l5.value: tmp.car;
6171             })()) !== l5.value ? l5.value : (v659 = ({car: l17.fvalue(pv, "START"), cdr: v659})));
6172             return (function(v660){
6173                 return (function(v662,v661){
6174                     try {
6175                         var tmp;
6176                         tmp = l189.value;
6177                         l189.value = v662;
6178                         v662 = tmp;
6179                         (function(v663){
6180                             return (v661 = l41.fvalue(pv, l177.fvalue(pv, v663)));
6181                         })(l188.fvalue(pv, l40.fvalue(pv, v659), (function(){
6182                             var symbol = l189;
6183                             var value = symbol.value;
6184                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6185                             return value;
6186                         })(), l186));
6187                         return l135.fvalue(values, "(function(){", (function(){
6188                             var symbol = l134;
6189                             var value = symbol.value;
6190                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6191                             return value;
6192                         })(), l144.fvalue(pv, "var tagbody_", v660, " = ", v661, ";", (function(){
6193                             var symbol = l134;
6194                             var value = symbol.value;
6195                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6196                             return value;
6197                         })(), "tbloop:", (function(){
6198                             var symbol = l134;
6199                             var value = symbol.value;
6200                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6201                             return value;
6202                         })(), "while (true) {", (function(){
6203                             var symbol = l134;
6204                             var value = symbol.value;
6205                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6206                             return value;
6207                         })(), l144.fvalue(pv, "try {", (function(){
6208                             var symbol = l134;
6209                             var value = symbol.value;
6210                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6211                             return value;
6212                         })(), l144.fvalue(pv, (function(v664){
6213                             return l135.fvalue(pv, "switch(tagbody_", v660, "){", (function(){
6214                                 var symbol = l134;
6215                                 var value = symbol.value;
6216                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6217                                 return value;
6218                             })(), "case ", v661, ":", (function(){
6219                                 var symbol = l134;
6220                                 var value = symbol.value;
6221                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6222                                 return value;
6223                             })(), (function(){
6224                                 return (function(v665,v666){
6225                                     (function(){
6226                                         while(v665 !== l5.value){
6227                                             (v666 = (function(){
6228                                                 var tmp = v665;
6229                                                 return tmp === l5.value? l5.value: tmp.car;
6230                                             })());
6231                                             (function(){
6232                                                 (v664 = l135.fvalue(pv, v664, (l28.fvalue(pv, l266.fvalue(pv, v666)) !== l5.value ? l144.fvalue(pv, l146.fvalue(pv, v666), ";", (function(){
6233                                                     var symbol = l134;
6234                                                     var value = symbol.value;
6235                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6236                                                     return value;
6237                                                 })()) : (function(v667){
6238                                                     return l135.fvalue(pv, "case ", l41.fvalue(pv, l177.fvalue(pv, v667)), ":", (function(){
6239                                                         var symbol = l134;
6240                                                         var value = symbol.value;
6241                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6242                                                         return value;
6243                                                     })());
6244                                                 })(l188.fvalue(pv, v666, (function(){
6245                                                     var symbol = l189;
6246                                                     var value = symbol.value;
6247                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6248                                                     return value;
6249                                                 })(), l186)))));
6250                                                 return l5.value;
6251                                             })();
6252                                             (v665 = (function(){
6253                                                 var tmp = v665;
6254                                                 return tmp === l5.value? l5.value: tmp.cdr;
6255                                             })());
6256                                         }return l5.value;
6257                                     })();
6258                                     return v664;
6259                                 })((function(){
6260                                     var tmp = v659;
6261                                     return tmp === l5.value? l5.value: tmp.cdr;
6262                                 })(),l5.value);
6263                             })(), "default:", (function(){
6264                                 var symbol = l134;
6265                                 var value = symbol.value;
6266                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6267                                 return value;
6268                             })(), "    break tbloop;", (function(){
6269                                 var symbol = l134;
6270                                 var value = symbol.value;
6271                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6272                                 return value;
6273                             })(), "}", (function(){
6274                                 var symbol = l134;
6275                                 var value = symbol.value;
6276                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6277                                 return value;
6278                             })());
6279                         })("")), "}", (function(){
6280                             var symbol = l134;
6281                             var value = symbol.value;
6282                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6283                             return value;
6284                         })(), "catch (jump) {", (function(){
6285                             var symbol = l134;
6286                             var value = symbol.value;
6287                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6288                             return value;
6289                         })(), "    if (jump.type == 'tagbody' && jump.id == ", v660, ")", (function(){
6290                             var symbol = l134;
6291                             var value = symbol.value;
6292                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6293                             return value;
6294                         })(), "        tagbody_", v660, " = jump.label;", (function(){
6295                             var symbol = l134;
6296                             var value = symbol.value;
6297                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6298                             return value;
6299                         })(), "    else", (function(){
6300                             var symbol = l134;
6301                             var value = symbol.value;
6302                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6303                             return value;
6304                         })(), "        throw(jump);", (function(){
6305                             var symbol = l134;
6306                             var value = symbol.value;
6307                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6308                             return value;
6309                         })(), "}", (function(){
6310                             var symbol = l134;
6311                             var value = symbol.value;
6312                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6313                             return value;
6314                         })()), "}", (function(){
6315                             var symbol = l134;
6316                             var value = symbol.value;
6317                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6318                             return value;
6319                         })(), "return ", l146.fvalue(pv, l5.value), ";", (function(){
6320                             var symbol = l134;
6321                             var value = symbol.value;
6322                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6323                             return value;
6324                         })()), "})()");
6325                     }
6326                     finally {
6327                         l189.value = v662;
6328                     }
6329                 })(l267.fvalue(pv, v660, v659),l5.value);
6330             })(l18.fvalue(pv, (function(){
6331                 var symbol = l264;
6332                 var value = symbol.value;
6333                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6334                 return value;
6335             })()));
6336         }
6337         catch (cf){
6338             if (cf.type == 'block' && cf.id == 222)
6339                 return values.apply(this, forcemv(cf.values));
6340             else
6341                 throw cf;
6342         }
6343     })();
6344 })), cdr: (function(){
6345     var symbol = l207;
6346     var value = symbol.value;
6347     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6348     return value;
6349 })()}));
6350 var l269 = {name: "GO"};
6351 ((l207).value = ({car: l45.fvalue(pv, l269, (function (values,v668){
6352     checkArgs(arguments, 2);
6353     var i;
6354     return (function(){
6355         return (function(v669,v670){
6356             return (v669 !== l5.value ? l135.fvalue(values, "(function(){", (function(){
6357                 var symbol = l134;
6358                 var value = symbol.value;
6359                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6360                 return value;
6361             })(), l144.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l40.fvalue(pv, l177.fvalue(pv, v669)), ", ", "label: ", l41.fvalue(pv, l177.fvalue(pv, v669)), ", ", "message: 'Attempt to GO to non-existing tag ", v670, "'", "})", (function(){
6362                 var symbol = l134;
6363                 var value = symbol.value;
6364                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6365                 return value;
6366             })()), "})()") : (function(){
6367                 throw l135.fvalue(pv, "Unknown tag `", v670, "'.");
6368             })());
6369         })(l188.fvalue(pv, v668, (function(){
6370             var symbol = l189;
6371             var value = symbol.value;
6372             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6373             return value;
6374         })(), l186),(((function(){
6375             var tmp = v668;
6376             return (typeof tmp == 'object' && 'name' in tmp);
6377         })()?l4.value: l5.value) !== l5.value ? (v668).name : (l82.fvalue(pv, v668) !== l5.value ? l18.fvalue(pv, v668) : l5.value)));
6378     })();
6379 })), cdr: (function(){
6380     var symbol = l207;
6381     var value = symbol.value;
6382     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6383     return value;
6384 })()}));
6385 var l270 = {name: "UNWIND-PROTECT"};
6386 ((l207).value = ({car: l45.fvalue(pv, l270, (function (values,v672){
6387     checkArgsAtLeast(arguments, 2);
6388     var v671= l5.value;
6389     for (var i = arguments.length-1; i>=2; i--)
6390         v671 = {car: arguments[i], cdr:
6391     v671};
6392     var i;
6393     return (function(){
6394         return l135.fvalue(values, "(function(){", (function(){
6395             var symbol = l134;
6396             var value = symbol.value;
6397             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6398             return value;
6399         })(), l144.fvalue(pv, "var ret = ", l146.fvalue(pv, l5.value), ";", (function(){
6400             var symbol = l134;
6401             var value = symbol.value;
6402             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6403             return value;
6404         })(), "try {", (function(){
6405             var symbol = l134;
6406             var value = symbol.value;
6407             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6408             return value;
6409         })(), l144.fvalue(pv, "ret = ", l146.fvalue(pv, v672), ";", (function(){
6410             var symbol = l134;
6411             var value = symbol.value;
6412             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6413             return value;
6414         })()), "} finally {", (function(){
6415             var symbol = l134;
6416             var value = symbol.value;
6417             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6418             return value;
6419         })(), l144.fvalue(pv, l230.fvalue(pv, v671)), "}", (function(){
6420             var symbol = l134;
6421             var value = symbol.value;
6422             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6423             return value;
6424         })(), "return ret;", (function(){
6425             var symbol = l134;
6426             var value = symbol.value;
6427             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6428             return value;
6429         })()), "})()");
6430     })();
6431 })), cdr: (function(){
6432     var symbol = l207;
6433     var value = symbol.value;
6434     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6435     return value;
6436 })()}));
6437 var l271 = {name: "MULTIPLE-VALUE-CALL"};
6438 ((l207).value = ({car: l45.fvalue(pv, l271, (function (values,v674){
6439     checkArgsAtLeast(arguments, 2);
6440     var v673= l5.value;
6441     for (var i = arguments.length-1; i>=2; i--)
6442         v673 = {car: arguments[i], cdr:
6443     v673};
6444     var i;
6445     return (function(){
6446         return l135.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         })(), l144.fvalue(pv, "var func = ", l146.fvalue(pv, v674), ";", (function(){
6452             var symbol = l134;
6453             var value = symbol.value;
6454             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6455             return value;
6456         })(), "var args = [", ((function(){
6457             var symbol = l173;
6458             var value = symbol.value;
6459             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6460             return value;
6461         })() !== l5.value ? "values" : "pv"), "];", (function(){
6462             var symbol = l134;
6463             var value = symbol.value;
6464             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6465             return value;
6466         })(), "return ", l135.fvalue(pv, "(function(){", (function(){
6467             var symbol = l134;
6468             var value = symbol.value;
6469             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6470             return value;
6471         })(), l144.fvalue(pv, "var values = mv;", (function(){
6472             var symbol = l134;
6473             var value = symbol.value;
6474             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6475             return value;
6476         })(), "var vs;", (function(){
6477             var symbol = l134;
6478             var value = symbol.value;
6479             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6480             return value;
6481         })(), l139.fvalue(pv, (function (values,v675){
6482             checkArgs(arguments, 2);
6483             var i;
6484             return l135.fvalue(values, "vs = ", l146.fvalue(pv, v675, l4.value), ";", (function(){
6485                 var symbol = l134;
6486                 var value = symbol.value;
6487                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6488                 return value;
6489             })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){
6490                 var symbol = l134;
6491                 var value = symbol.value;
6492                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6493                 return value;
6494             })(), l144.fvalue(pv, "args = args.concat(vs);", (function(){
6495                 var symbol = l134;
6496                 var value = symbol.value;
6497                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6498                 return value;
6499             })()), "else", (function(){
6500                 var symbol = l134;
6501                 var value = symbol.value;
6502                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6503                 return value;
6504             })(), l144.fvalue(pv, "args.push(vs);", (function(){
6505                 var symbol = l134;
6506                 var value = symbol.value;
6507                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6508                 return value;
6509             })()));
6510         }), v673), "return func.apply(window, args);", (function(){
6511             var symbol = l134;
6512             var value = symbol.value;
6513             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6514             return value;
6515         })()), "})()"), ";", (function(){
6516             var symbol = l134;
6517             var value = symbol.value;
6518             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6519             return value;
6520         })()), "})()");
6521     })();
6522 })), cdr: (function(){
6523     var symbol = l207;
6524     var value = symbol.value;
6525     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6526     return value;
6527 })()}));
6528 var l272 = {name: "MULTIPLE-VALUE-PROG1"};
6529 ((l207).value = ({car: l45.fvalue(pv, l272, (function (values,v677){
6530     checkArgsAtLeast(arguments, 2);
6531     var v676= l5.value;
6532     for (var i = arguments.length-1; i>=2; i--)
6533         v676 = {car: arguments[i], cdr:
6534     v676};
6535     var i;
6536     return (function(){
6537         return l135.fvalue(values, "(function(){", (function(){
6538             var symbol = l134;
6539             var value = symbol.value;
6540             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6541             return value;
6542         })(), l144.fvalue(pv, "var args = ", l146.fvalue(pv, v677, (function(){
6543             var symbol = l173;
6544             var value = symbol.value;
6545             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6546             return value;
6547         })()), ";", (function(){
6548             var symbol = l134;
6549             var value = symbol.value;
6550             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6551             return value;
6552         })(), l230.fvalue(pv, v676), "return args;", (function(){
6553             var symbol = l134;
6554             var value = symbol.value;
6555             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6556             return value;
6557         })()), "})()");
6558     })();
6559 })), cdr: (function(){
6560     var symbol = l207;
6561     var value = symbol.value;
6562     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6563     return value;
6564 })()}));
6565 var l273 = {name: "BACKQUOTE-EXPAND-1"};
6566 (function(){
6567     (l273).fvalue = (function(v680){
6568         ((v680)["fname"] = "BACKQUOTE-EXPAND-1");
6569         return v680;
6570     })((function (values,v678){
6571         checkArgs(arguments, 2);
6572         var i;
6573         return (function(){
6574             return (((function(){
6575                 var tmp = v678;
6576                 return (typeof tmp == 'object' && 'name' in tmp);
6577             })()?l4.value: l5.value) !== l5.value ? l45.fvalue(values, l168, v678) : (l46.fvalue(pv, v678) !== l5.value ? v678 : ((((function(){
6578                 var tmp = v678;
6579                 return tmp === l5.value? l5.value: tmp.car;
6580             })() === l171)?l4.value: l5.value) !== l5.value ? (function(){
6581                 var tmp = v678;
6582                 return tmp === l5.value? l5.value: tmp.car;
6583             })() : ((((function(){
6584                 var tmp = v678;
6585                 return tmp === l5.value? l5.value: tmp.car;
6586             })() === l169)?l4.value: l5.value) !== l5.value ? l273.fvalue(values, l273.fvalue(pv, l34.fvalue(pv, v678))) : ({car: l65, cdr: l74.fvalue(pv, (function (values,v679){
6587                 checkArgs(arguments, 2);
6588                 var i;
6589                 return ((l60.fvalue(pv, v679) !== l5.value ? (((function(){
6590                     var tmp = v679;
6591                     return tmp === l5.value? l5.value: tmp.car;
6592                 })() === l171)?l4.value: l5.value) : l5.value) !== l5.value ? l45.fvalue(values, l45, l34.fvalue(pv, v679)) : ((l60.fvalue(pv, v679) !== l5.value ? (((function(){
6593                     var tmp = v679;
6594                     return tmp === l5.value? l5.value: tmp.car;
6595                 })() === l170)?l4.value: l5.value) : l5.value) !== l5.value ? l34.fvalue(values, v679) : l45.fvalue(values, l45, l273.fvalue(pv, v679))));
6596             }), v678)})))));
6597         })();
6598     }));
6599     return l273;
6600 })();
6601 var l274 = {name: "BACKQUOTE-EXPAND"};
6602 (function(){
6603     (l274).fvalue = (function(v682){
6604         ((v682)["fname"] = "BACKQUOTE-EXPAND");
6605         return v682;
6606     })((function (values,v681){
6607         checkArgs(arguments, 2);
6608         var i;
6609         return (function(){
6610             return ((l60.fvalue(pv, v681) !== l5.value ? (((function(){
6611                 var tmp = v681;
6612                 return tmp === l5.value? l5.value: tmp.car;
6613             })() === l169)?l4.value: l5.value) : l5.value) !== l5.value ? l273.fvalue(values, l34.fvalue(pv, v681)) : v681);
6614         })();
6615     }));
6616     return l274;
6617 })();
6618 l169;
6619 ((l207).value = ({car: l45.fvalue(pv, l169, (function (values,v683){
6620     checkArgs(arguments, 2);
6621     var i;
6622     return (function(){
6623         return l146.fvalue(values, l273.fvalue(pv, v683));
6624     })();
6625 })), cdr: (function(){
6626     var symbol = l207;
6627     var value = symbol.value;
6628     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6629     return value;
6630 })()}));
6631 var l275 = {name: "*BUILTINS*"};
6632 (function(){
6633     (((l275.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l275).value = l5.value));
6634     return l275;
6635 })();
6636 var l276 = {name: "DEFINE-RAW-BUILTIN"};
6637 l276;
6638 var l277 = {name: "DEFINE-BUILTIN"};
6639 l277;
6640 var l278 = {name: "TYPE-CHECK"};
6641 l278;
6642 var l279 = {name: "VARIABLE-ARITY-CALL"};
6643 (function(){
6644     (l279).fvalue = (function(v692){
6645         ((v692)["fname"] = "VARIABLE-ARITY-CALL");
6646         return v692;
6647     })((function (values,v684,v685){
6648         checkArgs(arguments, 3);
6649         var i;
6650         return (function(){
6651             (((function(){
6652                 var tmp = v684;
6653                 return (typeof tmp == 'object' && 'car' in tmp);
6654             })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
6655                 throw "ARGS must be a non-empty list";
6656             })());
6657             return (function(v686,v687,v688){
6658                 (function(){
6659                     return (function(v689,v690){
6660                         (function(){
6661                             while(v689 !== l5.value){
6662                                 (v690 = (function(){
6663                                     var tmp = v689;
6664                                     return tmp === l5.value? l5.value: tmp.car;
6665                                 })());
6666                                 (function(){
6667                                     (function(v691){
6668                                         (v687 = ({car: v691, cdr: v687}));
6669                                         return (v688 = l135.fvalue(pv, v688, l135.fvalue(pv, "var ", v691, " = ", l146.fvalue(pv, v690), ";", (function(){
6670                                             var symbol = l134;
6671                                             var value = symbol.value;
6672                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6673                                             return value;
6674                                         })(), "if (typeof ", v691, " !== 'number') throw 'Not a number!';", (function(){
6675                                             var symbol = l134;
6676                                             var value = symbol.value;
6677                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6678                                             return value;
6679                                         })())));
6680                                     })(l135.fvalue(pv, "x", l18.fvalue(pv, (v686 = (function(){
6681                                         var x1 = v686;
6682                                         if (typeof x1 !== 'number') throw 'Not a number!';
6683                                         var x2 = 1;
6684                                         if (typeof x2 !== 'number') throw 'Not a number!';
6685                                         return x1+x2;
6686                                     })()))));
6687                                     return l5.value;
6688                                 })();
6689                                 (v689 = (function(){
6690                                     var tmp = v689;
6691                                     return tmp === l5.value? l5.value: tmp.cdr;
6692                                 })());
6693                             }return l5.value;
6694                         })();
6695                         return l5.value;
6696                     })(v684,l5.value);
6697                 })();
6698                 return l135.fvalue(values, "(function(){", (function(){
6699                     var symbol = l134;
6700                     var value = symbol.value;
6701                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6702                     return value;
6703                 })(), l144.fvalue(pv, v688, (v685)(pv, l67.fvalue(pv, v687))), "})()");
6704             })(0,l5,"");
6705         })();
6706     }));
6707     return l279;
6708 })();
6709 var l280 = {name: "VARIABLE-ARITY"};
6710 l280;
6711 var l281 = {name: "NUM-OP-NUM"};
6712 (function(){
6713     (l281).fvalue = (function(v696){
6714         ((v696)["fname"] = "NUM-OP-NUM");
6715         return v696;
6716     })((function (values,v693,v694,v695){
6717         checkArgs(arguments, 4);
6718         var i;
6719         return (function(){
6720             return l135.fvalue(values, "(function(){", (function(){
6721                 var symbol = l134;
6722                 var value = symbol.value;
6723                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6724                 return value;
6725             })(), l144.fvalue(pv, l135.fvalue(pv, "var ", "x", " = ", v693, ";", (function(){
6726                 var symbol = l134;
6727                 var value = symbol.value;
6728                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6729                 return value;
6730             })()), l135.fvalue(pv, "var ", "y", " = ", v695, ";", (function(){
6731                 var symbol = l134;
6732                 var value = symbol.value;
6733                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6734                 return value;
6735             })()), l135.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6736                 var symbol = l134;
6737                 var value = symbol.value;
6738                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6739                 return value;
6740             })(), l144.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6741                 var symbol = l134;
6742                 var value = symbol.value;
6743                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6744                 return value;
6745             })())), l135.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
6746                 var symbol = l134;
6747                 var value = symbol.value;
6748                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6749                 return value;
6750             })(), l144.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
6751                 var symbol = l134;
6752                 var value = symbol.value;
6753                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6754                 return value;
6755             })())), l135.fvalue(pv, "return ", l135.fvalue(pv, "x", v694, "y"), ";", (function(){
6756                 var symbol = l134;
6757                 var value = symbol.value;
6758                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6759                 return value;
6760             })())), "})()");
6761         })();
6762     }));
6763     return l281;
6764 })();
6765 ((l275).value = ({car: l45.fvalue(pv, l62, (function (values){
6766     var v697= l5.value;
6767     for (var i = arguments.length-1; i>=1; i--)
6768         v697 = {car: arguments[i], cdr:
6769     v697};
6770     var i;
6771     return (function(){
6772         return (l13.fvalue(pv, v697) !== l5.value ? "0" : l279.fvalue(values, v697, (function (values,v698){
6773             checkArgs(arguments, 2);
6774             var i;
6775             return l135.fvalue(values, "return ", l137.fvalue(pv, v698, "+"), ";", (function(){
6776                 var symbol = l134;
6777                 var value = symbol.value;
6778                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6779                 return value;
6780             })());
6781         })));
6782     })();
6783 })), cdr: (function(){
6784     var symbol = l275;
6785     var value = symbol.value;
6786     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6787     return value;
6788 })()}));
6789 ((l275).value = ({car: l45.fvalue(pv, l63, (function (values,v700){
6790     checkArgsAtLeast(arguments, 2);
6791     var v699= l5.value;
6792     for (var i = arguments.length-1; i>=2; i--)
6793         v699 = {car: arguments[i], cdr:
6794     v699};
6795     var i;
6796     return (function(){
6797         return (function(v701){
6798             return l279.fvalue(values, v701, (function (values,v702){
6799                 checkArgs(arguments, 2);
6800                 var i;
6801                 return l135.fvalue(values, "return ", (l13.fvalue(pv, v699) !== l5.value ? l135.fvalue(pv, "-", (function(){
6802                     var tmp = v702;
6803                     return tmp === l5.value? l5.value: tmp.car;
6804                 })()) : l137.fvalue(pv, v702, "-")), ";", (function(){
6805                     var symbol = l134;
6806                     var value = symbol.value;
6807                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6808                     return value;
6809                 })());
6810             }));
6811         })(({car: v700, cdr: v699}));
6812     })();
6813 })), cdr: (function(){
6814     var symbol = l275;
6815     var value = symbol.value;
6816     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6817     return value;
6818 })()}));
6819 ((l275).value = ({car: l45.fvalue(pv, l21, (function (values){
6820     var v703= l5.value;
6821     for (var i = arguments.length-1; i>=1; i--)
6822         v703 = {car: arguments[i], cdr:
6823     v703};
6824     var i;
6825     return (function(){
6826         return (l13.fvalue(pv, v703) !== l5.value ? "1" : l279.fvalue(values, v703, (function (values,v704){
6827             checkArgs(arguments, 2);
6828             var i;
6829             return l135.fvalue(values, "return ", l137.fvalue(pv, v704, "*"), ";", (function(){
6830                 var symbol = l134;
6831                 var value = symbol.value;
6832                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6833                 return value;
6834             })());
6835         })));
6836     })();
6837 })), cdr: (function(){
6838     var symbol = l275;
6839     var value = symbol.value;
6840     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6841     return value;
6842 })()}));
6843 ((l275).value = ({car: l45.fvalue(pv, l22, (function (values,v706){
6844     checkArgsAtLeast(arguments, 2);
6845     var v705= l5.value;
6846     for (var i = arguments.length-1; i>=2; i--)
6847         v705 = {car: arguments[i], cdr:
6848     v705};
6849     var i;
6850     return (function(){
6851         return (function(v707){
6852             return l279.fvalue(values, v707, (function (values,v708){
6853                 checkArgs(arguments, 2);
6854                 var i;
6855                 return l135.fvalue(values, "return ", (l13.fvalue(pv, v705) !== l5.value ? l135.fvalue(pv, "1 /", (function(){
6856                     var tmp = v708;
6857                     return tmp === l5.value? l5.value: tmp.car;
6858                 })()) : l137.fvalue(pv, v708, "/")), ";", (function(){
6859                     var symbol = l134;
6860                     var value = symbol.value;
6861                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6862                     return value;
6863                 })());
6864             }));
6865         })(({car: v706, cdr: v705}));
6866     })();
6867 })), cdr: (function(){
6868     var symbol = l275;
6869     var value = symbol.value;
6870     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6871     return value;
6872 })()}));
6873 var l282 = {name: "MOD"};
6874 ((l275).value = ({car: l45.fvalue(pv, l282, (function (values,v709,v710){
6875     checkArgs(arguments, 3);
6876     var i;
6877     return (function(){
6878         return (function(v711,v712){
6879             return l281.fvalue(values, v711, "%", v712);
6880         })(l146.fvalue(pv, v709),l146.fvalue(pv, v710));
6881     })();
6882 })), cdr: (function(){
6883     var symbol = l275;
6884     var value = symbol.value;
6885     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6886     return value;
6887 })()}));
6888 var l283 = {name: "COMPARISON-CONJUNTION"};
6889 (function(){
6890     (l283).fvalue = (function(v715){
6891         ((v715)["fname"] = "COMPARISON-CONJUNTION");
6892         return v715;
6893     })((function (values,v713,v714){
6894         checkArgs(arguments, 3);
6895         var i;
6896         return (function(){
6897             return (l13.fvalue(pv, (function(){
6898                 var tmp = v713;
6899                 return tmp === l5.value? l5.value: tmp.cdr;
6900             })()) !== l5.value ? "true" : (l13.fvalue(pv, l36.fvalue(pv, v713)) !== l5.value ? l135.fvalue(values, (function(){
6901                 var tmp = v713;
6902                 return tmp === l5.value? l5.value: tmp.car;
6903             })(), v714, l34.fvalue(pv, v713)) : l135.fvalue(values, (function(){
6904                 var tmp = v713;
6905                 return tmp === l5.value? l5.value: tmp.car;
6906             })(), v714, l34.fvalue(pv, v713), " && ", l283.fvalue(pv, (function(){
6907                 var tmp = v713;
6908                 return tmp === l5.value? l5.value: tmp.cdr;
6909             })(), v714))));
6910         })();
6911     }));
6912     return l283;
6913 })();
6914 var l284 = {name: "DEFINE-BUILTIN-COMPARISON"};
6915 l284;
6916 var l285 = {name: ">"};
6917 ((l275).value = ({car: l45.fvalue(pv, l285, (function (values,v717){
6918     checkArgsAtLeast(arguments, 2);
6919     var v716= l5.value;
6920     for (var i = arguments.length-1; i>=2; i--)
6921         v716 = {car: arguments[i], cdr:
6922     v716};
6923     var i;
6924     return (function(){
6925         return (function(v718){
6926             return l279.fvalue(values, v718, (function (values,v719){
6927                 checkArgs(arguments, 2);
6928                 var i;
6929                 return l135.fvalue(values, "return ", l145.fvalue(pv, l283.fvalue(pv, v719, ">")), ";", (function(){
6930                     var symbol = l134;
6931                     var value = symbol.value;
6932                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6933                     return value;
6934                 })());
6935             }));
6936         })(({car: v717, cdr: v716}));
6937     })();
6938 })), cdr: (function(){
6939     var symbol = l275;
6940     var value = symbol.value;
6941     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6942     return value;
6943 })()}));
6944 var l286 = {name: "<"};
6945 ((l275).value = ({car: l45.fvalue(pv, l286, (function (values,v721){
6946     checkArgsAtLeast(arguments, 2);
6947     var v720= l5.value;
6948     for (var i = arguments.length-1; i>=2; i--)
6949         v720 = {car: arguments[i], cdr:
6950     v720};
6951     var i;
6952     return (function(){
6953         return (function(v722){
6954             return l279.fvalue(values, v722, (function (values,v723){
6955                 checkArgs(arguments, 2);
6956                 var i;
6957                 return l135.fvalue(values, "return ", l145.fvalue(pv, l283.fvalue(pv, v723, "<")), ";", (function(){
6958                     var symbol = l134;
6959                     var value = symbol.value;
6960                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6961                     return value;
6962                 })());
6963             }));
6964         })(({car: v721, cdr: v720}));
6965     })();
6966 })), cdr: (function(){
6967     var symbol = l275;
6968     var value = symbol.value;
6969     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6970     return value;
6971 })()}));
6972 var l287 = {name: ">="};
6973 ((l275).value = ({car: l45.fvalue(pv, l287, (function (values,v725){
6974     checkArgsAtLeast(arguments, 2);
6975     var v724= l5.value;
6976     for (var i = arguments.length-1; i>=2; i--)
6977         v724 = {car: arguments[i], cdr:
6978     v724};
6979     var i;
6980     return (function(){
6981         return (function(v726){
6982             return l279.fvalue(values, v726, (function (values,v727){
6983                 checkArgs(arguments, 2);
6984                 var i;
6985                 return l135.fvalue(values, "return ", l145.fvalue(pv, l283.fvalue(pv, v727, ">=")), ";", (function(){
6986                     var symbol = l134;
6987                     var value = symbol.value;
6988                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6989                     return value;
6990                 })());
6991             }));
6992         })(({car: v725, cdr: v724}));
6993     })();
6994 })), cdr: (function(){
6995     var symbol = l275;
6996     var value = symbol.value;
6997     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6998     return value;
6999 })()}));
7000 var l288 = {name: "<="};
7001 ((l275).value = ({car: l45.fvalue(pv, l288, (function (values,v729){
7002     checkArgsAtLeast(arguments, 2);
7003     var v728= l5.value;
7004     for (var i = arguments.length-1; i>=2; i--)
7005         v728 = {car: arguments[i], cdr:
7006     v728};
7007     var i;
7008     return (function(){
7009         return (function(v730){
7010             return l279.fvalue(values, v730, (function (values,v731){
7011                 checkArgs(arguments, 2);
7012                 var i;
7013                 return l135.fvalue(values, "return ", l145.fvalue(pv, l283.fvalue(pv, v731, "<=")), ";", (function(){
7014                     var symbol = l134;
7015                     var value = symbol.value;
7016                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7017                     return value;
7018                 })());
7019             }));
7020         })(({car: v729, cdr: v728}));
7021     })();
7022 })), cdr: (function(){
7023     var symbol = l275;
7024     var value = symbol.value;
7025     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7026     return value;
7027 })()}));
7028 ((l275).value = ({car: l45.fvalue(pv, l20, (function (values,v733){
7029     checkArgsAtLeast(arguments, 2);
7030     var v732= l5.value;
7031     for (var i = arguments.length-1; i>=2; i--)
7032         v732 = {car: arguments[i], cdr:
7033     v732};
7034     var i;
7035     return (function(){
7036         return (function(v734){
7037             return l279.fvalue(values, v734, (function (values,v735){
7038                 checkArgs(arguments, 2);
7039                 var i;
7040                 return l135.fvalue(values, "return ", l145.fvalue(pv, l283.fvalue(pv, v735, "==")), ";", (function(){
7041                     var symbol = l134;
7042                     var value = symbol.value;
7043                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7044                     return value;
7045                 })());
7046             }));
7047         })(({car: v733, cdr: v732}));
7048     })();
7049 })), cdr: (function(){
7050     var symbol = l275;
7051     var value = symbol.value;
7052     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7053     return value;
7054 })()}));
7055 var l289 = {name: "NUMBERP"};
7056 ((l275).value = ({car: l45.fvalue(pv, l289, (function (values,v736){
7057     checkArgs(arguments, 2);
7058     var i;
7059     return (function(){
7060         return (function(v737){
7061             return l145.fvalue(values, l135.fvalue(pv, "(typeof (", v737, ") == \"number\")"));
7062         })(l146.fvalue(pv, v736));
7063     })();
7064 })), cdr: (function(){
7065     var symbol = l275;
7066     var value = symbol.value;
7067     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7068     return value;
7069 })()}));
7070 var l290 = {name: "FLOOR"};
7071 ((l275).value = ({car: l45.fvalue(pv, l290, (function (values,v738){
7072     checkArgs(arguments, 2);
7073     var i;
7074     return (function(){
7075         return (function(v739){
7076             return l135.fvalue(values, "(function(){", (function(){
7077                 var symbol = l134;
7078                 var value = symbol.value;
7079                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7080                 return value;
7081             })(), l144.fvalue(pv, l135.fvalue(pv, "var ", "x", " = ", v739, ";", (function(){
7082                 var symbol = l134;
7083                 var value = symbol.value;
7084                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7085                 return value;
7086             })()), l135.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7087                 var symbol = l134;
7088                 var value = symbol.value;
7089                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7090                 return value;
7091             })(), l144.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7092                 var symbol = l134;
7093                 var value = symbol.value;
7094                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7095                 return value;
7096             })())), l135.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){
7097                 var symbol = l134;
7098                 var value = symbol.value;
7099                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7100                 return value;
7101             })())), "})()");
7102         })(l146.fvalue(pv, v738));
7103     })();
7104 })), cdr: (function(){
7105     var symbol = l275;
7106     var value = symbol.value;
7107     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7108     return value;
7109 })()}));
7110 ((l275).value = ({car: l45.fvalue(pv, l29, (function (values,v740,v741){
7111     checkArgs(arguments, 3);
7112     var i;
7113     return (function(){
7114         return (function(v742,v743){
7115             return l135.fvalue(values, "({car: ", v742, ", cdr: ", v743, "})");
7116         })(l146.fvalue(pv, v740),l146.fvalue(pv, v741));
7117     })();
7118 })), cdr: (function(){
7119     var symbol = l275;
7120     var value = symbol.value;
7121     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7122     return value;
7123 })()}));
7124 ((l275).value = ({car: l45.fvalue(pv, l30, (function (values,v744){
7125     checkArgs(arguments, 2);
7126     var i;
7127     return (function(){
7128         return (function(v745){
7129             return l145.fvalue(values, l135.fvalue(pv, "(function(){", (function(){
7130                 var symbol = l134;
7131                 var value = symbol.value;
7132                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7133                 return value;
7134             })(), l144.fvalue(pv, "var tmp = ", v745, ";", (function(){
7135                 var symbol = l134;
7136                 var value = symbol.value;
7137                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7138                 return value;
7139             })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
7140                 var symbol = l134;
7141                 var value = symbol.value;
7142                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7143                 return value;
7144             })()), "})()"));
7145         })(l146.fvalue(pv, v744));
7146     })();
7147 })), cdr: (function(){
7148     var symbol = l275;
7149     var value = symbol.value;
7150     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7151     return value;
7152 })()}));
7153 ((l275).value = ({car: l45.fvalue(pv, l31, (function (values,v746){
7154     checkArgs(arguments, 2);
7155     var i;
7156     return (function(){
7157         return (function(v747){
7158             return l135.fvalue(values, "(function(){", (function(){
7159                 var symbol = l134;
7160                 var value = symbol.value;
7161                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7162                 return value;
7163             })(), l144.fvalue(pv, "var tmp = ", v747, ";", (function(){
7164                 var symbol = l134;
7165                 var value = symbol.value;
7166                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7167                 return value;
7168             })(), "return tmp === ", l146.fvalue(pv, l5.value), "? ", l146.fvalue(pv, l5.value), ": tmp.car;", (function(){
7169                 var symbol = l134;
7170                 var value = symbol.value;
7171                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7172                 return value;
7173             })()), "})()");
7174         })(l146.fvalue(pv, v746));
7175     })();
7176 })), cdr: (function(){
7177     var symbol = l275;
7178     var value = symbol.value;
7179     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7180     return value;
7181 })()}));
7182 ((l275).value = ({car: l45.fvalue(pv, l32, (function (values,v748){
7183     checkArgs(arguments, 2);
7184     var i;
7185     return (function(){
7186         return (function(v749){
7187             return l135.fvalue(values, "(function(){", (function(){
7188                 var symbol = l134;
7189                 var value = symbol.value;
7190                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7191                 return value;
7192             })(), l144.fvalue(pv, "var tmp = ", v749, ";", (function(){
7193                 var symbol = l134;
7194                 var value = symbol.value;
7195                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7196                 return value;
7197             })(), "return tmp === ", l146.fvalue(pv, l5.value), "? ", l146.fvalue(pv, l5.value), ": tmp.cdr;", (function(){
7198                 var symbol = l134;
7199                 var value = symbol.value;
7200                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7201                 return value;
7202             })()), "})()");
7203         })(l146.fvalue(pv, v748));
7204     })();
7205 })), cdr: (function(){
7206     var symbol = l275;
7207     var value = symbol.value;
7208     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7209     return value;
7210 })()}));
7211 var l291 = {name: "RPLACA"};
7212 ((l275).value = ({car: l45.fvalue(pv, l291, (function (values,v750,v751){
7213     checkArgs(arguments, 3);
7214     var i;
7215     return (function(){
7216         return (function(v752,v753){
7217             return l135.fvalue(values, "(function(){", (function(){
7218                 var symbol = l134;
7219                 var value = symbol.value;
7220                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7221                 return value;
7222             })(), l144.fvalue(pv, l135.fvalue(pv, "var ", "x", " = ", v752, ";", (function(){
7223                 var symbol = l134;
7224                 var value = symbol.value;
7225                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7226                 return value;
7227             })()), l135.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
7228                 var symbol = l134;
7229                 var value = symbol.value;
7230                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7231                 return value;
7232             })(), l144.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
7233                 var symbol = l134;
7234                 var value = symbol.value;
7235                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7236                 return value;
7237             })())), l135.fvalue(pv, "return ", l135.fvalue(pv, "(x.car = ", v753, ", x)"), ";", (function(){
7238                 var symbol = l134;
7239                 var value = symbol.value;
7240                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7241                 return value;
7242             })())), "})()");
7243         })(l146.fvalue(pv, v750),l146.fvalue(pv, v751));
7244     })();
7245 })), cdr: (function(){
7246     var symbol = l275;
7247     var value = symbol.value;
7248     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7249     return value;
7250 })()}));
7251 var l292 = {name: "RPLACD"};
7252 ((l275).value = ({car: l45.fvalue(pv, l292, (function (values,v754,v755){
7253     checkArgs(arguments, 3);
7254     var i;
7255     return (function(){
7256         return (function(v756,v757){
7257             return l135.fvalue(values, "(function(){", (function(){
7258                 var symbol = l134;
7259                 var value = symbol.value;
7260                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7261                 return value;
7262             })(), l144.fvalue(pv, l135.fvalue(pv, "var ", "x", " = ", v756, ";", (function(){
7263                 var symbol = l134;
7264                 var value = symbol.value;
7265                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7266                 return value;
7267             })()), l135.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
7268                 var symbol = l134;
7269                 var value = symbol.value;
7270                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7271                 return value;
7272             })(), l144.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
7273                 var symbol = l134;
7274                 var value = symbol.value;
7275                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7276                 return value;
7277             })())), l135.fvalue(pv, "return ", l135.fvalue(pv, "(x.cdr = ", v757, ", x)"), ";", (function(){
7278                 var symbol = l134;
7279                 var value = symbol.value;
7280                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7281                 return value;
7282             })())), "})()");
7283         })(l146.fvalue(pv, v754),l146.fvalue(pv, v755));
7284     })();
7285 })), cdr: (function(){
7286     var symbol = l275;
7287     var value = symbol.value;
7288     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7289     return value;
7290 })()}));
7291 var l293 = {name: "SYMBOLP"};
7292 ((l275).value = ({car: l45.fvalue(pv, l293, (function (values,v758){
7293     checkArgs(arguments, 2);
7294     var i;
7295     return (function(){
7296         return (function(v759){
7297             return l145.fvalue(values, l135.fvalue(pv, "(function(){", (function(){
7298                 var symbol = l134;
7299                 var value = symbol.value;
7300                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7301                 return value;
7302             })(), l144.fvalue(pv, "var tmp = ", v759, ";", (function(){
7303                 var symbol = l134;
7304                 var value = symbol.value;
7305                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7306                 return value;
7307             })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
7308                 var symbol = l134;
7309                 var value = symbol.value;
7310                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7311                 return value;
7312             })()), "})()"));
7313         })(l146.fvalue(pv, v758));
7314     })();
7315 })), cdr: (function(){
7316     var symbol = l275;
7317     var value = symbol.value;
7318     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7319     return value;
7320 })()}));
7321 var l294 = {name: "MAKE-SYMBOL"};
7322 ((l275).value = ({car: l45.fvalue(pv, l294, (function (values,v760){
7323     checkArgs(arguments, 2);
7324     var i;
7325     return (function(){
7326         return (function(v761){
7327             return l135.fvalue(values, "(function(){", (function(){
7328                 var symbol = l134;
7329                 var value = symbol.value;
7330                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7331                 return value;
7332             })(), l144.fvalue(pv, l135.fvalue(pv, "var ", "name", " = ", v761, ";", (function(){
7333                 var symbol = l134;
7334                 var value = symbol.value;
7335                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7336                 return value;
7337             })()), l135.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){
7338                 var symbol = l134;
7339                 var value = symbol.value;
7340                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7341                 return value;
7342             })(), l144.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
7343                 var symbol = l134;
7344                 var value = symbol.value;
7345                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7346                 return value;
7347             })())), l135.fvalue(pv, "return ", "({name: name})", ";", (function(){
7348                 var symbol = l134;
7349                 var value = symbol.value;
7350                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7351                 return value;
7352             })())), "})()");
7353         })(l146.fvalue(pv, v760));
7354     })();
7355 })), cdr: (function(){
7356     var symbol = l275;
7357     var value = symbol.value;
7358     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7359     return value;
7360 })()}));
7361 var l295 = {name: "SYMBOL-NAME"};
7362 ((l275).value = ({car: l45.fvalue(pv, l295, (function (values,v762){
7363     checkArgs(arguments, 2);
7364     var i;
7365     return (function(){
7366         return (function(v763){
7367             return l135.fvalue(values, "(", v763, ").name");
7368         })(l146.fvalue(pv, v762));
7369     })();
7370 })), cdr: (function(){
7371     var symbol = l275;
7372     var value = symbol.value;
7373     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7374     return value;
7375 })()}));
7376 ((l275).value = ({car: l45.fvalue(pv, l232, (function (values,v764,v765){
7377     checkArgs(arguments, 3);
7378     var i;
7379     return (function(){
7380         return (function(v766,v767){
7381             return l135.fvalue(values, "(", v766, ").value = ", v767);
7382         })(l146.fvalue(pv, v764),l146.fvalue(pv, v765));
7383     })();
7384 })), cdr: (function(){
7385     var symbol = l275;
7386     var value = symbol.value;
7387     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7388     return value;
7389 })()}));
7390 var l296 = {name: "FSET"};
7391 ((l275).value = ({car: l45.fvalue(pv, l296, (function (values,v768,v769){
7392     checkArgs(arguments, 3);
7393     var i;
7394     return (function(){
7395         return (function(v770,v771){
7396             return l135.fvalue(values, "(", v770, ").fvalue = ", v771);
7397         })(l146.fvalue(pv, v768),l146.fvalue(pv, v769));
7398     })();
7399 })), cdr: (function(){
7400     var symbol = l275;
7401     var value = symbol.value;
7402     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7403     return value;
7404 })()}));
7405 ((l275).value = ({car: l45.fvalue(pv, l19, (function (values,v772){
7406     checkArgs(arguments, 2);
7407     var i;
7408     return (function(){
7409         return (function(v773){
7410             return l145.fvalue(values, l135.fvalue(pv, "(", v773, ".value !== undefined)"));
7411         })(l146.fvalue(pv, v772));
7412     })();
7413 })), cdr: (function(){
7414     var symbol = l275;
7415     var value = symbol.value;
7416     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7417     return value;
7418 })()}));
7419 var l297 = {name: "SYMBOL-VALUE"};
7420 ((l275).value = ({car: l45.fvalue(pv, l297, (function (values,v774){
7421     checkArgs(arguments, 2);
7422     var i;
7423     return (function(){
7424         return (function(v775){
7425             return l135.fvalue(values, "(function(){", (function(){
7426                 var symbol = l134;
7427                 var value = symbol.value;
7428                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7429                 return value;
7430             })(), l144.fvalue(pv, "var symbol = ", v775, ";", (function(){
7431                 var symbol = l134;
7432                 var value = symbol.value;
7433                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7434                 return value;
7435             })(), "var value = symbol.value;", (function(){
7436                 var symbol = l134;
7437                 var value = symbol.value;
7438                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7439                 return value;
7440             })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
7441                 var symbol = l134;
7442                 var value = symbol.value;
7443                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7444                 return value;
7445             })(), "return value;", (function(){
7446                 var symbol = l134;
7447                 var value = symbol.value;
7448                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7449                 return value;
7450             })()), "})()");
7451         })(l146.fvalue(pv, v774));
7452     })();
7453 })), cdr: (function(){
7454     var symbol = l275;
7455     var value = symbol.value;
7456     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7457     return value;
7458 })()}));
7459 ((l275).value = ({car: l45.fvalue(pv, l241, (function (values,v776){
7460     checkArgs(arguments, 2);
7461     var i;
7462     return (function(){
7463         return (function(v777){
7464             return l135.fvalue(values, "(function(){", (function(){
7465                 var symbol = l134;
7466                 var value = symbol.value;
7467                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7468                 return value;
7469             })(), l144.fvalue(pv, "var symbol = ", v777, ";", (function(){
7470                 var symbol = l134;
7471                 var value = symbol.value;
7472                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7473                 return value;
7474             })(), "var func = symbol.fvalue;", (function(){
7475                 var symbol = l134;
7476                 var value = symbol.value;
7477                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7478                 return value;
7479             })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
7480                 var symbol = l134;
7481                 var value = symbol.value;
7482                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7483                 return value;
7484             })(), "return func;", (function(){
7485                 var symbol = l134;
7486                 var value = symbol.value;
7487                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7488                 return value;
7489             })()), "})()");
7490         })(l146.fvalue(pv, v776));
7491     })();
7492 })), cdr: (function(){
7493     var symbol = l275;
7494     var value = symbol.value;
7495     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7496     return value;
7497 })()}));
7498 var l298 = {name: "SYMBOL-PLIST"};
7499 ((l275).value = ({car: l45.fvalue(pv, l298, (function (values,v778){
7500     checkArgs(arguments, 2);
7501     var i;
7502     return (function(){
7503         return (function(v779){
7504             return l135.fvalue(values, "((", v779, ").plist || ", l146.fvalue(pv, l5.value), ")");
7505         })(l146.fvalue(pv, v778));
7506     })();
7507 })), cdr: (function(){
7508     var symbol = l275;
7509     var value = symbol.value;
7510     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7511     return value;
7512 })()}));
7513 var l299 = {name: "LAMBDA-CODE"};
7514 ((l275).value = ({car: l45.fvalue(pv, l299, (function (values,v780){
7515     checkArgs(arguments, 2);
7516     var i;
7517     return (function(){
7518         return (function(v781){
7519             return l135.fvalue(values, "(", v781, ").toString()");
7520         })(l146.fvalue(pv, v780));
7521     })();
7522 })), cdr: (function(){
7523     var symbol = l275;
7524     var value = symbol.value;
7525     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7526     return value;
7527 })()}));
7528 var l300 = {name: "EQ"};
7529 ((l275).value = ({car: l45.fvalue(pv, l300, (function (values,v782,v783){
7530     checkArgs(arguments, 3);
7531     var i;
7532     return (function(){
7533         return (function(v784,v785){
7534             return l145.fvalue(values, l135.fvalue(pv, "(", v784, " === ", v785, ")"));
7535         })(l146.fvalue(pv, v782),l146.fvalue(pv, v783));
7536     })();
7537 })), cdr: (function(){
7538     var symbol = l275;
7539     var value = symbol.value;
7540     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7541     return value;
7542 })()}));
7543 var l301 = {name: "EQUAL"};
7544 ((l275).value = ({car: l45.fvalue(pv, l301, (function (values,v786,v787){
7545     checkArgs(arguments, 3);
7546     var i;
7547     return (function(){
7548         return (function(v788,v789){
7549             return l145.fvalue(values, l135.fvalue(pv, "(", v788, " == ", v789, ")"));
7550         })(l146.fvalue(pv, v786),l146.fvalue(pv, v787));
7551     })();
7552 })), cdr: (function(){
7553     var symbol = l275;
7554     var value = symbol.value;
7555     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7556     return value;
7557 })()}));
7558 var l302 = {name: "CHAR-TO-STRING"};
7559 ((l275).value = ({car: l45.fvalue(pv, l302, (function (values,v790){
7560     checkArgs(arguments, 2);
7561     var i;
7562     return (function(){
7563         return (function(v791){
7564             return l135.fvalue(values, "(function(){", (function(){
7565                 var symbol = l134;
7566                 var value = symbol.value;
7567                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7568                 return value;
7569             })(), l144.fvalue(pv, l135.fvalue(pv, "var ", "x", " = ", v791, ";", (function(){
7570                 var symbol = l134;
7571                 var value = symbol.value;
7572                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7573                 return value;
7574             })()), l135.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7575                 var symbol = l134;
7576                 var value = symbol.value;
7577                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7578                 return value;
7579             })(), l144.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7580                 var symbol = l134;
7581                 var value = symbol.value;
7582                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7583                 return value;
7584             })())), l135.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){
7585                 var symbol = l134;
7586                 var value = symbol.value;
7587                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7588                 return value;
7589             })())), "})()");
7590         })(l146.fvalue(pv, v790));
7591     })();
7592 })), cdr: (function(){
7593     var symbol = l275;
7594     var value = symbol.value;
7595     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7596     return value;
7597 })()}));
7598 var l303 = {name: "STRINGP"};
7599 ((l275).value = ({car: l45.fvalue(pv, l303, (function (values,v792){
7600     checkArgs(arguments, 2);
7601     var i;
7602     return (function(){
7603         return (function(v793){
7604             return l145.fvalue(values, l135.fvalue(pv, "(typeof(", v793, ") == \"string\")"));
7605         })(l146.fvalue(pv, v792));
7606     })();
7607 })), cdr: (function(){
7608     var symbol = l275;
7609     var value = symbol.value;
7610     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7611     return value;
7612 })()}));
7613 var l304 = {name: "STRING-UPCASE"};
7614 ((l275).value = ({car: l45.fvalue(pv, l304, (function (values,v794){
7615     checkArgs(arguments, 2);
7616     var i;
7617     return (function(){
7618         return (function(v795){
7619             return l135.fvalue(values, "(function(){", (function(){
7620                 var symbol = l134;
7621                 var value = symbol.value;
7622                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7623                 return value;
7624             })(), l144.fvalue(pv, l135.fvalue(pv, "var ", "x", " = ", v795, ";", (function(){
7625                 var symbol = l134;
7626                 var value = symbol.value;
7627                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7628                 return value;
7629             })()), l135.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7630                 var symbol = l134;
7631                 var value = symbol.value;
7632                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7633                 return value;
7634             })(), l144.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7635                 var symbol = l134;
7636                 var value = symbol.value;
7637                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7638                 return value;
7639             })())), l135.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){
7640                 var symbol = l134;
7641                 var value = symbol.value;
7642                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7643                 return value;
7644             })())), "})()");
7645         })(l146.fvalue(pv, v794));
7646     })();
7647 })), cdr: (function(){
7648     var symbol = l275;
7649     var value = symbol.value;
7650     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7651     return value;
7652 })()}));
7653 var l305 = {name: "STRING-LENGTH"};
7654 ((l275).value = ({car: l45.fvalue(pv, l305, (function (values,v796){
7655     checkArgs(arguments, 2);
7656     var i;
7657     return (function(){
7658         return (function(v797){
7659             return l135.fvalue(values, "(function(){", (function(){
7660                 var symbol = l134;
7661                 var value = symbol.value;
7662                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7663                 return value;
7664             })(), l144.fvalue(pv, l135.fvalue(pv, "var ", "x", " = ", v797, ";", (function(){
7665                 var symbol = l134;
7666                 var value = symbol.value;
7667                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7668                 return value;
7669             })()), l135.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7670                 var symbol = l134;
7671                 var value = symbol.value;
7672                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7673                 return value;
7674             })(), l144.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7675                 var symbol = l134;
7676                 var value = symbol.value;
7677                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7678                 return value;
7679             })())), l135.fvalue(pv, "return ", "x.length", ";", (function(){
7680                 var symbol = l134;
7681                 var value = symbol.value;
7682                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7683                 return value;
7684             })())), "})()");
7685         })(l146.fvalue(pv, v796));
7686     })();
7687 })), cdr: (function(){
7688     var symbol = l275;
7689     var value = symbol.value;
7690     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7691     return value;
7692 })()}));
7693 var l306 = {name: "SLICE"};
7694 ((l275).value = ({car: l45.fvalue(pv, l306, (function (values,v798,v799,v800){
7695     checkArgsAtLeast(arguments, 3);
7696     checkArgsAtMost(arguments, 4);
7697     switch(arguments.length-1){
7698     case 2:
7699     v800=l5.value;
7700     default: break;
7701     }
7702     var i;
7703     return (function(){
7704         return l135.fvalue(values, "(function(){", (function(){
7705             var symbol = l134;
7706             var value = symbol.value;
7707             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7708             return value;
7709         })(), l144.fvalue(pv, "var str = ", l146.fvalue(pv, v798), ";", (function(){
7710             var symbol = l134;
7711             var value = symbol.value;
7712             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7713             return value;
7714         })(), "var a = ", l146.fvalue(pv, v799), ";", (function(){
7715             var symbol = l134;
7716             var value = symbol.value;
7717             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7718             return value;
7719         })(), "var b;", (function(){
7720             var symbol = l134;
7721             var value = symbol.value;
7722             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7723             return value;
7724         })(), (v800 !== l5.value ? l135.fvalue(pv, "b = ", l146.fvalue(pv, v800), ";", (function(){
7725             var symbol = l134;
7726             var value = symbol.value;
7727             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7728             return value;
7729         })()) : ""), "return str.slice(a,b);", (function(){
7730             var symbol = l134;
7731             var value = symbol.value;
7732             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7733             return value;
7734         })()), "})()");
7735     })();
7736 })), cdr: (function(){
7737     var symbol = l275;
7738     var value = symbol.value;
7739     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7740     return value;
7741 })()}));
7742 var l307 = {name: "CHAR"};
7743 ((l275).value = ({car: l45.fvalue(pv, l307, (function (values,v801,v802){
7744     checkArgs(arguments, 3);
7745     var i;
7746     return (function(){
7747         return (function(v803,v804){
7748             return l135.fvalue(values, "(function(){", (function(){
7749                 var symbol = l134;
7750                 var value = symbol.value;
7751                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7752                 return value;
7753             })(), l144.fvalue(pv, l135.fvalue(pv, "var ", "string", " = ", v803, ";", (function(){
7754                 var symbol = l134;
7755                 var value = symbol.value;
7756                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7757                 return value;
7758             })()), l135.fvalue(pv, "var ", "index", " = ", v804, ";", (function(){
7759                 var symbol = l134;
7760                 var value = symbol.value;
7761                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7762                 return value;
7763             })()), l135.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7764                 var symbol = l134;
7765                 var value = symbol.value;
7766                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7767                 return value;
7768             })(), l144.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7769                 var symbol = l134;
7770                 var value = symbol.value;
7771                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7772                 return value;
7773             })())), l135.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){
7774                 var symbol = l134;
7775                 var value = symbol.value;
7776                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7777                 return value;
7778             })(), l144.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
7779                 var symbol = l134;
7780                 var value = symbol.value;
7781                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7782                 return value;
7783             })())), l135.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){
7784                 var symbol = l134;
7785                 var value = symbol.value;
7786                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7787                 return value;
7788             })())), "})()");
7789         })(l146.fvalue(pv, v801),l146.fvalue(pv, v802));
7790     })();
7791 })), cdr: (function(){
7792     var symbol = l275;
7793     var value = symbol.value;
7794     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7795     return value;
7796 })()}));
7797 ((l275).value = ({car: l45.fvalue(pv, l73, (function (values,v805,v806){
7798     checkArgs(arguments, 3);
7799     var i;
7800     return (function(){
7801         return (function(v807,v808){
7802             return l135.fvalue(values, "(function(){", (function(){
7803                 var symbol = l134;
7804                 var value = symbol.value;
7805                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7806                 return value;
7807             })(), l144.fvalue(pv, l135.fvalue(pv, "var ", "string1", " = ", v807, ";", (function(){
7808                 var symbol = l134;
7809                 var value = symbol.value;
7810                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7811                 return value;
7812             })()), l135.fvalue(pv, "var ", "string2", " = ", v808, ";", (function(){
7813                 var symbol = l134;
7814                 var value = symbol.value;
7815                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7816                 return value;
7817             })()), l135.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){
7818                 var symbol = l134;
7819                 var value = symbol.value;
7820                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7821                 return value;
7822             })(), l144.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
7823                 var symbol = l134;
7824                 var value = symbol.value;
7825                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7826                 return value;
7827             })())), l135.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){
7828                 var symbol = l134;
7829                 var value = symbol.value;
7830                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7831                 return value;
7832             })(), l144.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
7833                 var symbol = l134;
7834                 var value = symbol.value;
7835                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7836                 return value;
7837             })())), l135.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){
7838                 var symbol = l134;
7839                 var value = symbol.value;
7840                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7841                 return value;
7842             })())), "})()");
7843         })(l146.fvalue(pv, v805),l146.fvalue(pv, v806));
7844     })();
7845 })), cdr: (function(){
7846     var symbol = l275;
7847     var value = symbol.value;
7848     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7849     return value;
7850 })()}));
7851 var l308 = {name: "FUNCALL"};
7852 ((l275).value = ({car: l45.fvalue(pv, l308, (function (values,v810){
7853     checkArgsAtLeast(arguments, 2);
7854     var v809= l5.value;
7855     for (var i = arguments.length-1; i>=2; i--)
7856         v809 = {car: arguments[i], cdr:
7857     v809};
7858     var i;
7859     return (function(){
7860         return l135.fvalue(values, "(", l146.fvalue(pv, v810), ")(", l137.fvalue(pv, ({car: ((function(){
7861             var symbol = l173;
7862             var value = symbol.value;
7863             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7864             return value;
7865         })() !== l5.value ? "values" : "pv"), cdr: l74.fvalue(pv, (function(){
7866             var symbol = l146;
7867             var func = symbol.fvalue;
7868             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7869             return func;
7870         })(), v809)}), ", "), ")");
7871     })();
7872 })), cdr: (function(){
7873     var symbol = l275;
7874     var value = symbol.value;
7875     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7876     return value;
7877 })()}));
7878 var l309 = {name: "APPLY"};
7879 ((l275).value = ({car: l45.fvalue(pv, l309, (function (values,v812){
7880     checkArgsAtLeast(arguments, 2);
7881     var v811= l5.value;
7882     for (var i = arguments.length-1; i>=2; i--)
7883         v811 = {car: arguments[i], cdr:
7884     v811};
7885     var i;
7886     return (function(){
7887         return (l13.fvalue(pv, v811) !== l5.value ? l135.fvalue(values, "(", l146.fvalue(pv, v812), ")()") : (function(v813,v814){
7888             return l135.fvalue(values, "(function(){", (function(){
7889                 var symbol = l134;
7890                 var value = symbol.value;
7891                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7892                 return value;
7893             })(), l144.fvalue(pv, "var f = ", l146.fvalue(pv, v812), ";", (function(){
7894                 var symbol = l134;
7895                 var value = symbol.value;
7896                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7897                 return value;
7898             })(), "var args = [", l137.fvalue(pv, ({car: ((function(){
7899                 var symbol = l173;
7900                 var value = symbol.value;
7901                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7902                 return value;
7903             })() !== l5.value ? "values" : "pv"), cdr: l74.fvalue(pv, (function(){
7904                 var symbol = l146;
7905                 var func = symbol.fvalue;
7906                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7907                 return func;
7908             })(), v813)}), ", "), "];", (function(){
7909                 var symbol = l134;
7910                 var value = symbol.value;
7911                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7912                 return value;
7913             })(), "var tail = (", l146.fvalue(pv, v814), ");", (function(){
7914                 var symbol = l134;
7915                 var value = symbol.value;
7916                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7917                 return value;
7918             })(), "while (tail != ", l146.fvalue(pv, l5.value), "){", (function(){
7919                 var symbol = l134;
7920                 var value = symbol.value;
7921                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7922                 return value;
7923             })(), "    args.push(tail.car);", (function(){
7924                 var symbol = l134;
7925                 var value = symbol.value;
7926                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7927                 return value;
7928             })(), "    tail = tail.cdr;", (function(){
7929                 var symbol = l134;
7930                 var value = symbol.value;
7931                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7932                 return value;
7933             })(), "}", (function(){
7934                 var symbol = l134;
7935                 var value = symbol.value;
7936                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7937                 return value;
7938             })(), "return f.apply(this, args);", (function(){
7939                 var symbol = l134;
7940                 var value = symbol.value;
7941                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7942                 return value;
7943             })()), "})()");
7944         })(l88.fvalue(pv, v811),(function(){
7945             var tmp = l87.fvalue(pv, v811);
7946             return tmp === l5.value? l5.value: tmp.car;
7947         })()));
7948     })();
7949 })), cdr: (function(){
7950     var symbol = l275;
7951     var value = symbol.value;
7952     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7953     return value;
7954 })()}));
7955 var l310 = {name: "JS-EVAL"};
7956 ((l275).value = ({car: l45.fvalue(pv, l310, (function (values,v815){
7957     checkArgs(arguments, 2);
7958     var i;
7959     return (function(){
7960         return (function(v816){
7961             return l135.fvalue(values, "(function(){", (function(){
7962                 var symbol = l134;
7963                 var value = symbol.value;
7964                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7965                 return value;
7966             })(), l144.fvalue(pv, l135.fvalue(pv, "var ", "string", " = ", v816, ";", (function(){
7967                 var symbol = l134;
7968                 var value = symbol.value;
7969                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7970                 return value;
7971             })()), l135.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7972                 var symbol = l134;
7973                 var value = symbol.value;
7974                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7975                 return value;
7976             })(), l144.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7977                 var symbol = l134;
7978                 var value = symbol.value;
7979                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7980                 return value;
7981             })())), l135.fvalue(pv, "return ", ((function(){
7982                 var symbol = l173;
7983                 var value = symbol.value;
7984                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7985                 return value;
7986             })() !== l5.value ? l135.fvalue(pv, "(function(){", (function(){
7987                 var symbol = l134;
7988                 var value = symbol.value;
7989                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7990                 return value;
7991             })(), l144.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){
7992                 var symbol = l134;
7993                 var value = symbol.value;
7994                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7995                 return value;
7996             })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){
7997                 var symbol = l134;
7998                 var value = symbol.value;
7999                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8000                 return value;
8001             })(), l144.fvalue(pv, "v = [v];", (function(){
8002                 var symbol = l134;
8003                 var value = symbol.value;
8004                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8005                 return value;
8006             })(), "v['multiple-value'] = true;", (function(){
8007                 var symbol = l134;
8008                 var value = symbol.value;
8009                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8010                 return value;
8011             })()), "}", (function(){
8012                 var symbol = l134;
8013                 var value = symbol.value;
8014                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8015                 return value;
8016             })(), "return values.apply(this, v);", (function(){
8017                 var symbol = l134;
8018                 var value = symbol.value;
8019                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8020                 return value;
8021             })()), "})()") : "eval.apply(window, [string])"), ";", (function(){
8022                 var symbol = l134;
8023                 var value = symbol.value;
8024                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8025                 return value;
8026             })())), "})()");
8027         })(l146.fvalue(pv, v815));
8028     })();
8029 })), cdr: (function(){
8030     var symbol = l275;
8031     var value = symbol.value;
8032     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8033     return value;
8034 })()}));
8035 var l311 = {name: "ERROR"};
8036 ((l275).value = ({car: l45.fvalue(pv, l311, (function (values,v817){
8037     checkArgs(arguments, 2);
8038     var i;
8039     return (function(){
8040         return (function(v818){
8041             return l135.fvalue(values, "(function(){", (function(){
8042                 var symbol = l134;
8043                 var value = symbol.value;
8044                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8045                 return value;
8046             })(), l144.fvalue(pv, "throw ", v818, ";", (function(){
8047                 var symbol = l134;
8048                 var value = symbol.value;
8049                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8050                 return value;
8051             })()), "})()");
8052         })(l146.fvalue(pv, v817));
8053     })();
8054 })), cdr: (function(){
8055     var symbol = l275;
8056     var value = symbol.value;
8057     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8058     return value;
8059 })()}));
8060 var l312 = {name: "NEW"};
8061 ((l275).value = ({car: l45.fvalue(pv, l312, (function (values){
8062     checkArgsAtMost(arguments, 1);
8063     var i;
8064     return (function(){
8065         return (function(){
8066             return "{}";
8067         })();
8068     })();
8069 })), cdr: (function(){
8070     var symbol = l275;
8071     var value = symbol.value;
8072     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8073     return value;
8074 })()}));
8075 var l313 = {name: "OBJECTP"};
8076 ((l275).value = ({car: l45.fvalue(pv, l313, (function (values,v819){
8077     checkArgs(arguments, 2);
8078     var i;
8079     return (function(){
8080         return (function(v820){
8081             return l145.fvalue(values, l135.fvalue(pv, "(typeof (", v820, ") === 'object')"));
8082         })(l146.fvalue(pv, v819));
8083     })();
8084 })), cdr: (function(){
8085     var symbol = l275;
8086     var value = symbol.value;
8087     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8088     return value;
8089 })()}));
8090 var l314 = {name: "OGET"};
8091 ((l275).value = ({car: l45.fvalue(pv, l314, (function (values,v821,v822){
8092     checkArgs(arguments, 3);
8093     var i;
8094     return (function(){
8095         return (function(v823,v824){
8096             return l135.fvalue(values, "(function(){", (function(){
8097                 var symbol = l134;
8098                 var value = symbol.value;
8099                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8100                 return value;
8101             })(), l144.fvalue(pv, "var tmp = ", "(", v823, ")[", v824, "];", (function(){
8102                 var symbol = l134;
8103                 var value = symbol.value;
8104                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8105                 return value;
8106             })(), "return tmp == undefined? ", l146.fvalue(pv, l5.value), ": tmp ;", (function(){
8107                 var symbol = l134;
8108                 var value = symbol.value;
8109                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8110                 return value;
8111             })()), "})()");
8112         })(l146.fvalue(pv, v821),l146.fvalue(pv, v822));
8113     })();
8114 })), cdr: (function(){
8115     var symbol = l275;
8116     var value = symbol.value;
8117     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8118     return value;
8119 })()}));
8120 var l315 = {name: "OSET"};
8121 ((l275).value = ({car: l45.fvalue(pv, l315, (function (values,v825,v826,v827){
8122     checkArgs(arguments, 4);
8123     var i;
8124     return (function(){
8125         return (function(v828,v829,v830){
8126             return l135.fvalue(values, "((", v828, ")[", v829, "] = ", v830, ")");
8127         })(l146.fvalue(pv, v825),l146.fvalue(pv, v826),l146.fvalue(pv, v827));
8128     })();
8129 })), cdr: (function(){
8130     var symbol = l275;
8131     var value = symbol.value;
8132     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8133     return value;
8134 })()}));
8135 var l316 = {name: "IN"};
8136 ((l275).value = ({car: l45.fvalue(pv, l316, (function (values,v831,v832){
8137     checkArgs(arguments, 3);
8138     var i;
8139     return (function(){
8140         return (function(v833,v834){
8141             return l145.fvalue(values, l135.fvalue(pv, "((", v833, ") in (", v834, "))"));
8142         })(l146.fvalue(pv, v831),l146.fvalue(pv, v832));
8143     })();
8144 })), cdr: (function(){
8145     var symbol = l275;
8146     var value = symbol.value;
8147     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8148     return value;
8149 })()}));
8150 var l317 = {name: "FUNCTIONP"};
8151 ((l275).value = ({car: l45.fvalue(pv, l317, (function (values,v835){
8152     checkArgs(arguments, 2);
8153     var i;
8154     return (function(){
8155         return (function(v836){
8156             return l145.fvalue(values, l135.fvalue(pv, "(typeof ", v836, " == 'function')"));
8157         })(l146.fvalue(pv, v835));
8158     })();
8159 })), cdr: (function(){
8160     var symbol = l275;
8161     var value = symbol.value;
8162     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8163     return value;
8164 })()}));
8165 var l318 = {name: "WRITE-STRING"};
8166 ((l275).value = ({car: l45.fvalue(pv, l318, (function (values,v837){
8167     checkArgs(arguments, 2);
8168     var i;
8169     return (function(){
8170         return (function(v838){
8171             return l135.fvalue(values, "(function(){", (function(){
8172                 var symbol = l134;
8173                 var value = symbol.value;
8174                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8175                 return value;
8176             })(), l144.fvalue(pv, l135.fvalue(pv, "var ", "x", " = ", v838, ";", (function(){
8177                 var symbol = l134;
8178                 var value = symbol.value;
8179                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8180                 return value;
8181             })()), l135.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
8182                 var symbol = l134;
8183                 var value = symbol.value;
8184                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8185                 return value;
8186             })(), l144.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
8187                 var symbol = l134;
8188                 var value = symbol.value;
8189                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8190                 return value;
8191             })())), l135.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){
8192                 var symbol = l134;
8193                 var value = symbol.value;
8194                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8195                 return value;
8196             })())), "})()");
8197         })(l146.fvalue(pv, v837));
8198     })();
8199 })), cdr: (function(){
8200     var symbol = l275;
8201     var value = symbol.value;
8202     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8203     return value;
8204 })()}));
8205 var l319 = {name: "MAKE-ARRAY"};
8206 ((l275).value = ({car: l45.fvalue(pv, l319, (function (values,v839){
8207     checkArgs(arguments, 2);
8208     var i;
8209     return (function(){
8210         return (function(v840){
8211             return l135.fvalue(values, "(function(){", (function(){
8212                 var symbol = l134;
8213                 var value = symbol.value;
8214                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8215                 return value;
8216             })(), l144.fvalue(pv, "var r = [];", (function(){
8217                 var symbol = l134;
8218                 var value = symbol.value;
8219                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8220                 return value;
8221             })(), "for (var i = 0; i < ", v840, "; i++)", (function(){
8222                 var symbol = l134;
8223                 var value = symbol.value;
8224                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8225                 return value;
8226             })(), l144.fvalue(pv, "r.push(", l146.fvalue(pv, l5.value), ");", (function(){
8227                 var symbol = l134;
8228                 var value = symbol.value;
8229                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8230                 return value;
8231             })()), "return r;", (function(){
8232                 var symbol = l134;
8233                 var value = symbol.value;
8234                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8235                 return value;
8236             })()), "})()");
8237         })(l146.fvalue(pv, v839));
8238     })();
8239 })), cdr: (function(){
8240     var symbol = l275;
8241     var value = symbol.value;
8242     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8243     return value;
8244 })()}));
8245 var l320 = {name: "ARRAYP"};
8246 ((l275).value = ({car: l45.fvalue(pv, l320, (function (values,v841){
8247     checkArgs(arguments, 2);
8248     var i;
8249     return (function(){
8250         return (function(v842){
8251             return l145.fvalue(values, l135.fvalue(pv, "(function(){", (function(){
8252                 var symbol = l134;
8253                 var value = symbol.value;
8254                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8255                 return value;
8256             })(), l144.fvalue(pv, "var x = ", v842, ";", (function(){
8257                 var symbol = l134;
8258                 var value = symbol.value;
8259                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8260                 return value;
8261             })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
8262         })(l146.fvalue(pv, v841));
8263     })();
8264 })), cdr: (function(){
8265     var symbol = l275;
8266     var value = symbol.value;
8267     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8268     return value;
8269 })()}));
8270 var l321 = {name: "AREF"};
8271 ((l275).value = ({car: l45.fvalue(pv, l321, (function (values,v843,v844){
8272     checkArgs(arguments, 3);
8273     var i;
8274     return (function(){
8275         return (function(v845,v846){
8276             return l135.fvalue(values, "(function(){", (function(){
8277                 var symbol = l134;
8278                 var value = symbol.value;
8279                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8280                 return value;
8281             })(), l144.fvalue(pv, "var x = ", "(", v845, ")[", v846, "];", (function(){
8282                 var symbol = l134;
8283                 var value = symbol.value;
8284                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8285                 return value;
8286             })(), "if (x === undefined) throw 'Out of range';", (function(){
8287                 var symbol = l134;
8288                 var value = symbol.value;
8289                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8290                 return value;
8291             })(), "return x;", (function(){
8292                 var symbol = l134;
8293                 var value = symbol.value;
8294                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8295                 return value;
8296             })()), "})()");
8297         })(l146.fvalue(pv, v843),l146.fvalue(pv, v844));
8298     })();
8299 })), cdr: (function(){
8300     var symbol = l275;
8301     var value = symbol.value;
8302     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8303     return value;
8304 })()}));
8305 var l322 = {name: "ASET"};
8306 ((l275).value = ({car: l45.fvalue(pv, l322, (function (values,v847,v848,v849){
8307     checkArgs(arguments, 4);
8308     var i;
8309     return (function(){
8310         return (function(v850,v851,v852){
8311             return l135.fvalue(values, "(function(){", (function(){
8312                 var symbol = l134;
8313                 var value = symbol.value;
8314                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8315                 return value;
8316             })(), l144.fvalue(pv, "var x = ", v850, ";", (function(){
8317                 var symbol = l134;
8318                 var value = symbol.value;
8319                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8320                 return value;
8321             })(), "var i = ", v851, ";", (function(){
8322                 var symbol = l134;
8323                 var value = symbol.value;
8324                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8325                 return value;
8326             })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
8327                 var symbol = l134;
8328                 var value = symbol.value;
8329                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8330                 return value;
8331             })(), "return x[i] = ", v852, ";", (function(){
8332                 var symbol = l134;
8333                 var value = symbol.value;
8334                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8335                 return value;
8336             })()), "})()");
8337         })(l146.fvalue(pv, v847),l146.fvalue(pv, v848),l146.fvalue(pv, v849));
8338     })();
8339 })), cdr: (function(){
8340     var symbol = l275;
8341     var value = symbol.value;
8342     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8343     return value;
8344 })()}));
8345 var l323 = {name: "GET-UNIX-TIME"};
8346 ((l275).value = ({car: l45.fvalue(pv, l323, (function (values){
8347     checkArgsAtMost(arguments, 1);
8348     var i;
8349     return (function(){
8350         return (function(){
8351             return l135.fvalue(values, "(Math.round(new Date() / 1000))");
8352         })();
8353     })();
8354 })), cdr: (function(){
8355     var symbol = l275;
8356     var value = symbol.value;
8357     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8358     return value;
8359 })()}));
8360 var l324 = {name: "VALUES-ARRAY"};
8361 ((l275).value = ({car: l45.fvalue(pv, l324, (function (values,v853){
8362     checkArgs(arguments, 2);
8363     var i;
8364     return (function(){
8365         return (function(v854){
8366             return ((function(){
8367                 var symbol = l173;
8368                 var value = symbol.value;
8369                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8370                 return value;
8371             })() !== l5.value ? l135.fvalue(values, "values.apply(this, ", v854, ")") : l135.fvalue(values, "pv.apply(this, ", v854, ")"));
8372         })(l146.fvalue(pv, v853));
8373     })();
8374 })), cdr: (function(){
8375     var symbol = l275;
8376     var value = symbol.value;
8377     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8378     return value;
8379 })()}));
8380 ((l275).value = ({car: l45.fvalue(pv, l143, (function (values){
8381     var v855= l5.value;
8382     for (var i = arguments.length-1; i>=1; i--)
8383         v855 = {car: arguments[i], cdr:
8384     v855};
8385     var i;
8386     return (function(){
8387         return ((function(){
8388             var symbol = l173;
8389             var value = symbol.value;
8390             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8391             return value;
8392         })() !== l5.value ? l135.fvalue(values, "values(", l137.fvalue(pv, l74.fvalue(pv, (function(){
8393             var symbol = l146;
8394             var func = symbol.fvalue;
8395             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8396             return func;
8397         })(), v855), ", "), ")") : l135.fvalue(values, "pv(", l137.fvalue(pv, l74.fvalue(pv, (function(){
8398             var symbol = l146;
8399             var func = symbol.fvalue;
8400             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8401             return func;
8402         })(), v855), ", "), ")"));
8403     })();
8404 })), cdr: (function(){
8405     var symbol = l275;
8406     var value = symbol.value;
8407     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8408     return value;
8409 })()}));
8410 (function(){
8411     (l199).fvalue = (function(v858){
8412         ((v858)["fname"] = "MACRO");
8413         return v858;
8414     })((function (values,v856){
8415         checkArgs(arguments, 2);
8416         var i;
8417         return (function(){
8418             return (((function(){
8419                 var tmp = v856;
8420                 return (typeof tmp == 'object' && 'name' in tmp);
8421             })()?l4.value: l5.value) !== l5.value ? (function(v857){
8422                 return (((l176.fvalue(pv, v857) === l199)?l4.value: l5.value) !== l5.value ? v857 : l5.value);
8423             })(l188.fvalue(pv, v856, (function(){
8424                 var symbol = l189;
8425                 var value = symbol.value;
8426                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8427                 return value;
8428             })(), l105)) : l5.value);
8429         })();
8430     }));
8431     return l199;
8432 })();
8433 var l325 = {name: "LS-MACROEXPAND-1"};
8434 (function(){
8435     (l325).fvalue = (function(v863){
8436         ((v863)["fname"] = "LS-MACROEXPAND-1");
8437         return v863;
8438     })((function (values,v859){
8439         checkArgs(arguments, 2);
8440         var i;
8441         return (function(){
8442             return (function(v860){
8443                 return (v860 !== l5.value ? (function(v861){
8444                     (l60.fvalue(pv, v861) !== l5.value ? (function(v862){
8445                         l179.fvalue(pv, v860, v862);
8446                         return (v861 = v862);
8447                     })(l250.fvalue(pv, v861)) : l5.value);
8448                     return (function(){
8449                         var f = v861;
8450                         var args = [values];
8451                         var tail = ((function(){
8452                             var tmp = v859;
8453                             return tmp === l5.value? l5.value: tmp.cdr;
8454                         })());
8455                         while (tail != l5.value){
8456                             args.push(tail.car);
8457                             tail = tail.cdr;
8458                         }
8459                         return f.apply(this, args);
8460                     })();
8461                 })(l177.fvalue(pv, v860)) : v859);
8462             })(l199.fvalue(pv, (function(){
8463                 var tmp = v859;
8464                 return tmp === l5.value? l5.value: tmp.car;
8465             })()));
8466         })();
8467     }));
8468     return l325;
8469 })();
8470 var l326 = {name: "COMPILE-FUNCALL"};
8471 var l327 = {name: "G902"};
8472 (function(){
8473     (l326).fvalue = (function(v868){
8474         ((v868)["fname"] = "COMPILE-FUNCALL");
8475         return v868;
8476     })((function (values,v864,v865){
8477         checkArgs(arguments, 3);
8478         var i;
8479         return (function(){
8480             return (function(){
8481                 var v866 = ((function(){
8482                     var symbol = l173;
8483                     var value = symbol.value;
8484                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8485                     return value;
8486                 })() !== l5.value ? "values" : "pv");
8487                 var v867 = l135.fvalue(pv, "(", l137.fvalue(pv, ({car: v866, cdr: l74.fvalue(pv, (function(){
8488                     var symbol = l146;
8489                     var func = symbol.fvalue;
8490                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8491                     return func;
8492                 })(), v865)}), ", "), ")");
8493                 return (l244.fvalue(pv, v864) !== l5.value ? l135.fvalue(values, l244.fvalue(pv, v864), v867) : ((((function(){
8494                     var tmp = v864;
8495                     return (typeof tmp == 'object' && 'name' in tmp);
8496                 })()?l4.value: l5.value) !== l5.value ? (((l123.fvalue(pv, v864) === l114.fvalue(pv, "COMMON-LISP"))?l4.value: l5.value) !== l5.value ? (function(){
8497                     var symbol = l327;
8498                     var value = symbol.value;
8499                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8500                     return value;
8501                 })() : l5.value) : l5.value) !== l5.value ? l135.fvalue(values, l146.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l168), l45.fvalue(pv, v864))), ".fvalue", v867) : l135.fvalue(values, l146.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l105), l45.fvalue(pv, v864))), v867)));
8502             })();
8503         })();
8504     }));
8505     return l326;
8506 })();
8507 (function(){
8508     (l230).fvalue = (function(v871){
8509         ((v871)["fname"] = "LS-COMPILE-BLOCK");
8510         return v871;
8511     })((function (values,v869,v870){
8512         checkArgsAtLeast(arguments, 2);
8513         checkArgsAtMost(arguments, 3);
8514         switch(arguments.length-1){
8515         case 1:
8516         v870=l5.value;
8517         default: break;
8518         }
8519         var i;
8520         return (function(){
8521             return (v870 !== l5.value ? l135.fvalue(values, l230.fvalue(pv, l88.fvalue(pv, v869)), "return ", l146.fvalue(pv, (function(){
8522                 var tmp = l87.fvalue(pv, v869);
8523                 return tmp === l5.value? l5.value: tmp.car;
8524             })(), (function(){
8525                 var symbol = l173;
8526                 var value = symbol.value;
8527                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8528                 return value;
8529             })()), ";") : l138.fvalue(values, l91.fvalue(pv, (function(){
8530                 var symbol = l196;
8531                 var func = symbol.fvalue;
8532                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8533                 return func;
8534             })(), l74.fvalue(pv, (function(){
8535                 var symbol = l146;
8536                 var func = symbol.fvalue;
8537                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8538                 return func;
8539             })(), v869)), l135.fvalue(pv, ";", (function(){
8540                 var symbol = l134;
8541                 var value = symbol.value;
8542                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8543                 return value;
8544             })())));
8545         })();
8546     }));
8547     return l230;
8548 })();
8549 (function(){
8550     (l146).fvalue = (function(v881){
8551         ((v881)["fname"] = "LS-COMPILE");
8552         return v881;
8553     })((function (values,v872,v873){
8554         checkArgsAtLeast(arguments, 2);
8555         checkArgsAtMost(arguments, 3);
8556         switch(arguments.length-1){
8557         case 1:
8558         v873=l5.value;
8559         default: break;
8560         }
8561         var i;
8562         return (function(){
8563             return (function(v874){
8564                 try {
8565                     var tmp;
8566                     tmp = l173.value;
8567                     l173.value = v874;
8568                     v874 = tmp;
8569                     return (((function(){
8570                         var tmp = v872;
8571                         return (typeof tmp == 'object' && 'name' in tmp);
8572                     })()?l4.value: l5.value) !== l5.value ? (function(v875){
8573                         return ((v875 !== l5.value ? l28.fvalue(pv, l89.fvalue(pv, l203, l178.fvalue(pv, v875))) : l5.value) !== l5.value ? l177.fvalue(values, v875) : ((function(v876){
8574                             return (v876 !== l5.value ? v876 : l89.fvalue(pv, l205, l178.fvalue(pv, v875)));
8575                         })(l122.fvalue(pv, v872)) !== l5.value ? l135.fvalue(values, l146.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l168), l45.fvalue(pv, v872))), ".value") : l146.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l297), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l168), l45.fvalue(pv, v872)))))));
8576                     })(l188.fvalue(pv, v872, (function(){
8577                         var symbol = l189;
8578                         var value = symbol.value;
8579                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8580                         return value;
8581                     })(), l106)) : (l82.fvalue(pv, v872) !== l5.value ? l18.fvalue(values, v872) : (((typeof(v872) == "string")?l4.value: l5.value) !== l5.value ? l135.fvalue(values, "\"", l149.fvalue(pv, v872), "\"") : (((function(){
8582                         var x = v872;
8583                         return typeof x === 'object' && 'length' in x;
8584                     })()?l4.value: l5.value) !== l5.value ? l239.fvalue(values, v872) : (l60.fvalue(pv, v872) !== l5.value ? (function(v877,v878){
8585                         return (l98.fvalue(pv, v877, (function(){
8586                             var symbol = l207;
8587                             var value = symbol.value;
8588                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8589                             return value;
8590                         })()) !== l5.value ? (function(v879){
8591                             return (function(){
8592                                 var f = v879;
8593                                 var args = [values];
8594                                 var tail = (v878);
8595                                 while (tail != l5.value){
8596                                     args.push(tail.car);
8597                                     tail = tail.cdr;
8598                                 }
8599                                 return f.apply(this, args);
8600                             })();
8601                         })(l41.fvalue(pv, l98.fvalue(pv, v877, (function(){
8602                             var symbol = l207;
8603                             var value = symbol.value;
8604                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8605                             return value;
8606                         })()))) : ((l98.fvalue(pv, v877, (function(){
8607                             var symbol = l275;
8608                             var value = symbol.value;
8609                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8610                             return value;
8611                         })()) !== l5.value ? l28.fvalue(pv, l201.fvalue(pv, v877, l105, l204)) : l5.value) !== l5.value ? (function(v880){
8612                             return (function(){
8613                                 var f = v880;
8614                                 var args = [values];
8615                                 var tail = (v878);
8616                                 while (tail != l5.value){
8617                                     args.push(tail.car);
8618                                     tail = tail.cdr;
8619                                 }
8620                                 return f.apply(this, args);
8621                             })();
8622                         })(l41.fvalue(pv, l98.fvalue(pv, v877, (function(){
8623                             var symbol = l275;
8624                             var value = symbol.value;
8625                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8626                             return value;
8627                         })()))) : (l199.fvalue(pv, v877) !== l5.value ? l146.fvalue(values, l325.fvalue(pv, v872), v873) : l326.fvalue(values, v877, v878))));
8628                     })((function(){
8629                         var tmp = v872;
8630                         return tmp === l5.value? l5.value: tmp.car;
8631                     })(),(function(){
8632                         var tmp = v872;
8633                         return tmp === l5.value? l5.value: tmp.cdr;
8634                     })()) : (function(){
8635                         throw "How should I compile this?";
8636                     })())))));
8637                 }
8638                 finally {
8639                     l173.value = v874;
8640                 }
8641             })(v873);
8642         })();
8643     }));
8644     return l146;
8645 })();
8646 var l328 = {name: "LS-COMPILE-TOPLEVEL"};
8647 (function(){
8648     (l328).fvalue = (function(v888){
8649         ((v888)["fname"] = "LS-COMPILE-TOPLEVEL");
8650         return v888;
8651     })((function (values,v882,v883){
8652         checkArgsAtLeast(arguments, 2);
8653         checkArgsAtMost(arguments, 3);
8654         switch(arguments.length-1){
8655         case 1:
8656         v883=l5.value;
8657         default: break;
8658         }
8659         var i;
8660         return (function(){
8661             return (function(v884){
8662                 try {
8663                     var tmp;
8664                     tmp = l194.value;
8665                     l194.value = v884;
8666                     v884 = tmp;
8667                     return ((((function(){
8668                         var tmp = v882;
8669                         return (typeof tmp == 'object' && 'car' in tmp);
8670                     })()?l4.value: l5.value) !== l5.value ? (((function(){
8671                         var tmp = v882;
8672                         return tmp === l5.value? l5.value: tmp.car;
8673                     })() === l249)?l4.value: l5.value) : l5.value) !== l5.value ? (function(v886){
8674                         return l137.fvalue(values, l91.fvalue(pv, (function(){
8675                             var symbol = l196;
8676                             var func = symbol.fvalue;
8677                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8678                             return func;
8679                         })(), v886));
8680                     })(l74.fvalue(pv, (function (values,v885){
8681                         checkArgs(arguments, 2);
8682                         var i;
8683                         return l328.fvalue(values, v885, l4.value);
8684                     }), (function(){
8685                         var tmp = v882;
8686                         return tmp === l5.value? l5.value: tmp.cdr;
8687                     })())) : (function(v887){
8688                         return l135.fvalue(values, l138.fvalue(pv, l197.fvalue(pv), l135.fvalue(pv, ";", (function(){
8689                             var symbol = l134;
8690                             var value = symbol.value;
8691                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8692                             return value;
8693                         })())), (v887 !== l5.value ? l135.fvalue(pv, v887, ";", (function(){
8694                             var symbol = l134;
8695                             var value = symbol.value;
8696                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8697                             return value;
8698                         })()) : ""));
8699                     })(l146.fvalue(pv, v882, v883)));
8700                 }
8701                 finally {
8702                     l194.value = v884;
8703                 }
8704             })(l5.value);
8705         })();
8706     }));
8707     return l328;
8708 })();
8709 (function(){
8710     (l250).fvalue = (function(v890){
8711         ((v890)["fname"] = "EVAL");
8712         return v890;
8713     })((function (values,v889){
8714         checkArgs(arguments, 2);
8715         var i;
8716         return (function(){
8717             return (function(){
8718                 var string = l328.fvalue(pv, v889, l4.value);
8719                 if (typeof string != 'string')
8720                     throw 'The value ' + string + ' is not a type string.';
8721                 return (function(){
8722                     var v = eval.apply(window, [string]);
8723                     if (typeof v !== 'object' || !('multiple-value' in v)){
8724                         v = [v];
8725                         v['multiple-value'] = true;
8726                     }
8727                     return values.apply(this, v);
8728                 })();
8729             })();
8730         })();
8731     }));
8732     return l250;
8733 })();
8734 var l329 = {name: "&BODY"};
8735 var l330 = {name: "ZEROPT"};
8736 var l331 = QIList(l212,l213,l211,l329,l21,l16,l124,l62,l63,l22,l23,l24,l286,l288,l20,l20,l285,l287,l55,l65,l309,l321,l320,l98,l46,l185,l19,l19,l88,l33,l39,l37,l34,l31,l31,l53,l262,l35,l38,l36,l32,l32,l307,l80,l81,l79,l52,l29,l30,l77,l78,l48,l2,l3,l10,l12,l1,l9,l94,l93,l102,l69,l70,l104,l50,l51,l54,l300,l27,l301,l311,l250,l97,l132,l101,l114,l127,l40,l245,l43,l296,l308,l105,l317,l17,l133,l269,l76,l209,l125,l47,l82,l82,l131,l122,l246,l6,l87,l72,l254,l257,l110,l45,l60,l319,l111,l294,l74,l89,l84,l282,l107,l271,l108,l272,l5,l28,l86,l85,l13,l289,l56,l115,l117,l113,l166,l83,l148,l151,l206,l57,l58,l249,l68,l49,l168,l90,l91,l92,l14,l261,l66,l67,l291,l292,l41,l232,l233,l96,l304,l99,l100,l303,l95,l241,l295,l123,l298,l297,l293,l4,l268,l42,l263,l26,l8,l270,l143,l142,l106,l150,l7,l103,l318,l330,l5);
8737 l132.fvalue(values, l331);
8738 ((l124).value = (function(){
8739     var symbol = l120;
8740     var value = symbol.value;
8741     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8742     return value;
8743 })());
8744 (function(){
8745     var string = "var lisp";
8746     if (typeof string != 'string')
8747         throw 'The value ' + string + ' is not a type string.';
8748     return (function(){
8749         var v = eval.apply(window, [string]);
8750         if (typeof v !== 'object' || !('multiple-value' in v)){
8751             v = [v];
8752             v['multiple-value'] = true;
8753         }
8754         return values.apply(this, v);
8755     })();
8756 })();
8757 (lisp = {});
8758 (lisp.read = (function(){
8759     var symbol = l172;
8760     var func = symbol.fvalue;
8761     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8762     return func;
8763 })());
8764 (lisp.print = (function(){
8765     var symbol = l148;
8766     var func = symbol.fvalue;
8767     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8768     return func;
8769 })());
8770 (lisp.eval = (function(){
8771     var symbol = l250;
8772     var func = symbol.fvalue;
8773     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8774     return func;
8775 })());
8776 (lisp.compile = (function (values,v891){
8777     checkArgs(arguments, 2);
8778     var i;
8779     return l328.fvalue(values, v891, l4.value);
8780 }));
8781 (lisp.evalString = (function (values,v892){
8782     checkArgs(arguments, 2);
8783     var i;
8784     return l250.fvalue(values, l172.fvalue(pv, v892));
8785 }));
8786 (lisp.compileString = (function (values,v893){
8787     checkArgs(arguments, 2);
8788     var i;
8789     return l328.fvalue(values, l172.fvalue(pv, v893), l4.value);
8790 }));
8791 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(l215,"l215"),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);
8792 var l333 = {name: "OP"};
8793 var l334 = {name: "SYM"};
8794 var l335 = {name: "X"};
8795 var l336 = {name: "ARGS"};
8796 var l337 = {name: "BODY"};
8797 var l338 = {name: "DECLS"};
8798 var l339 = {name: "DECL"};
8799 var l340 = {name: "NAME"};
8800 var l341 = {name: "ARG"};
8801 var l342 = {name: "FORM"};
8802 var l343 = {name: "PACKAGE-DESIGNATOR"};
8803 var l344 = {name: "VALUE-FROM"};
8804 var l345 = {name: "VARIABLES"};
8805 var l346 = {name: "VARLIST"};
8806 var l347 = {name: "ENDLIST"};
8807 var l348 = {name: "V"};
8808 var l349 = {name: "PAIRS"};
8809 var l350 = {name: "ASSIGNMENTS"};
8810 var l351 = {name: "VALUE"};
8811 var l352 = {name: "FORM1"};
8812 var l353 = {name: "RESULT"};
8813 var l354 = {name: "FORMS"};
8814 var l355 = {name: "G"};
8815 var l356 = {name: "CLAUSULES"};
8816 var l357 = {name: "!FORM"};
8817 var l358 = {name: "CLAUSULE"};
8818 var l359 = {name: "ITER"};
8819 var l360 = {name: "G!TO"};
8820 var l361 = {name: "VAR"};
8821 var l362 = {name: "TO"};
8822 var l363 = {name: "G!LIST"};
8823 var l364 = {name: "PLACE"};
8824 var l365 = {name: "DELTA"};
8825 var l366 = {name: "CONDITION"};
8826 var l367 = {name: "DOCSTRING"};
8827 var l368 = QIList(QIList(QIList(l275,l106,l5,QIList(l203,l5),l5),QIList(l265,l106,l5,QIList(l203,l5),l5),QIList(l264,l106,l5,QIList(l203,l5),l5),QIList(l258,l106,l5,QIList(l203,l5),l5),QIList(l247,l106,l5,QIList(l203,l5),l5),QIList(l237,l106,l5,QIList(l203,l5),l5),QIList(l236,l106,l5,QIList(l203,l5),l5),QIList(l210,l106,l5,QIList(l203,l5),l5),QIList(l207,l106,l5,QIList(l203,l5),l5),QIList(l194,l106,l5,QIList(l203,l5),l5),QIList(l190,l106,l5,QIList(l203,l5),l5),QIList(l189,l106,l5,QIList(l203,l5),l5),QIList(l173,l106,l5,QIList(l203,l5),l5),QIList(l167,l106,l5,QIList(l203,l5),l5),QIList(l134,l106,l5,QIList(l203,l5),l5),QIList(l124,l106,l5,QIList(l203,l5),l5),QIList(l121,l106,l5,QIList(l203,l5),l5),QIList(l120,l106,l5,QIList(l203,l5),l5),QIList(l119,l106,l5,QIList(l203,l5),l5),QIList(l109,l106,l5,QIList(l203,l5),l5),QIList(l16,l106,l5,QIList(l203,l5),l5),QIList(l5,l106,l5,QIList(l205,l203,l5),l5),QIList(l4,l106,l5,QIList(l205,l203,l5),l5),l5),QIList(QIList(l284,l199,QIList(l105,QIList(l6,QIList(l333,l334,l5),QIList(l169,QIList(l276,QIList(l171,l333,l5),QIList(l335,l212,l336,l5),QIList(l254,QIList(QIList(l336,QIList(l29,l335,l336,l5),l5),l5),QIList(l280,l336,QIList(l145,QIList(l283,l336,QIList(l171,l334,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l280,l199,QIList(l105,QIList(l6,QIList(l336,l212,l337,l5),QIList(l8,QIList(l293,l336,l5),QIList(l311,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l5),l5),QIList(l169,QIList(l279,QIList(l171,l336,l5),QIList(l6,QIList(QIList(l171,l336,l5),l5),QIList(l135,"return ",QIList(l170,l337,l5),";",l134,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l278,l199,QIList(l105,QIList(l6,QIList(l338,l212,l337,l5),QIList(l169,QIList(l147,QIList(l170,QIList(l74,QIList(l6,QIList(l339,l5),QIList(l169,QIList(l135,"var ",QIList(l171,QIList(l40,l339,l5),l5)," = ",QIList(l171,QIList(l42,l339,l5),l5),";",l134,l5),l5),l5),l338,l5),l5),QIList(l170,QIList(l74,QIList(l6,QIList(l339,l5),QIList(l169,QIList(l135,"if (typeof ",QIList(l171,QIList(l40,l339,l5),l5)," != '",QIList(l171,QIList(l41,l339,l5),l5),"')",l134,QIList(l144,"throw 'The value ' + ",QIList(l171,QIList(l40,l339,l5),l5)," + ' is not a type ",QIList(l171,QIList(l41,l339,l5),l5),".';",l134,l5),l5),l5),l5),l338,l5),l5),QIList(l135,"return ",QIList(l249,QIList(l170,l337,l5),l5),";",l134,l5),l5),l5),l5),l5),l5,l5),QIList(l277,l199,QIList(l105,QIList(l6,QIList(l340,l336,l212,l337,l5),QIList(l169,QIList(l249,QIList(l276,QIList(l171,l340,l5),QIList(l171,l336,l5),QIList(l254,QIList(l171,QIList(l74,QIList(l6,QIList(l341,l5),QIList(l169,QIList(QIList(l171,l341,l5),QIList(l146,QIList(l171,l341,l5),l5),l5),l5),l5),l336,l5),l5),QIList(l170,l337,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l276,l199,QIList(l105,QIList(l6,QIList(l340,l336,l212,l337,l5),QIList(l169,QIList(l49,QIList(l45,QIList(l168,QIList(l171,l340,l5),l5),QIList(l6,QIList(l171,l336,l5),QIList(l185,QIList(l171,l340,l5),QIList(l170,l337,l5),l5),l5),l5),l275,l5),l5),l5),l5),l5,l5),QIList(l169,l199,QIList(l105,QIList(l6,QIList(l342,l5),QIList(l273,l342,l5),l5),l5),l5,l5),QIList(l251,l199,QIList(l105,QIList(l6,QIList(l340,l336,l342,l5),QIList(l169,QIList(l208,QIList(l171,l340,l5),QIList(l171,l336,l5),QIList(l146,QIList(l171,l342,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l208,l199,QIList(l105,QIList(l6,QIList(l340,l336,l212,l337,l5),QIList(l169,QIList(l49,QIList(l45,QIList(l168,QIList(l171,l340,l5),l5),QIList(l6,QIList(l171,l336,l5),QIList(l185,QIList(l171,l340,l5),QIList(l170,l337,l5),l5),l5),l5),l207,l5),l5),l5),l5),l5,l5),QIList(l147,l199,QIList(l105,QIList(l6,QIList(l212,l337,l5),QIList(l169,QIList(l135,"(function(){",l134,QIList(l144,QIList(l170,l337,l5),l5),"})()",l5),l5),l5),l5),l5,l5),QIList(l136,l199,QIList(l105,QIList(l6,QIList(l106,l212,l342,l5),QIList(l169,QIList(l233,QIList(l171,l106,l5),QIList(l135,QIList(l171,l106,l5),QIList(l249,QIList(l170,l342,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l125,l199,QIList(l105,QIList(l6,QIList(l343,l5),QIList(l169,QIList(l248,QIList(l233,l124,QIList(l112,QIList(l171,l343,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l108,l199,QIList(l105,QIList(l6,QIList(l344,l5),QIList(l169,QIList(l271,QIList(l105,l45,l5),QIList(l171,l344,l5),l5),l5),l5),l5),l5,l5),QIList(l107,l199,QIList(l105,QIList(l6,QIList(l345,l344,l212,l337,l5),QIList(l169,QIList(l271,QIList(l6,QIList(l211,QIList(l170,l345,l5),l212,QIList(l171,QIList(l17,l5),l5),l5),QIList(l170,l337,l5),l5),QIList(l171,l344,l5),l5),l5),l5),l5),l5,l5),QIList(l70,l199,QIList(l105,QIList(l6,QIList(l346,l347,l212,l337,l5),QIList(l169,QIList(l185,l5,QIList(l257,QIList(l171,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(l171,QIList(l31,l347,l5),l5),QIList(l14,QIList(l249,QIList(l171,QIList(l32,l347,l5),l5),l5),l5),l5),QIList(l268,QIList(l170,l337,l5),l5),QIList(l233,QIList(l170,QIList(l309,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,l199,QIList(l105,QIList(l6,QIList(l346,l347,l212,l337,l5),QIList(l169,QIList(l185,l5,QIList(l254,QIList(l171,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(l171,QIList(l31,l347,l5),l5),QIList(l14,QIList(l249,QIList(l171,QIList(l32,l347,l5),l5),l5),l5),l5),QIList(l268,QIList(l170,l337,l5),l5),QIList(l68,QIList(l170,QIList(l309,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,l199,QIList(l105,QIList(l6,QIList(l212,l349,l5),QIList(l254,QIList(QIList(l350,QIList(l168,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(l311,"Odd paris in PSETQ",l5),l5),QIList(l4,QIList(l254,QIList(QIList(l106,QIList(l31,l349,l5),l5),QIList(l351,QIList(l34,l349,l5),l5),l5),QIList(l49,QIList(l169,QIList(QIList(l171,l106,l5),QIList(l171,QIList(l17,l5),l5),QIList(l171,l351,l5),l5),l5),l350,l5),QIList(l233,l349,QIList(l36,l349,l5),l5),l5),l5),l5),l5),QIList(l233,l350,QIList(l67,l350,l5),l5),QIList(l169,QIList(l254,QIList(l171,QIList(l74,QIList(l105,l32,l5),l350,l5),l5),QIList(l233,QIList(l170,QIList(l61,QIList(l105,l65,l5),QIList(l74,QIList(l105,l88,l5),l350,l5),QIList(l168,l5,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l58,l199,QIList(l105,QIList(l6,QIList(l352,l353,l212,l337,l5),QIList(l169,QIList(l57,QIList(l249,QIList(l171,l352,l5),QIList(l171,l353,l5),l5),QIList(l170,l337,l5),l5),l5),l5),l5),l5,l5),QIList(l57,l199,QIList(l105,QIList(l6,QIList(l342,l212,l337,l5),QIList(l254,QIList(QIList(l351,QIList(l17,l5),l5),l5),QIList(l169,QIList(l254,QIList(QIList(QIList(l171,l351,l5),QIList(l171,l342,l5),l5),l5),QIList(l170,l337,l5),QIList(l171,l351,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l56,l199,QIList(l105,QIList(l6,QIList(l212,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(l254,QIList(QIList(l355,QIList(l17,l5),l5),l5),QIList(l169,QIList(l254,QIList(QIList(QIList(l171,l355,l5),QIList(l171,QIList(l31,l354,l5),l5),l5),l5),QIList(l209,QIList(l171,l355,l5),QIList(l171,l355,l5),QIList(l56,QIList(l170,QIList(l32,l354,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l55,l199,QIList(l105,QIList(l6,QIList(l212,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(l169,QIList(l209,QIList(l171,QIList(l31,l354,l5),l5),QIList(l55,QIList(l170,QIList(l32,l354,l5),l5),l5),l5,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l54,l199,QIList(l105,QIList(l6,QIList(l342,l212,l356,l5),QIList(l169,QIList(l53,QIList(l171,l342,l5),QIList(l170,QIList(l65,l356,QIList(l169,QIList(QIList(l4,QIList(l311,"ECASE expression failed.",l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l53,l199,QIList(l105,QIList(l6,QIList(l342,l212,l356,l5),QIList(l254,QIList(QIList(l357,QIList(l17,l5),l5),l5),QIList(l169,QIList(l254,QIList(QIList(QIList(l171,l357,l5),QIList(l171,l342,l5),l5),l5),QIList(l52,QIList(l170,QIList(l74,QIList(l6,QIList(l358,l5),QIList(l209,QIList(l300,QIList(l31,l358,l5),l4,l5),l358,QIList(l169,QIList(QIList(l27,QIList(l171,l357,l5),QIList(l168,QIList(l171,QIList(l31,l358,l5),l5),l5),l5),QIList(l170,QIList(l32,l358,l5),l5),l5),l5),l5),l5),l356,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l52,l199,QIList(l105,QIList(l6,QIList(l212,l356,l5),QIList(l209,QIList(l13,l356,l5),l5,QIList(l209,QIList(l300,QIList(l33,l356,l5),l4,l5),QIList(l169,QIList(l249,QIList(l170,QIList(l35,l356,l5),l5),l5),l5),QIList(l169,QIList(l209,QIList(l171,QIList(l33,l356,l5),l5),QIList(l249,QIList(l170,QIList(l35,l356,l5),l5),l5),QIList(l52,QIList(l170,QIList(l32,l356,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l199,QIList(l105,QIList(l6,QIList(l359,l212,l337,l5),QIList(l254,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(l169,QIList(l185,l5,QIList(l254,QIList(QIList(QIList(l171,l361,l5),0,l5),QIList(QIList(l171,l360,l5),QIList(l171,l362,l5),l5),l5),QIList(l240,QIList(l286,QIList(l171,l361,l5),QIList(l171,l360,l5),l5),QIList(l268,QIList(l170,l337,l5),l5),QIList(l47,QIList(l171,l361,l5),l5),l5),QIList(l171,l353,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l50,l199,QIList(l105,QIList(l6,QIList(l359,l212,l337,l5),QIList(l254,QIList(QIList(l361,QIList(l40,l359,l5),l5),QIList(l363,QIList(l17,l5),l5),l5),QIList(l169,QIList(l185,l5,QIList(l254,QIList(QIList(QIList(l171,l363,l5),QIList(l171,QIList(l41,l359,l5),l5),l5),QIList(QIList(l171,l361,l5),l5,l5),l5),QIList(l240,QIList(l171,l363,l5),QIList(l233,QIList(l171,l361,l5),QIList(l31,QIList(l171,l363,l5),l5),l5),QIList(l268,QIList(l170,l337,l5),l5),QIList(l233,QIList(l171,l363,l5),QIList(l32,QIList(l171,l363,l5),l5),l5),l5),QIList(l171,QIList(l42,l359,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l49,l199,QIList(l105,QIList(l6,QIList(l335,l364,l5),QIList(l169,QIList(l233,QIList(l171,l364,l5),QIList(l29,QIList(l171,l335,l5),QIList(l171,l364,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l48,l199,QIList(l105,QIList(l6,QIList(l335,l211,QIList(l365,1,l5),l5),QIList(l169,QIList(l233,QIList(l171,l335,l5),QIList(l63,QIList(l171,l335,l5),QIList(l171,l365,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l47,l199,QIList(l105,QIList(l6,QIList(l335,l211,QIList(l365,1,l5),l5),QIList(l169,QIList(l233,QIList(l171,l335,l5),QIList(l62,QIList(l171,l335,l5),QIList(l171,l365,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l15,l199,QIList(l105,QIList(l6,QIList(l366,l212,l337,l5),QIList(l169,QIList(l185,l5,QIList(l240,QIList(l171,l366,l5),QIList(l170,l337,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l14,l199,QIList(l105,QIList(l6,QIList(l211,l351,l5),QIList(l169,QIList(l261,l5,QIList(l171,l351,l5),l5),l5),l5),l5),l5,l5),QIList(l12,l199,QIList(l105,QIList(l6,QIList(l340,l336,l212,l337,l5),QIList(l169,QIList(l249,QIList(l296,QIList(l168,QIList(l171,l340,l5),l5),QIList(l11,QIList(l171,QIList(l295,l340,l5),l5),QIList(l171,l336,l5),QIList(l170,QIList(l209,QIList(l55,QIList(l303,QIList(l31,l337,l5),l5),QIList(l28,QIList(l13,QIList(l32,l337,l5),l5),l5),l5),QIList(l169,QIList(QIList(l171,QIList(l31,l337,l5),l5),QIList(l185,QIList(l171,l340,l5),QIList(l170,QIList(l32,l337,l5),l5),l5),l5),l5),QIList(l169,QIList(QIList(l185,QIList(l171,l340,l5),QIList(l170,l337,l5),l5),l5),l5),l5),l5),l5),l5),QIList(l168,QIList(l171,l340,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l11,l199,QIList(l105,QIList(l6,QIList(l340,l336,l212,l337,l5),QIList(l254,QIList(QIList(l335,QIList(l17,"FN",l5),l5),l5),QIList(l169,QIList(l254,QIList(QIList(QIList(l171,l335,l5),QIList(l6,QIList(l171,l336,l5),QIList(l170,l337,l5),l5),l5),l5),QIList(l315,QIList(l171,l335,l5),"fname",QIList(l171,l340,l5),l5),QIList(l171,l335,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l10,l199,QIList(l105,QIList(l6,QIList(l340,l351,l211,l367,l5),QIList(l169,QIList(l249,QIList(l233,QIList(l171,l340,l5),QIList(l171,l351,l5),l5),QIList(l170,QIList(l7,QIList(l303,l367,l5),QIList(l169,QIList(QIList(l315,QIList(l168,QIList(l171,l340,l5),l5),"vardoc",QIList(l171,l367,l5),l5),l5),l5),l5),l5),QIList(l168,QIList(l171,l340,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l9,l199,QIList(l105,QIList(l6,QIList(l340,l351,l211,l367,l5),QIList(l169,QIList(l249,QIList(l2,QIList(l203,QIList(l171,l340,l5),l5),l5),QIList(l8,QIList(l19,QIList(l168,QIList(l171,l340,l5),l5),l5),QIList(l233,QIList(l171,l340,l5),QIList(l171,l351,l5),l5),l5),QIList(l170,QIList(l7,QIList(l303,l367,l5),QIList(l169,QIList(QIList(l315,QIList(l168,QIList(l171,l340,l5),l5),"vardoc",QIList(l171,l367,l5),l5),l5),l5),l5),l5),QIList(l168,QIList(l171,l340,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l8,l199,QIList(l105,QIList(l6,QIList(l366,l212,l337,l5),QIList(l169,QIList(l209,QIList(l171,l366,l5),l5,QIList(l249,QIList(l170,l337,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l7,l199,QIList(l105,QIList(l6,QIList(l366,l212,l337,l5),QIList(l169,QIList(l209,QIList(l171,l366,l5),QIList(l249,QIList(l170,l337,l5),l5),l5,l5),l5),l5),l5),l5,l5),QIList(l6,l199,QIList(l105,QIList(l6,QIList(l336,l212,l337,l5),QIList(l169,QIList(l105,QIList(l6,QIList(l171,l336,l5),QIList(l170,l337,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l3,l199,QIList(l105,QIList(l6,QIList(l340,l351,l211,l367,l5),QIList(l169,QIList(l249,QIList(l2,QIList(l203,QIList(l171,l340,l5),l5),l5),QIList(l2,QIList(l205,QIList(l171,l340,l5),l5),l5),QIList(l233,QIList(l171,l340,l5),QIList(l171,l351,l5),l5),QIList(l170,QIList(l7,QIList(l303,l367,l5),QIList(l169,QIList(QIList(l315,QIList(l168,QIList(l171,l340,l5),l5),"vardoc",QIList(l171,l367,l5),l5),l5),l5),l5),l5),QIList(l168,QIList(l171,l340,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l2,l199,QIList(l105,QIList(l6,QIList(l212,l338,l5),QIList(l169,QIList(l248,QIList(l170,QIList(l74,QIList(l6,QIList(l339,l5),QIList(l169,QIList(l202,QIList(l168,QIList(l171,l339,l5),l5),l5),l5),l5),l338,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l1,l199,QIList(l105,QIList(l6,QIList(l340,l336,l212,l337,l5),QIList(l169,QIList(l248,QIList(l198,QIList(l168,QIList(l171,l340,l5),l5),QIList(l168,QIList(l105,QIList(l6,QIList(l171,QIList(l74,QIList(l105,QIList(l6,QIList(l335,l5),QIList(l209,QIList(l300,l335,QIList(l168,l329,l5),l5),QIList(l168,l212,l5),l335,l5),l5),l5),l336,l5),l5),QIList(l170,l337,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),l5),l5,l5,l5);
8828 (function(){
8829     l126.fvalue(pv, l330);
8830     l126.fvalue(pv, l329);
8831     l126.fvalue(pv, l328);
8832     l126.fvalue(pv, l327);
8833     l126.fvalue(pv, l326);
8834     l126.fvalue(pv, l325);
8835     l126.fvalue(pv, l324);
8836     l126.fvalue(pv, l323);
8837     l126.fvalue(pv, l322);
8838     l126.fvalue(pv, l321);
8839     l126.fvalue(pv, l320);
8840     l126.fvalue(pv, l319);
8841     l126.fvalue(pv, l318);
8842     l126.fvalue(pv, l317);
8843     l126.fvalue(pv, l316);
8844     l126.fvalue(pv, l315);
8845     l126.fvalue(pv, l314);
8846     l126.fvalue(pv, l313);
8847     l126.fvalue(pv, l312);
8848     l126.fvalue(pv, l311);
8849     l126.fvalue(pv, l310);
8850     l126.fvalue(pv, l309);
8851     l126.fvalue(pv, l308);
8852     l126.fvalue(pv, l307);
8853     l126.fvalue(pv, l306);
8854     l126.fvalue(pv, l305);
8855     l126.fvalue(pv, l304);
8856     l126.fvalue(pv, l303);
8857     l126.fvalue(pv, l302);
8858     l126.fvalue(pv, l301);
8859     l126.fvalue(pv, l300);
8860     l126.fvalue(pv, l299);
8861     l126.fvalue(pv, l298);
8862     l126.fvalue(pv, l297);
8863     l126.fvalue(pv, l296);
8864     l126.fvalue(pv, l295);
8865     l126.fvalue(pv, l294);
8866     l126.fvalue(pv, l293);
8867     l126.fvalue(pv, l292);
8868     l126.fvalue(pv, l291);
8869     l126.fvalue(pv, l290);
8870     l126.fvalue(pv, l289);
8871     l126.fvalue(pv, l288);
8872     l126.fvalue(pv, l287);
8873     l126.fvalue(pv, l286);
8874     l126.fvalue(pv, l285);
8875     l126.fvalue(pv, l284);
8876     l126.fvalue(pv, l283);
8877     l126.fvalue(pv, l282);
8878     l126.fvalue(pv, l281);
8879     l126.fvalue(pv, l280);
8880     l126.fvalue(pv, l279);
8881     l126.fvalue(pv, l278);
8882     l126.fvalue(pv, l277);
8883     l126.fvalue(pv, l276);
8884     l126.fvalue(pv, l275);
8885     l126.fvalue(pv, l274);
8886     l126.fvalue(pv, l273);
8887     l126.fvalue(pv, l272);
8888     l126.fvalue(pv, l271);
8889     l126.fvalue(pv, l270);
8890     l126.fvalue(pv, l269);
8891     l126.fvalue(pv, l268);
8892     l126.fvalue(pv, l267);
8893     l126.fvalue(pv, l266);
8894     l126.fvalue(pv, l265);
8895     l126.fvalue(pv, l264);
8896     l126.fvalue(pv, l263);
8897     l126.fvalue(pv, l262);
8898     l126.fvalue(pv, l261);
8899     l126.fvalue(pv, l260);
8900     l126.fvalue(pv, l259);
8901     l126.fvalue(pv, l258);
8902     l126.fvalue(pv, l257);
8903     l126.fvalue(pv, l256);
8904     l126.fvalue(pv, l255);
8905     l126.fvalue(pv, l254);
8906     l126.fvalue(pv, l253);
8907     l126.fvalue(pv, l252);
8908     l126.fvalue(pv, l251);
8909     l126.fvalue(pv, l250);
8910     l126.fvalue(pv, l249);
8911     l126.fvalue(pv, l248);
8912     l126.fvalue(pv, l247);
8913     l126.fvalue(pv, l246);
8914     l126.fvalue(pv, l245);
8915     l126.fvalue(pv, l244);
8916     l126.fvalue(pv, l243);
8917     l126.fvalue(pv, l242);
8918     l126.fvalue(pv, l241);
8919     l126.fvalue(pv, l240);
8920     l126.fvalue(pv, l239);
8921     l126.fvalue(pv, l238);
8922     l126.fvalue(pv, l237);
8923     l126.fvalue(pv, l236);
8924     l126.fvalue(pv, l235);
8925     l126.fvalue(pv, l234);
8926     l126.fvalue(pv, l233);
8927     l126.fvalue(pv, l232);
8928     l126.fvalue(pv, l231);
8929     l126.fvalue(pv, l230);
8930     l126.fvalue(pv, l229);
8931     l126.fvalue(pv, l228);
8932     l126.fvalue(pv, l227);
8933     l126.fvalue(pv, l226);
8934     l126.fvalue(pv, l225);
8935     l126.fvalue(pv, l224);
8936     l126.fvalue(pv, l223);
8937     l126.fvalue(pv, l222);
8938     l126.fvalue(pv, l221);
8939     l126.fvalue(pv, l220);
8940     l126.fvalue(pv, l219);
8941     l126.fvalue(pv, l218);
8942     l126.fvalue(pv, l217);
8943     l126.fvalue(pv, l216);
8944     l126.fvalue(pv, l215);
8945     l126.fvalue(pv, l213);
8946     l126.fvalue(pv, l212);
8947     l126.fvalue(pv, l211);
8948     l126.fvalue(pv, l210);
8949     l126.fvalue(pv, l209);
8950     l126.fvalue(pv, l208);
8951     l126.fvalue(pv, l207);
8952     l126.fvalue(pv, l206);
8953     l126.fvalue(pv, l205);
8954     l126.fvalue(pv, l204);
8955     l126.fvalue(pv, l203);
8956     l126.fvalue(pv, l202);
8957     l126.fvalue(pv, l201);
8958     l126.fvalue(pv, l200);
8959     l126.fvalue(pv, l199);
8960     l126.fvalue(pv, l198);
8961     l126.fvalue(pv, l197);
8962     l126.fvalue(pv, l196);
8963     l126.fvalue(pv, l195);
8964     l126.fvalue(pv, l194);
8965     l126.fvalue(pv, l193);
8966     l126.fvalue(pv, l192);
8967     l126.fvalue(pv, l191);
8968     l126.fvalue(pv, l190);
8969     l126.fvalue(pv, l189);
8970     l126.fvalue(pv, l188);
8971     l126.fvalue(pv, l187);
8972     l126.fvalue(pv, l186);
8973     l126.fvalue(pv, l185);
8974     l126.fvalue(pv, l184);
8975     l126.fvalue(pv, l183);
8976     l126.fvalue(pv, l182);
8977     l126.fvalue(pv, l181);
8978     l126.fvalue(pv, l180);
8979     l126.fvalue(pv, l179);
8980     l126.fvalue(pv, l178);
8981     l126.fvalue(pv, l177);
8982     l126.fvalue(pv, l176);
8983     l126.fvalue(pv, l175);
8984     l126.fvalue(pv, l174);
8985     l126.fvalue(pv, l173);
8986     l126.fvalue(pv, l172);
8987     l126.fvalue(pv, l171);
8988     l126.fvalue(pv, l170);
8989     l126.fvalue(pv, l169);
8990     l126.fvalue(pv, l168);
8991     l126.fvalue(pv, l167);
8992     l126.fvalue(pv, l166);
8993     l126.fvalue(pv, l165);
8994     l126.fvalue(pv, l164);
8995     l126.fvalue(pv, l163);
8996     l126.fvalue(pv, l162);
8997     l126.fvalue(pv, l161);
8998     l126.fvalue(pv, l160);
8999     l126.fvalue(pv, l159);
9000     l126.fvalue(pv, l158);
9001     l126.fvalue(pv, l157);
9002     l126.fvalue(pv, l156);
9003     l126.fvalue(pv, l155);
9004     l126.fvalue(pv, l154);
9005     l126.fvalue(pv, l153);
9006     l126.fvalue(pv, l152);
9007     l126.fvalue(pv, l151);
9008     l126.fvalue(pv, l150);
9009     l126.fvalue(pv, l149);
9010     l126.fvalue(pv, l148);
9011     l126.fvalue(pv, l147);
9012     l126.fvalue(pv, l146);
9013     l126.fvalue(pv, l145);
9014     l126.fvalue(pv, l144);
9015     l126.fvalue(pv, l143);
9016     l126.fvalue(pv, l142);
9017     l126.fvalue(pv, l141);
9018     l126.fvalue(pv, l140);
9019     l126.fvalue(pv, l139);
9020     l126.fvalue(pv, l138);
9021     l126.fvalue(pv, l137);
9022     l126.fvalue(pv, l136);
9023     l126.fvalue(pv, l135);
9024     l126.fvalue(pv, l134);
9025     l126.fvalue(pv, l133);
9026     l126.fvalue(pv, l132);
9027     l126.fvalue(pv, l131);
9028     l126.fvalue(pv, l130);
9029     l126.fvalue(pv, l129);
9030     l126.fvalue(pv, l128);
9031     l126.fvalue(pv, l127);
9032     l126.fvalue(pv, l126);
9033     l126.fvalue(pv, l125);
9034     l126.fvalue(pv, l124);
9035     l126.fvalue(pv, l123);
9036     l126.fvalue(pv, l122);
9037     l126.fvalue(pv, l121);
9038     l126.fvalue(pv, l120);
9039     l126.fvalue(pv, l119);
9040     l126.fvalue(pv, l118);
9041     l126.fvalue(pv, l117);
9042     l126.fvalue(pv, l116);
9043     l126.fvalue(pv, l115);
9044     l126.fvalue(pv, l114);
9045     l126.fvalue(pv, l113);
9046     l126.fvalue(pv, l112);
9047     l126.fvalue(pv, l111);
9048     l126.fvalue(pv, l110);
9049     l126.fvalue(pv, l109);
9050     l126.fvalue(pv, l108);
9051     l126.fvalue(pv, l107);
9052     l126.fvalue(pv, l106);
9053     l126.fvalue(pv, l105);
9054     l126.fvalue(pv, l104);
9055     l126.fvalue(pv, l103);
9056     l126.fvalue(pv, l102);
9057     l126.fvalue(pv, l101);
9058     l126.fvalue(pv, l100);
9059     l126.fvalue(pv, l99);
9060     l126.fvalue(pv, l98);
9061     l126.fvalue(pv, l97);
9062     l126.fvalue(pv, l96);
9063     l126.fvalue(pv, l95);
9064     l126.fvalue(pv, l94);
9065     l126.fvalue(pv, l93);
9066     l126.fvalue(pv, l92);
9067     l126.fvalue(pv, l91);
9068     l126.fvalue(pv, l90);
9069     l126.fvalue(pv, l89);
9070     l126.fvalue(pv, l88);
9071     l126.fvalue(pv, l87);
9072     l126.fvalue(pv, l86);
9073     l126.fvalue(pv, l85);
9074     l126.fvalue(pv, l84);
9075     l126.fvalue(pv, l83);
9076     l126.fvalue(pv, l82);
9077     l126.fvalue(pv, l81);
9078     l126.fvalue(pv, l80);
9079     l126.fvalue(pv, l79);
9080     l126.fvalue(pv, l78);
9081     l126.fvalue(pv, l77);
9082     l126.fvalue(pv, l76);
9083     l126.fvalue(pv, l75);
9084     l126.fvalue(pv, l74);
9085     l126.fvalue(pv, l73);
9086     l126.fvalue(pv, l72);
9087     l126.fvalue(pv, l71);
9088     l126.fvalue(pv, l70);
9089     l126.fvalue(pv, l69);
9090     l126.fvalue(pv, l68);
9091     l126.fvalue(pv, l67);
9092     l126.fvalue(pv, l66);
9093     l126.fvalue(pv, l65);
9094     l126.fvalue(pv, l64);
9095     l126.fvalue(pv, l63);
9096     l126.fvalue(pv, l62);
9097     l126.fvalue(pv, l61);
9098     l126.fvalue(pv, l60);
9099     l126.fvalue(pv, l59);
9100     l126.fvalue(pv, l58);
9101     l126.fvalue(pv, l57);
9102     l126.fvalue(pv, l56);
9103     l126.fvalue(pv, l55);
9104     l126.fvalue(pv, l54);
9105     l126.fvalue(pv, l53);
9106     l126.fvalue(pv, l52);
9107     l126.fvalue(pv, l51);
9108     l126.fvalue(pv, l50);
9109     l126.fvalue(pv, l49);
9110     l126.fvalue(pv, l48);
9111     l126.fvalue(pv, l47);
9112     l126.fvalue(pv, l46);
9113     l126.fvalue(pv, l45);
9114     l126.fvalue(pv, l44);
9115     l126.fvalue(pv, l43);
9116     l126.fvalue(pv, l42);
9117     l126.fvalue(pv, l41);
9118     l126.fvalue(pv, l40);
9119     l126.fvalue(pv, l39);
9120     l126.fvalue(pv, l38);
9121     l126.fvalue(pv, l37);
9122     l126.fvalue(pv, l36);
9123     l126.fvalue(pv, l35);
9124     l126.fvalue(pv, l34);
9125     l126.fvalue(pv, l33);
9126     l126.fvalue(pv, l32);
9127     l126.fvalue(pv, l31);
9128     l126.fvalue(pv, l30);
9129     l126.fvalue(pv, l29);
9130     l126.fvalue(pv, l28);
9131     l126.fvalue(pv, l27);
9132     l126.fvalue(pv, l26);
9133     l126.fvalue(pv, l25);
9134     l126.fvalue(pv, l24);
9135     l126.fvalue(pv, l23);
9136     l126.fvalue(pv, l22);
9137     l126.fvalue(pv, l21);
9138     l126.fvalue(pv, l20);
9139     l126.fvalue(pv, l19);
9140     l126.fvalue(pv, l18);
9141     l126.fvalue(pv, l17);
9142     l126.fvalue(pv, l16);
9143     l126.fvalue(pv, l15);
9144     l126.fvalue(pv, l14);
9145     l126.fvalue(pv, l13);
9146     l126.fvalue(pv, l12);
9147     l126.fvalue(pv, l11);
9148     l126.fvalue(pv, l10);
9149     l126.fvalue(pv, l9);
9150     l126.fvalue(pv, l8);
9151     l126.fvalue(pv, l7);
9152     l126.fvalue(pv, l6);
9153     l126.fvalue(pv, l5);
9154     l126.fvalue(pv, l4);
9155     l126.fvalue(pv, l3);
9156     l126.fvalue(pv, l2);
9157     l126.fvalue(pv, l1);
9158     ((l236).value = l332);
9159     ((l189).value = l368);
9160     ((l190).value = 893);
9161     ((l16).value = 226);
9162     return ((l258).value = 296);
9163 })();
9164 ((l237).value = 368);