ecmalisp.js

   1 var nil;
   2
   3 function pv (x) { return x==undefined? nil: x; }
   4
   5 function mv(){
   6     var r = [];
   7     r['multiple-value'] = true;
   8     for (var i=0; i<arguments.length; i++)
   9         r.push(arguments[i]);
  10     return r;
  11 }
  12
  13 function forcemv (x) {
  14     return typeof x == 'object' && 'multiple-value' in x? x: mv(x);
  15 }
  16
  17 // NOTE: Define VALUES to be MV for toplevel forms. It is because
  18 // `eval' compiles the forms and execute the Javascript code at
  19 // toplevel with `js-eval', so it is necessary to return multiple
  20 // values from the eval function.
  21 var values = mv;
  22
  23 function checkArgsAtLeast(args, n){
  24     if (args.length < n) throw 'too few arguments';
  25 }
  26
  27 function checkArgsAtMost(args, n){
  28     if (args.length > n) throw 'too many arguments';
  29 }
  30
  31 function checkArgs(args, n){
  32     checkArgsAtLeast(args, n);
  33     checkArgsAtMost(args, n);
  34 }
  35
  36 // Improper list constructor (like LIST*)
  37 function QIList(){
  38     if (arguments.length == 1)
  39         return arguments[0];
  40     else {
  41         var i = arguments.length-1;
  42         var r = arguments[i--];
  43         for (; i>=0; i--){
  44             r = {car: arguments[i], cdr: r};
  45         }
  46         return r;
  47     }
  48 }
  49 var l1 = {name: "DEFMACRO"};
  50 l1;
  51 var l2 = {name: "DECLAIM"};
  52 l2;
  53 var l3 = {name: "DEFCONSTANT"};
  54 l3;
  55 var l4 = {name: "T"};
  56 (function(){
  57     ((l4).value = l4);
  58     return l4;
  59 })();
  60 var l5 = {name: "NIL"};
  61 (function(){
  62     ((l5).value = l5);
  63     return l5;
  64 })();
  65 (nil = l5.value);
  66 var l6 = {name: "LAMBDA"};
  67 l6;
  68 var l7 = {name: "WHEN"};
  69 l7;
  70 var l8 = {name: "UNLESS"};
  71 l8;
  72 var l9 = {name: "DEFVAR"};
  73 l9;
  74 var l10 = {name: "DEFPARAMETER"};
  75 l10;
  76 var l11 = {name: "NAMED-LAMBDA"};
  77 l11;
  78 var l12 = {name: "DEFUN"};
  79 l12;
  80 var l13 = {name: "NULL"};
  81 (function(){
  82     (l13).fvalue = (function(v2){
  83         ((v2)["fname"] = "NULL");
  84         return v2;
  85     })((function (values,v1){
  86         checkArgs(arguments, 2);
  87         return (function(){
  88             return ((v1 === l5.value)?l4.value: l5.value);
  89         })();
  90     }));
  91     return l13;
  92 })();
  93 var l14 = {name: "ENDP"};
  94 (function(){
  95     (l14).fvalue = (function(v4){
  96         ((v4)["fname"] = "ENDP");
  97         return v4;
  98     })((function (values,v3){
  99         checkArgs(arguments, 2);
 100         return (function(){
 101             return (l13.fvalue(pv, v3) !== l5.value ? l4.value : (((function(){
 102                 var tmp = v3;
 103                 return (typeof tmp == 'object' && 'car' in tmp);
 104             })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
 105                 throw "type-error";
 106             })()));
 107         })();
 108     }));
 109     return l14;
 110 })();
 111 var l15 = {name: "RETURN"};
 112 l15;
 113 var l16 = {name: "WHILE"};
 114 l16;
 115 var l17 = {name: "*GENSYM-COUNTER*"};
 116 (function(){
 117     (((l17.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l17).value = 0));
 118     return l17;
 119 })();
 120 var l18 = {name: "GENSYM"};
 121 var l19 = {name: "INTEGER-TO-STRING"};
 122 (function(){
 123     (l18).fvalue = (function(v6){
 124         ((v6)["fname"] = "GENSYM");
 125         return v6;
 126     })((function (values,v5){
 127         checkArgsAtMost(arguments, 2);
 128         var v5;
 129         switch(arguments.length-1){
 130         case 0:
 131             v5="G";
 132         default: break;
 133         }
 134         return (function(){
 135             ((l17).value = (function(){
 136                 var x1 = (function(){
 137                     var symbol = l17;
 138                     var value = symbol.value;
 139                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 140                     return value;
 141                 })();
 142                 if (typeof x1 !== 'number') throw 'Not a number!';
 143                 return x1+1;
 144             })());
 145             return (function(){
 146                 var name = (function(){
 147                     var string1 = v5;
 148                     var string2 = l19.fvalue(pv, (function(){
 149                         var symbol = l17;
 150                         var value = symbol.value;
 151                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 152                         return value;
 153                     })());
 154                     if (typeof string1 != 'string')
 155                         throw 'The value ' + string1 + ' is not a type string.';
 156                     if (typeof string2 != 'string')
 157                         throw 'The value ' + string2 + ' is not a type string.';
 158                     return string1.concat(string2);
 159                 })();
 160                 if (typeof name != 'string')
 161                     throw 'The value ' + name + ' is not a type string.';
 162                 return ({name: name});
 163             })();
 164         })();
 165     }));
 166     return l18;
 167 })();
 168 var l20 = {name: "BOUNDP"};
 169 (function(){
 170     (l20).fvalue = (function(v8){
 171         ((v8)["fname"] = "BOUNDP");
 172         return v8;
 173     })((function (values,v7){
 174         checkArgs(arguments, 2);
 175         return (function(){
 176             return ((v7.value !== undefined)?l4.value: l5.value);
 177         })();
 178     }));
 179     return l20;
 180 })();
 181 var l21 = {name: "="};
 182 (function(){
 183     (l21).fvalue = (function(v11){
 184         ((v11)["fname"] = "=");
 185         return v11;
 186     })((function (values,v9,v10){
 187         checkArgs(arguments, 3);
 188         return (function(){
 189             return (function(){
 190                 var x1 = v9;
 191                 if (typeof x1 !== 'number') throw 'Not a number!';
 192                 var x2 = v10;
 193                 if (typeof x2 !== 'number') throw 'Not a number!';
 194                 return (x1==x2?l4.value: l5.value);
 195             })();
 196         })();
 197     }));
 198     return l21;
 199 })();
 200 var l22 = {name: "*"};
 201 (function(){
 202     (l22).fvalue = (function(v14){
 203         ((v14)["fname"] = "*");
 204         return v14;
 205     })((function (values,v12,v13){
 206         checkArgs(arguments, 3);
 207         return (function(){
 208             return (function(){
 209                 var x1 = v12;
 210                 if (typeof x1 !== 'number') throw 'Not a number!';
 211                 var x2 = v13;
 212                 if (typeof x2 !== 'number') throw 'Not a number!';
 213                 return x1*x2;
 214             })();
 215         })();
 216     }));
 217     return l22;
 218 })();
 219 var l23 = {name: "/"};
 220 (function(){
 221     (l23).fvalue = (function(v17){
 222         ((v17)["fname"] = "/");
 223         return v17;
 224     })((function (values,v15,v16){
 225         checkArgs(arguments, 3);
 226         return (function(){
 227             return (function(){
 228                 var x1 = v15;
 229                 if (typeof x1 !== 'number') throw 'Not a number!';
 230                 var x2 = v16;
 231                 if (typeof x2 !== 'number') throw 'Not a number!';
 232                 return x1/x2;
 233             })();
 234         })();
 235     }));
 236     return l23;
 237 })();
 238 var l24 = {name: "1+"};
 239 (function(){
 240     (l24).fvalue = (function(v19){
 241         ((v19)["fname"] = "1+");
 242         return v19;
 243     })((function (values,v18){
 244         checkArgs(arguments, 2);
 245         return (function(){
 246             return (function(){
 247                 var x1 = v18;
 248                 if (typeof x1 !== 'number') throw 'Not a number!';
 249                 return x1+1;
 250             })();
 251         })();
 252     }));
 253     return l24;
 254 })();
 255 var l25 = {name: "1-"};
 256 (function(){
 257     (l25).fvalue = (function(v21){
 258         ((v21)["fname"] = "1-");
 259         return v21;
 260     })((function (values,v20){
 261         checkArgs(arguments, 2);
 262         return (function(){
 263             return (function(){
 264                 var x1 = v20;
 265                 if (typeof x1 !== 'number') throw 'Not a number!';
 266                 return x1-1;
 267             })();
 268         })();
 269     }));
 270     return l25;
 271 })();
 272 var l26 = {name: "ZEROP"};
 273 (function(){
 274     (l26).fvalue = (function(v23){
 275         ((v23)["fname"] = "ZEROP");
 276         return v23;
 277     })((function (values,v22){
 278         checkArgs(arguments, 2);
 279         return (function(){
 280             return (function(){
 281                 var x1 = v22;
 282                 if (typeof x1 !== 'number') throw 'Not a number!';
 283                 return (x1==0?l4.value: l5.value);
 284             })();
 285         })();
 286     }));
 287     return l26;
 288 })();
 289 var l27 = {name: "TRUNCATE"};
 290 (function(){
 291     (l27).fvalue = (function(v26){
 292         ((v26)["fname"] = "TRUNCATE");
 293         return v26;
 294     })((function (values,v24,v25){
 295         checkArgs(arguments, 3);
 296         return (function(){
 297             return (function(){
 298                 var x = (function(){
 299                     var x1 = v24;
 300                     if (typeof x1 !== 'number') throw 'Not a number!';
 301                     var x2 = v25;
 302                     if (typeof x2 !== 'number') throw 'Not a number!';
 303                     return x1/x2;
 304                 })();
 305                 if (typeof x != 'number')
 306                     throw 'The value ' + x + ' is not a type number.';
 307                 return Math.floor(x);
 308             })();
 309         })();
 310     }));
 311     return l27;
 312 })();
 313 var l28 = {name: "EQL"};
 314 (function(){
 315     (l28).fvalue = (function(v29){
 316         ((v29)["fname"] = "EQL");
 317         return v29;
 318     })((function (values,v27,v28){
 319         checkArgs(arguments, 3);
 320         return (function(){
 321             return ((v27 === v28)?l4.value: l5.value);
 322         })();
 323     }));
 324     return l28;
 325 })();
 326 var l29 = {name: "NOT"};
 327 (function(){
 328     (l29).fvalue = (function(v31){
 329         ((v31)["fname"] = "NOT");
 330         return v31;
 331     })((function (values,v30){
 332         checkArgs(arguments, 2);
 333         return (function(){
 334             return (v30 !== l5.value ? l5.value : l4.value);
 335         })();
 336     }));
 337     return l29;
 338 })();
 339 var l30 = {name: "CONS"};
 340 (function(){
 341     (l30).fvalue = (function(v34){
 342         ((v34)["fname"] = "CONS");
 343         return v34;
 344     })((function (values,v32,v33){
 345         checkArgs(arguments, 3);
 346         return (function(){
 347             return ({car: v32, cdr: v33});
 348         })();
 349     }));
 350     return l30;
 351 })();
 352 var l31 = {name: "CONSP"};
 353 (function(){
 354     (l31).fvalue = (function(v36){
 355         ((v36)["fname"] = "CONSP");
 356         return v36;
 357     })((function (values,v35){
 358         checkArgs(arguments, 2);
 359         return (function(){
 360             return ((function(){
 361                 var tmp = v35;
 362                 return (typeof tmp == 'object' && 'car' in tmp);
 363             })()?l4.value: l5.value);
 364         })();
 365     }));
 366     return l31;
 367 })();
 368 var l32 = {name: "CAR"};
 369 (function(){
 370     (l32).fvalue = (function(v38){
 371         ((v38)["fname"] = "CAR");
 372         return v38;
 373     })((function(){
 374         var func = (function (values,v37){
 375             checkArgs(arguments, 2);
 376             return (function(){
 377                 return (function(){
 378                     var tmp = v37;
 379                     return tmp === l5.value? l5.value: tmp.car;
 380                 })();
 381             })();
 382         });
 383         func.docstring = 'Return the CAR part of a cons, or NIL if X is null.';
 384         return func;
 385     })());
 386     return l32;
 387 })();
 388 var l33 = {name: "CDR"};
 389 (function(){
 390     (l33).fvalue = (function(v40){
 391         ((v40)["fname"] = "CDR");
 392         return v40;
 393     })((function (values,v39){
 394         checkArgs(arguments, 2);
 395         return (function(){
 396             return (function(){
 397                 var tmp = v39;
 398                 return tmp === l5.value? l5.value: tmp.cdr;
 399             })();
 400         })();
 401     }));
 402     return l33;
 403 })();
 404 var l34 = {name: "CAAR"};
 405 (function(){
 406     (l34).fvalue = (function(v42){
 407         ((v42)["fname"] = "CAAR");
 408         return v42;
 409     })((function (values,v41){
 410         checkArgs(arguments, 2);
 411         return (function(){
 412             return (function(){
 413                 var tmp = (function(){
 414                     var tmp = v41;
 415                     return tmp === l5.value? l5.value: tmp.car;
 416                 })();
 417                 return tmp === l5.value? l5.value: tmp.car;
 418             })();
 419         })();
 420     }));
 421     return l34;
 422 })();
 423 var l35 = {name: "CADR"};
 424 (function(){
 425     (l35).fvalue = (function(v44){
 426         ((v44)["fname"] = "CADR");
 427         return v44;
 428     })((function (values,v43){
 429         checkArgs(arguments, 2);
 430         return (function(){
 431             return (function(){
 432                 var tmp = (function(){
 433                     var tmp = v43;
 434                     return tmp === l5.value? l5.value: tmp.cdr;
 435                 })();
 436                 return tmp === l5.value? l5.value: tmp.car;
 437             })();
 438         })();
 439     }));
 440     return l35;
 441 })();
 442 var l36 = {name: "CDAR"};
 443 (function(){
 444     (l36).fvalue = (function(v46){
 445         ((v46)["fname"] = "CDAR");
 446         return v46;
 447     })((function (values,v45){
 448         checkArgs(arguments, 2);
 449         return (function(){
 450             return (function(){
 451                 var tmp = (function(){
 452                     var tmp = v45;
 453                     return tmp === l5.value? l5.value: tmp.car;
 454                 })();
 455                 return tmp === l5.value? l5.value: tmp.cdr;
 456             })();
 457         })();
 458     }));
 459     return l36;
 460 })();
 461 var l37 = {name: "CDDR"};
 462 (function(){
 463     (l37).fvalue = (function(v48){
 464         ((v48)["fname"] = "CDDR");
 465         return v48;
 466     })((function (values,v47){
 467         checkArgs(arguments, 2);
 468         return (function(){
 469             return (function(){
 470                 var tmp = (function(){
 471                     var tmp = v47;
 472                     return tmp === l5.value? l5.value: tmp.cdr;
 473                 })();
 474                 return tmp === l5.value? l5.value: tmp.cdr;
 475             })();
 476         })();
 477     }));
 478     return l37;
 479 })();
 480 var l38 = {name: "CADAR"};
 481 (function(){
 482     (l38).fvalue = (function(v50){
 483         ((v50)["fname"] = "CADAR");
 484         return v50;
 485     })((function (values,v49){
 486         checkArgs(arguments, 2);
 487         return (function(){
 488             return (function(){
 489                 var tmp = (function(){
 490                     var tmp = (function(){
 491                         var tmp = v49;
 492                         return tmp === l5.value? l5.value: tmp.car;
 493                     })();
 494                     return tmp === l5.value? l5.value: tmp.cdr;
 495                 })();
 496                 return tmp === l5.value? l5.value: tmp.car;
 497             })();
 498         })();
 499     }));
 500     return l38;
 501 })();
 502 var l39 = {name: "CADDR"};
 503 (function(){
 504     (l39).fvalue = (function(v52){
 505         ((v52)["fname"] = "CADDR");
 506         return v52;
 507     })((function (values,v51){
 508         checkArgs(arguments, 2);
 509         return (function(){
 510             return (function(){
 511                 var tmp = (function(){
 512                     var tmp = (function(){
 513                         var tmp = v51;
 514                         return tmp === l5.value? l5.value: tmp.cdr;
 515                     })();
 516                     return tmp === l5.value? l5.value: tmp.cdr;
 517                 })();
 518                 return tmp === l5.value? l5.value: tmp.car;
 519             })();
 520         })();
 521     }));
 522     return l39;
 523 })();
 524 var l40 = {name: "CDDDR"};
 525 (function(){
 526     (l40).fvalue = (function(v54){
 527         ((v54)["fname"] = "CDDDR");
 528         return v54;
 529     })((function (values,v53){
 530         checkArgs(arguments, 2);
 531         return (function(){
 532             return (function(){
 533                 var tmp = (function(){
 534                     var tmp = (function(){
 535                         var tmp = v53;
 536                         return tmp === l5.value? l5.value: tmp.cdr;
 537                     })();
 538                     return tmp === l5.value? l5.value: tmp.cdr;
 539                 })();
 540                 return tmp === l5.value? l5.value: tmp.cdr;
 541             })();
 542         })();
 543     }));
 544     return l40;
 545 })();
 546 var l41 = {name: "CADDDR"};
 547 (function(){
 548     (l41).fvalue = (function(v56){
 549         ((v56)["fname"] = "CADDDR");
 550         return v56;
 551     })((function (values,v55){
 552         checkArgs(arguments, 2);
 553         return (function(){
 554             return (function(){
 555                 var tmp = (function(){
 556                     var tmp = (function(){
 557                         var tmp = (function(){
 558                             var tmp = v55;
 559                             return tmp === l5.value? l5.value: tmp.cdr;
 560                         })();
 561                         return tmp === l5.value? l5.value: tmp.cdr;
 562                     })();
 563                     return tmp === l5.value? l5.value: tmp.cdr;
 564                 })();
 565                 return tmp === l5.value? l5.value: tmp.car;
 566             })();
 567         })();
 568     }));
 569     return l41;
 570 })();
 571 var l42 = {name: "FIRST"};
 572 (function(){
 573     (l42).fvalue = (function(v58){
 574         ((v58)["fname"] = "FIRST");
 575         return v58;
 576     })((function (values,v57){
 577         checkArgs(arguments, 2);
 578         return (function(){
 579             return (function(){
 580                 var tmp = v57;
 581                 return tmp === l5.value? l5.value: tmp.car;
 582             })();
 583         })();
 584     }));
 585     return l42;
 586 })();
 587 var l43 = {name: "SECOND"};
 588 (function(){
 589     (l43).fvalue = (function(v60){
 590         ((v60)["fname"] = "SECOND");
 591         return v60;
 592     })((function (values,v59){
 593         checkArgs(arguments, 2);
 594         return (function(){
 595             return l35.fvalue(values, v59);
 596         })();
 597     }));
 598     return l43;
 599 })();
 600 var l44 = {name: "THIRD"};
 601 (function(){
 602     (l44).fvalue = (function(v62){
 603         ((v62)["fname"] = "THIRD");
 604         return v62;
 605     })((function (values,v61){
 606         checkArgs(arguments, 2);
 607         return (function(){
 608             return l39.fvalue(values, v61);
 609         })();
 610     }));
 611     return l44;
 612 })();
 613 var l45 = {name: "FOURTH"};
 614 (function(){
 615     (l45).fvalue = (function(v64){
 616         ((v64)["fname"] = "FOURTH");
 617         return v64;
 618     })((function (values,v63){
 619         checkArgs(arguments, 2);
 620         return (function(){
 621             return l41.fvalue(values, v63);
 622         })();
 623     }));
 624     return l45;
 625 })();
 626 var l46 = {name: "REST"};
 627 (function(){
 628     (l46).fvalue = (function(v66){
 629         ((v66)["fname"] = "REST");
 630         return v66;
 631     })((function (values,v65){
 632         checkArgs(arguments, 2);
 633         return (function(){
 634             return (function(){
 635                 var tmp = v65;
 636                 return tmp === l5.value? l5.value: tmp.cdr;
 637             })();
 638         })();
 639     }));
 640     return l46;
 641 })();
 642 var l47 = {name: "LIST"};
 643 (function(){
 644     (l47).fvalue = (function(v68){
 645         ((v68)["fname"] = "LIST");
 646         return v68;
 647     })((function (values){
 648         var v67= l5.value;
 649         for (var i = arguments.length-1; i>=1; i--)
 650             v67 = {car: arguments[i], cdr:
 651         v67};
 652         return (function(){
 653             return v67;
 654         })();
 655     }));
 656     return l47;
 657 })();
 658 var l48 = {name: "ATOM"};
 659 (function(){
 660     (l48).fvalue = (function(v70){
 661         ((v70)["fname"] = "ATOM");
 662         return v70;
 663     })((function (values,v69){
 664         checkArgs(arguments, 2);
 665         return (function(){
 666             return l29.fvalue(values, ((function(){
 667                 var tmp = v69;
 668                 return (typeof tmp == 'object' && 'car' in tmp);
 669             })()?l4.value: l5.value));
 670         })();
 671     }));
 672     return l48;
 673 })();
 674 var l49 = {name: "INCF"};
 675 l49;
 676 var l50 = {name: "DECF"};
 677 l50;
 678 var l51 = {name: "PUSH"};
 679 l51;
 680 var l52 = {name: "DOLIST"};
 681 l52;
 682 var l53 = {name: "DOTIMES"};
 683 l53;
 684 var l54 = {name: "COND"};
 685 l54;
 686 var l55 = {name: "CASE"};
 687 l55;
 688 var l56 = {name: "ECASE"};
 689 l56;
 690 var l57 = {name: "AND"};
 691 l57;
 692 var l58 = {name: "OR"};
 693 l58;
 694 var l59 = {name: "PROG1"};
 695 l59;
 696 var l60 = {name: "PROG2"};
 697 l60;
 698 var l61 = {name: "ENSURE-LIST"};
 699 var l62 = {name: "LISTP"};
 700 (function(){
 701     (l61).fvalue = (function(v72){
 702         ((v72)["fname"] = "ENSURE-LIST");
 703         return v72;
 704     })((function (values,v71){
 705         checkArgs(arguments, 2);
 706         return (function(){
 707             return (l62.fvalue(pv, v71) !== l5.value ? v71 : l47.fvalue(values, v71));
 708         })();
 709     }));
 710     return l61;
 711 })();
 712 var l63 = {name: "!REDUCE"};
 713 var l64 = {name: "INITIAL-VALUE", 'package': 'KEYWORD'};
 714 (function(){
 715     (l63).fvalue = (function(v76){
 716         ((v76)["fname"] = "!REDUCE");
 717         return v76;
 718     })((function (values,v73,v74){
 719         checkArgsAtLeast(arguments, 3);
 720         var v75;
 721         var i;
 722         for (i=3; i<arguments.length; i+=2){
 723             if (arguments[i] === l64.value){
 724                 v75 = arguments[i+1];
 725                 break;
 726             }
 727         }
 728         if (i == arguments.length){
 729             v75 = l5.value;
 730         }
 731         for (i=3; i<arguments.length; i+=2){
 732             if (arguments[i] !== l64.value)
 733                 throw 'Unknown keyword argument ' + arguments[i].name;
 734         }
 735         return (function(){
 736             return (l13.fvalue(pv, v74) !== l5.value ? v75 : l63.fvalue(values, v73, (function(){
 737                 var tmp = v74;
 738                 return tmp === l5.value? l5.value: tmp.cdr;
 739             })(), l64.value, (function(){
 740                 var f = v73;
 741                 return (typeof f === 'function'? f: f.fvalue)(pv, v75, (function(){
 742                     var tmp = v74;
 743                     return tmp === l5.value? l5.value: tmp.car;
 744                 })())
 745             })()));
 746         })();
 747     }));
 748     return l63;
 749 })();
 750 var l65 = {name: "+"};
 751 (function(){
 752     (l65).fvalue = (function(v81){
 753         ((v81)["fname"] = "+");
 754         return v81;
 755     })((function (values){
 756         var v77= l5.value;
 757         for (var i = arguments.length-1; i>=1; i--)
 758             v77 = {car: arguments[i], cdr:
 759         v77};
 760         return (function(){
 761             return (function(v78){
 762                 return (function(){
 763                     return (function(v79,v80){
 764                         (function(){
 765                             while(v79 !== l5.value){
 766                                 (v80 = (function(){
 767                                     var tmp = v79;
 768                                     return tmp === l5.value? l5.value: tmp.car;
 769                                 })());
 770                                 (function(){
 771                                     (v78 = (function(){
 772                                         var x1 = v78;
 773                                         if (typeof x1 !== 'number') throw 'Not a number!';
 774                                         var x2 = v80;
 775                                         if (typeof x2 !== 'number') throw 'Not a number!';
 776                                         return x1+x2;
 777                                     })());
 778                                     return l5.value;
 779                                 })();
 780                                 (v79 = (function(){
 781                                     var tmp = v79;
 782                                     return tmp === l5.value? l5.value: tmp.cdr;
 783                                 })());
 784                             }return l5.value;
 785                         })();
 786                         return v78;
 787                     })(v77,l5.value);
 788                 })();
 789             })(0);
 790         })();
 791     }));
 792     return l65;
 793 })();
 794 var l66 = {name: "-"};
 795 (function(){
 796     (l66).fvalue = (function(v87){
 797         ((v87)["fname"] = "-");
 798         return v87;
 799     })((function (values,v83){
 800         checkArgsAtLeast(arguments, 2);
 801         var v82= l5.value;
 802         for (var i = arguments.length-1; i>=2; i--)
 803             v82 = {car: arguments[i], cdr:
 804         v82};
 805         return (function(){
 806             return (l13.fvalue(pv, v82) !== l5.value ? (function(){
 807                 var x1 = v83;
 808                 if (typeof x1 !== 'number') throw 'Not a number!';
 809                 return -x1;
 810             })() : (function(v84){
 811                 return (function(){
 812                     return (function(v85,v86){
 813                         (function(){
 814                             while(v85 !== l5.value){
 815                                 (v86 = (function(){
 816                                     var tmp = v85;
 817                                     return tmp === l5.value? l5.value: tmp.car;
 818                                 })());
 819                                 (function(){
 820                                     (v84 = (function(){
 821                                         var x1 = v84;
 822                                         if (typeof x1 !== 'number') throw 'Not a number!';
 823                                         var x2 = v86;
 824                                         if (typeof x2 !== 'number') throw 'Not a number!';
 825                                         return x1-x2;
 826                                     })());
 827                                     return l5.value;
 828                                 })();
 829                                 (v85 = (function(){
 830                                     var tmp = v85;
 831                                     return tmp === l5.value? l5.value: tmp.cdr;
 832                                 })());
 833                             }return l5.value;
 834                         })();
 835                         return v84;
 836                     })(v82,l5.value);
 837                 })();
 838             })(v83));
 839         })();
 840     }));
 841     return l66;
 842 })();
 843 var l67 = {name: "APPEND-TWO"};
 844 var l68 = {name: "APPEND"};
 845 (function(){
 846     (l67).fvalue = (function(v90){
 847         ((v90)["fname"] = "APPEND-TWO");
 848         return v90;
 849     })((function (values,v88,v89){
 850         checkArgs(arguments, 3);
 851         return (function(){
 852             return (l13.fvalue(pv, v88) !== l5.value ? v89 : ({car: (function(){
 853                 var tmp = v88;
 854                 return tmp === l5.value? l5.value: tmp.car;
 855             })(), cdr: l68.fvalue(pv, (function(){
 856                 var tmp = v88;
 857                 return tmp === l5.value? l5.value: tmp.cdr;
 858             })(), v89)}));
 859         })();
 860     }));
 861     return l67;
 862 })();
 863 (function(){
 864     (l68).fvalue = (function(v92){
 865         ((v92)["fname"] = "APPEND");
 866         return v92;
 867     })((function (values){
 868         var v91= l5.value;
 869         for (var i = arguments.length-1; i>=1; i--)
 870             v91 = {car: arguments[i], cdr:
 871         v91};
 872         return (function(){
 873             return l63.fvalue(values, (function(){
 874                 var symbol = l67;
 875                 var func = symbol.fvalue;
 876                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
 877                 return func;
 878             })(), v91);
 879         })();
 880     }));
 881     return l68;
 882 })();
 883 var l69 = {name: "REVAPPEND"};
 884 (function(){
 885     (l69).fvalue = (function(v95){
 886         ((v95)["fname"] = "REVAPPEND");
 887         return v95;
 888     })((function (values,v93,v94){
 889         checkArgs(arguments, 3);
 890         return (function(){
 891             (function(){
 892                 return (function(){
 893                     while(v93 !== l5.value){
 894                         (v94 = ({car: (function(){
 895                             var tmp = v93;
 896                             return tmp === l5.value? l5.value: tmp.car;
 897                         })(), cdr: v94}));
 898                         (v93 = (function(){
 899                             var tmp = v93;
 900                             return tmp === l5.value? l5.value: tmp.cdr;
 901                         })());
 902                     }return l5.value;
 903                 })();
 904             })();
 905             return v94;
 906         })();
 907     }));
 908     return l69;
 909 })();
 910 var l70 = {name: "REVERSE"};
 911 (function(){
 912     (l70).fvalue = (function(v97){
 913         ((v97)["fname"] = "REVERSE");
 914         return v97;
 915     })((function (values,v96){
 916         checkArgs(arguments, 2);
 917         return (function(){
 918             return l69.fvalue(values, v96, l5);
 919         })();
 920     }));
 921     return l70;
 922 })();
 923 var l71 = {name: "PSETQ"};
 924 l71;
 925 var l72 = {name: "DO"};
 926 l72;
 927 var l73 = {name: "DO*"};
 928 l73;
 929 var l74 = {name: "LIST-LENGTH"};
 930 (function(){
 931     (l74).fvalue = (function(v100){
 932         ((v100)["fname"] = "LIST-LENGTH");
 933         return v100;
 934     })((function (values,v98){
 935         checkArgs(arguments, 2);
 936         return (function(){
 937             return (function(v99){
 938                 (function(){
 939                     return (function(){
 940                         while(l29.fvalue(pv, l13.fvalue(pv, v98)) !== l5.value){
 941                             (v99 = (function(){
 942                                 var x1 = v99;
 943                                 if (typeof x1 !== 'number') throw 'Not a number!';
 944                                 return x1+1;
 945                             })());
 946                             (v98 = (function(){
 947                                 var tmp = v98;
 948                                 return tmp === l5.value? l5.value: tmp.cdr;
 949                             })());
 950                         }return l5.value;
 951                     })();
 952                 })();
 953                 return v99;
 954             })(0);
 955         })();
 956     }));
 957     return l74;
 958 })();
 959 var l75 = {name: "LENGTH"};
 960 (function(){
 961     (l75).fvalue = (function(v102){
 962         ((v102)["fname"] = "LENGTH");
 963         return v102;
 964     })((function (values,v101){
 965         checkArgs(arguments, 2);
 966         return (function(){
 967             return (((typeof(v101) == "string")?l4.value: l5.value) !== l5.value ? (function(){
 968                 var x = v101;
 969                 if (typeof x != 'string')
 970                     throw 'The value ' + x + ' is not a type string.';
 971                 return x.length;
 972             })() : (((function(){
 973                 var x = v101;
 974                 return typeof x === 'object' && 'length' in x;
 975             })()?l4.value: l5.value) !== l5.value ? (function(){
 976                 var tmp = (v101)["length"];
 977                 return tmp == undefined? l5.value: tmp ;
 978             })() : (l62.fvalue(pv, v101) !== l5.value ? l74.fvalue(values, v101) : l5.value)));
 979         })();
 980     }));
 981     return l75;
 982 })();
 983 var l76 = {name: "CONCAT-TWO"};
 984 (function(){
 985     (l76).fvalue = (function(v105){
 986         ((v105)["fname"] = "CONCAT-TWO");
 987         return v105;
 988     })((function (values,v103,v104){
 989         checkArgs(arguments, 3);
 990         return (function(){
 991             return (function(){
 992                 var string1 = v103;
 993                 var string2 = v104;
 994                 if (typeof string1 != 'string')
 995                     throw 'The value ' + string1 + ' is not a type string.';
 996                 if (typeof string2 != 'string')
 997                     throw 'The value ' + string2 + ' is not a type string.';
 998                 return string1.concat(string2);
 999             })();
1000         })();
1001     }));
1002     return l76;
1003 })();
1004 var l77 = {name: "WITH-COLLECT"};
1005 l77;
1006 var l78 = {name: "MAP1"};
1007 var l79 = {name: "SENTINEL"};
1008 (function(){
1009     (l78).fvalue = (function(v112){
1010         ((v112)["fname"] = "MAP1");
1011         return v112;
1012     })((function (values,v106,v107){
1013         checkArgs(arguments, 3);
1014         return (function(){
1015             return (function(){
1016                 var v108 = ({car: l79, cdr: l5.value});
1017                 var v109 = v108;
1018                 (function(v111){
1019                     return (function(){
1020                         return (function(){
1021                             while(v107 !== l5.value){
1022                                 v111(pv, (function(){
1023                                     var f = v106;
1024                                     return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
1025                                         var tmp = v107;
1026                                         return tmp === l5.value? l5.value: tmp.car;
1027                                     })())
1028                                 })());
1029                                 (v107 = (function(){
1030                                     var tmp = v107;
1031                                     return tmp === l5.value? l5.value: tmp.cdr;
1032                                 })());
1033                             }return l5.value;
1034                         })();
1035                     })();
1036                 })((function (values,v110){
1037                     checkArgs(arguments, 2);
1038                     (function(){
1039                         var x = v109;
1040                         if (typeof x != 'object')
1041                             throw 'The value ' + x + ' is not a type object.';
1042                         return (x.cdr = ({car: v110, cdr: l5.value}), x);
1043                     })();
1044                     (v109 = (function(){
1045                         var tmp = v109;
1046                         return tmp === l5.value? l5.value: tmp.cdr;
1047                     })());
1048                     return v110;
1049                 }));
1050                 return (function(){
1051                     var tmp = v108;
1052                     return tmp === l5.value? l5.value: tmp.cdr;
1053                 })();
1054             })();
1055         })();
1056     }));
1057     return l78;
1058 })();
1059 var l80 = {name: "LOOP"};
1060 l80;
1061 var l81 = {name: "MAPCAR"};
1062 (function(){
1063     (l81).fvalue = (function(v124){
1064         ((v124)["fname"] = "MAPCAR");
1065         return v124;
1066     })((function (values,v114,v115){
1067         checkArgsAtLeast(arguments, 3);
1068         var v113= l5.value;
1069         for (var i = arguments.length-1; i>=3; i--)
1070             v113 = {car: arguments[i], cdr:
1071         v113};
1072         return (function(){
1073             return (function(v116){
1074                 return (function(){
1075                     var v117 = ({car: l79, cdr: l5.value});
1076                     var v118 = v117;
1077                     (function(v120){
1078                         return (function(){
1079                             try {
1080                                 return (function(){
1081                                     return (function(){
1082                                         while(l4.value !== l5.value){
1083                                             (function(v121){
1084                                                 (function(){
1085                                                     return (function(v122){
1086                                                         return (function(){
1087                                                             try {
1088                                                                 return (function(){
1089                                                                     while(l4.value !== l5.value){
1090                                                                         (l13.fvalue(pv, v122) !== l5.value ? (function(){
1091                                                                             throw ({type: 'block', id: 54, values: l5.value, message: 'Return from unknown block NIL.'})
1092                                                                         })() : l5.value);
1093                                                                         (function(){
1094                                                                             (l13.fvalue(pv, (function(){
1095                                                                                 var tmp = v122;
1096                                                                                 return tmp === l5.value? l5.value: tmp.car;
1097                                                                             })()) !== l5.value ? (function(){
1098                                                                                 throw ({type: 'block', id: 51, values: l5.value, message: 'Return from unknown block LOOP.'})
1099                                                                             })() : l5.value);
1100                                                                             (function(){
1101                                                                                 var x = v122;
1102                                                                                 if (typeof x != 'object')
1103                                                                                     throw 'The value ' + x + ' is not a type object.';
1104                                                                                 return (x.car = l36.fvalue(pv, v122), x);
1105                                                                             })();
1106                                                                             return l5.value;
1107                                                                         })();
1108                                                                         (function(v123){
1109                                                                             return (v122 = v123);
1110                                                                         })((function(){
1111                                                                             var tmp = v122;
1112                                                                             return tmp === l5.value? l5.value: tmp.cdr;
1113                                                                         })());
1114                                                                     }return l5.value;
1115                                                                 })();
1116                                                             }
1117                                                             catch (cf){
1118                                                                 if (cf.type == 'block' && cf.id == 54)
1119                                                                     return cf.values;
1120                                                                 else
1121                                                                     throw cf;
1122                                                             }
1123                                                         })();
1124                                                     })(v116);
1125                                                 })();
1126                                                 return v120(pv, (function(){
1127                                                     var f = v114;
1128                                                     var args = [pv];
1129                                                     var tail = (v121);
1130                                                     while (tail != l5.value){
1131                                                         args.push(tail.car);
1132                                                         tail = tail.cdr;
1133                                                     }
1134                                                     return (typeof f === 'function'? f : f.fvalue).apply(this, args);
1135                                                 })());
1136                                             })(l78.fvalue(pv, (function(){
1137                                                 var symbol = l32;
1138                                                 var func = symbol.fvalue;
1139                                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1140                                                 return func;
1141                                             })(), v116));
1142                                         }return l5.value;
1143                                     })();
1144                                 })();
1145                             }
1146                             catch (cf){
1147                                 if (cf.type == 'block' && cf.id == 51)
1148                                     return cf.values;
1149                                 else
1150                                     throw cf;
1151                             }
1152                         })();
1153                     })((function (values,v119){
1154                         checkArgs(arguments, 2);
1155                         (function(){
1156                             var x = v118;
1157                             if (typeof x != 'object')
1158                                 throw 'The value ' + x + ' is not a type object.';
1159                             return (x.cdr = ({car: v119, cdr: l5.value}), x);
1160                         })();
1161                         (v118 = (function(){
1162                             var tmp = v118;
1163                             return tmp === l5.value? l5.value: tmp.cdr;
1164                         })());
1165                         return v119;
1166                     }));
1167                     return (function(){
1168                         var tmp = v117;
1169                         return tmp === l5.value? l5.value: tmp.cdr;
1170                     })();
1171                 })();
1172             })(({car: v115, cdr: v113}));
1173         })();
1174     }));
1175     return l81;
1176 })();
1177 var l82 = {name: "IDENTITY"};
1178 (function(){
1179     (l82).fvalue = (function(v126){
1180         ((v126)["fname"] = "IDENTITY");
1181         return v126;
1182     })((function (values,v125){
1183         checkArgs(arguments, 2);
1184         return (function(){
1185             return v125;
1186         })();
1187     }));
1188     return l82;
1189 })();
1190 var l83 = {name: "CONSTANTLY"};
1191 (function(){
1192     (l83).fvalue = (function(v129){
1193         ((v129)["fname"] = "CONSTANTLY");
1194         return v129;
1195     })((function (values,v127){
1196         checkArgs(arguments, 2);
1197         return (function(){
1198             return (function (values){
1199                 var v128= l5.value;
1200                 for (var i = arguments.length-1; i>=1; i--)
1201                     v128 = {car: arguments[i], cdr:
1202                 v128};
1203                 return v127;
1204             });
1205         })();
1206     }));
1207     return l83;
1208 })();
1209 var l84 = {name: "COPY-LIST"};
1210 (function(){
1211     (l84).fvalue = (function(v131){
1212         ((v131)["fname"] = "COPY-LIST");
1213         return v131;
1214     })((function (values,v130){
1215         checkArgs(arguments, 2);
1216         return (function(){
1217             return l81.fvalue(values, (function(){
1218                 var symbol = l82;
1219                 var func = symbol.fvalue;
1220                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1221                 return func;
1222             })(), v130);
1223         })();
1224     }));
1225     return l84;
1226 })();
1227 var l85 = {name: "LIST*"};
1228 (function(){
1229     (l85).fvalue = (function(v136){
1230         ((v136)["fname"] = "LIST*");
1231         return v136;
1232     })((function (values,v133){
1233         checkArgsAtLeast(arguments, 2);
1234         var v132= l5.value;
1235         for (var i = arguments.length-1; i>=2; i--)
1236             v132 = {car: arguments[i], cdr:
1237         v132};
1238         return (function(){
1239             return (l13.fvalue(pv, v132) !== l5.value ? v133 : (l13.fvalue(pv, (function(){
1240                 var tmp = v132;
1241                 return tmp === l5.value? l5.value: tmp.cdr;
1242             })()) !== l5.value ? ({car: v133, cdr: (function(){
1243                 var tmp = v132;
1244                 return tmp === l5.value? l5.value: tmp.car;
1245             })()}) : (function(){
1246                 (function(){
1247                     return (function(v134){
1248                         return (function(){
1249                             try {
1250                                 return (function(){
1251                                     while(l4.value !== l5.value){
1252                                         (l13.fvalue(pv, l37.fvalue(pv, v134)) !== l5.value ? (function(){
1253                                             throw ({type: 'block', id: 60, values: (function(){
1254                                                 var x = v134;
1255                                                 if (typeof x != 'object')
1256                                                     throw 'The value ' + x + ' is not a type object.';
1257                                                 return (x.cdr = l35.fvalue(pv, v134), x);
1258                                             })(), message: 'Return from unknown block NIL.'})
1259                                         })() : l5.value);
1260                                         l5.value;
1261                                         (function(v135){
1262                                             return (v134 = v135);
1263                                         })((function(){
1264                                             var tmp = v134;
1265                                             return tmp === l5.value? l5.value: tmp.cdr;
1266                                         })());
1267                                     }return l5.value;
1268                                 })();
1269                             }
1270                             catch (cf){
1271                                 if (cf.type == 'block' && cf.id == 60)
1272                                     return cf.values;
1273                                 else
1274                                     throw cf;
1275                             }
1276                         })();
1277                     })(v132);
1278                 })();
1279                 return ({car: v133, cdr: v132});
1280             })()));
1281         })();
1282     }));
1283     return l85;
1284 })();
1285 var l86 = {name: "CODE-CHAR"};
1286 (function(){
1287     (l86).fvalue = (function(v138){
1288         ((v138)["fname"] = "CODE-CHAR");
1289         return v138;
1290     })((function (values,v137){
1291         checkArgs(arguments, 2);
1292         return (function(){
1293             return v137;
1294         })();
1295     }));
1296     return l86;
1297 })();
1298 var l87 = {name: "CHAR-CODE"};
1299 (function(){
1300     (l87).fvalue = (function(v140){
1301         ((v140)["fname"] = "CHAR-CODE");
1302         return v140;
1303     })((function (values,v139){
1304         checkArgs(arguments, 2);
1305         return (function(){
1306             return v139;
1307         })();
1308     }));
1309     return l87;
1310 })();
1311 var l88 = {name: "CHAR="};
1312 (function(){
1313     (l88).fvalue = (function(v143){
1314         ((v143)["fname"] = "CHAR=");
1315         return v143;
1316     })((function (values,v141,v142){
1317         checkArgs(arguments, 3);
1318         return (function(){
1319             return (function(){
1320                 var x1 = v141;
1321                 if (typeof x1 !== 'number') throw 'Not a number!';
1322                 var x2 = v142;
1323                 if (typeof x2 !== 'number') throw 'Not a number!';
1324                 return (x1==x2?l4.value: l5.value);
1325             })();
1326         })();
1327     }));
1328     return l88;
1329 })();
1330 var l89 = {name: "INTEGERP"};
1331 (function(){
1332     (l89).fvalue = (function(v145){
1333         ((v145)["fname"] = "INTEGERP");
1334         return v145;
1335     })((function (values,v144){
1336         checkArgs(arguments, 2);
1337         return (function(){
1338             return (((typeof (v144) == "number")?l4.value: l5.value) !== l5.value ? (function(){
1339                 var x1 = (function(){
1340                     var x = v144;
1341                     if (typeof x != 'number')
1342                         throw 'The value ' + x + ' is not a type number.';
1343                     return Math.floor(x);
1344                 })();
1345                 if (typeof x1 !== 'number') throw 'Not a number!';
1346                 var x2 = v144;
1347                 if (typeof x2 !== 'number') throw 'Not a number!';
1348                 return (x1==x2?l4.value: l5.value);
1349             })() : l5.value);
1350         })();
1351     }));
1352     return l89;
1353 })();
1354 var l90 = {name: "PLUSP"};
1355 (function(){
1356     (l90).fvalue = (function(v147){
1357         ((v147)["fname"] = "PLUSP");
1358         return v147;
1359     })((function (values,v146){
1360         checkArgs(arguments, 2);
1361         return (function(){
1362             return (function(){
1363                 var x1 = v146;
1364                 if (typeof x1 !== 'number') throw 'Not a number!';
1365                 return (0<x1?l4.value: l5.value);
1366             })();
1367         })();
1368     }));
1369     return l90;
1370 })();
1371 var l91 = {name: "MINUSP"};
1372 (function(){
1373     (l91).fvalue = (function(v149){
1374         ((v149)["fname"] = "MINUSP");
1375         return v149;
1376     })((function (values,v148){
1377         checkArgs(arguments, 2);
1378         return (function(){
1379             return (function(){
1380                 var x1 = v148;
1381                 if (typeof x1 !== 'number') throw 'Not a number!';
1382                 return (x1<0?l4.value: l5.value);
1383             })();
1384         })();
1385     }));
1386     return l91;
1387 })();
1388 (function(){
1389     (l62).fvalue = (function(v152){
1390         ((v152)["fname"] = "LISTP");
1391         return v152;
1392     })((function (values,v150){
1393         checkArgs(arguments, 2);
1394         return (function(){
1395             return (function(v151){
1396                 return (v151 !== l5.value ? v151 : l13.fvalue(values, v150));
1397             })(((function(){
1398                 var tmp = v150;
1399                 return (typeof tmp == 'object' && 'car' in tmp);
1400             })()?l4.value: l5.value));
1401         })();
1402     }));
1403     return l62;
1404 })();
1405 var l92 = {name: "NTHCDR"};
1406 (function(){
1407     (l92).fvalue = (function(v155){
1408         ((v155)["fname"] = "NTHCDR");
1409         return v155;
1410     })((function (values,v153,v154){
1411         checkArgs(arguments, 3);
1412         return (function(){
1413             (function(){
1414                 return (function(){
1415                     while((l90.fvalue(pv, v153) !== l5.value ? v154 : l5.value) !== l5.value){
1416                         (v153 = l25.fvalue(pv, v153));
1417                         (v154 = (function(){
1418                             var tmp = v154;
1419                             return tmp === l5.value? l5.value: tmp.cdr;
1420                         })());
1421                     }return l5.value;
1422                 })();
1423             })();
1424             return v154;
1425         })();
1426     }));
1427     return l92;
1428 })();
1429 var l93 = {name: "NTH"};
1430 (function(){
1431     (l93).fvalue = (function(v158){
1432         ((v158)["fname"] = "NTH");
1433         return v158;
1434     })((function (values,v156,v157){
1435         checkArgs(arguments, 3);
1436         return (function(){
1437             return (function(){
1438                 var tmp = l92.fvalue(pv, v156, v157);
1439                 return tmp === l5.value? l5.value: tmp.car;
1440             })();
1441         })();
1442     }));
1443     return l93;
1444 })();
1445 var l94 = {name: "LAST"};
1446 (function(){
1447     (l94).fvalue = (function(v160){
1448         ((v160)["fname"] = "LAST");
1449         return v160;
1450     })((function (values,v159){
1451         checkArgs(arguments, 2);
1452         return (function(){
1453             (function(){
1454                 return (function(){
1455                     while(((function(){
1456                         var tmp = (function(){
1457                             var tmp = v159;
1458                             return tmp === l5.value? l5.value: tmp.cdr;
1459                         })();
1460                         return (typeof tmp == 'object' && 'car' in tmp);
1461                     })()?l4.value: l5.value) !== l5.value){
1462                         (v159 = (function(){
1463                             var tmp = v159;
1464                             return tmp === l5.value? l5.value: tmp.cdr;
1465                         })());
1466                     }return l5.value;
1467                 })();
1468             })();
1469             return v159;
1470         })();
1471     }));
1472     return l94;
1473 })();
1474 var l95 = {name: "BUTLAST"};
1475 (function(){
1476     (l95).fvalue = (function(v162){
1477         ((v162)["fname"] = "BUTLAST");
1478         return v162;
1479     })((function (values,v161){
1480         checkArgs(arguments, 2);
1481         return (function(){
1482             return (((function(){
1483                 var tmp = (function(){
1484                     var tmp = v161;
1485                     return tmp === l5.value? l5.value: tmp.cdr;
1486                 })();
1487                 return (typeof tmp == 'object' && 'car' in tmp);
1488             })()?l4.value: l5.value) !== l5.value ? ({car: (function(){
1489                 var tmp = v161;
1490                 return tmp === l5.value? l5.value: tmp.car;
1491             })(), cdr: l95.fvalue(pv, (function(){
1492                 var tmp = v161;
1493                 return tmp === l5.value? l5.value: tmp.cdr;
1494             })())}) : l5.value);
1495         })();
1496     }));
1497     return l95;
1498 })();
1499 var l96 = {name: "MEMBER"};
1500 (function(){
1501     (l96).fvalue = (function(v165){
1502         ((v165)["fname"] = "MEMBER");
1503         return v165;
1504     })((function (values,v163,v164){
1505         checkArgs(arguments, 3);
1506         return (function(){
1507             return (function(){
1508                 try {
1509                     return (function(){
1510                         while(v164 !== l5.value){
1511                             (l28.fvalue(pv, v163, (function(){
1512                                 var tmp = v164;
1513                                 return tmp === l5.value? l5.value: tmp.car;
1514                             })()) !== l5.value ? (function(){
1515                                 var values = mv;
1516                                 throw ({type: 'block', id: 75, values: v164, message: 'Return from unknown block NIL.'})
1517                             })() : l5.value);
1518                             (v164 = (function(){
1519                                 var tmp = v164;
1520                                 return tmp === l5.value? l5.value: tmp.cdr;
1521                             })());
1522                         }return l5.value;
1523                     })();
1524                 }
1525                 catch (cf){
1526                     if (cf.type == 'block' && cf.id == 75)
1527                         return values.apply(this, forcemv(cf.values));
1528                     else
1529                         throw cf;
1530                 }
1531             })();
1532         })();
1533     }));
1534     return l96;
1535 })();
1536 var l97 = {name: "REMOVE"};
1537 (function(){
1538     (l97).fvalue = (function(v168){
1539         ((v168)["fname"] = "REMOVE");
1540         return v168;
1541     })((function (values,v166,v167){
1542         checkArgs(arguments, 3);
1543         return (function(){
1544             return (l13.fvalue(pv, v167) !== l5.value ? l5.value : (l28.fvalue(pv, v166, (function(){
1545                 var tmp = v167;
1546                 return tmp === l5.value? l5.value: tmp.car;
1547             })()) !== l5.value ? l97.fvalue(values, v166, (function(){
1548                 var tmp = v167;
1549                 return tmp === l5.value? l5.value: tmp.cdr;
1550             })()) : ({car: (function(){
1551                 var tmp = v167;
1552                 return tmp === l5.value? l5.value: tmp.car;
1553             })(), cdr: l97.fvalue(pv, v166, (function(){
1554                 var tmp = v167;
1555                 return tmp === l5.value? l5.value: tmp.cdr;
1556             })())})));
1557         })();
1558     }));
1559     return l97;
1560 })();
1561 var l98 = {name: "REMOVE-IF"};
1562 (function(){
1563     (l98).fvalue = (function(v171){
1564         ((v171)["fname"] = "REMOVE-IF");
1565         return v171;
1566     })((function (values,v169,v170){
1567         checkArgs(arguments, 3);
1568         return (function(){
1569             return (l13.fvalue(pv, v170) !== l5.value ? l5.value : ((function(){
1570                 var f = v169;
1571                 return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
1572                     var tmp = v170;
1573                     return tmp === l5.value? l5.value: tmp.car;
1574                 })())
1575             })() !== l5.value ? l98.fvalue(values, v169, (function(){
1576                 var tmp = v170;
1577                 return tmp === l5.value? l5.value: tmp.cdr;
1578             })()) : ({car: (function(){
1579                 var tmp = v170;
1580                 return tmp === l5.value? l5.value: tmp.car;
1581             })(), cdr: l98.fvalue(pv, v169, (function(){
1582                 var tmp = v170;
1583                 return tmp === l5.value? l5.value: tmp.cdr;
1584             })())})));
1585         })();
1586     }));
1587     return l98;
1588 })();
1589 var l99 = {name: "REMOVE-IF-NOT"};
1590 (function(){
1591     (l99).fvalue = (function(v174){
1592         ((v174)["fname"] = "REMOVE-IF-NOT");
1593         return v174;
1594     })((function (values,v172,v173){
1595         checkArgs(arguments, 3);
1596         return (function(){
1597             return (l13.fvalue(pv, v173) !== l5.value ? l5.value : ((function(){
1598                 var f = v172;
1599                 return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
1600                     var tmp = v173;
1601                     return tmp === l5.value? l5.value: tmp.car;
1602                 })())
1603             })() !== l5.value ? ({car: (function(){
1604                 var tmp = v173;
1605                 return tmp === l5.value? l5.value: tmp.car;
1606             })(), cdr: l99.fvalue(pv, v172, (function(){
1607                 var tmp = v173;
1608                 return tmp === l5.value? l5.value: tmp.cdr;
1609             })())}) : l99.fvalue(values, v172, (function(){
1610                 var tmp = v173;
1611                 return tmp === l5.value? l5.value: tmp.cdr;
1612             })())));
1613         })();
1614     }));
1615     return l99;
1616 })();
1617 var l100 = {name: "DIGIT-CHAR-P"};
1618 (function(){
1619     (l100).fvalue = (function(v176){
1620         ((v176)["fname"] = "DIGIT-CHAR-P");
1621         return v176;
1622     })((function (values,v175){
1623         checkArgs(arguments, 2);
1624         return (function(){
1625             return (((function(){
1626                 var x1 = v175;
1627                 if (typeof x1 !== 'number') throw 'Not a number!';
1628                 return (48<=x1?l4.value: l5.value);
1629             })() !== l5.value ? (function(){
1630                 var x1 = v175;
1631                 if (typeof x1 !== 'number') throw 'Not a number!';
1632                 return (x1<=57?l4.value: l5.value);
1633             })() : l5.value) !== l5.value ? (function(){
1634                 var x1 = v175;
1635                 if (typeof x1 !== 'number') throw 'Not a number!';
1636                 return x1-48;
1637             })() : l5.value);
1638         })();
1639     }));
1640     return l100;
1641 })();
1642 var l101 = {name: "DIGIT-CHAR"};
1643 (function(){
1644     (l101).fvalue = (function(v178){
1645         ((v178)["fname"] = "DIGIT-CHAR");
1646         return v178;
1647     })((function (values,v177){
1648         checkArgs(arguments, 2);
1649         return (function(){
1650             return ((function(){
1651                 var x1 = v177;
1652                 if (typeof x1 !== 'number') throw 'Not a number!';
1653                 return (0<=x1 && x1<=9?l4.value: l5.value);
1654             })() !== l5.value ? (function(){
1655                 var string = "0123456789";
1656                 var index = v177;
1657                 if (typeof string != 'string')
1658                     throw 'The value ' + string + ' is not a type string.';
1659                 if (typeof index != 'number')
1660                     throw 'The value ' + index + ' is not a type number.';
1661                 return string.charCodeAt(index);
1662             })() : l5.value);
1663         })();
1664     }));
1665     return l101;
1666 })();
1667 var l102 = {name: "SUBSEQ"};
1668 (function(){
1669     (l102).fvalue = (function(v182){
1670         ((v182)["fname"] = "SUBSEQ");
1671         return v182;
1672     })((function (values,v179,v180,v181){
1673         checkArgsAtLeast(arguments, 3);
1674         checkArgsAtMost(arguments, 4);
1675         var v181;
1676         switch(arguments.length-1){
1677         case 2:
1678             v181=l5.value;
1679         default: break;
1680         }
1681         return (function(){
1682             return (((typeof(v179) == "string")?l4.value: l5.value) !== l5.value ? (v181 !== l5.value ? (function(){
1683                 var str = v179;
1684                 var a = v180;
1685                 var b;
1686                 b = v181;
1687                 return str.slice(a,b);
1688             })() : (function(){
1689                 var str = v179;
1690                 var a = v180;
1691                 var b;
1692                 return str.slice(a,b);
1693             })()) : (function(){
1694                 throw "Unsupported argument.";
1695             })());
1696         })();
1697     }));
1698     return l102;
1699 })();
1700 var l103 = {name: "SOME"};
1701 (function(){
1702     (l103).fvalue = (function(v189){
1703         ((v189)["fname"] = "SOME");
1704         return v189;
1705     })((function (values,v183,v184){
1706         checkArgs(arguments, 3);
1707         return (function(){
1708             try {
1709                 return (((typeof(v184) == "string")?l4.value: l5.value) !== l5.value ? (function(v185,v186){
1710                     (function(){
1711                         return (function(){
1712                             while((function(){
1713                                 var x1 = v185;
1714                                 if (typeof x1 !== 'number') throw 'Not a number!';
1715                                 var x2 = v186;
1716                                 if (typeof x2 !== 'number') throw 'Not a number!';
1717                                 return (x1<x2?l4.value: l5.value);
1718                             })() !== l5.value){
1719                                 ((function(){
1720                                     var f = v183;
1721                                     return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
1722                                         var string = v184;
1723                                         var index = v185;
1724                                         if (typeof string != 'string')
1725                                             throw 'The value ' + string + ' is not a type string.';
1726                                         if (typeof index != 'number')
1727                                             throw 'The value ' + index + ' is not a type number.';
1728                                         return string.charCodeAt(index);
1729                                     })())
1730                                 })() !== l5.value ? (function(){
1731                                     var values = mv;
1732                                     throw ({type: 'block', id: 82, values: l4.value, message: 'Return from unknown block SOME.'})
1733                                 })() : l5.value);
1734                                 (v185 = (function(){
1735                                     var x1 = v185;
1736                                     if (typeof x1 !== 'number') throw 'Not a number!';
1737                                     return x1+1;
1738                                 })());
1739                             }return l5.value;
1740                         })();
1741                     })();
1742                     return l5.value;
1743                 })(0,l75.fvalue(pv, v184)) : (l62.fvalue(pv, v184) !== l5.value ? (function(){
1744                     try {
1745                         return (function(v187,v188){
1746                             (function(){
1747                                 while(v187 !== l5.value){
1748                                     (v188 = (function(){
1749                                         var tmp = v187;
1750                                         return tmp === l5.value? l5.value: tmp.car;
1751                                     })());
1752                                     (function(){
1753                                         ((function(){
1754                                             var f = v183;
1755                                             return (typeof f === 'function'? f: f.fvalue)(pv, v188)
1756                                         })() !== l5.value ? (function(){
1757                                             var values = mv;
1758                                             throw ({type: 'block', id: 84, values: l4.value, message: 'Return from unknown block NIL.'})
1759                                         })() : l5.value);
1760                                         return l5.value;
1761                                     })();
1762                                     (v187 = (function(){
1763                                         var tmp = v187;
1764                                         return tmp === l5.value? l5.value: tmp.cdr;
1765                                     })());
1766                                 }return l5.value;
1767                             })();
1768                             return l5.value;
1769                         })(v184,l5.value);
1770                     }
1771                     catch (cf){
1772                         if (cf.type == 'block' && cf.id == 84)
1773                             return values.apply(this, forcemv(cf.values));
1774                         else
1775                             throw cf;
1776                     }
1777                 })() : (function(){
1778                     throw "Unknown sequence.";
1779                 })()));
1780             }
1781             catch (cf){
1782                 if (cf.type == 'block' && cf.id == 82)
1783                     return values.apply(this, forcemv(cf.values));
1784                 else
1785                     throw cf;
1786             }
1787         })();
1788     }));
1789     return l103;
1790 })();
1791 var l104 = {name: "EVERY"};
1792 (function(){
1793     (l104).fvalue = (function(v196){
1794         ((v196)["fname"] = "EVERY");
1795         return v196;
1796     })((function (values,v190,v191){
1797         checkArgs(arguments, 3);
1798         return (function(){
1799             try {
1800                 return (((typeof(v191) == "string")?l4.value: l5.value) !== l5.value ? (function(v192,v193){
1801                     (function(){
1802                         return (function(){
1803                             while((function(){
1804                                 var x1 = v192;
1805                                 if (typeof x1 !== 'number') throw 'Not a number!';
1806                                 var x2 = v193;
1807                                 if (typeof x2 !== 'number') throw 'Not a number!';
1808                                 return (x1<x2?l4.value: l5.value);
1809                             })() !== l5.value){
1810                                 ((function(){
1811                                     var f = v190;
1812                                     return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
1813                                         var string = v191;
1814                                         var index = v192;
1815                                         if (typeof string != 'string')
1816                                             throw 'The value ' + string + ' is not a type string.';
1817                                         if (typeof index != 'number')
1818                                             throw 'The value ' + index + ' is not a type number.';
1819                                         return string.charCodeAt(index);
1820                                     })())
1821                                 })() !== l5.value ? l5.value : (function(){
1822                                     var values = mv;
1823                                     throw ({type: 'block', id: 85, values: l5.value, message: 'Return from unknown block EVERY.'})
1824                                 })());
1825                                 (v192 = (function(){
1826                                     var x1 = v192;
1827                                     if (typeof x1 !== 'number') throw 'Not a number!';
1828                                     return x1+1;
1829                                 })());
1830                             }return l5.value;
1831                         })();
1832                     })();
1833                     return l4.value;
1834                 })(0,l75.fvalue(pv, v191)) : (l62.fvalue(pv, v191) !== l5.value ? (function(){
1835                     try {
1836                         return (function(v194,v195){
1837                             (function(){
1838                                 while(v194 !== l5.value){
1839                                     (v195 = (function(){
1840                                         var tmp = v194;
1841                                         return tmp === l5.value? l5.value: tmp.car;
1842                                     })());
1843                                     (function(){
1844                                         ((function(){
1845                                             var f = v190;
1846                                             return (typeof f === 'function'? f: f.fvalue)(pv, v195)
1847                                         })() !== l5.value ? l5.value : (function(){
1848                                             var values = mv;
1849                                             throw ({type: 'block', id: 87, values: l5.value, message: 'Return from unknown block NIL.'})
1850                                         })());
1851                                         return l5.value;
1852                                     })();
1853                                     (v194 = (function(){
1854                                         var tmp = v194;
1855                                         return tmp === l5.value? l5.value: tmp.cdr;
1856                                     })());
1857                                 }return l5.value;
1858                             })();
1859                             return l4.value;
1860                         })(v191,l5.value);
1861                     }
1862                     catch (cf){
1863                         if (cf.type == 'block' && cf.id == 87)
1864                             return values.apply(this, forcemv(cf.values));
1865                         else
1866                             throw cf;
1867                     }
1868                 })() : (function(){
1869                     throw "Unknown sequence.";
1870                 })()));
1871             }
1872             catch (cf){
1873                 if (cf.type == 'block' && cf.id == 85)
1874                     return values.apply(this, forcemv(cf.values));
1875                 else
1876                     throw cf;
1877             }
1878         })();
1879     }));
1880     return l104;
1881 })();
1882 var l105 = {name: "ASSOC"};
1883 (function(){
1884     (l105).fvalue = (function(v199){
1885         ((v199)["fname"] = "ASSOC");
1886         return v199;
1887     })((function (values,v197,v198){
1888         checkArgs(arguments, 3);
1889         return (function(){
1890             (function(){
1891                 try {
1892                     return (function(){
1893                         while(v198 !== l5.value){
1894                             (l28.fvalue(pv, v197, l34.fvalue(pv, v198)) !== l5.value ? (function(){
1895                                 throw ({type: 'block', id: 89, values: l5.value, message: 'Return from unknown block NIL.'})
1896                             })() : (v198 = (function(){
1897                                 var tmp = v198;
1898                                 return tmp === l5.value? l5.value: tmp.cdr;
1899                             })()));
1900                         }return l5.value;
1901                     })();
1902                 }
1903                 catch (cf){
1904                     if (cf.type == 'block' && cf.id == 89)
1905                         return cf.values;
1906                     else
1907                         throw cf;
1908                 }
1909             })();
1910             return (function(){
1911                 var tmp = v198;
1912                 return tmp === l5.value? l5.value: tmp.car;
1913             })();
1914         })();
1915     }));
1916     return l105;
1917 })();
1918 var l106 = {name: "STRING"};
1919 (function(){
1920     (l106).fvalue = (function(v201){
1921         ((v201)["fname"] = "STRING");
1922         return v201;
1923     })((function (values,v200){
1924         checkArgs(arguments, 2);
1925         return (function(){
1926             return (((typeof(v200) == "string")?l4.value: l5.value) !== l5.value ? v200 : (((function(){
1927                 var tmp = v200;
1928                 return (typeof tmp == 'object' && 'name' in tmp);
1929             })()?l4.value: l5.value) !== l5.value ? (v200).name : (function(){
1930                 var x = v200;
1931                 if (typeof x != 'number')
1932                     throw 'The value ' + x + ' is not a type number.';
1933                 return String.fromCharCode(x);
1934             })()));
1935         })();
1936     }));
1937     return l106;
1938 })();
1939 var l107 = {name: "STRING="};
1940 (function(){
1941     (l107).fvalue = (function(v204){
1942         ((v204)["fname"] = "STRING=");
1943         return v204;
1944     })((function (values,v202,v203){
1945         checkArgs(arguments, 3);
1946         return (function(){
1947             return ((v202 == v203)?l4.value: l5.value);
1948         })();
1949     }));
1950     return l107;
1951 })();
1952 var l108 = {name: "FDEFINITION"};
1953 (function(){
1954     (l108).fvalue = (function(v206){
1955         ((v206)["fname"] = "FDEFINITION");
1956         return v206;
1957     })((function (values,v205){
1958         checkArgs(arguments, 2);
1959         return (function(){
1960             return (((typeof v205 == 'function')?l4.value: l5.value) !== l5.value ? v205 : (((function(){
1961                 var tmp = v205;
1962                 return (typeof tmp == 'object' && 'name' in tmp);
1963             })()?l4.value: l5.value) !== l5.value ? (function(){
1964                 var symbol = v205;
1965                 var func = symbol.fvalue;
1966                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1967                 return func;
1968             })() : (function(){
1969                 throw "Invalid function";
1970             })()));
1971         })();
1972     }));
1973     return l108;
1974 })();
1975 var l109 = {name: "DISASSEMBLE"};
1976 var l110 = {name: "WRITE-LINE"};
1977 (function(){
1978     (l109).fvalue = (function(v208){
1979         ((v208)["fname"] = "DISASSEMBLE");
1980         return v208;
1981     })((function (values,v207){
1982         checkArgs(arguments, 2);
1983         return (function(){
1984             l110.fvalue(pv, (l108.fvalue(pv, v207)).toString());
1985             return l5.value;
1986         })();
1987     }));
1988     return l109;
1989 })();
1990 var l111 = {name: "DOCUMENTATION"};
1991 var l112 = {name: "FUNCTION"};
1992 var l113 = {name: "VARIABLE"};
1993 (function(){
1994     (l111).fvalue = (function(v213){
1995         ((v213)["fname"] = "DOCUMENTATION");
1996         return v213;
1997     })((function(){
1998         var func = (function (values,v209,v210){
1999             checkArgs(arguments, 3);
2000             return (function(){
2001                 return (function(v211){
2002                     return (l28.fvalue(pv, v211, l112) !== l5.value ? (function(v212){
2003                         return (function(){
2004                             var tmp = (v212)["docstring"];
2005                             return tmp == undefined? l5.value: tmp ;
2006                         })();
2007                     })(l108.fvalue(pv, v209)) : (l28.fvalue(pv, v211, l113) !== l5.value ? (function(){
2008                         (((function(){
2009                             var tmp = v209;
2010                             return (typeof tmp == 'object' && 'name' in tmp);
2011                         })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
2012                             throw "Wrong argument type! it should be a symbol";
2013                         })());
2014                         return (function(){
2015                             var tmp = (v209)["vardoc"];
2016                             return tmp == undefined? l5.value: tmp ;
2017                         })();
2018                     })() : (function(){
2019                         throw "ECASE expression failed.";
2020                     })()));
2021                 })(v210);
2022             })();
2023         });
2024         func.docstring = 'Return the documentation of X. TYPE must be the symbol VARIABLE or FUNCTION.';
2025         return func;
2026     })());
2027     return l111;
2028 })();
2029 var l114 = {name: "MULTIPLE-VALUE-BIND"};
2030 l114;
2031 var l115 = {name: "MULTIPLE-VALUE-LIST"};
2032 l115;
2033 var l116 = {name: "*SETF-EXPANDERS*"};
2034 (function(){
2035     (((l116.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l116).value = l5.value));
2036     return l116;
2037 })();
2038 var l117 = {name: "GET-SETF-EXPANSION"};
2039 var l118 = {name: "SETQ"};
2040 var l119 = {name: "LS-MACROEXPAND-1"};
2041 (function(){
2042     (l117).fvalue = (function(v219){
2043         ((v219)["fname"] = "GET-SETF-EXPANSION");
2044         return v219;
2045     })((function (values,v214){
2046         checkArgs(arguments, 2);
2047         return (function(){
2048             return (((function(){
2049                 var tmp = v214;
2050                 return (typeof tmp == 'object' && 'name' in tmp);
2051             })()?l4.value: l5.value) !== l5.value ? (function(v215){
2052                 return values(l5.value, l5.value, l47.fvalue(pv, v215), l47.fvalue(pv, l118, v214, v215), v214);
2053             })(l18.fvalue(pv)) : (function(v216){
2054                 return (function(){
2055                     var v217 = (function(){
2056                         var tmp = v216;
2057                         return tmp === l5.value? l5.value: tmp.car;
2058                     })();
2059                     var v218 = (function(){
2060                         var tmp = l105.fvalue(pv, v217, (function(){
2061                             var symbol = l116;
2062                             var value = symbol.value;
2063                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2064                             return value;
2065                         })());
2066                         return tmp === l5.value? l5.value: tmp.cdr;
2067                     })();
2068                     (l13.fvalue(pv, v218) !== l5.value ? (function(){
2069                         throw "Unknown generalized reference.";
2070                     })() : l5.value);
2071                     return (function(){
2072                         var f = v218;
2073                         var args = [values];
2074                         var tail = ((function(){
2075                             var tmp = v216;
2076                             return tmp === l5.value? l5.value: tmp.cdr;
2077                         })());
2078                         while (tail != l5.value){
2079                             args.push(tail.car);
2080                             tail = tail.cdr;
2081                         }
2082                         return (typeof f === 'function'? f : f.fvalue).apply(this, args);
2083                     })();
2084                 })();
2085             })(l119.fvalue(pv, v214)));
2086         })();
2087     }));
2088     return l117;
2089 })();
2090 var l120 = {name: "DEFINE-SETF-EXPANDER"};
2091 l120;
2092 var l121 = {name: "SETF"};
2093 l121;
2094 var l122 = {name: "PROGN"};
2095 var l123 = {name: "RPLACA"};
2096 (function(){
2097     ((l116).value = ({car: ({car: l32, cdr: (function (values,v220){
2098         checkArgs(arguments, 2);
2099         return (function(v221,v222){
2100             return values(l47.fvalue(pv, v221), l47.fvalue(pv, v220), l47.fvalue(pv, v222), l47.fvalue(pv, l122, l47.fvalue(pv, l123, v221, v222), v222), l47.fvalue(pv, l32, v221));
2101         })(l18.fvalue(pv),l18.fvalue(pv));
2102     })}), cdr: (function(){
2103         var symbol = l116;
2104         var value = symbol.value;
2105         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2106         return value;
2107     })()}));
2108     return l32;
2109 })();
2110 var l124 = {name: "RPLACD"};
2111 (function(){
2112     ((l116).value = ({car: ({car: l33, cdr: (function (values,v223){
2113         checkArgs(arguments, 2);
2114         return (function(v224,v225){
2115             return values(l47.fvalue(pv, v224), l47.fvalue(pv, v223), l47.fvalue(pv, v225), l47.fvalue(pv, l122, l47.fvalue(pv, l124, v224, v225), v225), l47.fvalue(pv, l32, v224));
2116         })(l18.fvalue(pv),l18.fvalue(pv));
2117     })}), cdr: (function(){
2118         var symbol = l116;
2119         var value = symbol.value;
2120         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2121         return value;
2122     })()}));
2123     return l33;
2124 })();
2125 l51;
2126 var l125 = {name: "TYPECASE"};
2127 l125;
2128 var l126 = {name: "NCONC"};
2129 (function(){
2130     (l126).fvalue = (function(v241){
2131         ((v241)["fname"] = "NCONC");
2132         return v241;
2133     })((function (values){
2134         var v226= l5.value;
2135         for (var i = arguments.length-1; i>=1; i--)
2136             v226 = {car: arguments[i], cdr:
2137         v226};
2138         return (function(){
2139             return (function(v228){
2140                 return (function(){
2141                     return (function(v229){
2142                         return (function(){
2143                             try {
2144                                 return (function(){
2145                                     while(l4.value !== l5.value){
2146                                         (l13.fvalue(pv, v229) !== l5.value ? (function(){
2147                                             var values = mv;
2148                                             throw ({type: 'block', id: 98, values: l5.value, message: 'Return from unknown block NIL.'})
2149                                         })() : l5.value);
2150                                         (function(){
2151                                             (function(v230){
2152                                                 return (function(v231){
2153                                                     return (((function(){
2154                                                         var tmp = v231;
2155                                                         return (typeof tmp == 'object' && 'car' in tmp);
2156                                                     })()?l4.value: l5.value) !== l5.value ? (function(){
2157                                                         var v232 = v230;
2158                                                         var v233 = v232;
2159                                                         (function(){
2160                                                             return (function(v234){
2161                                                                 return (function(){
2162                                                                     try {
2163                                                                         return (function(){
2164                                                                             while(l4.value !== l5.value){
2165                                                                                 (l14.fvalue(pv, v234) !== l5.value ? (function(){
2166                                                                                     throw ({type: 'block', id: 100, values: l5.value, message: 'Return from unknown block NIL.'})
2167                                                                                 })() : l5.value);
2168                                                                                 (function(){
2169                                                                                     (function(v235){
2170                                                                                         return (function(v236){
2171                                                                                             return (((function(){
2172                                                                                                 var tmp = v236;
2173                                                                                                 return (typeof tmp == 'object' && 'car' in tmp);
2174                                                                                             })()?l4.value: l5.value) !== l5.value ? (function(){
2175                                                                                                 (function(){
2176                                                                                                     var x = l94.fvalue(pv, v233);
2177                                                                                                     if (typeof x != 'object')
2178                                                                                                         throw 'The value ' + x + ' is not a type object.';
2179                                                                                                     return (x.cdr = v235, x);
2180                                                                                                 })();
2181                                                                                                 return (function(){
2182                                                                                                     return (function(){
2183                                                                                                         var func = (function (values,v238){
2184                                                                                                             var v238;
2185                                                                                                             switch(arguments.length-1){
2186                                                                                                             case 0:
2187                                                                                                                 v238=l5.value;
2188                                                                                                             default: break;
2189                                                                                                             }
2190                                                                                                             var v237= l5.value;
2191                                                                                                             for (var i = arguments.length-1; i>=2; i--)
2192                                                                                                                 v237 = {car: arguments[i], cdr:
2193                                                                                                             v237};
2194                                                                                                             return (v233 = v238);
2195                                                                                                         });
2196                                                                                                         var args = [pv];
2197                                                                                                         return (function(){
2198                                                                                                             var values = mv;
2199                                                                                                             var vs;
2200                                                                                                             vs = v235;
2201                                                                                                             if (typeof vs === 'object' && 'multiple-value' in vs)
2202                                                                                                                 args = args.concat(vs);
2203                                                                                                             else
2204                                                                                                                 args.push(vs);
2205                                                                                                             return func.apply(window, args);
2206                                                                                                         })();
2207                                                                                                     })();
2208                                                                                                 })();
2209                                                                                             })() : (l13.fvalue(pv, v236) !== l5.value ? (function(){
2210                                                                                                 var x = l94.fvalue(pv, v233);
2211                                                                                                 if (typeof x != 'object')
2212                                                                                                     throw 'The value ' + x + ' is not a type object.';
2213                                                                                                 return (x.cdr = l5.value, x);
2214                                                                                             })() : (l48.fvalue(pv, v236) !== l5.value ? ((function(){
2215                                                                                                 var tmp = v234;
2216                                                                                                 return tmp === l5.value? l5.value: tmp.cdr;
2217                                                                                             })() !== l5.value ? v228(pv, v235) : (function(){
2218                                                                                                 var x = l94.fvalue(pv, v233);
2219                                                                                                 if (typeof x != 'object')
2220                                                                                                     throw 'The value ' + x + ' is not a type object.';
2221                                                                                                 return (x.cdr = v235, x);
2222                                                                                             })()) : l5.value)));
2223                                                                                         })(v235);
2224                                                                                     })((function(){
2225                                                                                         var tmp = v234;
2226                                                                                         return tmp === l5.value? l5.value: tmp.car;
2227                                                                                     })());
2228                                                                                     return l5.value;
2229                                                                                 })();
2230                                                                                 (function(v239){
2231                                                                                     return (v234 = v239);
2232                                                                                 })((function(){
2233                                                                                     var tmp = v234;
2234                                                                                     return tmp === l5.value? l5.value: tmp.cdr;
2235                                                                                 })());
2236                                                                             }return l5.value;
2237                                                                         })();
2238                                                                     }
2239                                                                     catch (cf){
2240                                                                         if (cf.type == 'block' && cf.id == 100)
2241                                                                             return cf.values;
2242                                                                         else
2243                                                                             throw cf;
2244                                                                     }
2245                                                                 })();
2246                                                             })((function(){
2247                                                                 var tmp = v229;
2248                                                                 return tmp === l5.value? l5.value: tmp.cdr;
2249                                                             })());
2250                                                         })();
2251                                                         return (function(){
2252                                                             var values = mv;
2253                                                             throw ({type: 'block', id: 98, values: v232, message: 'Return from unknown block NIL.'})
2254                                                         })();
2255                                                     })() : (l13.fvalue(pv, v231) !== l5.value ? l5.value : (l48.fvalue(pv, v231) !== l5.value ? ((function(){
2256                                                         var tmp = v229;
2257                                                         return tmp === l5.value? l5.value: tmp.cdr;
2258                                                     })() !== l5.value ? v228(pv, v230) : (function(){
2259                                                         var values = mv;
2260                                                         throw ({type: 'block', id: 98, values: v230, message: 'Return from unknown block NIL.'})
2261                                                     })()) : l5.value)));
2262                                                 })(v230);
2263                                             })((function(){
2264                                                 var tmp = v229;
2265                                                 return tmp === l5.value? l5.value: tmp.car;
2266                                             })());
2267                                             return l5.value;
2268                                         })();
2269                                         (function(v240){
2270                                             return (v229 = v240);
2271                                         })((function(){
2272                                             var tmp = v229;
2273                                             return tmp === l5.value? l5.value: tmp.cdr;
2274                                         })());
2275                                     }return l5.value;
2276                                 })();
2277                             }
2278                             catch (cf){
2279                                 if (cf.type == 'block' && cf.id == 98)
2280                                     return values.apply(this, forcemv(cf.values));
2281                                 else
2282                                     throw cf;
2283                             }
2284                         })();
2285                     })(v226);
2286                 })();
2287             })((function (values,v227){
2288                 checkArgs(arguments, 2);
2289                 return (function(){
2290                     throw "type-error in nconc";
2291                 })();
2292             }));
2293         })();
2294     }));
2295     return l126;
2296 })();
2297 var l127 = {name: "NRECONC"};
2298 (function(){
2299     (l127).fvalue = (function(v250){
2300         ((v250)["fname"] = "NRECONC");
2301         return v250;
2302     })((function (values,v242,v243){
2303         checkArgs(arguments, 3);
2304         return (function(){
2305             return (function(){
2306                 return (function(v244,v245,v246){
2307                     return (function(){
2308                         try {
2309                             return (function(){
2310                                 while(l4.value !== l5.value){
2311                                     (l48.fvalue(pv, v245) !== l5.value ? (function(){
2312                                         var values = mv;
2313                                         throw ({type: 'block', id: 103, values: v246, message: 'Return from unknown block NIL.'})
2314                                     })() : l5.value);
2315                                     (function(){
2316                                         (function(){
2317                                             var x = v245;
2318                                             if (typeof x != 'object')
2319                                                 throw 'The value ' + x + ' is not a type object.';
2320                                             return (x.cdr = v246, x);
2321                                         })();
2322                                         return l5.value;
2323                                     })();
2324                                     (function(v247,v248,v249){
2325                                         return (v244 = v247, v245 = v248, v246 = v249);
2326                                     })((l14.fvalue(pv, v244) !== l5.value ? v244 : (function(){
2327                                         var tmp = v244;
2328                                         return tmp === l5.value? l5.value: tmp.cdr;
2329                                     })()),v244,v245);
2330                                 }return l5.value;
2331                             })();
2332                         }
2333                         catch (cf){
2334                             if (cf.type == 'block' && cf.id == 103)
2335                                 return values.apply(this, forcemv(cf.values));
2336                             else
2337                                 throw cf;
2338                         }
2339                     })();
2340                 })((function(){
2341                     var tmp = v242;
2342                     return tmp === l5.value? l5.value: tmp.cdr;
2343                 })(),v242,v243);
2344             })();
2345         })();
2346     }));
2347     return l127;
2348 })();
2349 var l128 = {name: "NOTANY"};
2350 (function(){
2351     (l128).fvalue = (function(v253){
2352         ((v253)["fname"] = "NOTANY");
2353         return v253;
2354     })((function (values,v251,v252){
2355         checkArgs(arguments, 3);
2356         return (function(){
2357             return l29.fvalue(values, l103.fvalue(pv, v251, v252));
2358         })();
2359     }));
2360     return l128;
2361 })();
2362 var l129 = {name: "*PACKAGE-LIST*"};
2363 (function(){
2364     (((l129.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l129).value = l5.value));
2365     return l129;
2366 })();
2367 var l130 = {name: "LIST-ALL-PACKAGES"};
2368 (function(){
2369     (l130).fvalue = (function(v254){
2370         ((v254)["fname"] = "LIST-ALL-PACKAGES");
2371         return v254;
2372     })((function (values){
2373         checkArgsAtMost(arguments, 1);
2374         return (function(){
2375             return (function(){
2376                 var symbol = l129;
2377                 var value = symbol.value;
2378                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2379                 return value;
2380             })();
2381         })();
2382     }));
2383     return l130;
2384 })();
2385 var l131 = {name: "MAKE-PACKAGE"};
2386 var l132 = {name: "USE", 'package': 'KEYWORD'};
2387 var l133 = {name: "FIND-PACKAGE-OR-FAIL"};
2388 (function(){
2389     (l131).fvalue = (function(v261){
2390         ((v261)["fname"] = "MAKE-PACKAGE");
2391         return v261;
2392     })((function (values,v255){
2393         checkArgsAtLeast(arguments, 2);
2394         var v256;
2395         var i;
2396         for (i=2; i<arguments.length; i+=2){
2397             if (arguments[i] === l132.value){
2398                 v256 = arguments[i+1];
2399                 break;
2400             }
2401         }
2402         if (i == arguments.length){
2403             v256 = l5.value;
2404         }
2405         for (i=2; i<arguments.length; i+=2){
2406             if (arguments[i] !== l132.value)
2407                 throw 'Unknown keyword argument ' + arguments[i].name;
2408         }
2409         return (function(){
2410             return (function(v257,v258){
2411                 ((v257)["packageName"] = v255);
2412                 ((v257)["symbols"] = {});
2413                 ((v257)["exports"] = {});
2414                 ((v257)["use"] = v258);
2415                 (function(){
2416                     var v259 = v257;
2417                     var v260 = ({car: v259, cdr: (function(){
2418                         var symbol = l129;
2419                         var value = symbol.value;
2420                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2421                         return value;
2422                     })()});
2423                     return ((l129).value = v260);
2424                 })();
2425                 return v257;
2426             })({},l81.fvalue(pv, (function(){
2427                 var symbol = l133;
2428                 var func = symbol.fvalue;
2429                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2430                 return func;
2431             })(), v256));
2432         })();
2433     }));
2434     return l131;
2435 })();
2436 var l134 = {name: "PACKAGEP"};
2437 (function(){
2438     (l134).fvalue = (function(v263){
2439         ((v263)["fname"] = "PACKAGEP");
2440         return v263;
2441     })((function (values,v262){
2442         checkArgs(arguments, 2);
2443         return (function(){
2444             return (((typeof (v262) === 'object')?l4.value: l5.value) !== l5.value ? ((("symbols") in (v262))?l4.value: l5.value) : l5.value);
2445         })();
2446     }));
2447     return l134;
2448 })();
2449 var l135 = {name: "FIND-PACKAGE"};
2450 var l136 = {name: "PACKAGE-NAME"};
2451 (function(){
2452     (l135).fvalue = (function(v268){
2453         ((v268)["fname"] = "FIND-PACKAGE");
2454         return v268;
2455     })((function (values,v264){
2456         checkArgs(arguments, 2);
2457         return (function(){
2458             try {
2459                 (l134.fvalue(pv, v264) !== l5.value ? (function(){
2460                     var values = mv;
2461                     throw ({type: 'block', id: 108, values: v264, message: 'Return from unknown block FIND-PACKAGE.'})
2462                 })() : l5.value);
2463                 return (function(v265){
2464                     return (function(){
2465                         try {
2466                             return (function(v266,v267){
2467                                 (function(){
2468                                     while(v266 !== l5.value){
2469                                         (v267 = (function(){
2470                                             var tmp = v266;
2471                                             return tmp === l5.value? l5.value: tmp.car;
2472                                         })());
2473                                         (function(){
2474                                             (l107.fvalue(pv, l136.fvalue(pv, v267), v265) !== l5.value ? (function(){
2475                                                 var values = mv;
2476                                                 throw ({type: 'block', id: 109, values: v267, message: 'Return from unknown block NIL.'})
2477                                             })() : l5.value);
2478                                             return l5.value;
2479                                         })();
2480                                         (v266 = (function(){
2481                                             var tmp = v266;
2482                                             return tmp === l5.value? l5.value: tmp.cdr;
2483                                         })());
2484                                     }return l5.value;
2485                                 })();
2486                                 return l5.value;
2487                             })((function(){
2488                                 var symbol = l129;
2489                                 var value = symbol.value;
2490                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2491                                 return value;
2492                             })(),l5.value);
2493                         }
2494                         catch (cf){
2495                             if (cf.type == 'block' && cf.id == 109)
2496                                 return values.apply(this, forcemv(cf.values));
2497                             else
2498                                 throw cf;
2499                         }
2500                     })();
2501                 })(l106.fvalue(pv, v264));
2502             }
2503             catch (cf){
2504                 if (cf.type == 'block' && cf.id == 108)
2505                     return values.apply(this, forcemv(cf.values));
2506                 else
2507                     throw cf;
2508             }
2509         })();
2510     }));
2511     return l135;
2512 })();
2513 (function(){
2514     (l133).fvalue = (function(v271){
2515         ((v271)["fname"] = "FIND-PACKAGE-OR-FAIL");
2516         return v271;
2517     })((function (values,v269){
2518         checkArgs(arguments, 2);
2519         return (function(){
2520             return (function(v270){
2521                 return (v270 !== l5.value ? v270 : (function(){
2522                     throw "Package unknown.";
2523                 })());
2524             })(l135.fvalue(pv, v269));
2525         })();
2526     }));
2527     return l133;
2528 })();
2529 (function(){
2530     (l136).fvalue = (function(v274){
2531         ((v274)["fname"] = "PACKAGE-NAME");
2532         return v274;
2533     })((function (values,v272){
2534         checkArgs(arguments, 2);
2535         return (function(){
2536             return (function(v273){
2537                 return (function(){
2538                     var tmp = (v273)["packageName"];
2539                     return tmp == undefined? l5.value: tmp ;
2540                 })();
2541             })(l133.fvalue(pv, v272));
2542         })();
2543     }));
2544     return l136;
2545 })();
2546 var l137 = {name: "%PACKAGE-SYMBOLS"};
2547 (function(){
2548     (l137).fvalue = (function(v277){
2549         ((v277)["fname"] = "%PACKAGE-SYMBOLS");
2550         return v277;
2551     })((function (values,v275){
2552         checkArgs(arguments, 2);
2553         return (function(){
2554             return (function(v276){
2555                 return (function(){
2556                     var tmp = (v276)["symbols"];
2557                     return tmp == undefined? l5.value: tmp ;
2558                 })();
2559             })(l133.fvalue(pv, v275));
2560         })();
2561     }));
2562     return l137;
2563 })();
2564 var l138 = {name: "PACKAGE-USE-LIST"};
2565 (function(){
2566     (l138).fvalue = (function(v280){
2567         ((v280)["fname"] = "PACKAGE-USE-LIST");
2568         return v280;
2569     })((function (values,v278){
2570         checkArgs(arguments, 2);
2571         return (function(){
2572             return (function(v279){
2573                 return (function(){
2574                     var tmp = (v279)["use"];
2575                     return tmp == undefined? l5.value: tmp ;
2576                 })();
2577             })(l133.fvalue(pv, v278));
2578         })();
2579     }));
2580     return l138;
2581 })();
2582 var l139 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
2583 (function(){
2584     (l139).fvalue = (function(v283){
2585         ((v283)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
2586         return v283;
2587     })((function (values,v281){
2588         checkArgs(arguments, 2);
2589         return (function(){
2590             return (function(v282){
2591                 return (function(){
2592                     var tmp = (v282)["exports"];
2593                     return tmp == undefined? l5.value: tmp ;
2594                 })();
2595             })(l133.fvalue(pv, v281));
2596         })();
2597     }));
2598     return l139;
2599 })();
2600 var l140 = {name: "*COMMON-LISP-PACKAGE*"};
2601 (function(){
2602     (((l140.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l140).value = l131.fvalue(pv, "CL")));
2603     return l140;
2604 })();
2605 var l141 = {name: "*USER-PACKAGE*"};
2606 (function(){
2607     (((l141.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l141).value = l131.fvalue(pv, "CL-USER", l132.value, l47.fvalue(pv, (function(){
2608         var symbol = l140;
2609         var value = symbol.value;
2610         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2611         return value;
2612     })()))));
2613     return l141;
2614 })();
2615 var l142 = {name: "*KEYWORD-PACKAGE*"};
2616 (function(){
2617     (((l142.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l142).value = l131.fvalue(pv, "KEYWORD")));
2618     return l142;
2619 })();
2620 var l143 = {name: "KEYWORDP"};
2621 var l144 = {name: "SYMBOL-PACKAGE"};
2622 (function(){
2623     (l143).fvalue = (function(v285){
2624         ((v285)["fname"] = "KEYWORDP");
2625         return v285;
2626     })((function (values,v284){
2627         checkArgs(arguments, 2);
2628         return (function(){
2629             return (((function(){
2630                 var tmp = v284;
2631                 return (typeof tmp == 'object' && 'name' in tmp);
2632             })()?l4.value: l5.value) !== l5.value ? ((l144.fvalue(pv, v284) === (function(){
2633                 var symbol = l142;
2634                 var value = symbol.value;
2635                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2636                 return value;
2637             })())?l4.value: l5.value) : l5.value);
2638         })();
2639     }));
2640     return l143;
2641 })();
2642 var l145 = {name: "*PACKAGE*"};
2643 (function(){
2644     (((l145.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l145).value = (function(){
2645         var symbol = l140;
2646         var value = symbol.value;
2647         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2648         return value;
2649     })()));
2650     return l145;
2651 })();
2652 var l146 = {name: "IN-PACKAGE"};
2653 l146;
2654 var l147 = {name: "%INTERN-SYMBOL"};
2655 (function(){
2656     (l147).fvalue = (function(v289){
2657         ((v289)["fname"] = "%INTERN-SYMBOL");
2658         return v289;
2659     })((function (values,v286){
2660         checkArgs(arguments, 2);
2661         return (function(){
2662             return (function(){
2663                 var v287 = (((("package") in (v286))?l4.value: l5.value) !== l5.value ? l133.fvalue(pv, (function(){
2664                     var tmp = (v286)["package"];
2665                     return tmp == undefined? l5.value: tmp ;
2666                 })()) : (function(){
2667                     var symbol = l140;
2668                     var value = symbol.value;
2669                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2670                     return value;
2671                 })());
2672                 var v288 = l137.fvalue(pv, v287);
2673                 ((v286)["package"] = v287);
2674                 (((v287 === (function(){
2675                     var symbol = l142;
2676                     var value = symbol.value;
2677                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2678                     return value;
2679                 })())?l4.value: l5.value) !== l5.value ? ((v286)["value"] = v286) : l5.value);
2680                 return ((v288)[(v286).name] = v286);
2681             })();
2682         })();
2683     }));
2684     return l147;
2685 })();
2686 var l148 = {name: "FIND-SYMBOL"};
2687 var l149 = {name: "EXTERNAL", 'package': 'KEYWORD'};
2688 var l150 = {name: "INTERNAL", 'package': 'KEYWORD'};
2689 var l151 = {name: "INHERIT", 'package': 'KEYWORD'};
2690 (function(){
2691     (l148).fvalue = (function(v298){
2692         ((v298)["fname"] = "FIND-SYMBOL");
2693         return v298;
2694     })((function (values,v290,v291){
2695         checkArgsAtLeast(arguments, 2);
2696         checkArgsAtMost(arguments, 3);
2697         var v291;
2698         switch(arguments.length-1){
2699         case 1:
2700             v291=(function(){
2701                 var symbol = l145;
2702                 var value = symbol.value;
2703                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2704                 return value;
2705             })();
2706         default: break;
2707         }
2708         return (function(){
2709             return (function(){
2710                 var v292 = l133.fvalue(pv, v291);
2711                 var v293 = l139.fvalue(pv, v292);
2712                 var v294 = l137.fvalue(pv, v292);
2713                 return ((((v290) in (v293))?l4.value: l5.value) !== l5.value ? values((function(){
2714                     var tmp = (v293)[v290];
2715                     return tmp == undefined? l5.value: tmp ;
2716                 })(), l149.value) : ((((v290) in (v294))?l4.value: l5.value) !== l5.value ? values((function(){
2717                     var tmp = (v294)[v290];
2718                     return tmp == undefined? l5.value: tmp ;
2719                 })(), l150.value) : (function(){
2720                     try {
2721                         return (function(v295,v296){
2722                             (function(){
2723                                 while(v295 !== l5.value){
2724                                     (v296 = (function(){
2725                                         var tmp = v295;
2726                                         return tmp === l5.value? l5.value: tmp.car;
2727                                     })());
2728                                     (function(){
2729                                         (function(v297){
2730                                             return ((((v290) in (v297))?l4.value: l5.value) !== l5.value ? (function(){
2731                                                 var values = mv;
2732                                                 throw ({type: 'block', id: 118, values: values((function(){
2733                                                     var tmp = (v297)[v290];
2734                                                     return tmp == undefined? l5.value: tmp ;
2735                                                 })(), l151.value), message: 'Return from unknown block NIL.'})
2736                                             })() : l5.value);
2737                                         })(l139.fvalue(pv, v296));
2738                                         return l5.value;
2739                                     })();
2740                                     (v295 = (function(){
2741                                         var tmp = v295;
2742                                         return tmp === l5.value? l5.value: tmp.cdr;
2743                                     })());
2744                                 }return l5.value;
2745                             })();
2746                             return values(l5.value, l5.value);
2747                         })(l138.fvalue(pv, v292),l5.value);
2748                     }
2749                     catch (cf){
2750                         if (cf.type == 'block' && cf.id == 118)
2751                             return values.apply(this, forcemv(cf.values));
2752                         else
2753                             throw cf;
2754                     }
2755                 })()));
2756             })();
2757         })();
2758     }));
2759     return l148;
2760 })();
2761 var l152 = {name: "INTERN"};
2762 var l153 = {name: "EXPORT"};
2763 (function(){
2764     (l152).fvalue = (function(v307){
2765         ((v307)["fname"] = "INTERN");
2766         return v307;
2767     })((function (values,v299,v300){
2768         checkArgsAtLeast(arguments, 2);
2769         checkArgsAtMost(arguments, 3);
2770         var v300;
2771         switch(arguments.length-1){
2772         case 1:
2773             v300=(function(){
2774                 var symbol = l145;
2775                 var value = symbol.value;
2776                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2777                 return value;
2778             })();
2779         default: break;
2780         }
2781         return (function(){
2782             return (function(v301){
2783                 return (function(){
2784                     var func = (function (values,v303,v304){
2785                         var v303;
2786                         var v304;
2787                         switch(arguments.length-1){
2788                         case 0:
2789                             v303=l5.value;
2790                         case 1:
2791                             v304=l5.value;
2792                         default: break;
2793                         }
2794                         var v302= l5.value;
2795                         for (var i = arguments.length-1; i>=3; i--)
2796                             v302 = {car: arguments[i], cdr:
2797                         v302};
2798                         return (v304 !== l5.value ? values(v303, v304) : (function(v305){
2799                             (function(){
2800                                 var tmp = (v305)[v299];
2801                                 return tmp == undefined? l5.value: tmp ;
2802                             })();
2803                             return (function(v306){
2804                                 ((v306)["package"] = v301);
2805                                 (((v301 === (function(){
2806                                     var symbol = l142;
2807                                     var value = symbol.value;
2808                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2809                                     return value;
2810                                 })())?l4.value: l5.value) !== l5.value ? (function(){
2811                                     ((v306)["value"] = v306);
2812                                     return l153.fvalue(pv, l47.fvalue(pv, v306), v301);
2813                                 })() : l5.value);
2814                                 ((v305)[v299] = v306);
2815                                 return values(v306, l5.value);
2816                             })((function(){
2817                                 var name = v299;
2818                                 if (typeof name != 'string')
2819                                     throw 'The value ' + name + ' is not a type string.';
2820                                 return ({name: name});
2821                             })());
2822                         })(l137.fvalue(pv, v301)));
2823                     });
2824                     var args = [values];
2825                     return (function(){
2826                         var values = mv;
2827                         var vs;
2828                         vs = l148.fvalue(values, v299, v301);
2829                         if (typeof vs === 'object' && 'multiple-value' in vs)
2830                             args = args.concat(vs);
2831                         else
2832                             args.push(vs);
2833                         return func.apply(window, args);
2834                     })();
2835                 })();
2836             })(l133.fvalue(pv, v300));
2837         })();
2838     }));
2839     return l152;
2840 })();
2841 (function(){
2842     (l144).fvalue = (function(v309){
2843         ((v309)["fname"] = "SYMBOL-PACKAGE");
2844         return v309;
2845     })((function (values,v308){
2846         checkArgs(arguments, 2);
2847         return (function(){
2848             (((function(){
2849                 var tmp = v308;
2850                 return (typeof tmp == 'object' && 'name' in tmp);
2851             })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
2852                 throw "it is not a symbol";
2853             })());
2854             return (function(){
2855                 var tmp = (v308)["package"];
2856                 return tmp == undefined? l5.value: tmp ;
2857             })();
2858         })();
2859     }));
2860     return l144;
2861 })();
2862 (function(){
2863     (l153).fvalue = (function(v315){
2864         ((v315)["fname"] = "EXPORT");
2865         return v315;
2866     })((function (values,v310,v311){
2867         checkArgsAtLeast(arguments, 2);
2868         checkArgsAtMost(arguments, 3);
2869         var v311;
2870         switch(arguments.length-1){
2871         case 1:
2872             v311=(function(){
2873                 var symbol = l145;
2874                 var value = symbol.value;
2875                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2876                 return value;
2877             })();
2878         default: break;
2879         }
2880         return (function(){
2881             return (function(v312){
2882                 return (function(){
2883                     return (function(v313,v314){
2884                         (function(){
2885                             while(v313 !== l5.value){
2886                                 (v314 = (function(){
2887                                     var tmp = v313;
2888                                     return tmp === l5.value? l5.value: tmp.car;
2889                                 })());
2890                                 (function(){
2891                                     ((v312)[(v314).name] = v314);
2892                                     return l5.value;
2893                                 })();
2894                                 (v313 = (function(){
2895                                     var tmp = v313;
2896                                     return tmp === l5.value? l5.value: tmp.cdr;
2897                                 })());
2898                             }return l5.value;
2899                         })();
2900                         return l4.value;
2901                     })(v310,l5.value);
2902                 })();
2903             })(l139.fvalue(pv, v311));
2904         })();
2905     }));
2906     return l153;
2907 })();
2908 var l154 = {name: "GET-UNIVERSAL-TIME"};
2909 (function(){
2910     (l154).fvalue = (function(v316){
2911         ((v316)["fname"] = "GET-UNIVERSAL-TIME");
2912         return v316;
2913     })((function (values){
2914         checkArgsAtMost(arguments, 1);
2915         return (function(){
2916             return (function(){
2917                 var x1 = (Math.round(new Date() / 1000));
2918                 if (typeof x1 !== 'number') throw 'Not a number!';
2919                 return x1+2208988800;
2920             })();
2921         })();
2922     }));
2923     return l154;
2924 })();
2925 var l155 = {name: "*NEWLINE*"};
2926 (function(){
2927     (((l155.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l155).value = l106.fvalue(pv, l86.fvalue(pv, 10))));
2928     return l155;
2929 })();
2930 var l156 = {name: "CONCAT"};
2931 (function(){
2932     (l156).fvalue = (function(v318){
2933         ((v318)["fname"] = "CONCAT");
2934         return v318;
2935     })((function (values){
2936         var v317= l5.value;
2937         for (var i = arguments.length-1; i>=1; i--)
2938             v317 = {car: arguments[i], cdr:
2939         v317};
2940         return (function(){
2941             return l63.fvalue(values, (function(){
2942                 var symbol = l76;
2943                 var func = symbol.fvalue;
2944                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2945                 return func;
2946             })(), v317, l64.value, "");
2947         })();
2948     }));
2949     return l156;
2950 })();
2951 var l157 = {name: "CONCATF"};
2952 l157;
2953 var l158 = {name: "JOIN"};
2954 (function(){
2955     (l158).fvalue = (function(v321){
2956         ((v321)["fname"] = "JOIN");
2957         return v321;
2958     })((function (values,v319,v320){
2959         checkArgsAtLeast(arguments, 2);
2960         checkArgsAtMost(arguments, 3);
2961         var v320;
2962         switch(arguments.length-1){
2963         case 1:
2964             v320="";
2965         default: break;
2966         }
2967         return (function(){
2968             return (l13.fvalue(pv, v319) !== l5.value ? "" : (l13.fvalue(pv, (function(){
2969                 var tmp = v319;
2970                 return tmp === l5.value? l5.value: tmp.cdr;
2971             })()) !== l5.value ? (function(){
2972                 var tmp = v319;
2973                 return tmp === l5.value? l5.value: tmp.car;
2974             })() : l156.fvalue(values, (function(){
2975                 var tmp = v319;
2976                 return tmp === l5.value? l5.value: tmp.car;
2977             })(), v320, l158.fvalue(pv, (function(){
2978                 var tmp = v319;
2979                 return tmp === l5.value? l5.value: tmp.cdr;
2980             })(), v320))));
2981         })();
2982     }));
2983     return l158;
2984 })();
2985 var l159 = {name: "JOIN-TRAILING"};
2986 (function(){
2987     (l159).fvalue = (function(v324){
2988         ((v324)["fname"] = "JOIN-TRAILING");
2989         return v324;
2990     })((function (values,v322,v323){
2991         checkArgsAtLeast(arguments, 2);
2992         checkArgsAtMost(arguments, 3);
2993         var v323;
2994         switch(arguments.length-1){
2995         case 1:
2996             v323="";
2997         default: break;
2998         }
2999         return (function(){
3000             return (l13.fvalue(pv, v322) !== l5.value ? "" : l156.fvalue(values, (function(){
3001                 var tmp = v322;
3002                 return tmp === l5.value? l5.value: tmp.car;
3003             })(), v323, l159.fvalue(pv, (function(){
3004                 var tmp = v322;
3005                 return tmp === l5.value? l5.value: tmp.cdr;
3006             })(), v323)));
3007         })();
3008     }));
3009     return l159;
3010 })();
3011 var l160 = {name: "MAPCONCAT"};
3012 (function(){
3013     (l160).fvalue = (function(v327){
3014         ((v327)["fname"] = "MAPCONCAT");
3015         return v327;
3016     })((function (values,v325,v326){
3017         checkArgs(arguments, 3);
3018         return (function(){
3019             return l158.fvalue(values, l81.fvalue(pv, v325, v326));
3020         })();
3021     }));
3022     return l160;
3023 })();
3024 var l161 = {name: "VECTOR-TO-LIST"};
3025 (function(){
3026     (l161).fvalue = (function(v335){
3027         ((v335)["fname"] = "VECTOR-TO-LIST");
3028         return v335;
3029     })((function (values,v328){
3030         checkArgs(arguments, 2);
3031         return (function(){
3032             return (function(v329,v330){
3033                 return (function(){
3034                     return (function(v331,v332){
3035                         (function(){
3036                             while((function(){
3037                                 var x1 = v331;
3038                                 if (typeof x1 !== 'number') throw 'Not a number!';
3039                                 var x2 = v332;
3040                                 if (typeof x2 !== 'number') throw 'Not a number!';
3041                                 return (x1<x2?l4.value: l5.value);
3042                             })() !== l5.value){
3043                                 (function(){
3044                                     (function(){
3045                                         var v333 = (function(){
3046                                             var x = (v328)[v331];
3047                                             if (x === undefined) throw 'Out of range';
3048                                             return x;
3049                                         })();
3050                                         var v334 = ({car: v333, cdr: v329});
3051                                         return (v329 = v334);
3052                                     })();
3053                                     return l5.value;
3054                                 })();
3055                                 (v331 = (function(){
3056                                     var x1 = v331;
3057                                     if (typeof x1 !== 'number') throw 'Not a number!';
3058                                     return x1+1;
3059                                 })());
3060                             }return l5.value;
3061                         })();
3062                         return l70.fvalue(values, v329);
3063                     })(0,v330);
3064                 })();
3065             })(l5.value,l75.fvalue(pv, v328));
3066         })();
3067     }));
3068     return l161;
3069 })();
3070 var l162 = {name: "LIST-TO-VECTOR"};
3071 (function(){
3072     (l162).fvalue = (function(v341){
3073         ((v341)["fname"] = "LIST-TO-VECTOR");
3074         return v341;
3075     })((function (values,v336){
3076         checkArgs(arguments, 2);
3077         return (function(){
3078             return (function(v337,v338){
3079                 return (function(){
3080                     return (function(v339,v340){
3081                         (function(){
3082                             while(v339 !== l5.value){
3083                                 (v340 = (function(){
3084                                     var tmp = v339;
3085                                     return tmp === l5.value? l5.value: tmp.car;
3086                                 })());
3087                                 (function(){
3088                                     (function(){
3089                                         var x = v337;
3090                                         var i = v338;
3091                                         if (i < 0 || i >= x.length) throw 'Out of range';
3092                                         return x[i] = v340;
3093                                     })();
3094                                     (v338 = (function(){
3095                                         var x1 = v338;
3096                                         if (typeof x1 !== 'number') throw 'Not a number!';
3097                                         return x1+1;
3098                                     })());
3099                                     return l5.value;
3100                                 })();
3101                                 (v339 = (function(){
3102                                     var tmp = v339;
3103                                     return tmp === l5.value? l5.value: tmp.cdr;
3104                                 })());
3105                             }return l5.value;
3106                         })();
3107                         return v337;
3108                     })(v336,l5.value);
3109                 })();
3110             })((function(){
3111                 var r = [];
3112                 for (var i = 0; i < l75.fvalue(pv, v336); i++)
3113                     r.push(l5.value);
3114                 return r;
3115             })(),0);
3116         })();
3117     }));
3118     return l162;
3119 })();
3120 var l163 = {name: "VALUES-LIST"};
3121 (function(){
3122     (l163).fvalue = (function(v343){
3123         ((v343)["fname"] = "VALUES-LIST");
3124         return v343;
3125     })((function (values,v342){
3126         checkArgs(arguments, 2);
3127         return (function(){
3128             return values.apply(this, l162.fvalue(pv, v342));
3129         })();
3130     }));
3131     return l163;
3132 })();
3133 var l164 = {name: "VALUES"};
3134 (function(){
3135     (l164).fvalue = (function(v345){
3136         ((v345)["fname"] = "VALUES");
3137         return v345;
3138     })((function (values){
3139         var v344= l5.value;
3140         for (var i = arguments.length-1; i>=1; i--)
3141             v344 = {car: arguments[i], cdr:
3142         v344};
3143         return (function(){
3144             return l163.fvalue(values, v344);
3145         })();
3146     }));
3147     return l164;
3148 })();
3149 (function(){
3150     (l19).fvalue = (function(v351){
3151         ((v351)["fname"] = "INTEGER-TO-STRING");
3152         return v351;
3153     })((function (values,v346){
3154         checkArgs(arguments, 2);
3155         return (function(){
3156             return (l26.fvalue(pv, v346) !== l5.value ? "0" : (l91.fvalue(pv, v346) !== l5.value ? l156.fvalue(values, "-", l19.fvalue(pv, (function(){
3157                 var x1 = v346;
3158                 if (typeof x1 !== 'number') throw 'Not a number!';
3159                 return 0-x1;
3160             })())) : (function(v347){
3161                 (function(){
3162                     return (function(){
3163                         while(l29.fvalue(pv, l26.fvalue(pv, v346)) !== l5.value){
3164                             (function(){
3165                                 var v348 = (function(){
3166                                     var x = v346;
3167                                     var y = 10;
3168                                     if (typeof x != 'number')
3169                                         throw 'The value ' + x + ' is not a type number.';
3170                                     if (typeof y != 'number')
3171                                         throw 'The value ' + y + ' is not a type number.';
3172                                     return x%y;
3173                                 })();
3174                                 var v349 = ({car: v348, cdr: v347});
3175                                 return (v347 = v349);
3176                             })();
3177                             (v346 = l27.fvalue(pv, v346, 10));
3178                         }return l5.value;
3179                     })();
3180                 })();
3181                 return l160.fvalue(values, (function (values,v350){
3182                     checkArgs(arguments, 2);
3183                     return l106.fvalue(values, l101.fvalue(pv, v350));
3184                 }), v347);
3185             })(l5.value)));
3186         })();
3187     }));
3188     return l19;
3189 })();
3190 var l165 = {name: "PRIN1-TO-STRING"};
3191 var l166 = {name: "ESCAPE-STRING"};
3192 (function(){
3193     (l165).fvalue = (function(v360){
3194         ((v360)["fname"] = "PRIN1-TO-STRING");
3195         return v360;
3196     })((function (values,v352){
3197         checkArgs(arguments, 2);
3198         return (function(){
3199             return (((function(){
3200                 var tmp = v352;
3201                 return (typeof tmp == 'object' && 'name' in tmp);
3202             })()?l4.value: l5.value) !== l5.value ? (function(){
3203                 var func = (function (values,v354,v355){
3204                     var v354;
3205                     var v355;
3206                     switch(arguments.length-1){
3207                     case 0:
3208                         v354=l5.value;
3209                     case 1:
3210                         v355=l5.value;
3211                     default: break;
3212                     }
3213                     var v353= l5.value;
3214                     for (var i = arguments.length-1; i>=3; i--)
3215                         v353 = {car: arguments[i], cdr:
3216                     v353};
3217                     return ((v355 !== l5.value ? ((v354 === v352)?l4.value: l5.value) : l5.value) !== l5.value ? (v352).name : (function(v356,v357){
3218                         return l156.fvalue(values, (l13.fvalue(pv, v356) !== l5.value ? "#" : (((v356 === l135.fvalue(pv, "KEYWORD"))?l4.value: l5.value) !== l5.value ? "" : l136.fvalue(pv, v356))), ":", v357);
3219                     })(l144.fvalue(pv, v352),(v352).name));
3220                 });
3221                 var args = [values];
3222                 return (function(){
3223                     var values = mv;
3224                     var vs;
3225                     vs = l148.fvalue(values, (v352).name, (function(){
3226                         var symbol = l145;
3227                         var value = symbol.value;
3228                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3229                         return value;
3230                     })());
3231                     if (typeof vs === 'object' && 'multiple-value' in vs)
3232                         args = args.concat(vs);
3233                     else
3234                         args.push(vs);
3235                     return func.apply(window, args);
3236                 })();
3237             })() : (l89.fvalue(pv, v352) !== l5.value ? l19.fvalue(values, v352) : (((typeof(v352) == "string")?l4.value: l5.value) !== l5.value ? l156.fvalue(values, "\"", l166.fvalue(pv, v352), "\"") : (((typeof v352 == 'function')?l4.value: l5.value) !== l5.value ? (function(v358){
3238                 return (v358 !== l5.value ? l156.fvalue(values, "#<FUNCTION ", v358, ">") : l156.fvalue(values, "#<FUNCTION>"));
3239             })((function(){
3240                 var tmp = (v352)["fname"];
3241                 return tmp == undefined? l5.value: tmp ;
3242             })()) : (l62.fvalue(pv, v352) !== l5.value ? l156.fvalue(values, "(", l159.fvalue(pv, l81.fvalue(pv, (function(){
3243                 var symbol = l165;
3244                 var func = symbol.fvalue;
3245                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3246                 return func;
3247             })(), l95.fvalue(pv, v352)), " "), (function(v359){
3248                 return (l13.fvalue(pv, (function(){
3249                     var tmp = v359;
3250                     return tmp === l5.value? l5.value: tmp.cdr;
3251                 })()) !== l5.value ? l165.fvalue(pv, (function(){
3252                     var tmp = v359;
3253                     return tmp === l5.value? l5.value: tmp.car;
3254                 })()) : l156.fvalue(pv, l165.fvalue(pv, (function(){
3255                     var tmp = v359;
3256                     return tmp === l5.value? l5.value: tmp.car;
3257                 })()), " . ", l165.fvalue(pv, (function(){
3258                     var tmp = v359;
3259                     return tmp === l5.value? l5.value: tmp.cdr;
3260                 })())));
3261             })(l94.fvalue(pv, v352)), ")") : (((function(){
3262                 var x = v352;
3263                 return typeof x === 'object' && 'length' in x;
3264             })()?l4.value: l5.value) !== l5.value ? l156.fvalue(values, "#", l165.fvalue(pv, l161.fvalue(pv, v352))) : (l134.fvalue(pv, v352) !== l5.value ? l156.fvalue(values, "#<PACKAGE ", l136.fvalue(pv, v352), ">") : l5.value)))))));
3265         })();
3266     }));
3267     return l165;
3268 })();
3269 (function(){
3270     (l110).fvalue = (function(v362){
3271         ((v362)["fname"] = "WRITE-LINE");
3272         return v362;
3273     })((function (values,v361){
3274         checkArgs(arguments, 2);
3275         return (function(){
3276             (function(){
3277                 var x = v361;
3278                 if (typeof x != 'string')
3279                     throw 'The value ' + x + ' is not a type string.';
3280                 return lisp.write(x);
3281             })();
3282             (function(){
3283                 var x = (function(){
3284                     var symbol = l155;
3285                     var value = symbol.value;
3286                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3287                     return value;
3288                 })();
3289                 if (typeof x != 'string')
3290                     throw 'The value ' + x + ' is not a type string.';
3291                 return lisp.write(x);
3292             })();
3293             return v361;
3294         })();
3295     }));
3296     return l110;
3297 })();
3298 var l167 = {name: "WARN"};
3299 (function(){
3300     (l167).fvalue = (function(v364){
3301         ((v364)["fname"] = "WARN");
3302         return v364;
3303     })((function (values,v363){
3304         checkArgs(arguments, 2);
3305         return (function(){
3306             (function(){
3307                 var x = "WARNING: ";
3308                 if (typeof x != 'string')
3309                     throw 'The value ' + x + ' is not a type string.';
3310                 return lisp.write(x);
3311             })();
3312             return l110.fvalue(values, v363);
3313         })();
3314     }));
3315     return l167;
3316 })();
3317 var l168 = {name: "PRINT"};
3318 (function(){
3319     (l168).fvalue = (function(v366){
3320         ((v366)["fname"] = "PRINT");
3321         return v366;
3322     })((function (values,v365){
3323         checkArgs(arguments, 2);
3324         return (function(){
3325             l110.fvalue(pv, l165.fvalue(pv, v365));
3326             return v365;
3327         })();
3328     }));
3329     return l168;
3330 })();
3331 var l169 = {name: "MAKE-STRING-STREAM"};
3332 (function(){
3333     (l169).fvalue = (function(v368){
3334         ((v368)["fname"] = "MAKE-STRING-STREAM");
3335         return v368;
3336     })((function (values,v367){
3337         checkArgs(arguments, 2);
3338         return (function(){
3339             return ({car: v367, cdr: 0});
3340         })();
3341     }));
3342     return l169;
3343 })();
3344 var l170 = {name: "%PEEK-CHAR"};
3345 (function(){
3346     (l170).fvalue = (function(v370){
3347         ((v370)["fname"] = "%PEEK-CHAR");
3348         return v370;
3349     })((function (values,v369){
3350         checkArgs(arguments, 2);
3351         return (function(){
3352             return ((function(){
3353                 var x1 = (function(){
3354                     var tmp = v369;
3355                     return tmp === l5.value? l5.value: tmp.cdr;
3356                 })();
3357                 if (typeof x1 !== 'number') throw 'Not a number!';
3358                 var x2 = l75.fvalue(pv, (function(){
3359                     var tmp = v369;
3360                     return tmp === l5.value? l5.value: tmp.car;
3361                 })());
3362                 if (typeof x2 !== 'number') throw 'Not a number!';
3363                 return (x1<x2?l4.value: l5.value);
3364             })() !== l5.value ? (function(){
3365                 var string = (function(){
3366                     var tmp = v369;
3367                     return tmp === l5.value? l5.value: tmp.car;
3368                 })();
3369                 var index = (function(){
3370                     var tmp = v369;
3371                     return tmp === l5.value? l5.value: tmp.cdr;
3372                 })();
3373                 if (typeof string != 'string')
3374                     throw 'The value ' + string + ' is not a type string.';
3375                 if (typeof index != 'number')
3376                     throw 'The value ' + index + ' is not a type number.';
3377                 return string.charCodeAt(index);
3378             })() : l5.value);
3379         })();
3380     }));
3381     return l170;
3382 })();
3383 var l171 = {name: "%READ-CHAR"};
3384 (function(){
3385     (l171).fvalue = (function(v373){
3386         ((v373)["fname"] = "%READ-CHAR");
3387         return v373;
3388     })((function (values,v371){
3389         checkArgs(arguments, 2);
3390         return (function(){
3391             return ((function(){
3392                 var x1 = (function(){
3393                     var tmp = v371;
3394                     return tmp === l5.value? l5.value: tmp.cdr;
3395                 })();
3396                 if (typeof x1 !== 'number') throw 'Not a number!';
3397                 var x2 = l75.fvalue(pv, (function(){
3398                     var tmp = v371;
3399                     return tmp === l5.value? l5.value: tmp.car;
3400                 })());
3401                 if (typeof x2 !== 'number') throw 'Not a number!';
3402                 return (x1<x2?l4.value: l5.value);
3403             })() !== l5.value ? (function(v372){
3404                 (function(){
3405                     var x = v371;
3406                     if (typeof x != 'object')
3407                         throw 'The value ' + x + ' is not a type object.';
3408                     return (x.cdr = l24.fvalue(pv, (function(){
3409                         var tmp = v371;
3410                         return tmp === l5.value? l5.value: tmp.cdr;
3411                     })()), x);
3412                 })();
3413                 return v372;
3414             })((function(){
3415                 var string = (function(){
3416                     var tmp = v371;
3417                     return tmp === l5.value? l5.value: tmp.car;
3418                 })();
3419                 var index = (function(){
3420                     var tmp = v371;
3421                     return tmp === l5.value? l5.value: tmp.cdr;
3422                 })();
3423                 if (typeof string != 'string')
3424                     throw 'The value ' + string + ' is not a type string.';
3425                 if (typeof index != 'number')
3426                     throw 'The value ' + index + ' is not a type number.';
3427                 return string.charCodeAt(index);
3428             })()) : l5.value);
3429         })();
3430     }));
3431     return l171;
3432 })();
3433 var l172 = {name: "WHITESPACEP"};
3434 (function(){
3435     (l172).fvalue = (function(v377){
3436         ((v377)["fname"] = "WHITESPACEP");
3437         return v377;
3438     })((function (values,v374){
3439         checkArgs(arguments, 2);
3440         return (function(){
3441             return (function(v375){
3442                 return (v375 !== l5.value ? v375 : (function(v376){
3443                     return (v376 !== l5.value ? v376 : l88.fvalue(values, v374, 9));
3444                 })(l88.fvalue(pv, v374, 10)));
3445             })(l88.fvalue(pv, v374, 32));
3446         })();
3447     }));
3448     return l172;
3449 })();
3450 var l173 = {name: "SKIP-WHITESPACES"};
3451 (function(){
3452     (l173).fvalue = (function(v380){
3453         ((v380)["fname"] = "SKIP-WHITESPACES");
3454         return v380;
3455     })((function (values,v378){
3456         checkArgs(arguments, 2);
3457         return (function(){
3458             return (function(v379){
3459                 (v379 = l170.fvalue(pv, v378));
3460                 return (function(){
3461                     return (function(){
3462                         while((v379 !== l5.value ? l172.fvalue(pv, v379) : l5.value) !== l5.value){
3463                             l171.fvalue(pv, v378);
3464                             (v379 = l170.fvalue(pv, v378));
3465                         }return l5.value;
3466                     })();
3467                 })();
3468             })(l5.value);
3469         })();
3470     }));
3471     return l173;
3472 })();
3473 var l174 = {name: "TERMINALP"};
3474 (function(){
3475     (l174).fvalue = (function(v385){
3476         ((v385)["fname"] = "TERMINALP");
3477         return v385;
3478     })((function (values,v381){
3479         checkArgs(arguments, 2);
3480         return (function(){
3481             return (function(v382){
3482                 return (v382 !== l5.value ? v382 : (function(v383){
3483                     return (v383 !== l5.value ? v383 : (function(v384){
3484                         return (v384 !== l5.value ? v384 : l88.fvalue(values, 40, v381));
3485                     })(l88.fvalue(pv, 41, v381)));
3486                 })(l172.fvalue(pv, v381)));
3487             })(l13.fvalue(pv, v381));
3488         })();
3489     }));
3490     return l174;
3491 })();
3492 var l175 = {name: "READ-UNTIL"};
3493 (function(){
3494     (l175).fvalue = (function(v390){
3495         ((v390)["fname"] = "READ-UNTIL");
3496         return v390;
3497     })((function (values,v386,v387){
3498         checkArgs(arguments, 3);
3499         return (function(){
3500             return (function(v388,v389){
3501                 (v389 = l170.fvalue(pv, v386));
3502                 (function(){
3503                     return (function(){
3504                         while((v389 !== l5.value ? l29.fvalue(pv, (function(){
3505                             var f = v387;
3506                             return (typeof f === 'function'? f: f.fvalue)(pv, v389)
3507                         })()) : l5.value) !== l5.value){
3508                             (v388 = l156.fvalue(pv, v388, l106.fvalue(pv, v389)));
3509                             l171.fvalue(pv, v386);
3510                             (v389 = l170.fvalue(pv, v386));
3511                         }return l5.value;
3512                     })();
3513                 })();
3514                 return v388;
3515             })("",l5.value);
3516         })();
3517     }));
3518     return l175;
3519 })();
3520 var l176 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
3521 (function(){
3522     (l176).fvalue = (function(v394){
3523         ((v394)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
3524         return v394;
3525     })((function (values,v391){
3526         checkArgs(arguments, 2);
3527         return (function(){
3528             return (function(v392){
3529                 l173.fvalue(pv, v391);
3530                 (v392 = l170.fvalue(pv, v391));
3531                 return (function(){
3532                     return (function(){
3533                         while((v392 !== l5.value ? l88.fvalue(pv, v392, 59) : l5.value) !== l5.value){
3534                             l175.fvalue(pv, v391, (function (values,v393){
3535                                 checkArgs(arguments, 2);
3536                                 return l88.fvalue(values, v393, 10);
3537                             }));
3538                             l173.fvalue(pv, v391);
3539                             (v392 = l170.fvalue(pv, v391));
3540                         }return l5.value;
3541                     })();
3542                 })();
3543             })(l5.value);
3544         })();
3545     }));
3546     return l176;
3547 })();
3548 var l177 = {name: "%READ-LIST"};
3549 var l178 = {name: "LS-READ"};
3550 (function(){
3551     (l177).fvalue = (function(v398){
3552         ((v398)["fname"] = "%READ-LIST");
3553         return v398;
3554     })((function (values,v395){
3555         checkArgs(arguments, 2);
3556         return (function(){
3557             l176.fvalue(pv, v395);
3558             return (function(v396){
3559                 return (l13.fvalue(pv, v396) !== l5.value ? (function(){
3560                     throw "Unspected EOF";
3561                 })() : (l88.fvalue(pv, v396, 41) !== l5.value ? (function(){
3562                     l171.fvalue(pv, v395);
3563                     return l5.value;
3564                 })() : (l88.fvalue(pv, v396, 46) !== l5.value ? (function(){
3565                     l171.fvalue(pv, v395);
3566                     return (function(v397){
3567                         l176.fvalue(pv, v395);
3568                         (l88.fvalue(pv, l171.fvalue(pv, v395), 41) !== l5.value ? l5.value : (function(){
3569                             throw "')' was expected.";
3570                         })());
3571                         return v397;
3572                     })(l178.fvalue(pv, v395));
3573                 })() : ({car: l178.fvalue(pv, v395), cdr: l177.fvalue(pv, v395)}))));
3574             })(l170.fvalue(pv, v395));
3575         })();
3576     }));
3577     return l177;
3578 })();
3579 var l179 = {name: "READ-STRING"};
3580 (function(){
3581     (l179).fvalue = (function(v402){
3582         ((v402)["fname"] = "READ-STRING");
3583         return v402;
3584     })((function (values,v399){
3585         checkArgs(arguments, 2);
3586         return (function(){
3587             return (function(v400,v401){
3588                 (v401 = l171.fvalue(pv, v399));
3589                 (function(){
3590                     return (function(){
3591                         while(l29.fvalue(pv, l28.fvalue(pv, v401, 34)) !== l5.value){
3592                             (l13.fvalue(pv, v401) !== l5.value ? (function(){
3593                                 throw "Unexpected EOF";
3594                             })() : l5.value);
3595                             (l28.fvalue(pv, v401, 92) !== l5.value ? (v401 = l171.fvalue(pv, v399)) : l5.value);
3596                             (v400 = l156.fvalue(pv, v400, l106.fvalue(pv, v401)));
3597                             (v401 = l171.fvalue(pv, v399));
3598                         }return l5.value;
3599                     })();
3600                 })();
3601                 return v400;
3602             })("",l5.value);
3603         })();
3604     }));
3605     return l179;
3606 })();
3607 var l180 = {name: "READ-SHARP"};
3608 (function(){
3609     (l180).fvalue = (function(v407){
3610         ((v407)["fname"] = "READ-SHARP");
3611         return v407;
3612     })((function (values,v403){
3613         checkArgs(arguments, 2);
3614         return (function(){
3615             l171.fvalue(pv, v403);
3616             return (function(v404){
3617                 return (l28.fvalue(pv, v404, 39) !== l5.value ? l47.fvalue(values, l112, l178.fvalue(pv, v403)) : (l28.fvalue(pv, v404, 40) !== l5.value ? l162.fvalue(values, l177.fvalue(pv, v403)) : (l28.fvalue(pv, v404, 58) !== l5.value ? (function(){
3618                     var name = (function(){
3619                         var x = l175.fvalue(pv, v403, (function(){
3620                             var symbol = l174;
3621                             var func = symbol.fvalue;
3622                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3623                             return func;
3624                         })());
3625                         if (typeof x != 'string')
3626                             throw 'The value ' + x + ' is not a type string.';
3627                         return x.toUpperCase();
3628                     })();
3629                     if (typeof name != 'string')
3630                         throw 'The value ' + name + ' is not a type string.';
3631                     return ({name: name});
3632                 })() : (l28.fvalue(pv, v404, 92) !== l5.value ? (function(v405){
3633                     return (l107.fvalue(pv, v405, "space") !== l5.value ? l87.fvalue(values, 32) : (l107.fvalue(pv, v405, "tab") !== l5.value ? l87.fvalue(values, 9) : (l107.fvalue(pv, v405, "newline") !== l5.value ? l87.fvalue(values, 10) : l87.fvalue(values, (function(){
3634                         var string = v405;
3635                         var index = 0;
3636                         if (typeof string != 'string')
3637                             throw 'The value ' + string + ' is not a type string.';
3638                         if (typeof index != 'number')
3639                             throw 'The value ' + index + ' is not a type number.';
3640                         return string.charCodeAt(index);
3641                     })()))));
3642                 })(l156.fvalue(pv, l106.fvalue(pv, l171.fvalue(pv, v403)), l175.fvalue(pv, v403, (function(){
3643                     var symbol = l174;
3644                     var func = symbol.fvalue;
3645                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3646                     return func;
3647                 })()))) : (l28.fvalue(pv, v404, 43) !== l5.value ? (function(v406){
3648                     return (l107.fvalue(pv, v406, "common-lisp") !== l5.value ? (function(){
3649                         l178.fvalue(pv, v403);
3650                         return l178.fvalue(values, v403);
3651                     })() : (l107.fvalue(pv, v406, "ecmalisp") !== l5.value ? l178.fvalue(values, v403) : (function(){
3652                         throw "Unknown reader form.";
3653                     })()));
3654                 })(l175.fvalue(pv, v403, (function(){
3655                     var symbol = l174;
3656                     var func = symbol.fvalue;
3657                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3658                     return func;
3659                 })())) : (function(){
3660                     throw "ECASE expression failed.";
3661                 })())))));
3662             })(l171.fvalue(pv, v403));
3663         })();
3664     }));
3665     return l180;
3666 })();
3667 var l181 = {name: "READ-SYMBOL"};
3668 (function(){
3669     (l181).fvalue = (function(v415){
3670         ((v415)["fname"] = "READ-SYMBOL");
3671         return v415;
3672     })((function (values,v408){
3673         checkArgs(arguments, 2);
3674         return (function(){
3675             return (function(v409,v410,v411,v412,v413){
3676                 (v413 = 0);
3677                 (function(){
3678                     return (function(){
3679                         while(((function(){
3680                             var x1 = v413;
3681                             if (typeof x1 !== 'number') throw 'Not a number!';
3682                             var x2 = v409;
3683                             if (typeof x2 !== 'number') throw 'Not a number!';
3684                             return (x1<x2?l4.value: l5.value);
3685                         })() !== l5.value ? l29.fvalue(pv, l88.fvalue(pv, (function(){
3686                             var string = v408;
3687                             var index = v413;
3688                             if (typeof string != 'string')
3689                                 throw 'The value ' + string + ' is not a type string.';
3690                             if (typeof index != 'number')
3691                                 throw 'The value ' + index + ' is not a type number.';
3692                             return string.charCodeAt(index);
3693                         })(), 58)) : l5.value) !== l5.value){
3694                             (v413 = (function(){
3695                                 var x1 = v413;
3696                                 if (typeof x1 !== 'number') throw 'Not a number!';
3697                                 return x1+1;
3698                             })());
3699                         }return l5.value;
3700                     })();
3701                 })();
3702                 ((function(){
3703                     var x1 = v413;
3704                     if (typeof x1 !== 'number') throw 'Not a number!';
3705                     var x2 = v409;
3706                     if (typeof x2 !== 'number') throw 'Not a number!';
3707                     return (x1==x2?l4.value: l5.value);
3708                 })() !== l5.value ? (function(){
3709                     (v411 = v408);
3710                     (v410 = (function(){
3711                         var symbol = l145;
3712                         var value = symbol.value;
3713                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3714                         return value;
3715                     })());
3716                     return (v412 = l4.value);
3717                 })() : (function(){
3718                     (l26.fvalue(pv, v413) !== l5.value ? (v410 = "KEYWORD") : (v410 = (function(){
3719                         var x = l102.fvalue(pv, v408, 0, v413);
3720                         if (typeof x != 'string')
3721                             throw 'The value ' + x + ' is not a type string.';
3722                         return x.toUpperCase();
3723                     })()));
3724                     (v413 = (function(){
3725                         var x1 = v413;
3726                         if (typeof x1 !== 'number') throw 'Not a number!';
3727                         return x1+1;
3728                     })());
3729                     (l88.fvalue(pv, (function(){
3730                         var string = v408;
3731                         var index = v413;
3732                         if (typeof string != 'string')
3733                             throw 'The value ' + string + ' is not a type string.';
3734                         if (typeof index != 'number')
3735                             throw 'The value ' + index + ' is not a type number.';
3736                         return string.charCodeAt(index);
3737                     })(), 58) !== l5.value ? (function(){
3738                         (v412 = l4.value);
3739                         return (v413 = (function(){
3740                             var x1 = v413;
3741                             if (typeof x1 !== 'number') throw 'Not a number!';
3742                             return x1+1;
3743                         })());
3744                     })() : l5.value);
3745                     return (v411 = l102.fvalue(pv, v408, v413));
3746                 })());
3747                 (v411 = (function(){
3748                     var x = v411;
3749                     if (typeof x != 'string')
3750                         throw 'The value ' + x + ' is not a type string.';
3751                     return x.toUpperCase();
3752                 })());
3753                 (v410 = l135.fvalue(pv, v410));
3754                 return ((function(v414){
3755                     return (v414 !== l5.value ? v414 : ((v410 === l135.fvalue(pv, "KEYWORD"))?l4.value: l5.value));
3756                 })(v412) !== l5.value ? l152.fvalue(values, v411, v410) : l148.fvalue(values, v411, v410));
3757             })(l75.fvalue(pv, v408),l5.value,l5.value,l5.value,l5.value);
3758         })();
3759     }));
3760     return l181;
3761 })();
3762 var l182 = {name: "!PARSE-INTEGER"};
3763 (function(){
3764     (l182).fvalue = (function(v426){
3765         ((v426)["fname"] = "!PARSE-INTEGER");
3766         return v426;
3767     })((function (values,v416,v417){
3768         checkArgs(arguments, 3);
3769         return (function(){
3770             return (function(){
3771                 try {
3772                     return (function(v418,v419,v420,v421){
3773                         (l26.fvalue(pv, v420) !== l5.value ? (function(){
3774                             var values = mv;
3775                             throw ({type: 'block', id: 158, values: values(l5.value, 0), message: 'Return from unknown block NIL.'})
3776                         })() : l5.value);
3777                         (function(v422){
3778                             return (l28.fvalue(pv, v422, 43) !== l5.value ? (v419 = (function(){
3779                                 var x1 = v419;
3780                                 if (typeof x1 !== 'number') throw 'Not a number!';
3781                                 return x1+1;
3782                             })()) : (l28.fvalue(pv, v422, 45) !== l5.value ? (function(){
3783                                 (v421 = -1);
3784                                 return (v419 = (function(){
3785                                     var x1 = v419;
3786                                     if (typeof x1 !== 'number') throw 'Not a number!';
3787                                     return x1+1;
3788                                 })());
3789                             })() : l5.value));
3790                         })((function(){
3791                             var string = v416;
3792                             var index = 0;
3793                             if (typeof string != 'string')
3794                                 throw 'The value ' + string + ' is not a type string.';
3795                             if (typeof index != 'number')
3796                                 throw 'The value ' + index + ' is not a type number.';
3797                             return string.charCodeAt(index);
3798                         })());
3799                         (((function(){
3800                             var x1 = v419;
3801                             if (typeof x1 !== 'number') throw 'Not a number!';
3802                             var x2 = v420;
3803                             if (typeof x2 !== 'number') throw 'Not a number!';
3804                             return (x1<x2?l4.value: l5.value);
3805                         })() !== l5.value ? (v418 = l100.fvalue(pv, (function(){
3806                             var string = v416;
3807                             var index = v419;
3808                             if (typeof string != 'string')
3809                                 throw 'The value ' + string + ' is not a type string.';
3810                             if (typeof index != 'number')
3811                                 throw 'The value ' + index + ' is not a type number.';
3812                             return string.charCodeAt(index);
3813                         })())) : l5.value) !== l5.value ? l5.value : (function(){
3814                             var values = mv;
3815                             throw ({type: 'block', id: 158, values: values(l5.value, v419), message: 'Return from unknown block NIL.'})
3816                         })());
3817                         (v419 = (function(){
3818                             var x1 = v419;
3819                             if (typeof x1 !== 'number') throw 'Not a number!';
3820                             return x1+1;
3821                         })());
3822                         (function(){
3823                             try {
3824                                 return (function(){
3825                                     while((function(){
3826                                         var x1 = v419;
3827                                         if (typeof x1 !== 'number') throw 'Not a number!';
3828                                         var x2 = v420;
3829                                         if (typeof x2 !== 'number') throw 'Not a number!';
3830                                         return (x1<x2?l4.value: l5.value);
3831                                     })() !== l5.value){
3832                                         (function(v423){
3833                                             (v423 !== l5.value ? l5.value : (function(){
3834                                                 throw ({type: 'block', id: 159, values: l5.value, message: 'Return from unknown block NIL.'})
3835                                             })());
3836                                             (v418 = (function(){
3837                                                 var x1 = (function(){
3838                                                     var x1 = v418;
3839                                                     if (typeof x1 !== 'number') throw 'Not a number!';
3840                                                     return x1*10;
3841                                                 })();
3842                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3843                                                 var x2 = v423;
3844                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3845                                                 return x1+x2;
3846                                             })());
3847                                             return (v419 = (function(){
3848                                                 var x1 = v419;
3849                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3850                                                 return x1+1;
3851                                             })());
3852                                         })(l100.fvalue(pv, (function(){
3853                                             var string = v416;
3854                                             var index = v419;
3855                                             if (typeof string != 'string')
3856                                                 throw 'The value ' + string + ' is not a type string.';
3857                                             if (typeof index != 'number')
3858                                                 throw 'The value ' + index + ' is not a type number.';
3859                                             return string.charCodeAt(index);
3860                                         })()));
3861                                     }return l5.value;
3862                                 })();
3863                             }
3864                             catch (cf){
3865                                 if (cf.type == 'block' && cf.id == 159)
3866                                     return cf.values;
3867                                 else
3868                                     throw cf;
3869                             }
3870                         })();
3871                         return ((function(v424){
3872                             return (v424 !== l5.value ? v424 : (function(v425){
3873                                 return (v425 !== l5.value ? v425 : l88.fvalue(pv, (function(){
3874                                     var string = v416;
3875                                     var index = v419;
3876                                     if (typeof string != 'string')
3877                                         throw 'The value ' + string + ' is not a type string.';
3878                                     if (typeof index != 'number')
3879                                         throw 'The value ' + index + ' is not a type number.';
3880                                     return string.charCodeAt(index);
3881                                 })(), 32));
3882                             })((function(){
3883                                 var x1 = v419;
3884                                 if (typeof x1 !== 'number') throw 'Not a number!';
3885                                 var x2 = v420;
3886                                 if (typeof x2 !== 'number') throw 'Not a number!';
3887                                 return (x1==x2?l4.value: l5.value);
3888                             })()));
3889                         })(v417) !== l5.value ? values((function(){
3890                             var x1 = v421;
3891                             if (typeof x1 !== 'number') throw 'Not a number!';
3892                             var x2 = v418;
3893                             if (typeof x2 !== 'number') throw 'Not a number!';
3894                             return x1*x2;
3895                         })(), v419) : values(l5.value, v419));
3896                     })(0,0,l75.fvalue(pv, v416),1);
3897                 }
3898                 catch (cf){
3899                     if (cf.type == 'block' && cf.id == 158)
3900                         return values.apply(this, forcemv(cf.values));
3901                     else
3902                         throw cf;
3903                 }
3904             })();
3905         })();
3906     }));
3907     return l182;
3908 })();
3909 var l183 = {name: "PARSE-INTEGER"};
3910 (function(){
3911     (l183).fvalue = (function(v428){
3912         ((v428)["fname"] = "PARSE-INTEGER");
3913         return v428;
3914     })((function (values,v427){
3915         checkArgs(arguments, 2);
3916         return (function(){
3917             return l182.fvalue(values, v427, l5.value);
3918         })();
3919     }));
3920     return l183;
3921 })();
3922 var l184 = {name: "*EOF*"};
3923 (function(){
3924     (((l184.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l184).value = l18.fvalue(pv)));
3925     return l184;
3926 })();
3927 var l185 = {name: "QUOTE"};
3928 var l186 = {name: "BACKQUOTE"};
3929 var l187 = {name: "UNQUOTE-SPLICING"};
3930 var l188 = {name: "UNQUOTE"};
3931 (function(){
3932     (l178).fvalue = (function(v434){
3933         ((v434)["fname"] = "LS-READ");
3934         return v434;
3935     })((function (values,v429){
3936         checkArgs(arguments, 2);
3937         return (function(){
3938             l176.fvalue(pv, v429);
3939             return (function(v430){
3940                 return ((function(v431){
3941                     return (v431 !== l5.value ? v431 : l88.fvalue(pv, v430, 41));
3942                 })(l13.fvalue(pv, v430)) !== l5.value ? (function(){
3943                     var symbol = l184;
3944                     var value = symbol.value;
3945                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3946                     return value;
3947                 })() : (l88.fvalue(pv, v430, 40) !== l5.value ? (function(){
3948                     l171.fvalue(pv, v429);
3949                     return l177.fvalue(values, v429);
3950                 })() : (l88.fvalue(pv, v430, 39) !== l5.value ? (function(){
3951                     l171.fvalue(pv, v429);
3952                     return l47.fvalue(values, l185, l178.fvalue(pv, v429));
3953                 })() : (l88.fvalue(pv, v430, 96) !== l5.value ? (function(){
3954                     l171.fvalue(pv, v429);
3955                     return l47.fvalue(values, l186, l178.fvalue(pv, v429));
3956                 })() : (l88.fvalue(pv, v430, 34) !== l5.value ? (function(){
3957                     l171.fvalue(pv, v429);
3958                     return l179.fvalue(values, v429);
3959                 })() : (l88.fvalue(pv, v430, 44) !== l5.value ? (function(){
3960                     l171.fvalue(pv, v429);
3961                     return (l28.fvalue(pv, l170.fvalue(pv, v429), 64) !== l5.value ? (function(){
3962                         l171.fvalue(pv, v429);
3963                         return l47.fvalue(values, l187, l178.fvalue(pv, v429));
3964                     })() : l47.fvalue(values, l188, l178.fvalue(pv, v429)));
3965                 })() : (l88.fvalue(pv, v430, 35) !== l5.value ? l180.fvalue(values, v429) : (function(v432){
3966                     return (function(v433){
3967                         return (v433 !== l5.value ? v433 : l181.fvalue(values, v432));
3968                     })(pv(l182.fvalue(pv, v432, l5.value)));
3969                 })(l175.fvalue(pv, v429, (function(){
3970                     var symbol = l174;
3971                     var func = symbol.fvalue;
3972                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3973                     return func;
3974                 })())))))))));
3975             })(l170.fvalue(pv, v429));
3976         })();
3977     }));
3978     return l178;
3979 })();
3980 var l189 = {name: "LS-READ-FROM-STRING"};
3981 (function(){
3982     (l189).fvalue = (function(v436){
3983         ((v436)["fname"] = "LS-READ-FROM-STRING");
3984         return v436;
3985     })((function (values,v435){
3986         checkArgs(arguments, 2);
3987         return (function(){
3988             return l178.fvalue(values, l169.fvalue(pv, v435));
3989         })();
3990     }));
3991     return l189;
3992 })();
3993 var l190 = {name: "CODE"};
3994 (function(){
3995     (l190).fvalue = (function(v439){
3996         ((v439)["fname"] = "CODE");
3997         return v439;
3998     })((function (values){
3999         var v437= l5.value;
4000         for (var i = arguments.length-1; i>=1; i--)
4001             v437 = {car: arguments[i], cdr:
4002         v437};
4003         return (function(){
4004             return l160.fvalue(values, (function (values,v438){
4005                 checkArgs(arguments, 2);
4006                 return (l13.fvalue(pv, v438) !== l5.value ? "" : (l89.fvalue(pv, v438) !== l5.value ? l19.fvalue(values, v438) : (((typeof(v438) == "string")?l4.value: l5.value) !== l5.value ? v438 : (function(){
4007                     throw "Unknown argument.";
4008                 })())));
4009             }), v437);
4010         })();
4011     }));
4012     return l190;
4013 })();
4014 var l191 = {name: "JS!BOOL"};
4015 var l192 = {name: "LS-COMPILE"};
4016 (function(){
4017     (l191).fvalue = (function(v441){
4018         ((v441)["fname"] = "JS!BOOL");
4019         return v441;
4020     })((function (values,v440){
4021         checkArgs(arguments, 2);
4022         return (function(){
4023             return l190.fvalue(values, "(", v440, "?", l192.fvalue(pv, l4.value), ": ", l192.fvalue(pv, l5.value), ")");
4024         })();
4025     }));
4026     return l191;
4027 })();
4028 var l193 = {name: "JS!SELFCALL"};
4029 l193;
4030 var l194 = {name: "INDENT"};
4031 (function(){
4032     (l194).fvalue = (function(v448){
4033         ((v448)["fname"] = "INDENT");
4034         return v448;
4035     })((function (values){
4036         var v442= l5.value;
4037         for (var i = arguments.length-1; i>=1; i--)
4038             v442 = {car: arguments[i], cdr:
4039         v442};
4040         return (function(){
4041             return (function(v443){
4042                 return (function(v444,v445,v446){
4043                     (l90.fvalue(pv, l75.fvalue(pv, v443)) !== l5.value ? (v444 = l156.fvalue(pv, v444, "    ")) : l5.value);
4044                     (function(){
4045                         return (function(){
4046                             while((function(){
4047                                 var x1 = v445;
4048                                 if (typeof x1 !== 'number') throw 'Not a number!';
4049                                 var x2 = v446;
4050                                 if (typeof x2 !== 'number') throw 'Not a number!';
4051                                 return (x1<x2?l4.value: l5.value);
4052                             })() !== l5.value){
4053                                 (function(v447){
4054                                     return (v444 = l156.fvalue(pv, v444, v447));
4055                                 })(((l88.fvalue(pv, (function(){
4056                                     var string = v443;
4057                                     var index = v445;
4058                                     if (typeof string != 'string')
4059                                         throw 'The value ' + string + ' is not a type string.';
4060                                     if (typeof index != 'number')
4061                                         throw 'The value ' + index + ' is not a type number.';
4062                                     return string.charCodeAt(index);
4063                                 })(), 10) !== l5.value ? ((function(){
4064                                     var x1 = v445;
4065                                     if (typeof x1 !== 'number') throw 'Not a number!';
4066                                     var x2 = l25.fvalue(pv, v446);
4067                                     if (typeof x2 !== 'number') throw 'Not a number!';
4068                                     return (x1<x2?l4.value: l5.value);
4069                                 })() !== l5.value ? l29.fvalue(pv, l88.fvalue(pv, (function(){
4070                                     var string = v443;
4071                                     var index = l24.fvalue(pv, v445);
4072                                     if (typeof string != 'string')
4073                                         throw 'The value ' + string + ' is not a type string.';
4074                                     if (typeof index != 'number')
4075                                         throw 'The value ' + index + ' is not a type number.';
4076                                     return string.charCodeAt(index);
4077                                 })(), 10)) : l5.value) : l5.value) !== l5.value ? l156.fvalue(pv, l106.fvalue(pv, 10), "    ") : l106.fvalue(pv, (function(){
4078                                     var string = v443;
4079                                     var index = v445;
4080                                     if (typeof string != 'string')
4081                                         throw 'The value ' + string + ' is not a type string.';
4082                                     if (typeof index != 'number')
4083                                         throw 'The value ' + index + ' is not a type number.';
4084                                     return string.charCodeAt(index);
4085                                 })())));
4086                                 (v445 = (function(){
4087                                     var x1 = v445;
4088                                     if (typeof x1 !== 'number') throw 'Not a number!';
4089                                     return x1+1;
4090                                 })());
4091                             }return l5.value;
4092                         })();
4093                     })();
4094                     return v444;
4095                 })("",0,l75.fvalue(pv, v443));
4096             })((function(){
4097                 var f = (function(){
4098                     var symbol = l190;
4099                     var func = symbol.fvalue;
4100                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4101                     return func;
4102                 })();
4103                 var args = [pv];
4104                 var tail = (v442);
4105                 while (tail != l5.value){
4106                     args.push(tail.car);
4107                     tail = tail.cdr;
4108                 }
4109                 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
4110             })());
4111         })();
4112     }));
4113     return l194;
4114 })();
4115 var l195 = {name: "*MULTIPLE-VALUE-P*"};
4116 (function(){
4117     (((l195.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l195).value = l5.value));
4118     return l195;
4119 })();
4120 var l196 = {name: "MAKE-BINDING"};
4121 (function(){
4122     (l196).fvalue = (function(v453){
4123         ((v453)["fname"] = "MAKE-BINDING");
4124         return v453;
4125     })((function (values,v449,v450,v451,v452){
4126         checkArgsAtLeast(arguments, 4);
4127         checkArgsAtMost(arguments, 5);
4128         var v452;
4129         switch(arguments.length-1){
4130         case 3:
4131             v452=l5.value;
4132         default: break;
4133         }
4134         return (function(){
4135             return l47.fvalue(values, v449, v450, v451, v452);
4136         })();
4137     }));
4138     return l196;
4139 })();
4140 var l197 = {name: "BINDING-NAME"};
4141 (function(){
4142     (l197).fvalue = (function(v455){
4143         ((v455)["fname"] = "BINDING-NAME");
4144         return v455;
4145     })((function (values,v454){
4146         checkArgs(arguments, 2);
4147         return (function(){
4148             return l42.fvalue(values, v454);
4149         })();
4150     }));
4151     return l197;
4152 })();
4153 var l198 = {name: "BINDING-TYPE"};
4154 (function(){
4155     (l198).fvalue = (function(v457){
4156         ((v457)["fname"] = "BINDING-TYPE");
4157         return v457;
4158     })((function (values,v456){
4159         checkArgs(arguments, 2);
4160         return (function(){
4161             return l43.fvalue(values, v456);
4162         })();
4163     }));
4164     return l198;
4165 })();
4166 var l199 = {name: "BINDING-VALUE"};
4167 (function(){
4168     (l199).fvalue = (function(v459){
4169         ((v459)["fname"] = "BINDING-VALUE");
4170         return v459;
4171     })((function (values,v458){
4172         checkArgs(arguments, 2);
4173         return (function(){
4174             return l44.fvalue(values, v458);
4175         })();
4176     }));
4177     return l199;
4178 })();
4179 var l200 = {name: "BINDING-DECLARATIONS"};
4180 (function(){
4181     (l200).fvalue = (function(v461){
4182         ((v461)["fname"] = "BINDING-DECLARATIONS");
4183         return v461;
4184     })((function (values,v460){
4185         checkArgs(arguments, 2);
4186         return (function(){
4187             return l45.fvalue(values, v460);
4188         })();
4189     }));
4190     return l200;
4191 })();
4192 var l201 = {name: "SET-BINDING-VALUE"};
4193 (function(){
4194     (l201).fvalue = (function(v464){
4195         ((v464)["fname"] = "SET-BINDING-VALUE");
4196         return v464;
4197     })((function (values,v462,v463){
4198         checkArgs(arguments, 3);
4199         return (function(){
4200             return (function(){
4201                 var x = l37.fvalue(pv, v462);
4202                 if (typeof x != 'object')
4203                     throw 'The value ' + x + ' is not a type object.';
4204                 return (x.car = v463, x);
4205             })();
4206         })();
4207     }));
4208     return l201;
4209 })();
4210 var l202 = {name: "SET-BINDING-DECLARATIONS"};
4211 (function(){
4212     (l202).fvalue = (function(v467){
4213         ((v467)["fname"] = "SET-BINDING-DECLARATIONS");
4214         return v467;
4215     })((function (values,v465,v466){
4216         checkArgs(arguments, 3);
4217         return (function(){
4218             return (function(){
4219                 var x = l40.fvalue(pv, v465);
4220                 if (typeof x != 'object')
4221                     throw 'The value ' + x + ' is not a type object.';
4222                 return (x.car = v466, x);
4223             })();
4224         })();
4225     }));
4226     return l202;
4227 })();
4228 var l203 = {name: "PUSH-BINDING-DECLARATION"};
4229 (function(){
4230     (l203).fvalue = (function(v470){
4231         ((v470)["fname"] = "PUSH-BINDING-DECLARATION");
4232         return v470;
4233     })((function (values,v468,v469){
4234         checkArgs(arguments, 3);
4235         return (function(){
4236             return l202.fvalue(values, v469, ({car: v468, cdr: l200.fvalue(pv, v469)}));
4237         })();
4238     }));
4239     return l203;
4240 })();
4241 var l204 = {name: "MAKE-LEXENV"};
4242 (function(){
4243     (l204).fvalue = (function(v471){
4244         ((v471)["fname"] = "MAKE-LEXENV");
4245         return v471;
4246     })((function (values){
4247         checkArgsAtMost(arguments, 1);
4248         return (function(){
4249             return l47.fvalue(values, l5.value, l5.value, l5.value, l5.value);
4250         })();
4251     }));
4252     return l204;
4253 })();
4254 var l205 = {name: "COPY-LEXENV"};
4255 (function(){
4256     (l205).fvalue = (function(v473){
4257         ((v473)["fname"] = "COPY-LEXENV");
4258         return v473;
4259     })((function (values,v472){
4260         checkArgs(arguments, 2);
4261         return (function(){
4262             return l84.fvalue(values, v472);
4263         })();
4264     }));
4265     return l205;
4266 })();
4267 var l206 = {name: "PUSH-TO-LEXENV"};
4268 var l207 = {name: "BLOCK"};
4269 var l208 = {name: "GOTAG"};
4270 (function(){
4271     (l206).fvalue = (function(v478){
4272         ((v478)["fname"] = "PUSH-TO-LEXENV");
4273         return v478;
4274     })((function (values,v474,v475,v476){
4275         checkArgs(arguments, 4);
4276         return (function(){
4277             return (function(v477){
4278                 return (l28.fvalue(pv, v477, l113) !== l5.value ? (function(){
4279                     var x = v475;
4280                     if (typeof x != 'object')
4281                         throw 'The value ' + x + ' is not a type object.';
4282                     return (x.car = ({car: v474, cdr: (function(){
4283                         var tmp = v475;
4284                         return tmp === l5.value? l5.value: tmp.car;
4285                     })()}), x);
4286                 })() : (l28.fvalue(pv, v477, l112) !== l5.value ? (function(){
4287                     var x = (function(){
4288                         var tmp = v475;
4289                         return tmp === l5.value? l5.value: tmp.cdr;
4290                     })();
4291                     if (typeof x != 'object')
4292                         throw 'The value ' + x + ' is not a type object.';
4293                     return (x.car = ({car: v474, cdr: l35.fvalue(pv, v475)}), x);
4294                 })() : (l28.fvalue(pv, v477, l207) !== l5.value ? (function(){
4295                     var x = l37.fvalue(pv, v475);
4296                     if (typeof x != 'object')
4297                         throw 'The value ' + x + ' is not a type object.';
4298                     return (x.car = ({car: v474, cdr: l39.fvalue(pv, v475)}), x);
4299                 })() : (l28.fvalue(pv, v477, l208) !== l5.value ? (function(){
4300                     var x = l40.fvalue(pv, v475);
4301                     if (typeof x != 'object')
4302                         throw 'The value ' + x + ' is not a type object.';
4303                     return (x.car = ({car: v474, cdr: l41.fvalue(pv, v475)}), x);
4304                 })() : (function(){
4305                     throw "ECASE expression failed.";
4306                 })()))));
4307             })(v476);
4308         })();
4309     }));
4310     return l206;
4311 })();
4312 var l209 = {name: "EXTEND-LEXENV"};
4313 (function(){
4314     (l209).fvalue = (function(v485){
4315         ((v485)["fname"] = "EXTEND-LEXENV");
4316         return v485;
4317     })((function (values,v479,v480,v481){
4318         checkArgs(arguments, 4);
4319         return (function(){
4320             return (function(v482){
4321                 return (function(){
4322                     return (function(v483,v484){
4323                         (function(){
4324                             while(v483 !== l5.value){
4325                                 (v484 = (function(){
4326                                     var tmp = v483;
4327                                     return tmp === l5.value? l5.value: tmp.car;
4328                                 })());
4329                                 (function(){
4330                                     l206.fvalue(pv, v484, v482, v481);
4331                                     return l5.value;
4332                                 })();
4333                                 (v483 = (function(){
4334                                     var tmp = v483;
4335                                     return tmp === l5.value? l5.value: tmp.cdr;
4336                                 })());
4337                             }return l5.value;
4338                         })();
4339                         return v482;
4340                     })(l70.fvalue(pv, v479),l5.value);
4341                 })();
4342             })(l205.fvalue(pv, v480));
4343         })();
4344     }));
4345     return l209;
4346 })();
4347 var l210 = {name: "LOOKUP-IN-LEXENV"};
4348 (function(){
4349     (l210).fvalue = (function(v490){
4350         ((v490)["fname"] = "LOOKUP-IN-LEXENV");
4351         return v490;
4352     })((function (values,v486,v487,v488){
4353         checkArgs(arguments, 4);
4354         return (function(){
4355             return l105.fvalue(values, v486, (function(v489){
4356                 return (l28.fvalue(pv, v489, l113) !== l5.value ? l42.fvalue(pv, v487) : (l28.fvalue(pv, v489, l112) !== l5.value ? l43.fvalue(pv, v487) : (l28.fvalue(pv, v489, l207) !== l5.value ? l44.fvalue(pv, v487) : (l28.fvalue(pv, v489, l208) !== l5.value ? l45.fvalue(pv, v487) : (function(){
4357                     throw "ECASE expression failed.";
4358                 })()))));
4359             })(v488));
4360         })();
4361     }));
4362     return l210;
4363 })();
4364 var l211 = {name: "*ENVIRONMENT*"};
4365 (function(){
4366     (((l211.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l211).value = l204.fvalue(pv)));
4367     return l211;
4368 })();
4369 var l212 = {name: "*VARIABLE-COUNTER*"};
4370 (function(){
4371     (((l212.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l212).value = 0));
4372     return l212;
4373 })();
4374 var l213 = {name: "GVARNAME"};
4375 (function(){
4376     (l213).fvalue = (function(v492){
4377         ((v492)["fname"] = "GVARNAME");
4378         return v492;
4379     })((function (values,v491){
4380         checkArgs(arguments, 2);
4381         return (function(){
4382             return l190.fvalue(values, "v", ((l212).value = (function(){
4383                 var x1 = (function(){
4384                     var symbol = l212;
4385                     var value = symbol.value;
4386                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4387                     return value;
4388                 })();
4389                 if (typeof x1 !== 'number') throw 'Not a number!';
4390                 return x1+1;
4391             })()));
4392         })();
4393     }));
4394     return l213;
4395 })();
4396 var l214 = {name: "TRANSLATE-VARIABLE"};
4397 (function(){
4398     (l214).fvalue = (function(v494){
4399         ((v494)["fname"] = "TRANSLATE-VARIABLE");
4400         return v494;
4401     })((function (values,v493){
4402         checkArgs(arguments, 2);
4403         return (function(){
4404             return l199.fvalue(values, l210.fvalue(pv, v493, (function(){
4405                 var symbol = l211;
4406                 var value = symbol.value;
4407                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4408                 return value;
4409             })(), l113));
4410         })();
4411     }));
4412     return l214;
4413 })();
4414 var l215 = {name: "EXTEND-LOCAL-ENV"};
4415 (function(){
4416     (l215).fvalue = (function(v500){
4417         ((v500)["fname"] = "EXTEND-LOCAL-ENV");
4418         return v500;
4419     })((function (values,v495){
4420         checkArgs(arguments, 2);
4421         return (function(){
4422             return (function(v496){
4423                 return (function(){
4424                     return (function(v497,v498){
4425                         (function(){
4426                             while(v497 !== l5.value){
4427                                 (v498 = (function(){
4428                                     var tmp = v497;
4429                                     return tmp === l5.value? l5.value: tmp.car;
4430                                 })());
4431                                 (function(){
4432                                     (function(v499){
4433                                         return l206.fvalue(pv, v499, v496, l113);
4434                                     })(l196.fvalue(pv, v498, l113, l213.fvalue(pv, v498)));
4435                                     return l5.value;
4436                                 })();
4437                                 (v497 = (function(){
4438                                     var tmp = v497;
4439                                     return tmp === l5.value? l5.value: tmp.cdr;
4440                                 })());
4441                             }return l5.value;
4442                         })();
4443                         return v496;
4444                     })(v495,l5.value);
4445                 })();
4446             })(l205.fvalue(pv, (function(){
4447                 var symbol = l211;
4448                 var value = symbol.value;
4449                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4450                 return value;
4451             })()));
4452         })();
4453     }));
4454     return l215;
4455 })();
4456 var l216 = {name: "*TOPLEVEL-COMPILATIONS*"};
4457 (function(){
4458     (((l216.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l216).value = l5.value));
4459     return l216;
4460 })();
4461 var l217 = {name: "TOPLEVEL-COMPILATION"};
4462 (function(){
4463     (l217).fvalue = (function(v504){
4464         ((v504)["fname"] = "TOPLEVEL-COMPILATION");
4465         return v504;
4466     })((function (values,v501){
4467         checkArgs(arguments, 2);
4468         return (function(){
4469             return (function(){
4470                 var v502 = v501;
4471                 var v503 = ({car: v502, cdr: (function(){
4472                     var symbol = l216;
4473                     var value = symbol.value;
4474                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4475                     return value;
4476                 })()});
4477                 return ((l216).value = v503);
4478             })();
4479         })();
4480     }));
4481     return l217;
4482 })();
4483 var l218 = {name: "NULL-OR-EMPTY-P"};
4484 (function(){
4485     (l218).fvalue = (function(v506){
4486         ((v506)["fname"] = "NULL-OR-EMPTY-P");
4487         return v506;
4488     })((function (values,v505){
4489         checkArgs(arguments, 2);
4490         return (function(){
4491             return l26.fvalue(values, l75.fvalue(pv, v505));
4492         })();
4493     }));
4494     return l218;
4495 })();
4496 var l219 = {name: "GET-TOPLEVEL-COMPILATIONS"};
4497 (function(){
4498     (l219).fvalue = (function(v507){
4499         ((v507)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
4500         return v507;
4501     })((function (values){
4502         checkArgsAtMost(arguments, 1);
4503         return (function(){
4504             return l70.fvalue(values, l98.fvalue(pv, (function(){
4505                 var symbol = l218;
4506                 var func = symbol.fvalue;
4507                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4508                 return func;
4509             })(), (function(){
4510                 var symbol = l216;
4511                 var value = symbol.value;
4512                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4513                 return value;
4514             })()));
4515         })();
4516     }));
4517     return l219;
4518 })();
4519 var l220 = {name: "%COMPILE-DEFMACRO"};
4520 var l221 = {name: "MACRO"};
4521 (function(){
4522     (l220).fvalue = (function(v510){
4523         ((v510)["fname"] = "%COMPILE-DEFMACRO");
4524         return v510;
4525     })((function (values,v508,v509){
4526         checkArgs(arguments, 3);
4527         return (function(){
4528             l217.fvalue(pv, l192.fvalue(pv, l47.fvalue(pv, l185, v508)));
4529             l206.fvalue(pv, l196.fvalue(pv, v508, l221, v509), (function(){
4530                 var symbol = l211;
4531                 var value = symbol.value;
4532                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4533                 return value;
4534             })(), l112);
4535             return v508;
4536         })();
4537     }));
4538     return l220;
4539 })();
4540 var l222 = {name: "GLOBAL-BINDING"};
4541 (function(){
4542     (l222).fvalue = (function(v516){
4543         ((v516)["fname"] = "GLOBAL-BINDING");
4544         return v516;
4545     })((function (values,v511,v512,v513){
4546         checkArgs(arguments, 4);
4547         return (function(){
4548             return (function(v514){
4549                 return (v514 !== l5.value ? v514 : (function(v515){
4550                     l206.fvalue(pv, v515, (function(){
4551                         var symbol = l211;
4552                         var value = symbol.value;
4553                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4554                         return value;
4555                     })(), v513);
4556                     return v515;
4557                 })(l196.fvalue(pv, v511, v512, l5.value)));
4558             })(l210.fvalue(pv, v511, (function(){
4559                 var symbol = l211;
4560                 var value = symbol.value;
4561                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4562                 return value;
4563             })(), v513));
4564         })();
4565     }));
4566     return l222;
4567 })();
4568 var l223 = {name: "CLAIMP"};
4569 (function(){
4570     (l223).fvalue = (function(v521){
4571         ((v521)["fname"] = "CLAIMP");
4572         return v521;
4573     })((function (values,v517,v518,v519){
4574         checkArgs(arguments, 4);
4575         return (function(){
4576             return (function(v520){
4577                 return (v520 !== l5.value ? l96.fvalue(values, v519, l200.fvalue(pv, v520)) : l5.value);
4578             })(l210.fvalue(pv, v517, (function(){
4579                 var symbol = l211;
4580                 var value = symbol.value;
4581                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4582                 return value;
4583             })(), v518));
4584         })();
4585     }));
4586     return l223;
4587 })();
4588 var l224 = {name: "!PROCLAIM"};
4589 var l225 = {name: "SPECIAL"};
4590 var l226 = {name: "NOTINLINE"};
4591 var l227 = {name: "CONSTANT"};
4592 (function(){
4593     (l224).fvalue = (function(v533){
4594         ((v533)["fname"] = "!PROCLAIM");
4595         return v533;
4596     })((function (values,v522){
4597         checkArgs(arguments, 2);
4598         return (function(){
4599             return (function(v523){
4600                 return (l28.fvalue(pv, v523, l225) !== l5.value ? (function(){
4601                     return (function(v524,v525){
4602                         (function(){
4603                             while(v524 !== l5.value){
4604                                 (v525 = (function(){
4605                                     var tmp = v524;
4606                                     return tmp === l5.value? l5.value: tmp.car;
4607                                 })());
4608                                 (function(){
4609                                     (function(v526){
4610                                         return l203.fvalue(pv, l225, v526);
4611                                     })(l222.fvalue(pv, v525, l113, l113));
4612                                     return l5.value;
4613                                 })();
4614                                 (v524 = (function(){
4615                                     var tmp = v524;
4616                                     return tmp === l5.value? l5.value: tmp.cdr;
4617                                 })());
4618                             }return l5.value;
4619                         })();
4620                         return l5.value;
4621                     })((function(){
4622                         var tmp = v522;
4623                         return tmp === l5.value? l5.value: tmp.cdr;
4624                     })(),l5.value);
4625                 })() : (l28.fvalue(pv, v523, l226) !== l5.value ? (function(){
4626                     return (function(v527,v528){
4627                         (function(){
4628                             while(v527 !== l5.value){
4629                                 (v528 = (function(){
4630                                     var tmp = v527;
4631                                     return tmp === l5.value? l5.value: tmp.car;
4632                                 })());
4633                                 (function(){
4634                                     (function(v529){
4635                                         return l203.fvalue(pv, l226, v529);
4636                                     })(l222.fvalue(pv, v528, l112, l112));
4637                                     return l5.value;
4638                                 })();
4639                                 (v527 = (function(){
4640                                     var tmp = v527;
4641                                     return tmp === l5.value? l5.value: tmp.cdr;
4642                                 })());
4643                             }return l5.value;
4644                         })();
4645                         return l5.value;
4646                     })((function(){
4647                         var tmp = v522;
4648                         return tmp === l5.value? l5.value: tmp.cdr;
4649                     })(),l5.value);
4650                 })() : (l28.fvalue(pv, v523, l227) !== l5.value ? (function(){
4651                     return (function(v530,v531){
4652                         (function(){
4653                             while(v530 !== l5.value){
4654                                 (v531 = (function(){
4655                                     var tmp = v530;
4656                                     return tmp === l5.value? l5.value: tmp.car;
4657                                 })());
4658                                 (function(){
4659                                     (function(v532){
4660                                         return l203.fvalue(pv, l227, v532);
4661                                     })(l222.fvalue(pv, v531, l113, l113));
4662                                     return l5.value;
4663                                 })();
4664                                 (v530 = (function(){
4665                                     var tmp = v530;
4666                                     return tmp === l5.value? l5.value: tmp.cdr;
4667                                 })());
4668                             }return l5.value;
4669                         })();
4670                         return l5.value;
4671                     })((function(){
4672                         var tmp = v522;
4673                         return tmp === l5.value? l5.value: tmp.cdr;
4674                     })(),l5.value);
4675                 })() : l5.value)));
4676             })((function(){
4677                 var tmp = v522;
4678                 return tmp === l5.value? l5.value: tmp.car;
4679             })());
4680         })();
4681     }));
4682     return l224;
4683 })();
4684 var l228 = {name: "PROCLAIM"};
4685 (l228).fvalue = (function(){
4686     var symbol = l224;
4687     var func = symbol.fvalue;
4688     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4689     return func;
4690 })();
4691 var l229 = {name: "*COMPILATIONS*"};
4692 (function(){
4693     (((l229.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l229).value = l5.value));
4694     return l229;
4695 })();
4696 var l230 = {name: "DEFINE-COMPILATION"};
4697 l230;
4698 var l231 = {name: "IF"};
4699 (function(){
4700     var v534 = l47.fvalue(pv, l231, (function (values,v535,v536,v537){
4701         checkArgs(arguments, 4);
4702         return (function(){
4703             return l190.fvalue(values, "(", l192.fvalue(pv, v535), " !== ", l192.fvalue(pv, l5.value), " ? ", l192.fvalue(pv, v536, (function(){
4704                 var symbol = l195;
4705                 var value = symbol.value;
4706                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4707                 return value;
4708             })()), " : ", l192.fvalue(pv, v537, (function(){
4709                 var symbol = l195;
4710                 var value = symbol.value;
4711                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4712                 return value;
4713             })()), ")");
4714         })();
4715     }));
4716     var v538 = ({car: v534, cdr: (function(){
4717         var symbol = l229;
4718         var value = symbol.value;
4719         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4720         return value;
4721     })()});
4722     return ((l229).value = v538);
4723 })();
4724 var l232 = {name: "*LL-KEYWORDS*"};
4725 var l233 = {name: "&OPTIONAL"};
4726 var l234 = {name: "&REST"};
4727 var l235 = {name: "&KEY"};
4728 var l236 = QIList(l233,l234,l235,l5);
4729 (function(){
4730     (((l232.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l232).value = l236));
4731     return l232;
4732 })();
4733 var l237 = {name: "LIST-UNTIL-KEYWORD"};
4734 (function(){
4735     (l237).fvalue = (function(v541){
4736         ((v541)["fname"] = "LIST-UNTIL-KEYWORD");
4737         return v541;
4738     })((function (values,v539){
4739         checkArgs(arguments, 2);
4740         return (function(){
4741             return ((function(v540){
4742                 return (v540 !== l5.value ? v540 : l96.fvalue(pv, (function(){
4743                     var tmp = v539;
4744                     return tmp === l5.value? l5.value: tmp.car;
4745                 })(), (function(){
4746                     var symbol = l232;
4747                     var value = symbol.value;
4748                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4749                     return value;
4750                 })()));
4751             })(l13.fvalue(pv, v539)) !== l5.value ? l5.value : ({car: (function(){
4752                 var tmp = v539;
4753                 return tmp === l5.value? l5.value: tmp.car;
4754             })(), cdr: l237.fvalue(pv, (function(){
4755                 var tmp = v539;
4756                 return tmp === l5.value? l5.value: tmp.cdr;
4757             })())}));
4758         })();
4759     }));
4760     return l237;
4761 })();
4762 var l238 = {name: "LL-SECTION"};
4763 (function(){
4764     (l238).fvalue = (function(v544){
4765         ((v544)["fname"] = "LL-SECTION");
4766         return v544;
4767     })((function (values,v542,v543){
4768         checkArgs(arguments, 3);
4769         return (function(){
4770             return l237.fvalue(values, (function(){
4771                 var tmp = l96.fvalue(pv, v542, v543);
4772                 return tmp === l5.value? l5.value: tmp.cdr;
4773             })());
4774         })();
4775     }));
4776     return l238;
4777 })();
4778 var l239 = {name: "LL-REQUIRED-ARGUMENTS"};
4779 (function(){
4780     (l239).fvalue = (function(v546){
4781         ((v546)["fname"] = "LL-REQUIRED-ARGUMENTS");
4782         return v546;
4783     })((function (values,v545){
4784         checkArgs(arguments, 2);
4785         return (function(){
4786             return l237.fvalue(values, v545);
4787         })();
4788     }));
4789     return l239;
4790 })();
4791 var l240 = {name: "LL-OPTIONAL-ARGUMENTS-CANONICAL"};
4792 (function(){
4793     (l240).fvalue = (function(v548){
4794         ((v548)["fname"] = "LL-OPTIONAL-ARGUMENTS-CANONICAL");
4795         return v548;
4796     })((function (values,v547){
4797         checkArgs(arguments, 2);
4798         return (function(){
4799             return l81.fvalue(values, (function(){
4800                 var symbol = l61;
4801                 var func = symbol.fvalue;
4802                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4803                 return func;
4804             })(), l238.fvalue(pv, l233, v547));
4805         })();
4806     }));
4807     return l240;
4808 })();
4809 var l241 = {name: "LL-OPTIONAL-ARGUMENTS"};
4810 (function(){
4811     (l241).fvalue = (function(v550){
4812         ((v550)["fname"] = "LL-OPTIONAL-ARGUMENTS");
4813         return v550;
4814     })((function (values,v549){
4815         checkArgs(arguments, 2);
4816         return (function(){
4817             return l81.fvalue(values, (function(){
4818                 var symbol = l32;
4819                 var func = symbol.fvalue;
4820                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4821                 return func;
4822             })(), l240.fvalue(pv, v549));
4823         })();
4824     }));
4825     return l241;
4826 })();
4827 var l242 = {name: "LL-REST-ARGUMENT"};
4828 (function(){
4829     (l242).fvalue = (function(v553){
4830         ((v553)["fname"] = "LL-REST-ARGUMENT");
4831         return v553;
4832     })((function (values,v551){
4833         checkArgs(arguments, 2);
4834         return (function(){
4835             return (function(v552){
4836                 ((function(){
4837                     var tmp = v552;
4838                     return tmp === l5.value? l5.value: tmp.cdr;
4839                 })() !== l5.value ? (function(){
4840                     throw "Bad lambda-list";
4841                 })() : l5.value);
4842                 return (function(){
4843                     var tmp = v552;
4844                     return tmp === l5.value? l5.value: tmp.car;
4845                 })();
4846             })(l238.fvalue(pv, l234, v551));
4847         })();
4848     }));
4849     return l242;
4850 })();
4851 var l243 = {name: "LL-KEYWORD-ARGUMENTS-CANONICAL"};
4852 (function(){
4853     (l243).fvalue = (function(v558){
4854         ((v558)["fname"] = "LL-KEYWORD-ARGUMENTS-CANONICAL");
4855         return v558;
4856     })((function (values,v554){
4857         checkArgs(arguments, 2);
4858         return (function(){
4859             return (function(v557){
4860                 return l81.fvalue(values, v557, l238.fvalue(pv, l235, v554));
4861             })((function (values,v555){
4862                 checkArgs(arguments, 2);
4863                 return (function(v556){
4864                     return ({car: (l62.fvalue(pv, (function(){
4865                         var tmp = v556;
4866                         return tmp === l5.value? l5.value: tmp.car;
4867                     })()) !== l5.value ? (function(){
4868                         var tmp = v556;
4869                         return tmp === l5.value? l5.value: tmp.car;
4870                     })() : l47.fvalue(pv, l152.fvalue(pv, ((function(){
4871                         var tmp = v556;
4872                         return tmp === l5.value? l5.value: tmp.car;
4873                     })()).name, "KEYWORD"), (function(){
4874                         var tmp = v556;
4875                         return tmp === l5.value? l5.value: tmp.car;
4876                     })())), cdr: (function(){
4877                         var tmp = v556;
4878                         return tmp === l5.value? l5.value: tmp.cdr;
4879                     })()});
4880                 })(l61.fvalue(pv, v555));
4881             }));
4882         })();
4883     }));
4884     return l243;
4885 })();
4886 var l244 = {name: "LL-KEYWORD-ARGUMENTS"};
4887 (function(){
4888     (l244).fvalue = (function(v561){
4889         ((v561)["fname"] = "LL-KEYWORD-ARGUMENTS");
4890         return v561;
4891     })((function (values,v559){
4892         checkArgs(arguments, 2);
4893         return (function(){
4894             return l81.fvalue(values, (function (values,v560){
4895                 checkArgs(arguments, 2);
4896                 return l43.fvalue(values, l42.fvalue(pv, v560));
4897             }), l243.fvalue(pv, v559));
4898         })();
4899     }));
4900     return l244;
4901 })();
4902 var l245 = {name: "LL-SVARS"};
4903 (function(){
4904     (l245).fvalue = (function(v564){
4905         ((v564)["fname"] = "LL-SVARS");
4906         return v564;
4907     })((function (values,v562){
4908         checkArgs(arguments, 2);
4909         return (function(){
4910             return (function(v563){
4911                 return l97.fvalue(values, l5.value, l81.fvalue(pv, (function(){
4912                     var symbol = l44;
4913                     var func = symbol.fvalue;
4914                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4915                     return func;
4916                 })(), v563));
4917             })(l68.fvalue(pv, l243.fvalue(pv, v562), l240.fvalue(pv, v562)));
4918         })();
4919     }));
4920     return l245;
4921 })();
4922 var l246 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
4923 (function(){
4924     (l246).fvalue = (function(v567){
4925         ((v567)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
4926         return v567;
4927     })((function (values,v566){
4928         checkArgsAtLeast(arguments, 2);
4929         var v565= l5.value;
4930         for (var i = arguments.length-1; i>=2; i--)
4931             v565 = {car: arguments[i], cdr:
4932         v565};
4933         return (function(){
4934             return (v566 !== l5.value ? l190.fvalue(values, "(function(){", (function(){
4935                 var symbol = l155;
4936                 var value = symbol.value;
4937                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4938                 return value;
4939             })(), l194.fvalue(pv, "var func = ", l158.fvalue(pv, v565), ";", (function(){
4940                 var symbol = l155;
4941                 var value = symbol.value;
4942                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4943                 return value;
4944             })(), "func.docstring = '", v566, "';", (function(){
4945                 var symbol = l155;
4946                 var value = symbol.value;
4947                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4948                 return value;
4949             })(), "return func;", (function(){
4950                 var symbol = l155;
4951                 var value = symbol.value;
4952                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4953                 return value;
4954             })()), "})()") : (function(){
4955                 var f = (function(){
4956                     var symbol = l190;
4957                     var func = symbol.fvalue;
4958                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4959                     return func;
4960                 })();
4961                 var args = [values];
4962                 var tail = (v565);
4963                 while (tail != l5.value){
4964                     args.push(tail.car);
4965                     tail = tail.cdr;
4966                 }
4967                 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
4968             })());
4969         })();
4970     }));
4971     return l246;
4972 })();
4973 var l247 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"};
4974 var l248 = {name: "N/A"};
4975 (function(){
4976     (l247).fvalue = (function(v573){
4977         ((v573)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT");
4978         return v573;
4979     })((function (values,v568,v569,v570){
4980         checkArgs(arguments, 4);
4981         return (function(){
4982             return (function(v571,v572){
4983                 return (function(){
4984                     try {
4985                         (((function(){
4986                             var x1 = v571;
4987                             if (typeof x1 !== 'number') throw 'Not a number!';
4988                             return (1<x1?l4.value: l5.value);
4989                         })() !== l5.value ? l28.fvalue(pv, v571, v572) : l5.value) !== l5.value ? (function(){
4990                             var values = mv;
4991                             throw ({type: 'block', id: 207, values: l190.fvalue(values, "checkArgs(arguments, ", v571, ");", (function(){
4992                                 var symbol = l155;
4993                                 var value = symbol.value;
4994                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4995                                 return value;
4996                             })()), message: 'Return from unknown block NIL.'})
4997                         })() : l5.value);
4998                         return l190.fvalue(values, ((function(){
4999                             var x1 = v571;
5000                             if (typeof x1 !== 'number') throw 'Not a number!';
5001                             return (1<x1?l4.value: l5.value);
5002                         })() !== l5.value ? l190.fvalue(pv, "checkArgsAtLeast(arguments, ", v571, ");", (function(){
5003                             var symbol = l155;
5004                             var value = symbol.value;
5005                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5006                             return value;
5007                         })()) : l5.value), (((typeof (v572) == "number")?l4.value: l5.value) !== l5.value ? l190.fvalue(pv, "checkArgsAtMost(arguments, ", v572, ");", (function(){
5008                             var symbol = l155;
5009                             var value = symbol.value;
5010                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5011                             return value;
5012                         })()) : l5.value));
5013                     }
5014                     catch (cf){
5015                         if (cf.type == 'block' && cf.id == 207)
5016                             return values.apply(this, forcemv(cf.values));
5017                         else
5018                             throw cf;
5019                     }
5020                 })();
5021             })(l24.fvalue(pv, v568),(v570 !== l5.value ? l248 : (function(){
5022                 var x1 = v568;
5023                 if (typeof x1 !== 'number') throw 'Not a number!';
5024                 var x2 = v569;
5025                 if (typeof x2 !== 'number') throw 'Not a number!';
5026                 return 1+x1+x2;
5027             })()));
5028         })();
5029     }));
5030     return l247;
5031 })();
5032 var l249 = {name: "COMPILE-LAMBDA-OPTIONAL"};
5033 (function(){
5034     (l249).fvalue = (function(v586){
5035         ((v586)["fname"] = "COMPILE-LAMBDA-OPTIONAL");
5036         return v586;
5037     })((function (values,v574){
5038         checkArgs(arguments, 2);
5039         return (function(){
5040             return (function(){
5041                 var v575 = l240.fvalue(pv, v574);
5042                 var v576 = l75.fvalue(pv, l239.fvalue(pv, v574));
5043                 var v577 = l75.fvalue(pv, v575);
5044                 return (v575 !== l5.value ? l190.fvalue(values, l160.fvalue(pv, (function (values,v578){
5045                     checkArgs(arguments, 2);
5046                     return l190.fvalue(values, "var ", l214.fvalue(pv, l42.fvalue(pv, v578)), "; ", (function(){
5047                         var symbol = l155;
5048                         var value = symbol.value;
5049                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5050                         return value;
5051                     })(), (l44.fvalue(pv, v578) !== l5.value ? l190.fvalue(pv, "var ", l214.fvalue(pv, l44.fvalue(pv, v578)), " = ", l192.fvalue(pv, l4.value), "; ", (function(){
5052                         var symbol = l155;
5053                         var value = symbol.value;
5054                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5055                         return value;
5056                     })()) : l5.value));
5057                 }), v575), "switch(arguments.length-1){", (function(){
5058                     var symbol = l155;
5059                     var value = symbol.value;
5060                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5061                     return value;
5062                 })(), (function(v579,v580){
5063                     return (function(){
5064                         (function(){
5065                             return (function(){
5066                                 while((function(){
5067                                     var x1 = v580;
5068                                     if (typeof x1 !== 'number') throw 'Not a number!';
5069                                     var x2 = v577;
5070                                     if (typeof x2 !== 'number') throw 'Not a number!';
5071                                     return (x1<x2?l4.value: l5.value);
5072                                 })() !== l5.value){
5073                                     (function(v581){
5074                                         (function(){
5075                                             var v582 = l190.fvalue(pv, "case ", (function(){
5076                                                 var x1 = v580;
5077                                                 if (typeof x1 !== 'number') throw 'Not a number!';
5078                                                 var x2 = v576;
5079                                                 if (typeof x2 !== 'number') throw 'Not a number!';
5080                                                 return x1+x2;
5081                                             })(), ":", (function(){
5082                                                 var symbol = l155;
5083                                                 var value = symbol.value;
5084                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5085                                                 return value;
5086                                             })(), l194.fvalue(pv, l214.fvalue(pv, (function(){
5087                                                 var tmp = v581;
5088                                                 return tmp === l5.value? l5.value: tmp.car;
5089                                             })()), "=", l192.fvalue(pv, l35.fvalue(pv, v581)), ";", (function(){
5090                                                 var symbol = l155;
5091                                                 var value = symbol.value;
5092                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5093                                                 return value;
5094                                             })()), (l44.fvalue(pv, v581) !== l5.value ? l194.fvalue(pv, l214.fvalue(pv, l44.fvalue(pv, v581)), "=", l192.fvalue(pv, l5.value), ";", (function(){
5095                                                 var symbol = l155;
5096                                                 var value = symbol.value;
5097                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5098                                                 return value;
5099                                             })()) : l5.value));
5100                                             var v583 = ({car: v582, cdr: v579});
5101                                             return (v579 = v583);
5102                                         })();
5103                                         return (v580 = (function(){
5104                                             var x1 = v580;
5105                                             if (typeof x1 !== 'number') throw 'Not a number!';
5106                                             return x1+1;
5107                                         })());
5108                                     })(l93.fvalue(pv, v580, v575));
5109                                 }return l5.value;
5110                             })();
5111                         })();
5112                         (function(){
5113                             var v584 = l190.fvalue(pv, "default: break;", (function(){
5114                                 var symbol = l155;
5115                                 var value = symbol.value;
5116                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5117                                 return value;
5118                             })());
5119                             var v585 = ({car: v584, cdr: v579});
5120                             return (v579 = v585);
5121                         })();
5122                         return l158.fvalue(pv, l70.fvalue(pv, v579));
5123                     })();
5124                 })(l5.value,0), "}", (function(){
5125                     var symbol = l155;
5126                     var value = symbol.value;
5127                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5128                     return value;
5129                 })()) : l5.value);
5130             })();
5131         })();
5132     }));
5133     return l249;
5134 })();
5135 var l250 = {name: "COMPILE-LAMBDA-REST"};
5136 (function(){
5137     (l250).fvalue = (function(v592){
5138         ((v592)["fname"] = "COMPILE-LAMBDA-REST");
5139         return v592;
5140     })((function (values,v587){
5141         checkArgs(arguments, 2);
5142         return (function(){
5143             return (function(v588,v589,v590){
5144                 return (v590 !== l5.value ? (function(v591){
5145                     return l190.fvalue(values, "var ", v591, "= ", l192.fvalue(pv, l5.value), ";", (function(){
5146                         var symbol = l155;
5147                         var value = symbol.value;
5148                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5149                         return value;
5150                     })(), "for (var i = arguments.length-1; i>=", (function(){
5151                         var x1 = v588;
5152                         if (typeof x1 !== 'number') throw 'Not a number!';
5153                         var x2 = v589;
5154                         if (typeof x2 !== 'number') throw 'Not a number!';
5155                         return 1+x1+x2;
5156                     })(), "; i--)", (function(){
5157                         var symbol = l155;
5158                         var value = symbol.value;
5159                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5160                         return value;
5161                     })(), l194.fvalue(pv, v591, " = {car: arguments[i], cdr: "), v591, "};", (function(){
5162                         var symbol = l155;
5163                         var value = symbol.value;
5164                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5165                         return value;
5166                     })());
5167                 })(l214.fvalue(pv, v590)) : l5.value);
5168             })(l75.fvalue(pv, l239.fvalue(pv, v587)),l75.fvalue(pv, l241.fvalue(pv, v587)),l242.fvalue(pv, v587));
5169         })();
5170     }));
5171     return l250;
5172 })();
5173 var l251 = {name: "COMPILE-LAMBDA-PARSE-KEYWORDS"};
5174 (function(){
5175     (l251).fvalue = (function(v603){
5176         ((v603)["fname"] = "COMPILE-LAMBDA-PARSE-KEYWORDS");
5177         return v603;
5178     })((function (values,v593){
5179         checkArgs(arguments, 2);
5180         return (function(){
5181             return (function(v594,v595,v596){
5182                 return l190.fvalue(values, l160.fvalue(pv, (function (values,v597){
5183                     checkArgs(arguments, 2);
5184                     return (function(v598){
5185                         return l190.fvalue(values, "var ", l214.fvalue(pv, v598), "; ", (function(){
5186                             var symbol = l155;
5187                             var value = symbol.value;
5188                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5189                             return value;
5190                         })(), (l44.fvalue(pv, v597) !== l5.value ? l190.fvalue(pv, "var ", l214.fvalue(pv, l44.fvalue(pv, v597)), " = ", l192.fvalue(pv, l5.value), ";", (function(){
5191                             var symbol = l155;
5192                             var value = symbol.value;
5193                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5194                             return value;
5195                         })()) : l5.value));
5196                     })(l43.fvalue(pv, (function(){
5197                         var tmp = v597;
5198                         return tmp === l5.value? l5.value: tmp.car;
5199                     })()));
5200                 }), v596), (function(v601){
5201                     return (v596 !== l5.value ? l190.fvalue(pv, "var i;", (function(){
5202                         var symbol = l155;
5203                         var value = symbol.value;
5204                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5205                         return value;
5206                     })(), l160.fvalue(pv, v601, v596)) : l5.value);
5207                 })((function (values,v599){
5208                     checkArgs(arguments, 2);
5209                     return l190.fvalue(values, "for (i=", (function(){
5210                         var x1 = v594;
5211                         if (typeof x1 !== 'number') throw 'Not a number!';
5212                         var x2 = v595;
5213                         if (typeof x2 !== 'number') throw 'Not a number!';
5214                         return 1+x1+x2;
5215                     })(), "; i<arguments.length; i+=2){", (function(){
5216                         var symbol = l155;
5217                         var value = symbol.value;
5218                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5219                         return value;
5220                     })(), l194.fvalue(pv, "if (arguments[i] === ", l192.fvalue(pv, l34.fvalue(pv, v599)), "){", (function(){
5221                         var symbol = l155;
5222                         var value = symbol.value;
5223                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5224                         return value;
5225                     })(), l194.fvalue(pv, l214.fvalue(pv, l35.fvalue(pv, (function(){
5226                         var tmp = v599;
5227                         return tmp === l5.value? l5.value: tmp.car;
5228                     })())), " = arguments[i+1];", (function(){
5229                         var symbol = l155;
5230                         var value = symbol.value;
5231                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5232                         return value;
5233                     })(), (function(v600){
5234                         return (v600 !== l5.value ? l190.fvalue(pv, l214.fvalue(pv, v600), " = ", l192.fvalue(pv, l4.value), ";", (function(){
5235                             var symbol = l155;
5236                             var value = symbol.value;
5237                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5238                             return value;
5239                         })()) : l5.value);
5240                     })(l44.fvalue(pv, v599)), "break;", (function(){
5241                         var symbol = l155;
5242                         var value = symbol.value;
5243                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5244                         return value;
5245                     })()), "}", (function(){
5246                         var symbol = l155;
5247                         var value = symbol.value;
5248                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5249                         return value;
5250                     })()), "}", (function(){
5251                         var symbol = l155;
5252                         var value = symbol.value;
5253                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5254                         return value;
5255                     })(), "if (i == arguments.length){", (function(){
5256                         var symbol = l155;
5257                         var value = symbol.value;
5258                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5259                         return value;
5260                     })(), l194.fvalue(pv, l214.fvalue(pv, l35.fvalue(pv, (function(){
5261                         var tmp = v599;
5262                         return tmp === l5.value? l5.value: tmp.car;
5263                     })())), " = ", l192.fvalue(pv, l35.fvalue(pv, v599)), ";", (function(){
5264                         var symbol = l155;
5265                         var value = symbol.value;
5266                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5267                         return value;
5268                     })()), "}", (function(){
5269                         var symbol = l155;
5270                         var value = symbol.value;
5271                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5272                         return value;
5273                     })());
5274                 })), (v596 !== l5.value ? l190.fvalue(pv, "for (i=", (function(){
5275                     var x1 = v594;
5276                     if (typeof x1 !== 'number') throw 'Not a number!';
5277                     var x2 = v595;
5278                     if (typeof x2 !== 'number') throw 'Not a number!';
5279                     return 1+x1+x2;
5280                 })(), "; i<arguments.length; i+=2){", (function(){
5281                     var symbol = l155;
5282                     var value = symbol.value;
5283                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5284                     return value;
5285                 })(), l194.fvalue(pv, "if (", l158.fvalue(pv, l81.fvalue(pv, (function (values,v602){
5286                     checkArgs(arguments, 2);
5287                     return l156.fvalue(values, "arguments[i] !== ", l192.fvalue(pv, l34.fvalue(pv, v602)));
5288                 }), v596), " && "), ")", (function(){
5289                     var symbol = l155;
5290                     var value = symbol.value;
5291                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5292                     return value;
5293                 })(), l194.fvalue(pv, "throw 'Unknown keyword argument ' + arguments[i].name;", (function(){
5294                     var symbol = l155;
5295                     var value = symbol.value;
5296                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5297                     return value;
5298                 })())), "}", (function(){
5299                     var symbol = l155;
5300                     var value = symbol.value;
5301                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5302                     return value;
5303                 })()) : l5.value));
5304             })(l75.fvalue(pv, l239.fvalue(pv, v593)),l75.fvalue(pv, l241.fvalue(pv, v593)),l243.fvalue(pv, v593));
5305         })();
5306     }));
5307     return l251;
5308 })();
5309 var l252 = {name: "COMPILE-LAMBDA"};
5310 var l253 = {name: "LS-COMPILE-BLOCK"};
5311 (function(){
5312     (l252).fvalue = (function(v616){
5313         ((v616)["fname"] = "COMPILE-LAMBDA");
5314         return v616;
5315     })((function (values,v604,v605){
5316         checkArgs(arguments, 3);
5317         return (function(){
5318             return (function(v606,v607,v608,v609,v610){
5319                 ((((typeof((function(){
5320                     var tmp = v605;
5321                     return tmp === l5.value? l5.value: tmp.car;
5322                 })()) == "string")?l4.value: l5.value) !== l5.value ? l29.fvalue(pv, l13.fvalue(pv, (function(){
5323                     var tmp = v605;
5324                     return tmp === l5.value? l5.value: tmp.cdr;
5325                 })())) : l5.value) !== l5.value ? (function(){
5326                     (v610 = (function(){
5327                         var tmp = v605;
5328                         return tmp === l5.value? l5.value: tmp.car;
5329                     })());
5330                     return (v605 = (function(){
5331                         var tmp = v605;
5332                         return tmp === l5.value? l5.value: tmp.cdr;
5333                     })());
5334                 })() : l5.value);
5335                 return (function(v611,v612,v613){
5336                     try {
5337                         var tmp;
5338                         tmp = l211.value;
5339                         l211.value = v613;
5340                         v613 = tmp;
5341                         return l246.fvalue(values, v610, "(function (", l158.fvalue(pv, ({car: "values", cdr: l81.fvalue(pv, (function(){
5342                             var symbol = l214;
5343                             var func = symbol.fvalue;
5344                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5345                             return func;
5346                         })(), l68.fvalue(pv, v606, v607))}), ","), "){", (function(){
5347                             var symbol = l155;
5348                             var value = symbol.value;
5349                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5350                             return value;
5351                         })(), l194.fvalue(pv, l247.fvalue(pv, v611, v612, (function(v614){
5352                             return (v614 !== l5.value ? v614 : v608);
5353                         })(v609)), l249.fvalue(pv, v604), l250.fvalue(pv, v604), l251.fvalue(pv, v604), (function(v615){
5354                             try {
5355                                 var tmp;
5356                                 tmp = l195.value;
5357                                 l195.value = v615;
5358                                 v615 = tmp;
5359                                 return l253.fvalue(pv, v605, l4.value);
5360                             }
5361                             finally {
5362                                 l195.value = v615;
5363                             }
5364                         })(l4.value)), "})");
5365                     }
5366                     finally {
5367                         l211.value = v613;
5368                     }
5369                 })(l75.fvalue(pv, v606),l75.fvalue(pv, v607),l215.fvalue(pv, l68.fvalue(pv, l61.fvalue(pv, v609), v606, v607, v608, l245.fvalue(pv, v604))));
5370             })(l239.fvalue(pv, v604),l241.fvalue(pv, v604),l244.fvalue(pv, v604),l242.fvalue(pv, v604),l5.value);
5371         })();
5372     }));
5373     return l252;
5374 })();
5375 var l254 = {name: "SETQ-PAIR"};
5376 var l255 = {name: "SET"};
5377 (function(){
5378     (l254).fvalue = (function(v620){
5379         ((v620)["fname"] = "SETQ-PAIR");
5380         return v620;
5381     })((function (values,v617,v618){
5382         checkArgs(arguments, 3);
5383         return (function(){
5384             return (function(v619){
5385                 return ((((l198.fvalue(pv, v619) === l113)?l4.value: l5.value) !== l5.value ? (l29.fvalue(pv, l96.fvalue(pv, l225, l200.fvalue(pv, v619))) !== l5.value ? l29.fvalue(pv, l96.fvalue(pv, l227, l200.fvalue(pv, v619))) : l5.value) : l5.value) !== l5.value ? l190.fvalue(values, l199.fvalue(pv, v619), " = ", l192.fvalue(pv, v618)) : l192.fvalue(values, l47.fvalue(pv, l255, l47.fvalue(pv, l185, v617), v618)));
5386             })(l210.fvalue(pv, v617, (function(){
5387                 var symbol = l211;
5388                 var value = symbol.value;
5389                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5390                 return value;
5391             })(), l113));
5392         })();
5393     }));
5394     return l254;
5395 })();
5396 (function(){
5397     var v621 = l47.fvalue(pv, l118, (function (values){
5398         var v622= l5.value;
5399         for (var i = arguments.length-1; i>=1; i--)
5400             v622 = {car: arguments[i], cdr:
5401         v622};
5402         return (function(){
5403             return (function(v623){
5404                 (function(){
5405                     try {
5406                         return (function(){
5407                             while(l4.value !== l5.value){
5408                                 (l13.fvalue(pv, v622) !== l5.value ? (function(){
5409                                     throw ({type: 'block', id: 215, values: l5.value, message: 'Return from unknown block NIL.'})
5410                                 })() : (l13.fvalue(pv, (function(){
5411                                     var tmp = v622;
5412                                     return tmp === l5.value? l5.value: tmp.cdr;
5413                                 })()) !== l5.value ? (function(){
5414                                     throw "Odd paris in SETQ";
5415                                 })() : (function(){
5416                                     (v623 = l156.fvalue(pv, v623, l156.fvalue(pv, l254.fvalue(pv, (function(){
5417                                         var tmp = v622;
5418                                         return tmp === l5.value? l5.value: tmp.car;
5419                                     })(), l35.fvalue(pv, v622)), (l13.fvalue(pv, l37.fvalue(pv, v622)) !== l5.value ? "" : ", "))));
5420                                     return (v622 = l37.fvalue(pv, v622));
5421                                 })()));
5422                             }return l5.value;
5423                         })();
5424                     }
5425                     catch (cf){
5426                         if (cf.type == 'block' && cf.id == 215)
5427                             return cf.values;
5428                         else
5429                             throw cf;
5430                     }
5431                 })();
5432                 return l190.fvalue(values, "(", v623, ")");
5433             })("");
5434         })();
5435     }));
5436     var v624 = ({car: v621, cdr: (function(){
5437         var symbol = l229;
5438         var value = symbol.value;
5439         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5440         return value;
5441     })()});
5442     return ((l229).value = v624);
5443 })();
5444 var l256 = {name: "JS-VREF"};
5445 (function(){
5446     var v625 = l47.fvalue(pv, l256, (function (values,v626){
5447         checkArgs(arguments, 2);
5448         return (function(){
5449             return v626;
5450         })();
5451     }));
5452     var v627 = ({car: v625, cdr: (function(){
5453         var symbol = l229;
5454         var value = symbol.value;
5455         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5456         return value;
5457     })()});
5458     return ((l229).value = v627);
5459 })();
5460 var l257 = {name: "JS-VSET"};
5461 (function(){
5462     var v628 = l47.fvalue(pv, l257, (function (values,v629,v630){
5463         checkArgs(arguments, 3);
5464         return (function(){
5465             return l190.fvalue(values, "(", v629, " = ", l192.fvalue(pv, v630), ")");
5466         })();
5467     }));
5468     var v631 = ({car: v628, cdr: (function(){
5469         var symbol = l229;
5470         var value = symbol.value;
5471         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5472         return value;
5473     })()});
5474     return ((l229).value = v631);
5475 })();
5476 (function(){
5477     (l166).fvalue = (function(v638){
5478         ((v638)["fname"] = "ESCAPE-STRING");
5479         return v638;
5480     })((function (values,v632){
5481         checkArgs(arguments, 2);
5482         return (function(){
5483             return (function(v633,v634,v635){
5484                 (function(){
5485                     return (function(){
5486                         while((function(){
5487                             var x1 = v634;
5488                             if (typeof x1 !== 'number') throw 'Not a number!';
5489                             var x2 = v635;
5490                             if (typeof x2 !== 'number') throw 'Not a number!';
5491                             return (x1<x2?l4.value: l5.value);
5492                         })() !== l5.value){
5493                             (function(v636){
5494                                 ((function(v637){
5495                                     return (v637 !== l5.value ? v637 : l88.fvalue(pv, v636, 92));
5496                                 })(l88.fvalue(pv, v636, 34)) !== l5.value ? (v633 = l156.fvalue(pv, v633, "\\")) : l5.value);
5497                                 (l88.fvalue(pv, v636, 10) !== l5.value ? (function(){
5498                                     (v633 = l156.fvalue(pv, v633, "\\"));
5499                                     return (v636 = 110);
5500                                 })() : l5.value);
5501                                 return (v633 = l156.fvalue(pv, v633, l106.fvalue(pv, v636)));
5502                             })((function(){
5503                                 var string = v632;
5504                                 var index = v634;
5505                                 if (typeof string != 'string')
5506                                     throw 'The value ' + string + ' is not a type string.';
5507                                 if (typeof index != 'number')
5508                                     throw 'The value ' + index + ' is not a type number.';
5509                                 return string.charCodeAt(index);
5510                             })());
5511                             (v634 = (function(){
5512                                 var x1 = v634;
5513                                 if (typeof x1 !== 'number') throw 'Not a number!';
5514                                 return x1+1;
5515                             })());
5516                         }return l5.value;
5517                     })();
5518                 })();
5519                 return v633;
5520             })("",0,l75.fvalue(pv, v632));
5521         })();
5522     }));
5523     return l166;
5524 })();
5525 var l258 = {name: "*LITERAL-SYMBOLS*"};
5526 (function(){
5527     (((l258.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l258).value = l5.value));
5528     return l258;
5529 })();
5530 var l259 = {name: "*LITERAL-COUNTER*"};
5531 (function(){
5532     (((l259.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l259).value = 0));
5533     return l259;
5534 })();
5535 var l260 = {name: "GENLIT"};
5536 (function(){
5537     (l260).fvalue = (function(v639){
5538         ((v639)["fname"] = "GENLIT");
5539         return v639;
5540     })((function (values){
5541         checkArgsAtMost(arguments, 1);
5542         return (function(){
5543             return l190.fvalue(values, "l", ((l259).value = (function(){
5544                 var x1 = (function(){
5545                     var symbol = l259;
5546                     var value = symbol.value;
5547                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5548                     return value;
5549                 })();
5550                 if (typeof x1 !== 'number') throw 'Not a number!';
5551                 return x1+1;
5552             })()));
5553         })();
5554     }));
5555     return l260;
5556 })();
5557 var l261 = {name: "LITERAL"};
5558 (function(){
5559     (l261).fvalue = (function(v656){
5560         ((v656)["fname"] = "LITERAL");
5561         return v656;
5562     })((function (values,v640,v641){
5563         checkArgsAtLeast(arguments, 2);
5564         checkArgsAtMost(arguments, 3);
5565         var v641;
5566         switch(arguments.length-1){
5567         case 1:
5568             v641=l5.value;
5569         default: break;
5570         }
5571         return (function(){
5572             return (l89.fvalue(pv, v640) !== l5.value ? l19.fvalue(values, v640) : (((typeof(v640) == "string")?l4.value: l5.value) !== l5.value ? l190.fvalue(values, "\"", l166.fvalue(pv, v640), "\"") : (((function(){
5573                 var tmp = v640;
5574                 return (typeof tmp == 'object' && 'name' in tmp);
5575             })()?l4.value: l5.value) !== l5.value ? (function(v642){
5576                 return (v642 !== l5.value ? v642 : (function(v644,v645){
5577                     (function(){
5578                         var v646 = ({car: v640, cdr: v644});
5579                         var v647 = ({car: v646, cdr: (function(){
5580                             var symbol = l258;
5581                             var value = symbol.value;
5582                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5583                             return value;
5584                         })()});
5585                         return ((l258).value = v647);
5586                     })();
5587                     l217.fvalue(pv, l190.fvalue(pv, "var ", v644, " = ", v645));
5588                     return v644;
5589                 })(l260.fvalue(pv),(function(v643){
5590                     return (l13.fvalue(pv, v643) !== l5.value ? l190.fvalue(pv, "{name: \"", l166.fvalue(pv, (v640).name), "\"}") : l192.fvalue(pv, l47.fvalue(pv, l152, (v640).name, l136.fvalue(pv, v643))));
5591                 })(l144.fvalue(pv, v640))));
5592             })((function(){
5593                 var tmp = l105.fvalue(pv, v640, (function(){
5594                     var symbol = l258;
5595                     var value = symbol.value;
5596                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5597                     return value;
5598                 })());
5599                 return tmp === l5.value? l5.value: tmp.cdr;
5600             })()) : (((function(){
5601                 var tmp = v640;
5602                 return (typeof tmp == 'object' && 'car' in tmp);
5603             })()?l4.value: l5.value) !== l5.value ? (function(){
5604                 var v648 = l95.fvalue(pv, v640);
5605                 var v649 = l94.fvalue(pv, v640);
5606                 var v650 = l190.fvalue(pv, "QIList(", l159.fvalue(pv, l81.fvalue(pv, (function (values,v651){
5607                     checkArgs(arguments, 2);
5608                     return l261.fvalue(values, v651, l4.value);
5609                 }), v648), ","), l261.fvalue(pv, (function(){
5610                     var tmp = v649;
5611                     return tmp === l5.value? l5.value: tmp.car;
5612                 })(), l4.value), ",", l261.fvalue(pv, (function(){
5613                     var tmp = v649;
5614                     return tmp === l5.value? l5.value: tmp.cdr;
5615                 })(), l4.value), ")");
5616                 return (v641 !== l5.value ? v650 : (function(v652){
5617                     l217.fvalue(pv, l190.fvalue(pv, "var ", v652, " = ", v650));
5618                     return v652;
5619                 })(l260.fvalue(pv)));
5620             })() : (((function(){
5621                 var x = v640;
5622                 return typeof x === 'object' && 'length' in x;
5623             })()?l4.value: l5.value) !== l5.value ? (function(v653){
5624                 return (function(v654){
5625                     return (v641 !== l5.value ? v654 : (function(v655){
5626                         l217.fvalue(pv, l190.fvalue(pv, "var ", v655, " = ", v654));
5627                         return v655;
5628                     })(l260.fvalue(pv)));
5629                 })(l156.fvalue(pv, "[", l158.fvalue(pv, l81.fvalue(pv, (function(){
5630                     var symbol = l261;
5631                     var func = symbol.fvalue;
5632                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5633                     return func;
5634                 })(), v653), ", "), "]"));
5635             })(l161.fvalue(pv, v640)) : l5.value)))));
5636         })();
5637     }));
5638     return l261;
5639 })();
5640 (function(){
5641     var v657 = l47.fvalue(pv, l185, (function (values,v658){
5642         checkArgs(arguments, 2);
5643         return (function(){
5644             return l261.fvalue(values, v658);
5645         })();
5646     }));
5647     var v659 = ({car: v657, cdr: (function(){
5648         var symbol = l229;
5649         var value = symbol.value;
5650         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5651         return value;
5652     })()});
5653     return ((l229).value = v659);
5654 })();
5655 var l262 = {name: "%WHILE"};
5656 (function(){
5657     var v660 = l47.fvalue(pv, l262, (function (values,v662){
5658         checkArgsAtLeast(arguments, 2);
5659         var v661= l5.value;
5660         for (var i = arguments.length-1; i>=2; i--)
5661             v661 = {car: arguments[i], cdr:
5662         v661};
5663         return (function(){
5664             return l190.fvalue(values, "(function(){", (function(){
5665                 var symbol = l155;
5666                 var value = symbol.value;
5667                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5668                 return value;
5669             })(), l194.fvalue(pv, "while(", l192.fvalue(pv, v662), " !== ", l192.fvalue(pv, l5.value), "){", (function(){
5670                 var symbol = l155;
5671                 var value = symbol.value;
5672                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5673                 return value;
5674             })(), l194.fvalue(pv, l253.fvalue(pv, v661)), "}", "return ", l192.fvalue(pv, l5.value), ";", (function(){
5675                 var symbol = l155;
5676                 var value = symbol.value;
5677                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5678                 return value;
5679             })()), "})()");
5680         })();
5681     }));
5682     var v663 = ({car: v660, cdr: (function(){
5683         var symbol = l229;
5684         var value = symbol.value;
5685         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5686         return value;
5687     })()});
5688     return ((l229).value = v663);
5689 })();
5690 var l263 = {name: "SYMBOL-FUNCTION"};
5691 (function(){
5692     var v664 = l47.fvalue(pv, l112, (function (values,v665){
5693         checkArgs(arguments, 2);
5694         return (function(){
5695             return ((l62.fvalue(pv, v665) !== l5.value ? (((function(){
5696                 var tmp = v665;
5697                 return tmp === l5.value? l5.value: tmp.car;
5698             })() === l6)?l4.value: l5.value) : l5.value) !== l5.value ? l252.fvalue(values, l35.fvalue(pv, v665), l37.fvalue(pv, v665)) : (((function(){
5699                 var tmp = v665;
5700                 return (typeof tmp == 'object' && 'name' in tmp);
5701             })()?l4.value: l5.value) !== l5.value ? (function(v666){
5702                 return (v666 !== l5.value ? l199.fvalue(values, v666) : l192.fvalue(values, l47.fvalue(pv, l263, l47.fvalue(pv, l185, v665))));
5703             })(l210.fvalue(pv, v665, (function(){
5704                 var symbol = l211;
5705                 var value = symbol.value;
5706                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5707                 return value;
5708             })(), l112)) : l5.value));
5709         })();
5710     }));
5711     var v667 = ({car: v664, cdr: (function(){
5712         var symbol = l229;
5713         var value = symbol.value;
5714         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5715         return value;
5716     })()});
5717     return ((l229).value = v667);
5718 })();
5719 var l264 = {name: "MAKE-FUNCTION-BINDING"};
5720 (function(){
5721     (l264).fvalue = (function(v669){
5722         ((v669)["fname"] = "MAKE-FUNCTION-BINDING");
5723         return v669;
5724     })((function (values,v668){
5725         checkArgs(arguments, 2);
5726         return (function(){
5727             return l196.fvalue(values, v668, l112, l213.fvalue(pv, v668));
5728         })();
5729     }));
5730     return l264;
5731 })();
5732 var l265 = {name: "COMPILE-FUNCTION-DEFINITION"};
5733 (function(){
5734     (l265).fvalue = (function(v671){
5735         ((v671)["fname"] = "COMPILE-FUNCTION-DEFINITION");
5736         return v671;
5737     })((function (values,v670){
5738         checkArgs(arguments, 2);
5739         return (function(){
5740             return l252.fvalue(values, (function(){
5741                 var tmp = v670;
5742                 return tmp === l5.value? l5.value: tmp.car;
5743             })(), (function(){
5744                 var tmp = v670;
5745                 return tmp === l5.value? l5.value: tmp.cdr;
5746             })());
5747         })();
5748     }));
5749     return l265;
5750 })();
5751 var l266 = {name: "TRANSLATE-FUNCTION"};
5752 (function(){
5753     (l266).fvalue = (function(v674){
5754         ((v674)["fname"] = "TRANSLATE-FUNCTION");
5755         return v674;
5756     })((function (values,v672){
5757         checkArgs(arguments, 2);
5758         return (function(){
5759             return (function(v673){
5760                 return l199.fvalue(values, v673);
5761             })(l210.fvalue(pv, v672, (function(){
5762                 var symbol = l211;
5763                 var value = symbol.value;
5764                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5765                 return value;
5766             })(), l112));
5767         })();
5768     }));
5769     return l266;
5770 })();
5771 var l267 = {name: "FLET"};
5772 (function(){
5773     var v675 = l47.fvalue(pv, l267, (function (values,v677){
5774         checkArgsAtLeast(arguments, 2);
5775         var v676= l5.value;
5776         for (var i = arguments.length-1; i>=2; i--)
5777             v676 = {car: arguments[i], cdr:
5778         v676};
5779         return (function(){
5780             return (function(){
5781                 try {
5782                     var v682 = l211.value;
5783                     var v678 = l81.fvalue(pv, (function(){
5784                         var symbol = l32;
5785                         var func = symbol.fvalue;
5786                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5787                         return func;
5788                     })(), v677);
5789                     var v679 = l81.fvalue(pv, (function(){
5790                         var symbol = l33;
5791                         var func = symbol.fvalue;
5792                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5793                         return func;
5794                     })(), v677);
5795                     var v680 = l81.fvalue(pv, (function(){
5796                         var symbol = l265;
5797                         var func = symbol.fvalue;
5798                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5799                         return func;
5800                     })(), v679);
5801                     ((l211).value = l209.fvalue(pv, l81.fvalue(pv, (function(){
5802                         var symbol = l264;
5803                         var func = symbol.fvalue;
5804                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5805                         return func;
5806                     })(), v678), (function(){
5807                         var symbol = l211;
5808                         var value = symbol.value;
5809                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5810                         return value;
5811                     })(), l112));
5812                     return l190.fvalue(values, "(function(", l158.fvalue(pv, l81.fvalue(pv, (function(){
5813                         var symbol = l266;
5814                         var func = symbol.fvalue;
5815                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5816                         return func;
5817                     })(), v678), ","), "){", (function(){
5818                         var symbol = l155;
5819                         var value = symbol.value;
5820                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5821                         return value;
5822                     })(), (function(v681){
5823                         return l194.fvalue(pv, v681);
5824                     })(l253.fvalue(pv, v676, l4.value)), "})(", l158.fvalue(pv, v680, ","), ")");
5825                 }
5826                 finally {
5827                     l211.value = v682;
5828                 }
5829             })();
5830         })();
5831     }));
5832     var v683 = ({car: v675, cdr: (function(){
5833         var symbol = l229;
5834         var value = symbol.value;
5835         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5836         return value;
5837     })()});
5838     return ((l229).value = v683);
5839 })();
5840 var l268 = {name: "LABELS"};
5841 (function(){
5842     var v684 = l47.fvalue(pv, l268, (function (values,v686){
5843         checkArgsAtLeast(arguments, 2);
5844         var v685= l5.value;
5845         for (var i = arguments.length-1; i>=2; i--)
5846             v685 = {car: arguments[i], cdr:
5847         v685};
5848         return (function(){
5849             return (function(){
5850                 try {
5851                     var v689 = l211.value;
5852                     var v687 = l81.fvalue(pv, (function(){
5853                         var symbol = l32;
5854                         var func = symbol.fvalue;
5855                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5856                         return func;
5857                     })(), v686);
5858                     ((l211).value = l209.fvalue(pv, l81.fvalue(pv, (function(){
5859                         var symbol = l264;
5860                         var func = symbol.fvalue;
5861                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5862                         return func;
5863                     })(), v687), (function(){
5864                         var symbol = l211;
5865                         var value = symbol.value;
5866                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5867                         return value;
5868                     })(), l112));
5869                     return l190.fvalue(values, "(function(){", (function(){
5870                         var symbol = l155;
5871                         var value = symbol.value;
5872                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5873                         return value;
5874                     })(), l194.fvalue(pv, l160.fvalue(pv, (function (values,v688){
5875                         checkArgs(arguments, 2);
5876                         return l190.fvalue(values, "var ", l266.fvalue(pv, (function(){
5877                             var tmp = v688;
5878                             return tmp === l5.value? l5.value: tmp.car;
5879                         })()), " = ", l252.fvalue(pv, l35.fvalue(pv, v688), l37.fvalue(pv, v688)), ";", (function(){
5880                             var symbol = l155;
5881                             var value = symbol.value;
5882                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5883                             return value;
5884                         })());
5885                     }), v686), l253.fvalue(pv, v685, l4.value)), "})()");
5886                 }
5887                 finally {
5888                     l211.value = v689;
5889                 }
5890             })();
5891         })();
5892     }));
5893     var v690 = ({car: v684, cdr: (function(){
5894         var symbol = l229;
5895         var value = symbol.value;
5896         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5897         return value;
5898     })()});
5899     return ((l229).value = v690);
5900 })();
5901 var l269 = {name: "*COMPILING-FILE*"};
5902 (function(){
5903     (((l269.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l269).value = l5.value));
5904     return l269;
5905 })();
5906 var l270 = {name: "EVAL-WHEN-COMPILE"};
5907 var l271 = {name: "EVAL"};
5908 (function(){
5909     var v691 = l47.fvalue(pv, l270, (function (values){
5910         var v692= l5.value;
5911         for (var i = arguments.length-1; i>=1; i--)
5912             v692 = {car: arguments[i], cdr:
5913         v692};
5914         return (function(){
5915             return ((function(){
5916                 var symbol = l269;
5917                 var value = symbol.value;
5918                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5919                 return value;
5920             })() !== l5.value ? (function(){
5921                 l271.fvalue(pv, ({car: l122, cdr: v692}));
5922                 return l5.value;
5923             })() : l192.fvalue(values, ({car: l122, cdr: v692})));
5924         })();
5925     }));
5926     var v693 = ({car: v691, cdr: (function(){
5927         var symbol = l229;
5928         var value = symbol.value;
5929         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5930         return value;
5931     })()});
5932     return ((l229).value = v693);
5933 })();
5934 var l272 = {name: "DEFINE-TRANSFORMATION"};
5935 l272;
5936 (function(){
5937     var v694 = l47.fvalue(pv, l122, (function (values){
5938         var v695= l5.value;
5939         for (var i = arguments.length-1; i>=1; i--)
5940             v695 = {car: arguments[i], cdr:
5941         v695};
5942         return (function(){
5943             return (l13.fvalue(pv, (function(){
5944                 var tmp = v695;
5945                 return tmp === l5.value? l5.value: tmp.cdr;
5946             })()) !== l5.value ? l192.fvalue(values, (function(){
5947                 var tmp = v695;
5948                 return tmp === l5.value? l5.value: tmp.car;
5949             })(), (function(){
5950                 var symbol = l195;
5951                 var value = symbol.value;
5952                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5953                 return value;
5954             })()) : l190.fvalue(values, "(function(){", (function(){
5955                 var symbol = l155;
5956                 var value = symbol.value;
5957                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5958                 return value;
5959             })(), l194.fvalue(pv, l253.fvalue(pv, v695, l4.value)), "})()"));
5960         })();
5961     }));
5962     var v696 = ({car: v694, cdr: (function(){
5963         var symbol = l229;
5964         var value = symbol.value;
5965         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5966         return value;
5967     })()});
5968     return ((l229).value = v696);
5969 })();
5970 var l273 = {name: "SPECIAL-VARIABLE-P"};
5971 (function(){
5972     (l273).fvalue = (function(v698){
5973         ((v698)["fname"] = "SPECIAL-VARIABLE-P");
5974         return v698;
5975     })((function (values,v697){
5976         checkArgs(arguments, 2);
5977         return (function(){
5978             return (l223.fvalue(pv, v697, l113, l225) !== l5.value ? l4.value : l5.value);
5979         })();
5980     }));
5981     return l273;
5982 })();
5983 var l274 = {name: "LET-BINDING-WRAPPER"};
5984 (function(){
5985     (l274).fvalue = (function(v705){
5986         ((v705)["fname"] = "LET-BINDING-WRAPPER");
5987         return v705;
5988     })((function (values,v699,v700){
5989         checkArgs(arguments, 3);
5990         return (function(){
5991             try {
5992                 (l13.fvalue(pv, v699) !== l5.value ? (function(){
5993                     var values = mv;
5994                     throw ({type: 'block', id: 233, values: v700, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
5995                 })() : l5.value);
5996                 return l190.fvalue(values, "try {", (function(){
5997                     var symbol = l155;
5998                     var value = symbol.value;
5999                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6000                     return value;
6001                 })(), l194.fvalue(pv, "var tmp;", (function(){
6002                     var symbol = l155;
6003                     var value = symbol.value;
6004                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6005                     return value;
6006                 })(), l160.fvalue(pv, (function (values,v701){
6007                     checkArgs(arguments, 2);
6008                     return (function(v702){
6009                         return l190.fvalue(values, "tmp = ", v702, ".value;", (function(){
6010                             var symbol = l155;
6011                             var value = symbol.value;
6012                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6013                             return value;
6014                         })(), v702, ".value = ", (function(){
6015                             var tmp = v701;
6016                             return tmp === l5.value? l5.value: tmp.cdr;
6017                         })(), ";", (function(){
6018                             var symbol = l155;
6019                             var value = symbol.value;
6020                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6021                             return value;
6022                         })(), (function(){
6023                             var tmp = v701;
6024                             return tmp === l5.value? l5.value: tmp.cdr;
6025                         })(), " = tmp;", (function(){
6026                             var symbol = l155;
6027                             var value = symbol.value;
6028                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6029                             return value;
6030                         })());
6031                     })(l192.fvalue(pv, l47.fvalue(pv, l185, (function(){
6032                         var tmp = v701;
6033                         return tmp === l5.value? l5.value: tmp.car;
6034                     })())));
6035                 }), v699), v700, (function(){
6036                     var symbol = l155;
6037                     var value = symbol.value;
6038                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6039                     return value;
6040                 })()), "}", (function(){
6041                     var symbol = l155;
6042                     var value = symbol.value;
6043                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6044                     return value;
6045                 })(), "finally {", (function(){
6046                     var symbol = l155;
6047                     var value = symbol.value;
6048                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6049                     return value;
6050                 })(), l194.fvalue(pv, l160.fvalue(pv, (function (values,v703){
6051                     checkArgs(arguments, 2);
6052                     return (function(v704){
6053                         return l190.fvalue(values, v704, ".value", " = ", (function(){
6054                             var tmp = v703;
6055                             return tmp === l5.value? l5.value: tmp.cdr;
6056                         })(), ";", (function(){
6057                             var symbol = l155;
6058                             var value = symbol.value;
6059                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6060                             return value;
6061                         })());
6062                     })(l192.fvalue(pv, l47.fvalue(pv, l185, (function(){
6063                         var tmp = v703;
6064                         return tmp === l5.value? l5.value: tmp.car;
6065                     })())));
6066                 }), v699)), "}", (function(){
6067                     var symbol = l155;
6068                     var value = symbol.value;
6069                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6070                     return value;
6071                 })());
6072             }
6073             catch (cf){
6074                 if (cf.type == 'block' && cf.id == 233)
6075                     return values.apply(this, forcemv(cf.values));
6076                 else
6077                     throw cf;
6078             }
6079         })();
6080     }));
6081     return l274;
6082 })();
6083 var l275 = {name: "LET"};
6084 (function(){
6085     var v706 = l47.fvalue(pv, l275, (function (values,v708){
6086         checkArgsAtLeast(arguments, 2);
6087         var v707= l5.value;
6088         for (var i = arguments.length-1; i>=2; i--)
6089             v707 = {car: arguments[i], cdr:
6090         v707};
6091         return (function(){
6092             return (function(){
6093                 try {
6094                     var v718 = l211.value;
6095                     var v709 = l81.fvalue(pv, (function(){
6096                         var symbol = l61;
6097                         var func = symbol.fvalue;
6098                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6099                         return func;
6100                     })(), v708);
6101                     var v710 = l81.fvalue(pv, (function(){
6102                         var symbol = l42;
6103                         var func = symbol.fvalue;
6104                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6105                         return func;
6106                     })(), v709);
6107                     var v711 = l81.fvalue(pv, (function(){
6108                         var symbol = l192;
6109                         var func = symbol.fvalue;
6110                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6111                         return func;
6112                     })(), l81.fvalue(pv, (function(){
6113                         var symbol = l43;
6114                         var func = symbol.fvalue;
6115                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6116                         return func;
6117                     })(), v709));
6118                     ((l211).value = l215.fvalue(pv, l98.fvalue(pv, (function(){
6119                         var symbol = l273;
6120                         var func = symbol.fvalue;
6121                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6122                         return func;
6123                     })(), v710)));
6124                     var v712 = l5.value;
6125                     return l190.fvalue(values, "(function(", l158.fvalue(pv, l81.fvalue(pv, (function (values,v713){
6126                         checkArgs(arguments, 2);
6127                         return (l273.fvalue(pv, v713) !== l5.value ? (function(v714){
6128                             (function(){
6129                                 var v715 = ({car: v713, cdr: v714});
6130                                 var v716 = ({car: v715, cdr: v712});
6131                                 return (v712 = v716);
6132                             })();
6133                             return v714;
6134                         })(l213.fvalue(pv, v713)) : l214.fvalue(values, v713));
6135                     }), v710), ","), "){", (function(){
6136                         var symbol = l155;
6137                         var value = symbol.value;
6138                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6139                         return value;
6140                     })(), (function(v717){
6141                         return l194.fvalue(pv, l274.fvalue(pv, v712, v717));
6142                     })(l253.fvalue(pv, v707, l4.value)), "})(", l158.fvalue(pv, v711, ","), ")");
6143                 }
6144                 finally {
6145                     l211.value = v718;
6146                 }
6147             })();
6148         })();
6149     }));
6150     var v719 = ({car: v706, cdr: (function(){
6151         var symbol = l229;
6152         var value = symbol.value;
6153         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6154         return value;
6155     })()});
6156     return ((l229).value = v719);
6157 })();
6158 var l276 = {name: "LET*-INITIALIZE-VALUE"};
6159 (function(){
6160     (l276).fvalue = (function(v726){
6161         ((v726)["fname"] = "LET*-INITIALIZE-VALUE");
6162         return v726;
6163     })((function (values,v720){
6164         checkArgs(arguments, 2);
6165         return (function(){
6166             return (function(v721,v722){
6167                 return (l273.fvalue(pv, v721) !== l5.value ? l190.fvalue(values, l192.fvalue(pv, l47.fvalue(pv, l118, v721, v722)), ";", (function(){
6168                     var symbol = l155;
6169                     var value = symbol.value;
6170                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6171                     return value;
6172                 })()) : (function(){
6173                     var v723 = l213.fvalue(pv, v721);
6174                     var v724 = l196.fvalue(pv, v721, l113, v723);
6175                     return (function(v725){
6176                         l206.fvalue(pv, v724, (function(){
6177                             var symbol = l211;
6178                             var value = symbol.value;
6179                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6180                             return value;
6181                         })(), l113);
6182                         return v725;
6183                     })(l190.fvalue(pv, "var ", v723, " = ", l192.fvalue(pv, v722), ";", (function(){
6184                         var symbol = l155;
6185                         var value = symbol.value;
6186                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6187                         return value;
6188                     })()));
6189                 })());
6190             })(l42.fvalue(pv, v720),l43.fvalue(pv, v720));
6191         })();
6192     }));
6193     return l276;
6194 })();
6195 var l277 = {name: "LET*-BINDING-WRAPPER"};
6196 (function(){
6197     (l277).fvalue = (function(v735){
6198         ((v735)["fname"] = "LET*-BINDING-WRAPPER");
6199         return v735;
6200     })((function (values,v727,v728){
6201         checkArgs(arguments, 3);
6202         return (function(){
6203             try {
6204                 (l13.fvalue(pv, v727) !== l5.value ? (function(){
6205                     var values = mv;
6206                     throw ({type: 'block', id: 236, values: v728, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
6207                 })() : l5.value);
6208                 return (function(v730){
6209                     return l190.fvalue(values, "try {", (function(){
6210                         var symbol = l155;
6211                         var value = symbol.value;
6212                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6213                         return value;
6214                     })(), l194.fvalue(pv, l160.fvalue(pv, (function (values,v731){
6215                         checkArgs(arguments, 2);
6216                         return (function(v732){
6217                             return l190.fvalue(values, "var ", (function(){
6218                                 var tmp = v731;
6219                                 return tmp === l5.value? l5.value: tmp.cdr;
6220                             })(), " = ", v732, ".value;", (function(){
6221                                 var symbol = l155;
6222                                 var value = symbol.value;
6223                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6224                                 return value;
6225                             })());
6226                         })(l192.fvalue(pv, l47.fvalue(pv, l185, (function(){
6227                             var tmp = v731;
6228                             return tmp === l5.value? l5.value: tmp.car;
6229                         })())));
6230                     }), v730), v728), "}", (function(){
6231                         var symbol = l155;
6232                         var value = symbol.value;
6233                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6234                         return value;
6235                     })(), "finally {", (function(){
6236                         var symbol = l155;
6237                         var value = symbol.value;
6238                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6239                         return value;
6240                     })(), l194.fvalue(pv, l160.fvalue(pv, (function (values,v733){
6241                         checkArgs(arguments, 2);
6242                         return (function(v734){
6243                             return l190.fvalue(values, v734, ".value", " = ", (function(){
6244                                 var tmp = v733;
6245                                 return tmp === l5.value? l5.value: tmp.cdr;
6246                             })(), ";", (function(){
6247                                 var symbol = l155;
6248                                 var value = symbol.value;
6249                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6250                                 return value;
6251                             })());
6252                         })(l192.fvalue(pv, l47.fvalue(pv, l185, (function(){
6253                             var tmp = v733;
6254                             return tmp === l5.value? l5.value: tmp.car;
6255                         })())));
6256                     }), v730)), "}", (function(){
6257                         var symbol = l155;
6258                         var value = symbol.value;
6259                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6260                         return value;
6261                     })());
6262                 })(l81.fvalue(pv, (function (values,v729){
6263                     checkArgs(arguments, 2);
6264                     return ({car: v729, cdr: l213.fvalue(pv, v729)});
6265                 }), l99.fvalue(pv, (function(){
6266                     var symbol = l273;
6267                     var func = symbol.fvalue;
6268                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6269                     return func;
6270                 })(), v727)));
6271             }
6272             catch (cf){
6273                 if (cf.type == 'block' && cf.id == 236)
6274                     return values.apply(this, forcemv(cf.values));
6275                 else
6276                     throw cf;
6277             }
6278         })();
6279     }));
6280     return l277;
6281 })();
6282 var l278 = {name: "LET*"};
6283 (function(){
6284     var v736 = l47.fvalue(pv, l278, (function (values,v738){
6285         checkArgsAtLeast(arguments, 2);
6286         var v737= l5.value;
6287         for (var i = arguments.length-1; i>=2; i--)
6288             v737 = {car: arguments[i], cdr:
6289         v737};
6290         return (function(){
6291             return (function(v739,v740){
6292                 try {
6293                     var tmp;
6294                     tmp = l211.value;
6295                     l211.value = v740;
6296                     v740 = tmp;
6297                     return l190.fvalue(values, "(function(){", (function(){
6298                         var symbol = l155;
6299                         var value = symbol.value;
6300                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6301                         return value;
6302                     })(), l194.fvalue(pv, (function(v741,v742){
6303                         return l277.fvalue(pv, v741, v742);
6304                     })(l99.fvalue(pv, (function(){
6305                         var symbol = l273;
6306                         var func = symbol.fvalue;
6307                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6308                         return func;
6309                     })(), l81.fvalue(pv, (function(){
6310                         var symbol = l42;
6311                         var func = symbol.fvalue;
6312                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6313                         return func;
6314                     })(), v739)),l156.fvalue(pv, l160.fvalue(pv, (function(){
6315                         var symbol = l276;
6316                         var func = symbol.fvalue;
6317                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6318                         return func;
6319                     })(), v739), l253.fvalue(pv, v737, l4.value)))), "})()");
6320                 }
6321                 finally {
6322                     l211.value = v740;
6323                 }
6324             })(l81.fvalue(pv, (function(){
6325                 var symbol = l61;
6326                 var func = symbol.fvalue;
6327                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6328                 return func;
6329             })(), v738),l205.fvalue(pv, (function(){
6330                 var symbol = l211;
6331                 var value = symbol.value;
6332                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6333                 return value;
6334             })()));
6335         })();
6336     }));
6337     var v743 = ({car: v736, cdr: (function(){
6338         var symbol = l229;
6339         var value = symbol.value;
6340         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6341         return value;
6342     })()});
6343     return ((l229).value = v743);
6344 })();
6345 var l279 = {name: "*BLOCK-COUNTER*"};
6346 (function(){
6347     (((l279.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l279).value = 0));
6348     return l279;
6349 })();
6350 var l280 = {name: "MULTIPLE-VALUE"};
6351 var l281 = {name: "USED"};
6352 (function(){
6353     var v744 = l47.fvalue(pv, l207, (function (values,v746){
6354         checkArgsAtLeast(arguments, 2);
6355         var v745= l5.value;
6356         for (var i = arguments.length-1; i>=2; i--)
6357             v745 = {car: arguments[i], cdr:
6358         v745};
6359         return (function(){
6360             return (function(){
6361                 var v747 = ((l279).value = (function(){
6362                     var x1 = (function(){
6363                         var symbol = l279;
6364                         var value = symbol.value;
6365                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6366                         return value;
6367                     })();
6368                     if (typeof x1 !== 'number') throw 'Not a number!';
6369                     return x1+1;
6370                 })());
6371                 var v748 = l196.fvalue(pv, v746, l207, v747);
6372                 ((function(){
6373                     var symbol = l195;
6374                     var value = symbol.value;
6375                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6376                     return value;
6377                 })() !== l5.value ? l203.fvalue(pv, l280, v748) : l5.value);
6378                 return (function(){
6379                     try {
6380                         var v750 = l211.value;
6381                         ((l211).value = l209.fvalue(pv, l47.fvalue(pv, v748), (function(){
6382                             var symbol = l211;
6383                             var value = symbol.value;
6384                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6385                             return value;
6386                         })(), l207));
6387                         var v749 = l253.fvalue(pv, v745, l4.value);
6388                         return (l96.fvalue(pv, l281, l200.fvalue(pv, v748)) !== l5.value ? l190.fvalue(values, "(function(){", (function(){
6389                             var symbol = l155;
6390                             var value = symbol.value;
6391                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6392                             return value;
6393                         })(), l194.fvalue(pv, "try {", (function(){
6394                             var symbol = l155;
6395                             var value = symbol.value;
6396                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6397                             return value;
6398                         })(), l194.fvalue(pv, v749), "}", (function(){
6399                             var symbol = l155;
6400                             var value = symbol.value;
6401                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6402                             return value;
6403                         })(), "catch (cf){", (function(){
6404                             var symbol = l155;
6405                             var value = symbol.value;
6406                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6407                             return value;
6408                         })(), "    if (cf.type == 'block' && cf.id == ", v747, ")", (function(){
6409                             var symbol = l155;
6410                             var value = symbol.value;
6411                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6412                             return value;
6413                         })(), ((function(){
6414                             var symbol = l195;
6415                             var value = symbol.value;
6416                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6417                             return value;
6418                         })() !== l5.value ? "        return values.apply(this, forcemv(cf.values));" : "        return cf.values;"), (function(){
6419                             var symbol = l155;
6420                             var value = symbol.value;
6421                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6422                             return value;
6423                         })(), "    else", (function(){
6424                             var symbol = l155;
6425                             var value = symbol.value;
6426                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6427                             return value;
6428                         })(), "        throw cf;", (function(){
6429                             var symbol = l155;
6430                             var value = symbol.value;
6431                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6432                             return value;
6433                         })(), "}", (function(){
6434                             var symbol = l155;
6435                             var value = symbol.value;
6436                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6437                             return value;
6438                         })()), "})()") : l190.fvalue(values, "(function(){", (function(){
6439                             var symbol = l155;
6440                             var value = symbol.value;
6441                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6442                             return value;
6443                         })(), l194.fvalue(pv, v749), "})()"));
6444                     }
6445                     finally {
6446                         l211.value = v750;
6447                     }
6448                 })();
6449             })();
6450         })();
6451     }));
6452     var v751 = ({car: v744, cdr: (function(){
6453         var symbol = l229;
6454         var value = symbol.value;
6455         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6456         return value;
6457     })()});
6458     return ((l229).value = v751);
6459 })();
6460 var l282 = {name: "RETURN-FROM"};
6461 (function(){
6462     var v752 = l47.fvalue(pv, l282, (function (values,v753,v754){
6463         checkArgsAtLeast(arguments, 2);
6464         checkArgsAtMost(arguments, 3);
6465         var v754;
6466         switch(arguments.length-1){
6467         case 1:
6468             v754=l5.value;
6469         default: break;
6470         }
6471         return (function(){
6472             return (function(){
6473                 var v755 = l210.fvalue(pv, v753, (function(){
6474                     var symbol = l211;
6475                     var value = symbol.value;
6476                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6477                     return value;
6478                 })(), l207);
6479                 var v756 = l96.fvalue(pv, l280, l200.fvalue(pv, v755));
6480                 (l13.fvalue(pv, v755) !== l5.value ? (function(){
6481                     throw l156.fvalue(pv, "Unknown block `", (v753).name, "'.");
6482                 })() : l5.value);
6483                 l203.fvalue(pv, l281, v755);
6484                 return l190.fvalue(values, "(function(){", (function(){
6485                     var symbol = l155;
6486                     var value = symbol.value;
6487                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6488                     return value;
6489                 })(), l194.fvalue(pv, (v756 !== l5.value ? l190.fvalue(pv, "var values = mv;", (function(){
6490                     var symbol = l155;
6491                     var value = symbol.value;
6492                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6493                     return value;
6494                 })()) : l5.value), "throw ({", "type: 'block', ", "id: ", l199.fvalue(pv, v755), ", ", "values: ", l192.fvalue(pv, v754, v756), ", ", "message: 'Return from unknown block ", (v753).name, ".'", "})"), "})()");
6495             })();
6496         })();
6497     }));
6498     var v757 = ({car: v752, cdr: (function(){
6499         var symbol = l229;
6500         var value = symbol.value;
6501         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6502         return value;
6503     })()});
6504     return ((l229).value = v757);
6505 })();
6506 var l283 = {name: "CATCH"};
6507 (function(){
6508     var v758 = l47.fvalue(pv, l283, (function (values,v760){
6509         checkArgsAtLeast(arguments, 2);
6510         var v759= l5.value;
6511         for (var i = arguments.length-1; i>=2; i--)
6512             v759 = {car: arguments[i], cdr:
6513         v759};
6514         return (function(){
6515             return l190.fvalue(values, "(function(){", (function(){
6516                 var symbol = l155;
6517                 var value = symbol.value;
6518                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6519                 return value;
6520             })(), l194.fvalue(pv, "var id = ", l192.fvalue(pv, v760), ";", (function(){
6521                 var symbol = l155;
6522                 var value = symbol.value;
6523                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6524                 return value;
6525             })(), "try {", (function(){
6526                 var symbol = l155;
6527                 var value = symbol.value;
6528                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6529                 return value;
6530             })(), l194.fvalue(pv, l253.fvalue(pv, v759, l4.value)), (function(){
6531                 var symbol = l155;
6532                 var value = symbol.value;
6533                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6534                 return value;
6535             })(), "}", (function(){
6536                 var symbol = l155;
6537                 var value = symbol.value;
6538                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6539                 return value;
6540             })(), "catch (cf){", (function(){
6541                 var symbol = l155;
6542                 var value = symbol.value;
6543                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6544                 return value;
6545             })(), "    if (cf.type == 'catch' && cf.id == id)", (function(){
6546                 var symbol = l155;
6547                 var value = symbol.value;
6548                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6549                 return value;
6550             })(), ((function(){
6551                 var symbol = l195;
6552                 var value = symbol.value;
6553                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6554                 return value;
6555             })() !== l5.value ? "        return values.apply(this, forcemv(cf.values));" : "        return pv.apply(this, forcemv(cf.values));"), (function(){
6556                 var symbol = l155;
6557                 var value = symbol.value;
6558                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6559                 return value;
6560             })(), "    else", (function(){
6561                 var symbol = l155;
6562                 var value = symbol.value;
6563                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6564                 return value;
6565             })(), "        throw cf;", (function(){
6566                 var symbol = l155;
6567                 var value = symbol.value;
6568                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6569                 return value;
6570             })(), "}", (function(){
6571                 var symbol = l155;
6572                 var value = symbol.value;
6573                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6574                 return value;
6575             })()), "})()");
6576         })();
6577     }));
6578     var v761 = ({car: v758, cdr: (function(){
6579         var symbol = l229;
6580         var value = symbol.value;
6581         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6582         return value;
6583     })()});
6584     return ((l229).value = v761);
6585 })();
6586 var l284 = {name: "THROW"};
6587 (function(){
6588     var v762 = l47.fvalue(pv, l284, (function (values,v763,v764){
6589         checkArgs(arguments, 3);
6590         return (function(){
6591             return l190.fvalue(values, "(function(){", (function(){
6592                 var symbol = l155;
6593                 var value = symbol.value;
6594                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6595                 return value;
6596             })(), l194.fvalue(pv, "var values = mv;", (function(){
6597                 var symbol = l155;
6598                 var value = symbol.value;
6599                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6600                 return value;
6601             })(), "throw ({", "type: 'catch', ", "id: ", l192.fvalue(pv, v763), ", ", "values: ", l192.fvalue(pv, v764, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
6602         })();
6603     }));
6604     var v765 = ({car: v762, cdr: (function(){
6605         var symbol = l229;
6606         var value = symbol.value;
6607         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6608         return value;
6609     })()});
6610     return ((l229).value = v765);
6611 })();
6612 var l285 = {name: "*TAGBODY-COUNTER*"};
6613 (function(){
6614     (((l285.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l285).value = 0));
6615     return l285;
6616 })();
6617 var l286 = {name: "*GO-TAG-COUNTER*"};
6618 (function(){
6619     (((l286.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l286).value = 0));
6620     return l286;
6621 })();
6622 var l287 = {name: "GO-TAG-P"};
6623 (function(){
6624     (l287).fvalue = (function(v768){
6625         ((v768)["fname"] = "GO-TAG-P");
6626         return v768;
6627     })((function (values,v766){
6628         checkArgs(arguments, 2);
6629         return (function(){
6630             return (function(v767){
6631                 return (v767 !== l5.value ? v767 : ((function(){
6632                     var tmp = v766;
6633                     return (typeof tmp == 'object' && 'name' in tmp);
6634                 })()?l4.value: l5.value));
6635             })(l89.fvalue(pv, v766));
6636         })();
6637     }));
6638     return l287;
6639 })();
6640 var l288 = {name: "DECLARE-TAGBODY-TAGS"};
6641 (function(){
6642     (l288).fvalue = (function(v774){
6643         ((v774)["fname"] = "DECLARE-TAGBODY-TAGS");
6644         return v774;
6645     })((function (values,v769,v770){
6646         checkArgs(arguments, 3);
6647         return (function(){
6648             return (function(v773){
6649                 return l209.fvalue(values, v773, (function(){
6650                     var symbol = l211;
6651                     var value = symbol.value;
6652                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6653                     return value;
6654                 })(), l208);
6655             })(l81.fvalue(pv, (function (values,v771){
6656                 checkArgs(arguments, 2);
6657                 return (function(v772){
6658                     return l196.fvalue(values, v771, l208, l47.fvalue(pv, v769, v772));
6659                 })(l19.fvalue(pv, ((l286).value = (function(){
6660                     var x1 = (function(){
6661                         var symbol = l286;
6662                         var value = symbol.value;
6663                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6664                         return value;
6665                     })();
6666                     if (typeof x1 !== 'number') throw 'Not a number!';
6667                     return x1+1;
6668                 })())));
6669             }), l99.fvalue(pv, (function(){
6670                 var symbol = l287;
6671                 var func = symbol.fvalue;
6672                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6673                 return func;
6674             })(), v770)));
6675         })();
6676     }));
6677     return l288;
6678 })();
6679 var l289 = {name: "TAGBODY"};
6680 var l290 = QIList(l5,l5);
6681 (function(){
6682     var v775 = l47.fvalue(pv, l289, (function (values){
6683         var v776= l5.value;
6684         for (var i = arguments.length-1; i>=1; i--)
6685             v776 = {car: arguments[i], cdr:
6686         v776};
6687         return (function(){
6688             try {
6689                 (l103.fvalue(pv, (function(){
6690                     var symbol = l287;
6691                     var func = symbol.fvalue;
6692                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6693                     return func;
6694                 })(), v776) !== l5.value ? l5.value : (function(){
6695                     var values = mv;
6696                     throw ({type: 'block', id: 244, values: l192.fvalue(values, ({car: l122, cdr: l68.fvalue(pv, v776, l290)})), message: 'Return from unknown block TAGBODY.'})
6697                 })());
6698                 (l287.fvalue(pv, (function(){
6699                     var tmp = v776;
6700                     return tmp === l5.value? l5.value: tmp.car;
6701                 })()) !== l5.value ? l5.value : (function(){
6702                     var v777 = l18.fvalue(pv, "START");
6703                     var v778 = ({car: v777, cdr: v776});
6704                     return (v776 = v778);
6705                 })());
6706                 return (function(v779){
6707                     return (function(v781,v780){
6708                         try {
6709                             var tmp;
6710                             tmp = l211.value;
6711                             l211.value = v781;
6712                             v781 = tmp;
6713                             (function(v782){
6714                                 return (v780 = l43.fvalue(pv, l199.fvalue(pv, v782)));
6715                             })(l210.fvalue(pv, l42.fvalue(pv, v776), (function(){
6716                                 var symbol = l211;
6717                                 var value = symbol.value;
6718                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6719                                 return value;
6720                             })(), l208));
6721                             return l190.fvalue(values, "(function(){", (function(){
6722                                 var symbol = l155;
6723                                 var value = symbol.value;
6724                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6725                                 return value;
6726                             })(), l194.fvalue(pv, "var tagbody_", v779, " = ", v780, ";", (function(){
6727                                 var symbol = l155;
6728                                 var value = symbol.value;
6729                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6730                                 return value;
6731                             })(), "tbloop:", (function(){
6732                                 var symbol = l155;
6733                                 var value = symbol.value;
6734                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6735                                 return value;
6736                             })(), "while (true) {", (function(){
6737                                 var symbol = l155;
6738                                 var value = symbol.value;
6739                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6740                                 return value;
6741                             })(), l194.fvalue(pv, "try {", (function(){
6742                                 var symbol = l155;
6743                                 var value = symbol.value;
6744                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6745                                 return value;
6746                             })(), l194.fvalue(pv, (function(v783){
6747                                 return l190.fvalue(pv, "switch(tagbody_", v779, "){", (function(){
6748                                     var symbol = l155;
6749                                     var value = symbol.value;
6750                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6751                                     return value;
6752                                 })(), "case ", v780, ":", (function(){
6753                                     var symbol = l155;
6754                                     var value = symbol.value;
6755                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6756                                     return value;
6757                                 })(), (function(){
6758                                     return (function(v784,v785){
6759                                         (function(){
6760                                             while(v784 !== l5.value){
6761                                                 (v785 = (function(){
6762                                                     var tmp = v784;
6763                                                     return tmp === l5.value? l5.value: tmp.car;
6764                                                 })());
6765                                                 (function(){
6766                                                     (v783 = l156.fvalue(pv, v783, (l29.fvalue(pv, l287.fvalue(pv, v785)) !== l5.value ? l194.fvalue(pv, l192.fvalue(pv, v785), ";", (function(){
6767                                                         var symbol = l155;
6768                                                         var value = symbol.value;
6769                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6770                                                         return value;
6771                                                     })()) : (function(v786){
6772                                                         return l190.fvalue(pv, "case ", l43.fvalue(pv, l199.fvalue(pv, v786)), ":", (function(){
6773                                                             var symbol = l155;
6774                                                             var value = symbol.value;
6775                                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6776                                                             return value;
6777                                                         })());
6778                                                     })(l210.fvalue(pv, v785, (function(){
6779                                                         var symbol = l211;
6780                                                         var value = symbol.value;
6781                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6782                                                         return value;
6783                                                     })(), l208)))));
6784                                                     return l5.value;
6785                                                 })();
6786                                                 (v784 = (function(){
6787                                                     var tmp = v784;
6788                                                     return tmp === l5.value? l5.value: tmp.cdr;
6789                                                 })());
6790                                             }return l5.value;
6791                                         })();
6792                                         return v783;
6793                                     })((function(){
6794                                         var tmp = v776;
6795                                         return tmp === l5.value? l5.value: tmp.cdr;
6796                                     })(),l5.value);
6797                                 })(), "default:", (function(){
6798                                     var symbol = l155;
6799                                     var value = symbol.value;
6800                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6801                                     return value;
6802                                 })(), "    break tbloop;", (function(){
6803                                     var symbol = l155;
6804                                     var value = symbol.value;
6805                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6806                                     return value;
6807                                 })(), "}", (function(){
6808                                     var symbol = l155;
6809                                     var value = symbol.value;
6810                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6811                                     return value;
6812                                 })());
6813                             })("")), "}", (function(){
6814                                 var symbol = l155;
6815                                 var value = symbol.value;
6816                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6817                                 return value;
6818                             })(), "catch (jump) {", (function(){
6819                                 var symbol = l155;
6820                                 var value = symbol.value;
6821                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6822                                 return value;
6823                             })(), "    if (jump.type == 'tagbody' && jump.id == ", v779, ")", (function(){
6824                                 var symbol = l155;
6825                                 var value = symbol.value;
6826                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6827                                 return value;
6828                             })(), "        tagbody_", v779, " = jump.label;", (function(){
6829                                 var symbol = l155;
6830                                 var value = symbol.value;
6831                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6832                                 return value;
6833                             })(), "    else", (function(){
6834                                 var symbol = l155;
6835                                 var value = symbol.value;
6836                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6837                                 return value;
6838                             })(), "        throw(jump);", (function(){
6839                                 var symbol = l155;
6840                                 var value = symbol.value;
6841                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6842                                 return value;
6843                             })(), "}", (function(){
6844                                 var symbol = l155;
6845                                 var value = symbol.value;
6846                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6847                                 return value;
6848                             })()), "}", (function(){
6849                                 var symbol = l155;
6850                                 var value = symbol.value;
6851                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6852                                 return value;
6853                             })(), "return ", l192.fvalue(pv, l5.value), ";", (function(){
6854                                 var symbol = l155;
6855                                 var value = symbol.value;
6856                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6857                                 return value;
6858                             })()), "})()");
6859                         }
6860                         finally {
6861                             l211.value = v781;
6862                         }
6863                     })(l288.fvalue(pv, v779, v776),l5.value);
6864                 })((function(){
6865                     var symbol = l285;
6866                     var value = symbol.value;
6867                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6868                     return value;
6869                 })());
6870             }
6871             catch (cf){
6872                 if (cf.type == 'block' && cf.id == 244)
6873                     return values.apply(this, forcemv(cf.values));
6874                 else
6875                     throw cf;
6876             }
6877         })();
6878     }));
6879     var v787 = ({car: v775, cdr: (function(){
6880         var symbol = l229;
6881         var value = symbol.value;
6882         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6883         return value;
6884     })()});
6885     return ((l229).value = v787);
6886 })();
6887 var l291 = {name: "GO"};
6888 (function(){
6889     var v788 = l47.fvalue(pv, l291, (function (values,v789){
6890         checkArgs(arguments, 2);
6891         return (function(){
6892             return (function(v790,v791){
6893                 (l13.fvalue(pv, v790) !== l5.value ? (function(){
6894                     throw l156.fvalue(pv, "Unknown tag `", v791, "'.");
6895                 })() : l5.value);
6896                 return l190.fvalue(values, "(function(){", (function(){
6897                     var symbol = l155;
6898                     var value = symbol.value;
6899                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6900                     return value;
6901                 })(), l194.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l42.fvalue(pv, l199.fvalue(pv, v790)), ", ", "label: ", l43.fvalue(pv, l199.fvalue(pv, v790)), ", ", "message: 'Attempt to GO to non-existing tag ", v791, "'", "})", (function(){
6902                     var symbol = l155;
6903                     var value = symbol.value;
6904                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6905                     return value;
6906                 })()), "})()");
6907             })(l210.fvalue(pv, v789, (function(){
6908                 var symbol = l211;
6909                 var value = symbol.value;
6910                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6911                 return value;
6912             })(), l208),(((function(){
6913                 var tmp = v789;
6914                 return (typeof tmp == 'object' && 'name' in tmp);
6915             })()?l4.value: l5.value) !== l5.value ? (v789).name : (l89.fvalue(pv, v789) !== l5.value ? l19.fvalue(pv, v789) : l5.value)));
6916         })();
6917     }));
6918     var v792 = ({car: v788, cdr: (function(){
6919         var symbol = l229;
6920         var value = symbol.value;
6921         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6922         return value;
6923     })()});
6924     return ((l229).value = v792);
6925 })();
6926 var l292 = {name: "UNWIND-PROTECT"};
6927 (function(){
6928     var v793 = l47.fvalue(pv, l292, (function (values,v795){
6929         checkArgsAtLeast(arguments, 2);
6930         var v794= l5.value;
6931         for (var i = arguments.length-1; i>=2; i--)
6932             v794 = {car: arguments[i], cdr:
6933         v794};
6934         return (function(){
6935             return l190.fvalue(values, "(function(){", (function(){
6936                 var symbol = l155;
6937                 var value = symbol.value;
6938                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6939                 return value;
6940             })(), l194.fvalue(pv, "var ret = ", l192.fvalue(pv, l5.value), ";", (function(){
6941                 var symbol = l155;
6942                 var value = symbol.value;
6943                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6944                 return value;
6945             })(), "try {", (function(){
6946                 var symbol = l155;
6947                 var value = symbol.value;
6948                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6949                 return value;
6950             })(), l194.fvalue(pv, "ret = ", l192.fvalue(pv, v795), ";", (function(){
6951                 var symbol = l155;
6952                 var value = symbol.value;
6953                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6954                 return value;
6955             })()), "} finally {", (function(){
6956                 var symbol = l155;
6957                 var value = symbol.value;
6958                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6959                 return value;
6960             })(), l194.fvalue(pv, l253.fvalue(pv, v794)), "}", (function(){
6961                 var symbol = l155;
6962                 var value = symbol.value;
6963                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6964                 return value;
6965             })(), "return ret;", (function(){
6966                 var symbol = l155;
6967                 var value = symbol.value;
6968                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6969                 return value;
6970             })()), "})()");
6971         })();
6972     }));
6973     var v796 = ({car: v793, cdr: (function(){
6974         var symbol = l229;
6975         var value = symbol.value;
6976         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6977         return value;
6978     })()});
6979     return ((l229).value = v796);
6980 })();
6981 var l293 = {name: "MULTIPLE-VALUE-CALL"};
6982 (function(){
6983     var v797 = l47.fvalue(pv, l293, (function (values,v799){
6984         checkArgsAtLeast(arguments, 2);
6985         var v798= l5.value;
6986         for (var i = arguments.length-1; i>=2; i--)
6987             v798 = {car: arguments[i], cdr:
6988         v798};
6989         return (function(){
6990             return l190.fvalue(values, "(function(){", (function(){
6991                 var symbol = l155;
6992                 var value = symbol.value;
6993                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6994                 return value;
6995             })(), l194.fvalue(pv, "var func = ", l192.fvalue(pv, v799), ";", (function(){
6996                 var symbol = l155;
6997                 var value = symbol.value;
6998                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6999                 return value;
7000             })(), "var args = [", ((function(){
7001                 var symbol = l195;
7002                 var value = symbol.value;
7003                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7004                 return value;
7005             })() !== l5.value ? "values" : "pv"), "];", (function(){
7006                 var symbol = l155;
7007                 var value = symbol.value;
7008                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7009                 return value;
7010             })(), "return ", l190.fvalue(pv, "(function(){", (function(){
7011                 var symbol = l155;
7012                 var value = symbol.value;
7013                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7014                 return value;
7015             })(), l194.fvalue(pv, "var values = mv;", (function(){
7016                 var symbol = l155;
7017                 var value = symbol.value;
7018                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7019                 return value;
7020             })(), "var vs;", (function(){
7021                 var symbol = l155;
7022                 var value = symbol.value;
7023                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7024                 return value;
7025             })(), l160.fvalue(pv, (function (values,v800){
7026                 checkArgs(arguments, 2);
7027                 return l190.fvalue(values, "vs = ", l192.fvalue(pv, v800, l4.value), ";", (function(){
7028                     var symbol = l155;
7029                     var value = symbol.value;
7030                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7031                     return value;
7032                 })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){
7033                     var symbol = l155;
7034                     var value = symbol.value;
7035                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7036                     return value;
7037                 })(), l194.fvalue(pv, "args = args.concat(vs);", (function(){
7038                     var symbol = l155;
7039                     var value = symbol.value;
7040                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7041                     return value;
7042                 })()), "else", (function(){
7043                     var symbol = l155;
7044                     var value = symbol.value;
7045                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7046                     return value;
7047                 })(), l194.fvalue(pv, "args.push(vs);", (function(){
7048                     var symbol = l155;
7049                     var value = symbol.value;
7050                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7051                     return value;
7052                 })()));
7053             }), v798), "return func.apply(window, args);", (function(){
7054                 var symbol = l155;
7055                 var value = symbol.value;
7056                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7057                 return value;
7058             })()), "})()"), ";", (function(){
7059                 var symbol = l155;
7060                 var value = symbol.value;
7061                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7062                 return value;
7063             })()), "})()");
7064         })();
7065     }));
7066     var v801 = ({car: v797, cdr: (function(){
7067         var symbol = l229;
7068         var value = symbol.value;
7069         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7070         return value;
7071     })()});
7072     return ((l229).value = v801);
7073 })();
7074 var l294 = {name: "MULTIPLE-VALUE-PROG1"};
7075 (function(){
7076     var v802 = l47.fvalue(pv, l294, (function (values,v804){
7077         checkArgsAtLeast(arguments, 2);
7078         var v803= l5.value;
7079         for (var i = arguments.length-1; i>=2; i--)
7080             v803 = {car: arguments[i], cdr:
7081         v803};
7082         return (function(){
7083             return l190.fvalue(values, "(function(){", (function(){
7084                 var symbol = l155;
7085                 var value = symbol.value;
7086                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7087                 return value;
7088             })(), l194.fvalue(pv, "var args = ", l192.fvalue(pv, v804, (function(){
7089                 var symbol = l195;
7090                 var value = symbol.value;
7091                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7092                 return value;
7093             })()), ";", (function(){
7094                 var symbol = l155;
7095                 var value = symbol.value;
7096                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7097                 return value;
7098             })(), l253.fvalue(pv, v803), "return args;", (function(){
7099                 var symbol = l155;
7100                 var value = symbol.value;
7101                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7102                 return value;
7103             })()), "})()");
7104         })();
7105     }));
7106     var v805 = ({car: v802, cdr: (function(){
7107         var symbol = l229;
7108         var value = symbol.value;
7109         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7110         return value;
7111     })()});
7112     return ((l229).value = v805);
7113 })();
7114 var l295 = {name: "*COMMA*"};
7115 (function(){
7116     (((l295.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l295).value = l188));
7117     return l295;
7118 })();
7119 var l296 = {name: "*COMMA-ATSIGN*"};
7120 (function(){
7121     (((l296.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l296).value = l187));
7122     return l296;
7123 })();
7124 var l297 = {name: "*BQ-LIST*"};
7125 (function(){
7126     (((l297.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l297).value = (function(){
7127         var name = "BQ-LIST";
7128         if (typeof name != 'string')
7129             throw 'The value ' + name + ' is not a type string.';
7130         return ({name: name});
7131     })()));
7132     return l297;
7133 })();
7134 var l298 = {name: "*BQ-APPEND*"};
7135 (function(){
7136     (((l298.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l298).value = (function(){
7137         var name = "BQ-APPEND";
7138         if (typeof name != 'string')
7139             throw 'The value ' + name + ' is not a type string.';
7140         return ({name: name});
7141     })()));
7142     return l298;
7143 })();
7144 var l299 = {name: "*BQ-LIST**"};
7145 (function(){
7146     (((l299.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l299).value = (function(){
7147         var name = "BQ-LIST*";
7148         if (typeof name != 'string')
7149             throw 'The value ' + name + ' is not a type string.';
7150         return ({name: name});
7151     })()));
7152     return l299;
7153 })();
7154 var l300 = {name: "*BQ-NCONC*"};
7155 (function(){
7156     (((l300.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l300).value = (function(){
7157         var name = "BQ-NCONC";
7158         if (typeof name != 'string')
7159             throw 'The value ' + name + ' is not a type string.';
7160         return ({name: name});
7161     })()));
7162     return l300;
7163 })();
7164 var l301 = {name: "*BQ-CLOBBERABLE*"};
7165 (function(){
7166     (((l301.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l301).value = (function(){
7167         var name = "BQ-CLOBBERABLE";
7168         if (typeof name != 'string')
7169             throw 'The value ' + name + ' is not a type string.';
7170         return ({name: name});
7171     })()));
7172     return l301;
7173 })();
7174 var l302 = {name: "*BQ-QUOTE*"};
7175 (function(){
7176     (((l302.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l302).value = (function(){
7177         var name = "BQ-QUOTE";
7178         if (typeof name != 'string')
7179             throw 'The value ' + name + ' is not a type string.';
7180         return ({name: name});
7181     })()));
7182     return l302;
7183 })();
7184 var l303 = {name: "*BQ-QUOTE-NIL*"};
7185 (function(){
7186     (((l303.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l303).value = l47.fvalue(pv, (function(){
7187         var symbol = l302;
7188         var value = symbol.value;
7189         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7190         return value;
7191     })(), l5.value)));
7192     return l303;
7193 })();
7194 var l304 = {name: "*BQ-SIMPLIFY*"};
7195 (function(){
7196     ((l304).value = l4.value);
7197     return l304;
7198 })();
7199 l186;
7200 var l305 = {name: "BQ-COMPLETELY-PROCESS"};
7201 var l306 = {name: "BQ-PROCESS"};
7202 var l307 = {name: "BQ-SIMPLIFY"};
7203 var l308 = {name: "BQ-REMOVE-TOKENS"};
7204 (function(){
7205     (l305).fvalue = (function(v808){
7206         ((v808)["fname"] = "BQ-COMPLETELY-PROCESS");
7207         return v808;
7208     })((function (values,v806){
7209         checkArgs(arguments, 2);
7210         return (function(){
7211             return (function(v807){
7212                 return l308.fvalue(values, ((function(){
7213                     var symbol = l304;
7214                     var value = symbol.value;
7215                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7216                     return value;
7217                 })() !== l5.value ? l307.fvalue(pv, v807) : v807));
7218             })(l306.fvalue(pv, v806));
7219         })();
7220     }));
7221     return l305;
7222 })();
7223 var l309 = {name: "BRACKET"};
7224 (function(){
7225     (l306).fvalue = (function(v814){
7226         ((v814)["fname"] = "BQ-PROCESS");
7227         return v814;
7228     })((function (values,v809){
7229         checkArgs(arguments, 2);
7230         return (function(){
7231             return (l48.fvalue(pv, v809) !== l5.value ? l47.fvalue(values, (function(){
7232                 var symbol = l302;
7233                 var value = symbol.value;
7234                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7235                 return value;
7236             })(), v809) : ((((function(){
7237                 var tmp = v809;
7238                 return tmp === l5.value? l5.value: tmp.car;
7239             })() === l186)?l4.value: l5.value) !== l5.value ? l306.fvalue(values, l305.fvalue(pv, l35.fvalue(pv, v809))) : ((((function(){
7240                 var tmp = v809;
7241                 return tmp === l5.value? l5.value: tmp.car;
7242             })() === (function(){
7243                 var symbol = l295;
7244                 var value = symbol.value;
7245                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7246                 return value;
7247             })())?l4.value: l5.value) !== l5.value ? l35.fvalue(values, v809) : ((((function(){
7248                 var tmp = v809;
7249                 return tmp === l5.value? l5.value: tmp.car;
7250             })() === (function(){
7251                 var symbol = l296;
7252                 var value = symbol.value;
7253                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7254                 return value;
7255             })())?l4.value: l5.value) !== l5.value ? (function(){
7256                 throw "ill-formed";
7257             })() : (function(){
7258                 return (function(v810,v811){
7259                     return (function(){
7260                         try {
7261                             return (function(){
7262                                 while(l4.value !== l5.value){
7263                                     (l48.fvalue(pv, v810) !== l5.value ? (function(){
7264                                         var values = mv;
7265                                         throw ({type: 'block', id: 253, values: ({car: (function(){
7266                                             var symbol = l298;
7267                                             var value = symbol.value;
7268                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7269                                             return value;
7270                                         })(), cdr: l127.fvalue(pv, v811, l47.fvalue(pv, l47.fvalue(pv, (function(){
7271                                             var symbol = l302;
7272                                             var value = symbol.value;
7273                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7274                                             return value;
7275                                         })(), v810)))}), message: 'Return from unknown block NIL.'})
7276                                     })() : l5.value);
7277                                     (function(){
7278                                         ((((function(){
7279                                             var tmp = v810;
7280                                             return tmp === l5.value? l5.value: tmp.car;
7281                                         })() === (function(){
7282                                             var symbol = l295;
7283                                             var value = symbol.value;
7284                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7285                                             return value;
7286                                         })())?l4.value: l5.value) !== l5.value ? (function(){
7287                                             (l13.fvalue(pv, l37.fvalue(pv, v810)) !== l5.value ? l5.value : (function(){
7288                                                 throw "Malformed";
7289                                             })());
7290                                             return (function(){
7291                                                 var values = mv;
7292                                                 throw ({type: 'block', id: 253, values: ({car: (function(){
7293                                                     var symbol = l298;
7294                                                     var value = symbol.value;
7295                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7296                                                     return value;
7297                                                 })(), cdr: l127.fvalue(pv, v811, l47.fvalue(pv, l35.fvalue(pv, v810)))}), message: 'Return from unknown block NIL.'})
7298                                             })();
7299                                         })() : l5.value);
7300                                         ((((function(){
7301                                             var tmp = v810;
7302                                             return tmp === l5.value? l5.value: tmp.car;
7303                                         })() === (function(){
7304                                             var symbol = l296;
7305                                             var value = symbol.value;
7306                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7307                                             return value;
7308                                         })())?l4.value: l5.value) !== l5.value ? (function(){
7309                                             throw "Dotted";
7310                                         })() : l5.value);
7311                                         return l5.value;
7312                                     })();
7313                                     (function(v812,v813){
7314                                         return (v810 = v812, v811 = v813);
7315                                     })((function(){
7316                                         var tmp = v810;
7317                                         return tmp === l5.value? l5.value: tmp.cdr;
7318                                     })(),({car: l309.fvalue(pv, (function(){
7319                                         var tmp = v810;
7320                                         return tmp === l5.value? l5.value: tmp.car;
7321                                     })()), cdr: v811}));
7322                                 }return l5.value;
7323                             })();
7324                         }
7325                         catch (cf){
7326                             if (cf.type == 'block' && cf.id == 253)
7327                                 return values.apply(this, forcemv(cf.values));
7328                             else
7329                                 throw cf;
7330                         }
7331                     })();
7332                 })(v809,l5);
7333             })()))));
7334         })();
7335     }));
7336     return l306;
7337 })();
7338 (function(){
7339     (l309).fvalue = (function(v816){
7340         ((v816)["fname"] = "BRACKET");
7341         return v816;
7342     })((function (values,v815){
7343         checkArgs(arguments, 2);
7344         return (function(){
7345             return (l48.fvalue(pv, v815) !== l5.value ? l47.fvalue(values, (function(){
7346                 var symbol = l297;
7347                 var value = symbol.value;
7348                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7349                 return value;
7350             })(), l306.fvalue(pv, v815)) : ((((function(){
7351                 var tmp = v815;
7352                 return tmp === l5.value? l5.value: tmp.car;
7353             })() === (function(){
7354                 var symbol = l295;
7355                 var value = symbol.value;
7356                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7357                 return value;
7358             })())?l4.value: l5.value) !== l5.value ? l47.fvalue(values, (function(){
7359                 var symbol = l297;
7360                 var value = symbol.value;
7361                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7362                 return value;
7363             })(), l35.fvalue(pv, v815)) : ((((function(){
7364                 var tmp = v815;
7365                 return tmp === l5.value? l5.value: tmp.car;
7366             })() === (function(){
7367                 var symbol = l296;
7368                 var value = symbol.value;
7369                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7370                 return value;
7371             })())?l4.value: l5.value) !== l5.value ? l35.fvalue(values, v815) : l47.fvalue(values, (function(){
7372                 var symbol = l297;
7373                 var value = symbol.value;
7374                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7375                 return value;
7376             })(), l306.fvalue(pv, v815)))));
7377         })();
7378     }));
7379     return l309;
7380 })();
7381 var l310 = {name: "MAPTREE"};
7382 (function(){
7383     (l310).fvalue = (function(v821){
7384         ((v821)["fname"] = "MAPTREE");
7385         return v821;
7386     })((function (values,v817,v818){
7387         checkArgs(arguments, 3);
7388         return (function(){
7389             return (l48.fvalue(pv, v818) !== l5.value ? (function(){
7390                 var f = v817;
7391                 return (typeof f === 'function'? f: f.fvalue)(values, v818)
7392             })() : (function(v819,v820){
7393                 return ((l28.fvalue(pv, v819, (function(){
7394                     var tmp = v818;
7395                     return tmp === l5.value? l5.value: tmp.car;
7396                 })()) !== l5.value ? l28.fvalue(pv, v820, (function(){
7397                     var tmp = v818;
7398                     return tmp === l5.value? l5.value: tmp.cdr;
7399                 })()) : l5.value) !== l5.value ? v818 : ({car: v819, cdr: v820}));
7400             })((function(){
7401                 var f = v817;
7402                 return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
7403                     var tmp = v818;
7404                     return tmp === l5.value? l5.value: tmp.car;
7405                 })())
7406             })(),l310.fvalue(pv, v817, (function(){
7407                 var tmp = v818;
7408                 return tmp === l5.value? l5.value: tmp.cdr;
7409             })())));
7410         })();
7411     }));
7412     return l310;
7413 })();
7414 var l311 = {name: "BQ-SPLICING-FROB"};
7415 (function(){
7416     (l311).fvalue = (function(v823){
7417         ((v823)["fname"] = "BQ-SPLICING-FROB");
7418         return v823;
7419     })((function (values,v822){
7420         checkArgs(arguments, 2);
7421         return (function(){
7422             return (((function(){
7423                 var tmp = v822;
7424                 return (typeof tmp == 'object' && 'car' in tmp);
7425             })()?l4.value: l5.value) !== l5.value ? (((function(){
7426                 var tmp = v822;
7427                 return tmp === l5.value? l5.value: tmp.car;
7428             })() === (function(){
7429                 var symbol = l296;
7430                 var value = symbol.value;
7431                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7432                 return value;
7433             })())?l4.value: l5.value) : l5.value);
7434         })();
7435     }));
7436     return l311;
7437 })();
7438 var l312 = {name: "BQ-FROB"};
7439 (function(){
7440     (l312).fvalue = (function(v826){
7441         ((v826)["fname"] = "BQ-FROB");
7442         return v826;
7443     })((function (values,v824){
7444         checkArgs(arguments, 2);
7445         return (function(){
7446             return (((function(){
7447                 var tmp = v824;
7448                 return (typeof tmp == 'object' && 'car' in tmp);
7449             })()?l4.value: l5.value) !== l5.value ? (function(v825){
7450                 return (v825 !== l5.value ? v825 : (((function(){
7451                     var tmp = v824;
7452                     return tmp === l5.value? l5.value: tmp.car;
7453                 })() === (function(){
7454                     var symbol = l296;
7455                     var value = symbol.value;
7456                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7457                     return value;
7458                 })())?l4.value: l5.value));
7459             })((((function(){
7460                 var tmp = v824;
7461                 return tmp === l5.value? l5.value: tmp.car;
7462             })() === (function(){
7463                 var symbol = l295;
7464                 var value = symbol.value;
7465                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7466                 return value;
7467             })())?l4.value: l5.value)) : l5.value);
7468         })();
7469     }));
7470     return l312;
7471 })();
7472 var l313 = {name: "BQ-SIMPLIFY-ARGS"};
7473 (function(){
7474     (l307).fvalue = (function(v829){
7475         ((v829)["fname"] = "BQ-SIMPLIFY");
7476         return v829;
7477     })((function (values,v827){
7478         checkArgs(arguments, 2);
7479         return (function(){
7480             return (l48.fvalue(pv, v827) !== l5.value ? v827 : (function(v828){
7481                 return (l29.fvalue(pv, (((function(){
7482                     var tmp = v828;
7483                     return tmp === l5.value? l5.value: tmp.car;
7484                 })() === (function(){
7485                     var symbol = l298;
7486                     var value = symbol.value;
7487                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7488                     return value;
7489                 })())?l4.value: l5.value)) !== l5.value ? v828 : l313.fvalue(values, v828));
7490             })(((((function(){
7491                 var tmp = v827;
7492                 return tmp === l5.value? l5.value: tmp.car;
7493             })() === (function(){
7494                 var symbol = l302;
7495                 var value = symbol.value;
7496                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7497                 return value;
7498             })())?l4.value: l5.value) !== l5.value ? v827 : l310.fvalue(pv, (function(){
7499                 var symbol = l307;
7500                 var func = symbol.fvalue;
7501                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7502                 return func;
7503             })(), v827))));
7504         })();
7505     }));
7506     return l307;
7507 })();
7508 var l314 = {name: "BQ-ATTACH-APPEND"};
7509 var l315 = {name: "BQ-ATTACH-CONSES"};
7510 var l316 = {name: "CDDAR"};
7511 var l317 = {name: "CAADAR"};
7512 (function(){
7513     (l313).fvalue = (function(v835){
7514         ((v835)["fname"] = "BQ-SIMPLIFY-ARGS");
7515         return v835;
7516     })((function (values,v830){
7517         checkArgs(arguments, 2);
7518         return (function(){
7519             return (function(){
7520                 return (function(v831,v832){
7521                     return (function(){
7522                         try {
7523                             return (function(){
7524                                 while(l4.value !== l5.value){
7525                                     (l13.fvalue(pv, v831) !== l5.value ? (function(){
7526                                         var values = mv;
7527                                         throw ({type: 'block', id: 261, values: v832, message: 'Return from unknown block NIL.'})
7528                                     })() : l5.value);
7529                                     l5.value;
7530                                     (function(v833,v834){
7531                                         return (v831 = v833, v832 = v834);
7532                                     })((function(){
7533                                         var tmp = v831;
7534                                         return tmp === l5.value? l5.value: tmp.cdr;
7535                                     })(),(l48.fvalue(pv, (function(){
7536                                         var tmp = v831;
7537                                         return tmp === l5.value? l5.value: tmp.car;
7538                                     })()) !== l5.value ? l314.fvalue(pv, (function(){
7539                                         var symbol = l298;
7540                                         var value = symbol.value;
7541                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7542                                         return value;
7543                                     })(), (function(){
7544                                         var tmp = v831;
7545                                         return tmp === l5.value? l5.value: tmp.car;
7546                                     })(), v832) : ((((l34.fvalue(pv, v831) === (function(){
7547                                         var symbol = l297;
7548                                         var value = symbol.value;
7549                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7550                                         return value;
7551                                     })())?l4.value: l5.value) !== l5.value ? l128.fvalue(pv, (function(){
7552                                         var symbol = l311;
7553                                         var func = symbol.fvalue;
7554                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7555                                         return func;
7556                                     })(), l36.fvalue(pv, v831)) : l5.value) !== l5.value ? l315.fvalue(pv, l36.fvalue(pv, v831), v832) : ((((l34.fvalue(pv, v831) === (function(){
7557                                         var symbol = l299;
7558                                         var value = symbol.value;
7559                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7560                                         return value;
7561                                     })())?l4.value: l5.value) !== l5.value ? l128.fvalue(pv, (function(){
7562                                         var symbol = l311;
7563                                         var func = symbol.fvalue;
7564                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7565                                         return func;
7566                                     })(), l36.fvalue(pv, v831)) : l5.value) !== l5.value ? l315.fvalue(pv, l70.fvalue(pv, (function(){
7567                                         var tmp = l70.fvalue(pv, l36.fvalue(pv, v831));
7568                                         return tmp === l5.value? l5.value: tmp.cdr;
7569                                     })()), l314.fvalue(pv, (function(){
7570                                         var symbol = l298;
7571                                         var value = symbol.value;
7572                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7573                                         return value;
7574                                     })(), (function(){
7575                                         var tmp = l94.fvalue(pv, (function(){
7576                                             var tmp = v831;
7577                                             return tmp === l5.value? l5.value: tmp.car;
7578                                         })());
7579                                         return tmp === l5.value? l5.value: tmp.car;
7580                                     })(), v832)) : ((((l34.fvalue(pv, v831) === (function(){
7581                                         var symbol = l302;
7582                                         var value = symbol.value;
7583                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7584                                         return value;
7585                                     })())?l4.value: l5.value) !== l5.value ? (((function(){
7586                                         var tmp = l38.fvalue(pv, v831);
7587                                         return (typeof tmp == 'object' && 'car' in tmp);
7588                                     })()?l4.value: l5.value) !== l5.value ? (l29.fvalue(pv, l312.fvalue(pv, l38.fvalue(pv, v831))) !== l5.value ? l13.fvalue(pv, l316.fvalue(pv, v831)) : l5.value) : l5.value) : l5.value) !== l5.value ? l315.fvalue(pv, l47.fvalue(pv, l47.fvalue(pv, (function(){
7589                                         var symbol = l302;
7590                                         var value = symbol.value;
7591                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7592                                         return value;
7593                                     })(), l317.fvalue(pv, v831))), v832) : (((l34.fvalue(pv, v831) === (function(){
7594                                         var symbol = l301;
7595                                         var value = symbol.value;
7596                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7597                                         return value;
7598                                     })())?l4.value: l5.value) !== l5.value ? l314.fvalue(pv, (function(){
7599                                         var symbol = l300;
7600                                         var value = symbol.value;
7601                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7602                                         return value;
7603                                     })(), l38.fvalue(pv, v831), v832) : l314.fvalue(pv, (function(){
7604                                         var symbol = l298;
7605                                         var value = symbol.value;
7606                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7607                                         return value;
7608                                     })(), (function(){
7609                                         var tmp = v831;
7610                                         return tmp === l5.value? l5.value: tmp.car;
7611                                     })(), v832)))))));
7612                                 }return l5.value;
7613                             })();
7614                         }
7615                         catch (cf){
7616                             if (cf.type == 'block' && cf.id == 261)
7617                                 return values.apply(this, forcemv(cf.values));
7618                             else
7619                                 throw cf;
7620                         }
7621                     })();
7622                 })(l70.fvalue(pv, (function(){
7623                     var tmp = v830;
7624                     return tmp === l5.value? l5.value: tmp.cdr;
7625                 })()),l5.value);
7626             })();
7627         })();
7628     }));
7629     return l313;
7630 })();
7631 var l318 = {name: "NULL-OR-QUOTED"};
7632 (function(){
7633     (l318).fvalue = (function(v838){
7634         ((v838)["fname"] = "NULL-OR-QUOTED");
7635         return v838;
7636     })((function (values,v836){
7637         checkArgs(arguments, 2);
7638         return (function(){
7639             return (function(v837){
7640                 return (v837 !== l5.value ? v837 : (((function(){
7641                     var tmp = v836;
7642                     return (typeof tmp == 'object' && 'car' in tmp);
7643                 })()?l4.value: l5.value) !== l5.value ? (((function(){
7644                     var tmp = v836;
7645                     return tmp === l5.value? l5.value: tmp.car;
7646                 })() === (function(){
7647                     var symbol = l302;
7648                     var value = symbol.value;
7649                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7650                     return value;
7651                 })())?l4.value: l5.value) : l5.value));
7652             })(l13.fvalue(pv, v836));
7653         })();
7654     }));
7655     return l318;
7656 })();
7657 (function(){
7658     (l314).fvalue = (function(v843){
7659         ((v843)["fname"] = "BQ-ATTACH-APPEND");
7660         return v843;
7661     })((function (values,v839,v840,v841){
7662         checkArgs(arguments, 4);
7663         return (function(){
7664             return ((l318.fvalue(pv, v840) !== l5.value ? l318.fvalue(pv, v841) : l5.value) !== l5.value ? l47.fvalue(values, (function(){
7665                 var symbol = l302;
7666                 var value = symbol.value;
7667                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7668                 return value;
7669             })(), l68.fvalue(pv, l35.fvalue(pv, v840), l35.fvalue(pv, v841))) : ((function(v842){
7670                 return (v842 !== l5.value ? v842 : ((v841 == (function(){
7671                     var symbol = l303;
7672                     var value = symbol.value;
7673                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7674                     return value;
7675                 })())?l4.value: l5.value));
7676             })(l13.fvalue(pv, v841)) !== l5.value ? (l311.fvalue(pv, v840) !== l5.value ? l47.fvalue(values, v839, v840) : v840) : ((((function(){
7677                 var tmp = v841;
7678                 return (typeof tmp == 'object' && 'car' in tmp);
7679             })()?l4.value: l5.value) !== l5.value ? (((function(){
7680                 var tmp = v841;
7681                 return tmp === l5.value? l5.value: tmp.car;
7682             })() === v839)?l4.value: l5.value) : l5.value) !== l5.value ? l85.fvalue(values, (function(){
7683                 var tmp = v841;
7684                 return tmp === l5.value? l5.value: tmp.car;
7685             })(), v840, (function(){
7686                 var tmp = v841;
7687                 return tmp === l5.value? l5.value: tmp.cdr;
7688             })()) : l47.fvalue(values, v839, v840, v841))));
7689         })();
7690     }));
7691     return l314;
7692 })();
7693 (function(){
7694     (l315).fvalue = (function(v848){
7695         ((v848)["fname"] = "BQ-ATTACH-CONSES");
7696         return v848;
7697     })((function (values,v844,v845){
7698         checkArgs(arguments, 3);
7699         return (function(){
7700             return ((l104.fvalue(pv, (function(){
7701                 var symbol = l318;
7702                 var func = symbol.fvalue;
7703                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7704                 return func;
7705             })(), v844) !== l5.value ? l318.fvalue(pv, v845) : l5.value) !== l5.value ? l47.fvalue(values, (function(){
7706                 var symbol = l302;
7707                 var value = symbol.value;
7708                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7709                 return value;
7710             })(), l68.fvalue(pv, l81.fvalue(pv, (function(){
7711                 var symbol = l35;
7712                 var func = symbol.fvalue;
7713                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7714                 return func;
7715             })(), v844), l35.fvalue(pv, v845))) : ((function(v846){
7716                 return (v846 !== l5.value ? v846 : ((v845 == (function(){
7717                     var symbol = l303;
7718                     var value = symbol.value;
7719                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7720                     return value;
7721                 })())?l4.value: l5.value));
7722             })(l13.fvalue(pv, v845)) !== l5.value ? ({car: (function(){
7723                 var symbol = l297;
7724                 var value = symbol.value;
7725                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7726                 return value;
7727             })(), cdr: v844}) : ((((function(){
7728                 var tmp = v845;
7729                 return (typeof tmp == 'object' && 'car' in tmp);
7730             })()?l4.value: l5.value) !== l5.value ? (function(v847){
7731                 return (v847 !== l5.value ? v847 : (((function(){
7732                     var tmp = v845;
7733                     return tmp === l5.value? l5.value: tmp.car;
7734                 })() === (function(){
7735                     var symbol = l299;
7736                     var value = symbol.value;
7737                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7738                     return value;
7739                 })())?l4.value: l5.value));
7740             })((((function(){
7741                 var tmp = v845;
7742                 return tmp === l5.value? l5.value: tmp.car;
7743             })() === (function(){
7744                 var symbol = l297;
7745                 var value = symbol.value;
7746                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7747                 return value;
7748             })())?l4.value: l5.value)) : l5.value) !== l5.value ? ({car: (function(){
7749                 var tmp = v845;
7750                 return tmp === l5.value? l5.value: tmp.car;
7751             })(), cdr: l68.fvalue(pv, v844, (function(){
7752                 var tmp = v845;
7753                 return tmp === l5.value? l5.value: tmp.cdr;
7754             })())}) : ({car: (function(){
7755                 var symbol = l299;
7756                 var value = symbol.value;
7757                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7758                 return value;
7759             })(), cdr: l68.fvalue(pv, v844, l47.fvalue(pv, v845))}))));
7760         })();
7761     }));
7762     return l315;
7763 })();
7764 (function(){
7765     (l308).fvalue = (function(v850){
7766         ((v850)["fname"] = "BQ-REMOVE-TOKENS");
7767         return v850;
7768     })((function (values,v849){
7769         checkArgs(arguments, 2);
7770         return (function(){
7771             return (((v849 === (function(){
7772                 var symbol = l297;
7773                 var value = symbol.value;
7774                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7775                 return value;
7776             })())?l4.value: l5.value) !== l5.value ? l47 : (((v849 === (function(){
7777                 var symbol = l298;
7778                 var value = symbol.value;
7779                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7780                 return value;
7781             })())?l4.value: l5.value) !== l5.value ? l68 : (((v849 === (function(){
7782                 var symbol = l300;
7783                 var value = symbol.value;
7784                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7785                 return value;
7786             })())?l4.value: l5.value) !== l5.value ? l126 : (((v849 === (function(){
7787                 var symbol = l299;
7788                 var value = symbol.value;
7789                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7790                 return value;
7791             })())?l4.value: l5.value) !== l5.value ? l85 : (((v849 === (function(){
7792                 var symbol = l302;
7793                 var value = symbol.value;
7794                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7795                 return value;
7796             })())?l4.value: l5.value) !== l5.value ? l185 : (l48.fvalue(pv, v849) !== l5.value ? v849 : ((((function(){
7797                 var tmp = v849;
7798                 return tmp === l5.value? l5.value: tmp.car;
7799             })() === (function(){
7800                 var symbol = l301;
7801                 var value = symbol.value;
7802                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7803                 return value;
7804             })())?l4.value: l5.value) !== l5.value ? l308.fvalue(values, l35.fvalue(pv, v849)) : (((((function(){
7805                 var tmp = v849;
7806                 return tmp === l5.value? l5.value: tmp.car;
7807             })() === (function(){
7808                 var symbol = l299;
7809                 var value = symbol.value;
7810                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7811                 return value;
7812             })())?l4.value: l5.value) !== l5.value ? (((function(){
7813                 var tmp = l37.fvalue(pv, v849);
7814                 return (typeof tmp == 'object' && 'car' in tmp);
7815             })()?l4.value: l5.value) !== l5.value ? l13.fvalue(pv, l40.fvalue(pv, v849)) : l5.value) : l5.value) !== l5.value ? ({car: l30, cdr: l310.fvalue(pv, (function(){
7816                 var symbol = l308;
7817                 var func = symbol.fvalue;
7818                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7819                 return func;
7820             })(), (function(){
7821                 var tmp = v849;
7822                 return tmp === l5.value? l5.value: tmp.cdr;
7823             })())}) : l310.fvalue(values, (function(){
7824                 var symbol = l308;
7825                 var func = symbol.fvalue;
7826                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7827                 return func;
7828             })(), v849)))))))));
7829         })();
7830     }));
7831     return l308;
7832 })();
7833 (function(){
7834     var v851 = l47.fvalue(pv, l186, (function (values,v852){
7835         checkArgs(arguments, 2);
7836         return (function(){
7837             return l192.fvalue(values, l305.fvalue(pv, v852));
7838         })();
7839     }));
7840     var v853 = ({car: v851, cdr: (function(){
7841         var symbol = l229;
7842         var value = symbol.value;
7843         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7844         return value;
7845     })()});
7846     return ((l229).value = v853);
7847 })();
7848 var l319 = {name: "*BUILTINS*"};
7849 (function(){
7850     (((l319.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l319).value = l5.value));
7851     return l319;
7852 })();
7853 var l320 = {name: "DEFINE-RAW-BUILTIN"};
7854 l320;
7855 var l321 = {name: "DEFINE-BUILTIN"};
7856 l321;
7857 var l322 = {name: "TYPE-CHECK"};
7858 l322;
7859 var l323 = {name: "VARIABLE-ARITY-CALL"};
7860 (function(){
7861     (l323).fvalue = (function(v866){
7862         ((v866)["fname"] = "VARIABLE-ARITY-CALL");
7863         return v866;
7864     })((function (values,v854,v855){
7865         checkArgs(arguments, 3);
7866         return (function(){
7867             (((function(){
7868                 var tmp = v854;
7869                 return (typeof tmp == 'object' && 'car' in tmp);
7870             })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
7871                 throw "ARGS must be a non-empty list";
7872             })());
7873             return (function(v856,v857,v858){
7874                 (function(){
7875                     return (function(v859,v860){
7876                         (function(){
7877                             while(v859 !== l5.value){
7878                                 (v860 = (function(){
7879                                     var tmp = v859;
7880                                     return tmp === l5.value? l5.value: tmp.car;
7881                                 })());
7882                                 (function(){
7883                                     (((typeof (v860) == "number")?l4.value: l5.value) !== l5.value ? (function(){
7884                                         var v861 = l19.fvalue(pv, v860);
7885                                         var v862 = ({car: v861, cdr: v857});
7886                                         return (v857 = v862);
7887                                     })() : (function(v863){
7888                                         (function(){
7889                                             var v864 = v863;
7890                                             var v865 = ({car: v864, cdr: v857});
7891                                             return (v857 = v865);
7892                                         })();
7893                                         return (v858 = l156.fvalue(pv, v858, l190.fvalue(pv, "var ", v863, " = ", l192.fvalue(pv, v860), ";", (function(){
7894                                             var symbol = l155;
7895                                             var value = symbol.value;
7896                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7897                                             return value;
7898                                         })(), "if (typeof ", v863, " !== 'number') throw 'Not a number!';", (function(){
7899                                             var symbol = l155;
7900                                             var value = symbol.value;
7901                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7902                                             return value;
7903                                         })())));
7904                                     })(l190.fvalue(pv, "x", (v856 = (function(){
7905                                         var x1 = v856;
7906                                         if (typeof x1 !== 'number') throw 'Not a number!';
7907                                         return x1+1;
7908                                     })()))));
7909                                     return l5.value;
7910                                 })();
7911                                 (v859 = (function(){
7912                                     var tmp = v859;
7913                                     return tmp === l5.value? l5.value: tmp.cdr;
7914                                 })());
7915                             }return l5.value;
7916                         })();
7917                         return l5.value;
7918                     })(v854,l5.value);
7919                 })();
7920                 return l190.fvalue(values, "(function(){", (function(){
7921                     var symbol = l155;
7922                     var value = symbol.value;
7923                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7924                     return value;
7925                 })(), l194.fvalue(pv, v858, (function(){
7926                     var f = v855;
7927                     return (typeof f === 'function'? f: f.fvalue)(pv, l70.fvalue(pv, v857))
7928                 })()), "})()");
7929             })(0,l5,"");
7930         })();
7931     }));
7932     return l323;
7933 })();
7934 var l324 = {name: "VARIABLE-ARITY"};
7935 l324;
7936 var l325 = {name: "NUM-OP-NUM"};
7937 (function(){
7938     (l325).fvalue = (function(v870){
7939         ((v870)["fname"] = "NUM-OP-NUM");
7940         return v870;
7941     })((function (values,v867,v868,v869){
7942         checkArgs(arguments, 4);
7943         return (function(){
7944             return l190.fvalue(values, "(function(){", (function(){
7945                 var symbol = l155;
7946                 var value = symbol.value;
7947                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7948                 return value;
7949             })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "x", " = ", v867, ";", (function(){
7950                 var symbol = l155;
7951                 var value = symbol.value;
7952                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7953                 return value;
7954             })()), l190.fvalue(pv, "var ", "y", " = ", v869, ";", (function(){
7955                 var symbol = l155;
7956                 var value = symbol.value;
7957                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7958                 return value;
7959             })()), l190.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7960                 var symbol = l155;
7961                 var value = symbol.value;
7962                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7963                 return value;
7964             })(), l194.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7965                 var symbol = l155;
7966                 var value = symbol.value;
7967                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7968                 return value;
7969             })())), l190.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
7970                 var symbol = l155;
7971                 var value = symbol.value;
7972                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7973                 return value;
7974             })(), l194.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
7975                 var symbol = l155;
7976                 var value = symbol.value;
7977                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7978                 return value;
7979             })())), l190.fvalue(pv, "return ", l190.fvalue(pv, "x", v868, "y"), ";", (function(){
7980                 var symbol = l155;
7981                 var value = symbol.value;
7982                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7983                 return value;
7984             })())), "})()");
7985         })();
7986     }));
7987     return l325;
7988 })();
7989 (function(){
7990     var v871 = l47.fvalue(pv, l65, (function (values){
7991         var v872= l5.value;
7992         for (var i = arguments.length-1; i>=1; i--)
7993             v872 = {car: arguments[i], cdr:
7994         v872};
7995         return (function(){
7996             return (l13.fvalue(pv, v872) !== l5.value ? "0" : l323.fvalue(values, v872, (function (values,v873){
7997                 checkArgs(arguments, 2);
7998                 return l190.fvalue(values, "return ", l158.fvalue(pv, v873, "+"), ";", (function(){
7999                     var symbol = l155;
8000                     var value = symbol.value;
8001                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8002                     return value;
8003                 })());
8004             })));
8005         })();
8006     }));
8007     var v874 = ({car: v871, cdr: (function(){
8008         var symbol = l319;
8009         var value = symbol.value;
8010         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8011         return value;
8012     })()});
8013     return ((l319).value = v874);
8014 })();
8015 (function(){
8016     var v875 = l47.fvalue(pv, l66, (function (values,v877){
8017         checkArgsAtLeast(arguments, 2);
8018         var v876= l5.value;
8019         for (var i = arguments.length-1; i>=2; i--)
8020             v876 = {car: arguments[i], cdr:
8021         v876};
8022         return (function(){
8023             return (function(v878){
8024                 return l323.fvalue(values, v878, (function (values,v879){
8025                     checkArgs(arguments, 2);
8026                     return l190.fvalue(values, "return ", (l13.fvalue(pv, v876) !== l5.value ? l156.fvalue(pv, "-", (function(){
8027                         var tmp = v879;
8028                         return tmp === l5.value? l5.value: tmp.car;
8029                     })()) : l158.fvalue(pv, v879, "-")), ";", (function(){
8030                         var symbol = l155;
8031                         var value = symbol.value;
8032                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8033                         return value;
8034                     })());
8035                 }));
8036             })(({car: v877, cdr: v876}));
8037         })();
8038     }));
8039     var v880 = ({car: v875, cdr: (function(){
8040         var symbol = l319;
8041         var value = symbol.value;
8042         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8043         return value;
8044     })()});
8045     return ((l319).value = v880);
8046 })();
8047 (function(){
8048     var v881 = l47.fvalue(pv, l22, (function (values){
8049         var v882= l5.value;
8050         for (var i = arguments.length-1; i>=1; i--)
8051             v882 = {car: arguments[i], cdr:
8052         v882};
8053         return (function(){
8054             return (l13.fvalue(pv, v882) !== l5.value ? "1" : l323.fvalue(values, v882, (function (values,v883){
8055                 checkArgs(arguments, 2);
8056                 return l190.fvalue(values, "return ", l158.fvalue(pv, v883, "*"), ";", (function(){
8057                     var symbol = l155;
8058                     var value = symbol.value;
8059                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8060                     return value;
8061                 })());
8062             })));
8063         })();
8064     }));
8065     var v884 = ({car: v881, cdr: (function(){
8066         var symbol = l319;
8067         var value = symbol.value;
8068         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8069         return value;
8070     })()});
8071     return ((l319).value = v884);
8072 })();
8073 (function(){
8074     var v885 = l47.fvalue(pv, l23, (function (values,v887){
8075         checkArgsAtLeast(arguments, 2);
8076         var v886= l5.value;
8077         for (var i = arguments.length-1; i>=2; i--)
8078             v886 = {car: arguments[i], cdr:
8079         v886};
8080         return (function(){
8081             return (function(v888){
8082                 return l323.fvalue(values, v888, (function (values,v889){
8083                     checkArgs(arguments, 2);
8084                     return l190.fvalue(values, "return ", (l13.fvalue(pv, v886) !== l5.value ? l156.fvalue(pv, "1 /", (function(){
8085                         var tmp = v889;
8086                         return tmp === l5.value? l5.value: tmp.car;
8087                     })()) : l158.fvalue(pv, v889, "/")), ";", (function(){
8088                         var symbol = l155;
8089                         var value = symbol.value;
8090                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8091                         return value;
8092                     })());
8093                 }));
8094             })(({car: v887, cdr: v886}));
8095         })();
8096     }));
8097     var v890 = ({car: v885, cdr: (function(){
8098         var symbol = l319;
8099         var value = symbol.value;
8100         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8101         return value;
8102     })()});
8103     return ((l319).value = v890);
8104 })();
8105 var l326 = {name: "MOD"};
8106 (function(){
8107     var v891 = l47.fvalue(pv, l326, (function (values,v892,v893){
8108         checkArgs(arguments, 3);
8109         return (function(){
8110             return (function(v894,v895){
8111                 return l325.fvalue(values, v894, "%", v895);
8112             })(l192.fvalue(pv, v892),l192.fvalue(pv, v893));
8113         })();
8114     }));
8115     var v896 = ({car: v891, cdr: (function(){
8116         var symbol = l319;
8117         var value = symbol.value;
8118         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8119         return value;
8120     })()});
8121     return ((l319).value = v896);
8122 })();
8123 var l327 = {name: "COMPARISON-CONJUNTION"};
8124 (function(){
8125     (l327).fvalue = (function(v899){
8126         ((v899)["fname"] = "COMPARISON-CONJUNTION");
8127         return v899;
8128     })((function (values,v897,v898){
8129         checkArgs(arguments, 3);
8130         return (function(){
8131             return (l13.fvalue(pv, (function(){
8132                 var tmp = v897;
8133                 return tmp === l5.value? l5.value: tmp.cdr;
8134             })()) !== l5.value ? "true" : (l13.fvalue(pv, l37.fvalue(pv, v897)) !== l5.value ? l156.fvalue(values, (function(){
8135                 var tmp = v897;
8136                 return tmp === l5.value? l5.value: tmp.car;
8137             })(), v898, l35.fvalue(pv, v897)) : l156.fvalue(values, (function(){
8138                 var tmp = v897;
8139                 return tmp === l5.value? l5.value: tmp.car;
8140             })(), v898, l35.fvalue(pv, v897), " && ", l327.fvalue(pv, (function(){
8141                 var tmp = v897;
8142                 return tmp === l5.value? l5.value: tmp.cdr;
8143             })(), v898))));
8144         })();
8145     }));
8146     return l327;
8147 })();
8148 var l328 = {name: "DEFINE-BUILTIN-COMPARISON"};
8149 l328;
8150 var l329 = {name: ">"};
8151 (function(){
8152     var v900 = l47.fvalue(pv, l329, (function (values,v902){
8153         checkArgsAtLeast(arguments, 2);
8154         var v901= l5.value;
8155         for (var i = arguments.length-1; i>=2; i--)
8156             v901 = {car: arguments[i], cdr:
8157         v901};
8158         return (function(){
8159             return (function(v903){
8160                 return l323.fvalue(values, v903, (function (values,v904){
8161                     checkArgs(arguments, 2);
8162                     return l190.fvalue(values, "return ", l191.fvalue(pv, l327.fvalue(pv, v904, ">")), ";", (function(){
8163                         var symbol = l155;
8164                         var value = symbol.value;
8165                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8166                         return value;
8167                     })());
8168                 }));
8169             })(({car: v902, cdr: v901}));
8170         })();
8171     }));
8172     var v905 = ({car: v900, cdr: (function(){
8173         var symbol = l319;
8174         var value = symbol.value;
8175         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8176         return value;
8177     })()});
8178     return ((l319).value = v905);
8179 })();
8180 var l330 = {name: "<"};
8181 (function(){
8182     var v906 = l47.fvalue(pv, l330, (function (values,v908){
8183         checkArgsAtLeast(arguments, 2);
8184         var v907= l5.value;
8185         for (var i = arguments.length-1; i>=2; i--)
8186             v907 = {car: arguments[i], cdr:
8187         v907};
8188         return (function(){
8189             return (function(v909){
8190                 return l323.fvalue(values, v909, (function (values,v910){
8191                     checkArgs(arguments, 2);
8192                     return l190.fvalue(values, "return ", l191.fvalue(pv, l327.fvalue(pv, v910, "<")), ";", (function(){
8193                         var symbol = l155;
8194                         var value = symbol.value;
8195                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8196                         return value;
8197                     })());
8198                 }));
8199             })(({car: v908, cdr: v907}));
8200         })();
8201     }));
8202     var v911 = ({car: v906, cdr: (function(){
8203         var symbol = l319;
8204         var value = symbol.value;
8205         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8206         return value;
8207     })()});
8208     return ((l319).value = v911);
8209 })();
8210 var l331 = {name: ">="};
8211 (function(){
8212     var v912 = l47.fvalue(pv, l331, (function (values,v914){
8213         checkArgsAtLeast(arguments, 2);
8214         var v913= l5.value;
8215         for (var i = arguments.length-1; i>=2; i--)
8216             v913 = {car: arguments[i], cdr:
8217         v913};
8218         return (function(){
8219             return (function(v915){
8220                 return l323.fvalue(values, v915, (function (values,v916){
8221                     checkArgs(arguments, 2);
8222                     return l190.fvalue(values, "return ", l191.fvalue(pv, l327.fvalue(pv, v916, ">=")), ";", (function(){
8223                         var symbol = l155;
8224                         var value = symbol.value;
8225                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8226                         return value;
8227                     })());
8228                 }));
8229             })(({car: v914, cdr: v913}));
8230         })();
8231     }));
8232     var v917 = ({car: v912, cdr: (function(){
8233         var symbol = l319;
8234         var value = symbol.value;
8235         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8236         return value;
8237     })()});
8238     return ((l319).value = v917);
8239 })();
8240 var l332 = {name: "<="};
8241 (function(){
8242     var v918 = l47.fvalue(pv, l332, (function (values,v920){
8243         checkArgsAtLeast(arguments, 2);
8244         var v919= l5.value;
8245         for (var i = arguments.length-1; i>=2; i--)
8246             v919 = {car: arguments[i], cdr:
8247         v919};
8248         return (function(){
8249             return (function(v921){
8250                 return l323.fvalue(values, v921, (function (values,v922){
8251                     checkArgs(arguments, 2);
8252                     return l190.fvalue(values, "return ", l191.fvalue(pv, l327.fvalue(pv, v922, "<=")), ";", (function(){
8253                         var symbol = l155;
8254                         var value = symbol.value;
8255                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8256                         return value;
8257                     })());
8258                 }));
8259             })(({car: v920, cdr: v919}));
8260         })();
8261     }));
8262     var v923 = ({car: v918, cdr: (function(){
8263         var symbol = l319;
8264         var value = symbol.value;
8265         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8266         return value;
8267     })()});
8268     return ((l319).value = v923);
8269 })();
8270 (function(){
8271     var v924 = l47.fvalue(pv, l21, (function (values,v926){
8272         checkArgsAtLeast(arguments, 2);
8273         var v925= l5.value;
8274         for (var i = arguments.length-1; i>=2; i--)
8275             v925 = {car: arguments[i], cdr:
8276         v925};
8277         return (function(){
8278             return (function(v927){
8279                 return l323.fvalue(values, v927, (function (values,v928){
8280                     checkArgs(arguments, 2);
8281                     return l190.fvalue(values, "return ", l191.fvalue(pv, l327.fvalue(pv, v928, "==")), ";", (function(){
8282                         var symbol = l155;
8283                         var value = symbol.value;
8284                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8285                         return value;
8286                     })());
8287                 }));
8288             })(({car: v926, cdr: v925}));
8289         })();
8290     }));
8291     var v929 = ({car: v924, cdr: (function(){
8292         var symbol = l319;
8293         var value = symbol.value;
8294         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8295         return value;
8296     })()});
8297     return ((l319).value = v929);
8298 })();
8299 var l333 = {name: "NUMBERP"};
8300 (function(){
8301     var v930 = l47.fvalue(pv, l333, (function (values,v931){
8302         checkArgs(arguments, 2);
8303         return (function(){
8304             return (function(v932){
8305                 return l191.fvalue(values, l190.fvalue(pv, "(typeof (", v932, ") == \"number\")"));
8306             })(l192.fvalue(pv, v931));
8307         })();
8308     }));
8309     var v933 = ({car: v930, cdr: (function(){
8310         var symbol = l319;
8311         var value = symbol.value;
8312         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8313         return value;
8314     })()});
8315     return ((l319).value = v933);
8316 })();
8317 var l334 = {name: "FLOOR"};
8318 (function(){
8319     var v934 = l47.fvalue(pv, l334, (function (values,v935){
8320         checkArgs(arguments, 2);
8321         return (function(){
8322             return (function(v936){
8323                 return l190.fvalue(values, "(function(){", (function(){
8324                     var symbol = l155;
8325                     var value = symbol.value;
8326                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8327                     return value;
8328                 })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "x", " = ", v936, ";", (function(){
8329                     var symbol = l155;
8330                     var value = symbol.value;
8331                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8332                     return value;
8333                 })()), l190.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
8334                     var symbol = l155;
8335                     var value = symbol.value;
8336                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8337                     return value;
8338                 })(), l194.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
8339                     var symbol = l155;
8340                     var value = symbol.value;
8341                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8342                     return value;
8343                 })())), l190.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){
8344                     var symbol = l155;
8345                     var value = symbol.value;
8346                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8347                     return value;
8348                 })())), "})()");
8349             })(l192.fvalue(pv, v935));
8350         })();
8351     }));
8352     var v937 = ({car: v934, cdr: (function(){
8353         var symbol = l319;
8354         var value = symbol.value;
8355         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8356         return value;
8357     })()});
8358     return ((l319).value = v937);
8359 })();
8360 (function(){
8361     var v938 = l47.fvalue(pv, l30, (function (values,v939,v940){
8362         checkArgs(arguments, 3);
8363         return (function(){
8364             return (function(v941,v942){
8365                 return l190.fvalue(values, "({car: ", v941, ", cdr: ", v942, "})");
8366             })(l192.fvalue(pv, v939),l192.fvalue(pv, v940));
8367         })();
8368     }));
8369     var v943 = ({car: v938, cdr: (function(){
8370         var symbol = l319;
8371         var value = symbol.value;
8372         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8373         return value;
8374     })()});
8375     return ((l319).value = v943);
8376 })();
8377 (function(){
8378     var v944 = l47.fvalue(pv, l31, (function (values,v945){
8379         checkArgs(arguments, 2);
8380         return (function(){
8381             return (function(v946){
8382                 return l191.fvalue(values, l190.fvalue(pv, "(function(){", (function(){
8383                     var symbol = l155;
8384                     var value = symbol.value;
8385                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8386                     return value;
8387                 })(), l194.fvalue(pv, "var tmp = ", v946, ";", (function(){
8388                     var symbol = l155;
8389                     var value = symbol.value;
8390                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8391                     return value;
8392                 })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
8393                     var symbol = l155;
8394                     var value = symbol.value;
8395                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8396                     return value;
8397                 })()), "})()"));
8398             })(l192.fvalue(pv, v945));
8399         })();
8400     }));
8401     var v947 = ({car: v944, cdr: (function(){
8402         var symbol = l319;
8403         var value = symbol.value;
8404         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8405         return value;
8406     })()});
8407     return ((l319).value = v947);
8408 })();
8409 (function(){
8410     var v948 = l47.fvalue(pv, l32, (function (values,v949){
8411         checkArgs(arguments, 2);
8412         return (function(){
8413             return (function(v950){
8414                 return l190.fvalue(values, "(function(){", (function(){
8415                     var symbol = l155;
8416                     var value = symbol.value;
8417                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8418                     return value;
8419                 })(), l194.fvalue(pv, "var tmp = ", v950, ";", (function(){
8420                     var symbol = l155;
8421                     var value = symbol.value;
8422                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8423                     return value;
8424                 })(), "return tmp === ", l192.fvalue(pv, l5.value), "? ", l192.fvalue(pv, l5.value), ": tmp.car;", (function(){
8425                     var symbol = l155;
8426                     var value = symbol.value;
8427                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8428                     return value;
8429                 })()), "})()");
8430             })(l192.fvalue(pv, v949));
8431         })();
8432     }));
8433     var v951 = ({car: v948, cdr: (function(){
8434         var symbol = l319;
8435         var value = symbol.value;
8436         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8437         return value;
8438     })()});
8439     return ((l319).value = v951);
8440 })();
8441 (function(){
8442     var v952 = l47.fvalue(pv, l33, (function (values,v953){
8443         checkArgs(arguments, 2);
8444         return (function(){
8445             return (function(v954){
8446                 return l190.fvalue(values, "(function(){", (function(){
8447                     var symbol = l155;
8448                     var value = symbol.value;
8449                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8450                     return value;
8451                 })(), l194.fvalue(pv, "var tmp = ", v954, ";", (function(){
8452                     var symbol = l155;
8453                     var value = symbol.value;
8454                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8455                     return value;
8456                 })(), "return tmp === ", l192.fvalue(pv, l5.value), "? ", l192.fvalue(pv, l5.value), ": tmp.cdr;", (function(){
8457                     var symbol = l155;
8458                     var value = symbol.value;
8459                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8460                     return value;
8461                 })()), "})()");
8462             })(l192.fvalue(pv, v953));
8463         })();
8464     }));
8465     var v955 = ({car: v952, cdr: (function(){
8466         var symbol = l319;
8467         var value = symbol.value;
8468         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8469         return value;
8470     })()});
8471     return ((l319).value = v955);
8472 })();
8473 (function(){
8474     var v956 = l47.fvalue(pv, l123, (function (values,v957,v958){
8475         checkArgs(arguments, 3);
8476         return (function(){
8477             return (function(v959,v960){
8478                 return l190.fvalue(values, "(function(){", (function(){
8479                     var symbol = l155;
8480                     var value = symbol.value;
8481                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8482                     return value;
8483                 })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "x", " = ", v959, ";", (function(){
8484                     var symbol = l155;
8485                     var value = symbol.value;
8486                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8487                     return value;
8488                 })()), l190.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
8489                     var symbol = l155;
8490                     var value = symbol.value;
8491                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8492                     return value;
8493                 })(), l194.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
8494                     var symbol = l155;
8495                     var value = symbol.value;
8496                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8497                     return value;
8498                 })())), l190.fvalue(pv, "return ", l190.fvalue(pv, "(x.car = ", v960, ", x)"), ";", (function(){
8499                     var symbol = l155;
8500                     var value = symbol.value;
8501                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8502                     return value;
8503                 })())), "})()");
8504             })(l192.fvalue(pv, v957),l192.fvalue(pv, v958));
8505         })();
8506     }));
8507     var v961 = ({car: v956, cdr: (function(){
8508         var symbol = l319;
8509         var value = symbol.value;
8510         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8511         return value;
8512     })()});
8513     return ((l319).value = v961);
8514 })();
8515 (function(){
8516     var v962 = l47.fvalue(pv, l124, (function (values,v963,v964){
8517         checkArgs(arguments, 3);
8518         return (function(){
8519             return (function(v965,v966){
8520                 return l190.fvalue(values, "(function(){", (function(){
8521                     var symbol = l155;
8522                     var value = symbol.value;
8523                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8524                     return value;
8525                 })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "x", " = ", v965, ";", (function(){
8526                     var symbol = l155;
8527                     var value = symbol.value;
8528                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8529                     return value;
8530                 })()), l190.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
8531                     var symbol = l155;
8532                     var value = symbol.value;
8533                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8534                     return value;
8535                 })(), l194.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
8536                     var symbol = l155;
8537                     var value = symbol.value;
8538                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8539                     return value;
8540                 })())), l190.fvalue(pv, "return ", l190.fvalue(pv, "(x.cdr = ", v966, ", x)"), ";", (function(){
8541                     var symbol = l155;
8542                     var value = symbol.value;
8543                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8544                     return value;
8545                 })())), "})()");
8546             })(l192.fvalue(pv, v963),l192.fvalue(pv, v964));
8547         })();
8548     }));
8549     var v967 = ({car: v962, cdr: (function(){
8550         var symbol = l319;
8551         var value = symbol.value;
8552         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8553         return value;
8554     })()});
8555     return ((l319).value = v967);
8556 })();
8557 var l335 = {name: "SYMBOLP"};
8558 (function(){
8559     var v968 = l47.fvalue(pv, l335, (function (values,v969){
8560         checkArgs(arguments, 2);
8561         return (function(){
8562             return (function(v970){
8563                 return l191.fvalue(values, l190.fvalue(pv, "(function(){", (function(){
8564                     var symbol = l155;
8565                     var value = symbol.value;
8566                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8567                     return value;
8568                 })(), l194.fvalue(pv, "var tmp = ", v970, ";", (function(){
8569                     var symbol = l155;
8570                     var value = symbol.value;
8571                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8572                     return value;
8573                 })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
8574                     var symbol = l155;
8575                     var value = symbol.value;
8576                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8577                     return value;
8578                 })()), "})()"));
8579             })(l192.fvalue(pv, v969));
8580         })();
8581     }));
8582     var v971 = ({car: v968, cdr: (function(){
8583         var symbol = l319;
8584         var value = symbol.value;
8585         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8586         return value;
8587     })()});
8588     return ((l319).value = v971);
8589 })();
8590 var l336 = {name: "MAKE-SYMBOL"};
8591 (function(){
8592     var v972 = l47.fvalue(pv, l336, (function (values,v973){
8593         checkArgs(arguments, 2);
8594         return (function(){
8595             return (function(v974){
8596                 return l190.fvalue(values, "(function(){", (function(){
8597                     var symbol = l155;
8598                     var value = symbol.value;
8599                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8600                     return value;
8601                 })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "name", " = ", v974, ";", (function(){
8602                     var symbol = l155;
8603                     var value = symbol.value;
8604                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8605                     return value;
8606                 })()), l190.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){
8607                     var symbol = l155;
8608                     var value = symbol.value;
8609                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8610                     return value;
8611                 })(), l194.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
8612                     var symbol = l155;
8613                     var value = symbol.value;
8614                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8615                     return value;
8616                 })())), l190.fvalue(pv, "return ", "({name: name})", ";", (function(){
8617                     var symbol = l155;
8618                     var value = symbol.value;
8619                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8620                     return value;
8621                 })())), "})()");
8622             })(l192.fvalue(pv, v973));
8623         })();
8624     }));
8625     var v975 = ({car: v972, cdr: (function(){
8626         var symbol = l319;
8627         var value = symbol.value;
8628         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8629         return value;
8630     })()});
8631     return ((l319).value = v975);
8632 })();
8633 var l337 = {name: "SYMBOL-NAME"};
8634 (function(){
8635     var v976 = l47.fvalue(pv, l337, (function (values,v977){
8636         checkArgs(arguments, 2);
8637         return (function(){
8638             return (function(v978){
8639                 return l190.fvalue(values, "(", v978, ").name");
8640             })(l192.fvalue(pv, v977));
8641         })();
8642     }));
8643     var v979 = ({car: v976, cdr: (function(){
8644         var symbol = l319;
8645         var value = symbol.value;
8646         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8647         return value;
8648     })()});
8649     return ((l319).value = v979);
8650 })();
8651 (function(){
8652     var v980 = l47.fvalue(pv, l255, (function (values,v981,v982){
8653         checkArgs(arguments, 3);
8654         return (function(){
8655             return (function(v983,v984){
8656                 return l190.fvalue(values, "(", v983, ").value = ", v984);
8657             })(l192.fvalue(pv, v981),l192.fvalue(pv, v982));
8658         })();
8659     }));
8660     var v985 = ({car: v980, cdr: (function(){
8661         var symbol = l319;
8662         var value = symbol.value;
8663         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8664         return value;
8665     })()});
8666     return ((l319).value = v985);
8667 })();
8668 var l338 = {name: "FSET"};
8669 (function(){
8670     var v986 = l47.fvalue(pv, l338, (function (values,v987,v988){
8671         checkArgs(arguments, 3);
8672         return (function(){
8673             return (function(v989,v990){
8674                 return l190.fvalue(values, "(", v989, ").fvalue = ", v990);
8675             })(l192.fvalue(pv, v987),l192.fvalue(pv, v988));
8676         })();
8677     }));
8678     var v991 = ({car: v986, cdr: (function(){
8679         var symbol = l319;
8680         var value = symbol.value;
8681         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8682         return value;
8683     })()});
8684     return ((l319).value = v991);
8685 })();
8686 (function(){
8687     var v992 = l47.fvalue(pv, l20, (function (values,v993){
8688         checkArgs(arguments, 2);
8689         return (function(){
8690             return (function(v994){
8691                 return l191.fvalue(values, l190.fvalue(pv, "(", v994, ".value !== undefined)"));
8692             })(l192.fvalue(pv, v993));
8693         })();
8694     }));
8695     var v995 = ({car: v992, cdr: (function(){
8696         var symbol = l319;
8697         var value = symbol.value;
8698         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8699         return value;
8700     })()});
8701     return ((l319).value = v995);
8702 })();
8703 var l339 = {name: "SYMBOL-VALUE"};
8704 (function(){
8705     var v996 = l47.fvalue(pv, l339, (function (values,v997){
8706         checkArgs(arguments, 2);
8707         return (function(){
8708             return (function(v998){
8709                 return l190.fvalue(values, "(function(){", (function(){
8710                     var symbol = l155;
8711                     var value = symbol.value;
8712                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8713                     return value;
8714                 })(), l194.fvalue(pv, "var symbol = ", v998, ";", (function(){
8715                     var symbol = l155;
8716                     var value = symbol.value;
8717                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8718                     return value;
8719                 })(), "var value = symbol.value;", (function(){
8720                     var symbol = l155;
8721                     var value = symbol.value;
8722                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8723                     return value;
8724                 })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
8725                     var symbol = l155;
8726                     var value = symbol.value;
8727                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8728                     return value;
8729                 })(), "return value;", (function(){
8730                     var symbol = l155;
8731                     var value = symbol.value;
8732                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8733                     return value;
8734                 })()), "})()");
8735             })(l192.fvalue(pv, v997));
8736         })();
8737     }));
8738     var v999 = ({car: v996, cdr: (function(){
8739         var symbol = l319;
8740         var value = symbol.value;
8741         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8742         return value;
8743     })()});
8744     return ((l319).value = v999);
8745 })();
8746 (function(){
8747     var v1000 = l47.fvalue(pv, l263, (function (values,v1001){
8748         checkArgs(arguments, 2);
8749         return (function(){
8750             return (function(v1002){
8751                 return l190.fvalue(values, "(function(){", (function(){
8752                     var symbol = l155;
8753                     var value = symbol.value;
8754                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8755                     return value;
8756                 })(), l194.fvalue(pv, "var symbol = ", v1002, ";", (function(){
8757                     var symbol = l155;
8758                     var value = symbol.value;
8759                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8760                     return value;
8761                 })(), "var func = symbol.fvalue;", (function(){
8762                     var symbol = l155;
8763                     var value = symbol.value;
8764                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8765                     return value;
8766                 })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
8767                     var symbol = l155;
8768                     var value = symbol.value;
8769                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8770                     return value;
8771                 })(), "return func;", (function(){
8772                     var symbol = l155;
8773                     var value = symbol.value;
8774                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8775                     return value;
8776                 })()), "})()");
8777             })(l192.fvalue(pv, v1001));
8778         })();
8779     }));
8780     var v1003 = ({car: v1000, cdr: (function(){
8781         var symbol = l319;
8782         var value = symbol.value;
8783         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8784         return value;
8785     })()});
8786     return ((l319).value = v1003);
8787 })();
8788 var l340 = {name: "SYMBOL-PLIST"};
8789 (function(){
8790     var v1004 = l47.fvalue(pv, l340, (function (values,v1005){
8791         checkArgs(arguments, 2);
8792         return (function(){
8793             return (function(v1006){
8794                 return l190.fvalue(values, "((", v1006, ").plist || ", l192.fvalue(pv, l5.value), ")");
8795             })(l192.fvalue(pv, v1005));
8796         })();
8797     }));
8798     var v1007 = ({car: v1004, cdr: (function(){
8799         var symbol = l319;
8800         var value = symbol.value;
8801         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8802         return value;
8803     })()});
8804     return ((l319).value = v1007);
8805 })();
8806 var l341 = {name: "LAMBDA-CODE"};
8807 (function(){
8808     var v1008 = l47.fvalue(pv, l341, (function (values,v1009){
8809         checkArgs(arguments, 2);
8810         return (function(){
8811             return (function(v1010){
8812                 return l190.fvalue(values, "(", v1010, ").toString()");
8813             })(l192.fvalue(pv, v1009));
8814         })();
8815     }));
8816     var v1011 = ({car: v1008, cdr: (function(){
8817         var symbol = l319;
8818         var value = symbol.value;
8819         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8820         return value;
8821     })()});
8822     return ((l319).value = v1011);
8823 })();
8824 var l342 = {name: "EQ"};
8825 (function(){
8826     var v1012 = l47.fvalue(pv, l342, (function (values,v1013,v1014){
8827         checkArgs(arguments, 3);
8828         return (function(){
8829             return (function(v1015,v1016){
8830                 return l191.fvalue(values, l190.fvalue(pv, "(", v1015, " === ", v1016, ")"));
8831             })(l192.fvalue(pv, v1013),l192.fvalue(pv, v1014));
8832         })();
8833     }));
8834     var v1017 = ({car: v1012, cdr: (function(){
8835         var symbol = l319;
8836         var value = symbol.value;
8837         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8838         return value;
8839     })()});
8840     return ((l319).value = v1017);
8841 })();
8842 var l343 = {name: "EQUAL"};
8843 (function(){
8844     var v1018 = l47.fvalue(pv, l343, (function (values,v1019,v1020){
8845         checkArgs(arguments, 3);
8846         return (function(){
8847             return (function(v1021,v1022){
8848                 return l191.fvalue(values, l190.fvalue(pv, "(", v1021, " == ", v1022, ")"));
8849             })(l192.fvalue(pv, v1019),l192.fvalue(pv, v1020));
8850         })();
8851     }));
8852     var v1023 = ({car: v1018, cdr: (function(){
8853         var symbol = l319;
8854         var value = symbol.value;
8855         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8856         return value;
8857     })()});
8858     return ((l319).value = v1023);
8859 })();
8860 var l344 = {name: "CHAR-TO-STRING"};
8861 (function(){
8862     var v1024 = l47.fvalue(pv, l344, (function (values,v1025){
8863         checkArgs(arguments, 2);
8864         return (function(){
8865             return (function(v1026){
8866                 return l190.fvalue(values, "(function(){", (function(){
8867                     var symbol = l155;
8868                     var value = symbol.value;
8869                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8870                     return value;
8871                 })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "x", " = ", v1026, ";", (function(){
8872                     var symbol = l155;
8873                     var value = symbol.value;
8874                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8875                     return value;
8876                 })()), l190.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
8877                     var symbol = l155;
8878                     var value = symbol.value;
8879                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8880                     return value;
8881                 })(), l194.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
8882                     var symbol = l155;
8883                     var value = symbol.value;
8884                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8885                     return value;
8886                 })())), l190.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){
8887                     var symbol = l155;
8888                     var value = symbol.value;
8889                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8890                     return value;
8891                 })())), "})()");
8892             })(l192.fvalue(pv, v1025));
8893         })();
8894     }));
8895     var v1027 = ({car: v1024, cdr: (function(){
8896         var symbol = l319;
8897         var value = symbol.value;
8898         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8899         return value;
8900     })()});
8901     return ((l319).value = v1027);
8902 })();
8903 var l345 = {name: "STRINGP"};
8904 (function(){
8905     var v1028 = l47.fvalue(pv, l345, (function (values,v1029){
8906         checkArgs(arguments, 2);
8907         return (function(){
8908             return (function(v1030){
8909                 return l191.fvalue(values, l190.fvalue(pv, "(typeof(", v1030, ") == \"string\")"));
8910             })(l192.fvalue(pv, v1029));
8911         })();
8912     }));
8913     var v1031 = ({car: v1028, cdr: (function(){
8914         var symbol = l319;
8915         var value = symbol.value;
8916         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8917         return value;
8918     })()});
8919     return ((l319).value = v1031);
8920 })();
8921 var l346 = {name: "STRING-UPCASE"};
8922 (function(){
8923     var v1032 = l47.fvalue(pv, l346, (function (values,v1033){
8924         checkArgs(arguments, 2);
8925         return (function(){
8926             return (function(v1034){
8927                 return l190.fvalue(values, "(function(){", (function(){
8928                     var symbol = l155;
8929                     var value = symbol.value;
8930                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8931                     return value;
8932                 })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "x", " = ", v1034, ";", (function(){
8933                     var symbol = l155;
8934                     var value = symbol.value;
8935                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8936                     return value;
8937                 })()), l190.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
8938                     var symbol = l155;
8939                     var value = symbol.value;
8940                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8941                     return value;
8942                 })(), l194.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
8943                     var symbol = l155;
8944                     var value = symbol.value;
8945                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8946                     return value;
8947                 })())), l190.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){
8948                     var symbol = l155;
8949                     var value = symbol.value;
8950                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8951                     return value;
8952                 })())), "})()");
8953             })(l192.fvalue(pv, v1033));
8954         })();
8955     }));
8956     var v1035 = ({car: v1032, cdr: (function(){
8957         var symbol = l319;
8958         var value = symbol.value;
8959         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8960         return value;
8961     })()});
8962     return ((l319).value = v1035);
8963 })();
8964 var l347 = {name: "STRING-LENGTH"};
8965 (function(){
8966     var v1036 = l47.fvalue(pv, l347, (function (values,v1037){
8967         checkArgs(arguments, 2);
8968         return (function(){
8969             return (function(v1038){
8970                 return l190.fvalue(values, "(function(){", (function(){
8971                     var symbol = l155;
8972                     var value = symbol.value;
8973                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8974                     return value;
8975                 })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "x", " = ", v1038, ";", (function(){
8976                     var symbol = l155;
8977                     var value = symbol.value;
8978                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8979                     return value;
8980                 })()), l190.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
8981                     var symbol = l155;
8982                     var value = symbol.value;
8983                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8984                     return value;
8985                 })(), l194.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
8986                     var symbol = l155;
8987                     var value = symbol.value;
8988                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8989                     return value;
8990                 })())), l190.fvalue(pv, "return ", "x.length", ";", (function(){
8991                     var symbol = l155;
8992                     var value = symbol.value;
8993                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8994                     return value;
8995                 })())), "})()");
8996             })(l192.fvalue(pv, v1037));
8997         })();
8998     }));
8999     var v1039 = ({car: v1036, cdr: (function(){
9000         var symbol = l319;
9001         var value = symbol.value;
9002         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9003         return value;
9004     })()});
9005     return ((l319).value = v1039);
9006 })();
9007 var l348 = {name: "SLICE"};
9008 (function(){
9009     var v1040 = l47.fvalue(pv, l348, (function (values,v1041,v1042,v1043){
9010         checkArgsAtLeast(arguments, 3);
9011         checkArgsAtMost(arguments, 4);
9012         var v1043;
9013         switch(arguments.length-1){
9014         case 2:
9015             v1043=l5.value;
9016         default: break;
9017         }
9018         return (function(){
9019             return l190.fvalue(values, "(function(){", (function(){
9020                 var symbol = l155;
9021                 var value = symbol.value;
9022                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9023                 return value;
9024             })(), l194.fvalue(pv, "var str = ", l192.fvalue(pv, v1041), ";", (function(){
9025                 var symbol = l155;
9026                 var value = symbol.value;
9027                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9028                 return value;
9029             })(), "var a = ", l192.fvalue(pv, v1042), ";", (function(){
9030                 var symbol = l155;
9031                 var value = symbol.value;
9032                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9033                 return value;
9034             })(), "var b;", (function(){
9035                 var symbol = l155;
9036                 var value = symbol.value;
9037                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9038                 return value;
9039             })(), (v1043 !== l5.value ? l190.fvalue(pv, "b = ", l192.fvalue(pv, v1043), ";", (function(){
9040                 var symbol = l155;
9041                 var value = symbol.value;
9042                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9043                 return value;
9044             })()) : l5.value), "return str.slice(a,b);", (function(){
9045                 var symbol = l155;
9046                 var value = symbol.value;
9047                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9048                 return value;
9049             })()), "})()");
9050         })();
9051     }));
9052     var v1044 = ({car: v1040, cdr: (function(){
9053         var symbol = l319;
9054         var value = symbol.value;
9055         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9056         return value;
9057     })()});
9058     return ((l319).value = v1044);
9059 })();
9060 var l349 = {name: "CHAR"};
9061 (function(){
9062     var v1045 = l47.fvalue(pv, l349, (function (values,v1046,v1047){
9063         checkArgs(arguments, 3);
9064         return (function(){
9065             return (function(v1048,v1049){
9066                 return l190.fvalue(values, "(function(){", (function(){
9067                     var symbol = l155;
9068                     var value = symbol.value;
9069                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9070                     return value;
9071                 })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "string", " = ", v1048, ";", (function(){
9072                     var symbol = l155;
9073                     var value = symbol.value;
9074                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9075                     return value;
9076                 })()), l190.fvalue(pv, "var ", "index", " = ", v1049, ";", (function(){
9077                     var symbol = l155;
9078                     var value = symbol.value;
9079                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9080                     return value;
9081                 })()), l190.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
9082                     var symbol = l155;
9083                     var value = symbol.value;
9084                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9085                     return value;
9086                 })(), l194.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
9087                     var symbol = l155;
9088                     var value = symbol.value;
9089                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9090                     return value;
9091                 })())), l190.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){
9092                     var symbol = l155;
9093                     var value = symbol.value;
9094                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9095                     return value;
9096                 })(), l194.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
9097                     var symbol = l155;
9098                     var value = symbol.value;
9099                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9100                     return value;
9101                 })())), l190.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){
9102                     var symbol = l155;
9103                     var value = symbol.value;
9104                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9105                     return value;
9106                 })())), "})()");
9107             })(l192.fvalue(pv, v1046),l192.fvalue(pv, v1047));
9108         })();
9109     }));
9110     var v1050 = ({car: v1045, cdr: (function(){
9111         var symbol = l319;
9112         var value = symbol.value;
9113         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9114         return value;
9115     })()});
9116     return ((l319).value = v1050);
9117 })();
9118 (function(){
9119     var v1051 = l47.fvalue(pv, l76, (function (values,v1052,v1053){
9120         checkArgs(arguments, 3);
9121         return (function(){
9122             return (function(v1054,v1055){
9123                 return l190.fvalue(values, "(function(){", (function(){
9124                     var symbol = l155;
9125                     var value = symbol.value;
9126                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9127                     return value;
9128                 })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "string1", " = ", v1054, ";", (function(){
9129                     var symbol = l155;
9130                     var value = symbol.value;
9131                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9132                     return value;
9133                 })()), l190.fvalue(pv, "var ", "string2", " = ", v1055, ";", (function(){
9134                     var symbol = l155;
9135                     var value = symbol.value;
9136                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9137                     return value;
9138                 })()), l190.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){
9139                     var symbol = l155;
9140                     var value = symbol.value;
9141                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9142                     return value;
9143                 })(), l194.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
9144                     var symbol = l155;
9145                     var value = symbol.value;
9146                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9147                     return value;
9148                 })())), l190.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){
9149                     var symbol = l155;
9150                     var value = symbol.value;
9151                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9152                     return value;
9153                 })(), l194.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
9154                     var symbol = l155;
9155                     var value = symbol.value;
9156                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9157                     return value;
9158                 })())), l190.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){
9159                     var symbol = l155;
9160                     var value = symbol.value;
9161                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9162                     return value;
9163                 })())), "})()");
9164             })(l192.fvalue(pv, v1052),l192.fvalue(pv, v1053));
9165         })();
9166     }));
9167     var v1056 = ({car: v1051, cdr: (function(){
9168         var symbol = l319;
9169         var value = symbol.value;
9170         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9171         return value;
9172     })()});
9173     return ((l319).value = v1056);
9174 })();
9175 var l350 = {name: "FUNCALL"};
9176 (function(){
9177     var v1057 = l47.fvalue(pv, l350, (function (values,v1059){
9178         checkArgsAtLeast(arguments, 2);
9179         var v1058= l5.value;
9180         for (var i = arguments.length-1; i>=2; i--)
9181             v1058 = {car: arguments[i], cdr:
9182         v1058};
9183         return (function(){
9184             return l190.fvalue(values, "(function(){", (function(){
9185                 var symbol = l155;
9186                 var value = symbol.value;
9187                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9188                 return value;
9189             })(), l194.fvalue(pv, "var f = ", l192.fvalue(pv, v1059), ";", (function(){
9190                 var symbol = l155;
9191                 var value = symbol.value;
9192                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9193                 return value;
9194             })(), "return (typeof f === 'function'? f: f.fvalue)(", l158.fvalue(pv, ({car: ((function(){
9195                 var symbol = l195;
9196                 var value = symbol.value;
9197                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9198                 return value;
9199             })() !== l5.value ? "values" : "pv"), cdr: l81.fvalue(pv, (function(){
9200                 var symbol = l192;
9201                 var func = symbol.fvalue;
9202                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9203                 return func;
9204             })(), v1058)}), ", "), ")"), "})()");
9205         })();
9206     }));
9207     var v1060 = ({car: v1057, cdr: (function(){
9208         var symbol = l319;
9209         var value = symbol.value;
9210         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9211         return value;
9212     })()});
9213     return ((l319).value = v1060);
9214 })();
9215 var l351 = {name: "APPLY"};
9216 (function(){
9217     var v1061 = l47.fvalue(pv, l351, (function (values,v1063){
9218         checkArgsAtLeast(arguments, 2);
9219         var v1062= l5.value;
9220         for (var i = arguments.length-1; i>=2; i--)
9221             v1062 = {car: arguments[i], cdr:
9222         v1062};
9223         return (function(){
9224             return (l13.fvalue(pv, v1062) !== l5.value ? l190.fvalue(values, "(", l192.fvalue(pv, v1063), ")()") : (function(v1064,v1065){
9225                 return l190.fvalue(values, "(function(){", (function(){
9226                     var symbol = l155;
9227                     var value = symbol.value;
9228                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9229                     return value;
9230                 })(), l194.fvalue(pv, "var f = ", l192.fvalue(pv, v1063), ";", (function(){
9231                     var symbol = l155;
9232                     var value = symbol.value;
9233                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9234                     return value;
9235                 })(), "var args = [", l158.fvalue(pv, ({car: ((function(){
9236                     var symbol = l195;
9237                     var value = symbol.value;
9238                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9239                     return value;
9240                 })() !== l5.value ? "values" : "pv"), cdr: l81.fvalue(pv, (function(){
9241                     var symbol = l192;
9242                     var func = symbol.fvalue;
9243                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9244                     return func;
9245                 })(), v1064)}), ", "), "];", (function(){
9246                     var symbol = l155;
9247                     var value = symbol.value;
9248                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9249                     return value;
9250                 })(), "var tail = (", l192.fvalue(pv, v1065), ");", (function(){
9251                     var symbol = l155;
9252                     var value = symbol.value;
9253                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9254                     return value;
9255                 })(), "while (tail != ", l192.fvalue(pv, l5.value), "){", (function(){
9256                     var symbol = l155;
9257                     var value = symbol.value;
9258                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9259                     return value;
9260                 })(), "    args.push(tail.car);", (function(){
9261                     var symbol = l155;
9262                     var value = symbol.value;
9263                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9264                     return value;
9265                 })(), "    tail = tail.cdr;", (function(){
9266                     var symbol = l155;
9267                     var value = symbol.value;
9268                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9269                     return value;
9270                 })(), "}", (function(){
9271                     var symbol = l155;
9272                     var value = symbol.value;
9273                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9274                     return value;
9275                 })(), "return (typeof f === 'function'? f : f.fvalue).apply(this, args);", (function(){
9276                     var symbol = l155;
9277                     var value = symbol.value;
9278                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9279                     return value;
9280                 })()), "})()");
9281             })(l95.fvalue(pv, v1062),(function(){
9282                 var tmp = l94.fvalue(pv, v1062);
9283                 return tmp === l5.value? l5.value: tmp.car;
9284             })()));
9285         })();
9286     }));
9287     var v1066 = ({car: v1061, cdr: (function(){
9288         var symbol = l319;
9289         var value = symbol.value;
9290         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9291         return value;
9292     })()});
9293     return ((l319).value = v1066);
9294 })();
9295 var l352 = {name: "JS-EVAL"};
9296 (function(){
9297     var v1067 = l47.fvalue(pv, l352, (function (values,v1068){
9298         checkArgs(arguments, 2);
9299         return (function(){
9300             return (function(v1069){
9301                 return l190.fvalue(values, "(function(){", (function(){
9302                     var symbol = l155;
9303                     var value = symbol.value;
9304                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9305                     return value;
9306                 })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "string", " = ", v1069, ";", (function(){
9307                     var symbol = l155;
9308                     var value = symbol.value;
9309                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9310                     return value;
9311                 })()), l190.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
9312                     var symbol = l155;
9313                     var value = symbol.value;
9314                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9315                     return value;
9316                 })(), l194.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
9317                     var symbol = l155;
9318                     var value = symbol.value;
9319                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9320                     return value;
9321                 })())), l190.fvalue(pv, "return ", ((function(){
9322                     var symbol = l195;
9323                     var value = symbol.value;
9324                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9325                     return value;
9326                 })() !== l5.value ? l190.fvalue(pv, "(function(){", (function(){
9327                     var symbol = l155;
9328                     var value = symbol.value;
9329                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9330                     return value;
9331                 })(), l194.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){
9332                     var symbol = l155;
9333                     var value = symbol.value;
9334                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9335                     return value;
9336                 })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){
9337                     var symbol = l155;
9338                     var value = symbol.value;
9339                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9340                     return value;
9341                 })(), l194.fvalue(pv, "v = [v];", (function(){
9342                     var symbol = l155;
9343                     var value = symbol.value;
9344                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9345                     return value;
9346                 })(), "v['multiple-value'] = true;", (function(){
9347                     var symbol = l155;
9348                     var value = symbol.value;
9349                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9350                     return value;
9351                 })()), "}", (function(){
9352                     var symbol = l155;
9353                     var value = symbol.value;
9354                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9355                     return value;
9356                 })(), "return values.apply(this, v);", (function(){
9357                     var symbol = l155;
9358                     var value = symbol.value;
9359                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9360                     return value;
9361                 })()), "})()") : "eval.apply(window, [string])"), ";", (function(){
9362                     var symbol = l155;
9363                     var value = symbol.value;
9364                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9365                     return value;
9366                 })())), "})()");
9367             })(l192.fvalue(pv, v1068));
9368         })();
9369     }));
9370     var v1070 = ({car: v1067, cdr: (function(){
9371         var symbol = l319;
9372         var value = symbol.value;
9373         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9374         return value;
9375     })()});
9376     return ((l319).value = v1070);
9377 })();
9378 var l353 = {name: "ERROR"};
9379 (function(){
9380     var v1071 = l47.fvalue(pv, l353, (function (values,v1072){
9381         checkArgs(arguments, 2);
9382         return (function(){
9383             return (function(v1073){
9384                 return l190.fvalue(values, "(function(){", (function(){
9385                     var symbol = l155;
9386                     var value = symbol.value;
9387                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9388                     return value;
9389                 })(), l194.fvalue(pv, "throw ", v1073, ";", (function(){
9390                     var symbol = l155;
9391                     var value = symbol.value;
9392                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9393                     return value;
9394                 })()), "})()");
9395             })(l192.fvalue(pv, v1072));
9396         })();
9397     }));
9398     var v1074 = ({car: v1071, cdr: (function(){
9399         var symbol = l319;
9400         var value = symbol.value;
9401         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9402         return value;
9403     })()});
9404     return ((l319).value = v1074);
9405 })();
9406 var l354 = {name: "NEW"};
9407 (function(){
9408     var v1075 = l47.fvalue(pv, l354, (function (values){
9409         checkArgsAtMost(arguments, 1);
9410         return (function(){
9411             return (function(){
9412                 return "{}";
9413             })();
9414         })();
9415     }));
9416     var v1076 = ({car: v1075, cdr: (function(){
9417         var symbol = l319;
9418         var value = symbol.value;
9419         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9420         return value;
9421     })()});
9422     return ((l319).value = v1076);
9423 })();
9424 var l355 = {name: "OBJECTP"};
9425 (function(){
9426     var v1077 = l47.fvalue(pv, l355, (function (values,v1078){
9427         checkArgs(arguments, 2);
9428         return (function(){
9429             return (function(v1079){
9430                 return l191.fvalue(values, l190.fvalue(pv, "(typeof (", v1079, ") === 'object')"));
9431             })(l192.fvalue(pv, v1078));
9432         })();
9433     }));
9434     var v1080 = ({car: v1077, cdr: (function(){
9435         var symbol = l319;
9436         var value = symbol.value;
9437         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9438         return value;
9439     })()});
9440     return ((l319).value = v1080);
9441 })();
9442 var l356 = {name: "OGET"};
9443 (function(){
9444     var v1081 = l47.fvalue(pv, l356, (function (values,v1082,v1083){
9445         checkArgs(arguments, 3);
9446         return (function(){
9447             return (function(v1084,v1085){
9448                 return l190.fvalue(values, "(function(){", (function(){
9449                     var symbol = l155;
9450                     var value = symbol.value;
9451                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9452                     return value;
9453                 })(), l194.fvalue(pv, "var tmp = ", "(", v1084, ")[", v1085, "];", (function(){
9454                     var symbol = l155;
9455                     var value = symbol.value;
9456                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9457                     return value;
9458                 })(), "return tmp == undefined? ", l192.fvalue(pv, l5.value), ": tmp ;", (function(){
9459                     var symbol = l155;
9460                     var value = symbol.value;
9461                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9462                     return value;
9463                 })()), "})()");
9464             })(l192.fvalue(pv, v1082),l192.fvalue(pv, v1083));
9465         })();
9466     }));
9467     var v1086 = ({car: v1081, cdr: (function(){
9468         var symbol = l319;
9469         var value = symbol.value;
9470         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9471         return value;
9472     })()});
9473     return ((l319).value = v1086);
9474 })();
9475 var l357 = {name: "OSET"};
9476 (function(){
9477     var v1087 = l47.fvalue(pv, l357, (function (values,v1088,v1089,v1090){
9478         checkArgs(arguments, 4);
9479         return (function(){
9480             return (function(v1091,v1092,v1093){
9481                 return l190.fvalue(values, "((", v1091, ")[", v1092, "] = ", v1093, ")");
9482             })(l192.fvalue(pv, v1088),l192.fvalue(pv, v1089),l192.fvalue(pv, v1090));
9483         })();
9484     }));
9485     var v1094 = ({car: v1087, cdr: (function(){
9486         var symbol = l319;
9487         var value = symbol.value;
9488         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9489         return value;
9490     })()});
9491     return ((l319).value = v1094);
9492 })();
9493 var l358 = {name: "IN"};
9494 (function(){
9495     var v1095 = l47.fvalue(pv, l358, (function (values,v1096,v1097){
9496         checkArgs(arguments, 3);
9497         return (function(){
9498             return (function(v1098,v1099){
9499                 return l191.fvalue(values, l190.fvalue(pv, "((", v1098, ") in (", v1099, "))"));
9500             })(l192.fvalue(pv, v1096),l192.fvalue(pv, v1097));
9501         })();
9502     }));
9503     var v1100 = ({car: v1095, cdr: (function(){
9504         var symbol = l319;
9505         var value = symbol.value;
9506         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9507         return value;
9508     })()});
9509     return ((l319).value = v1100);
9510 })();
9511 var l359 = {name: "FUNCTIONP"};
9512 (function(){
9513     var v1101 = l47.fvalue(pv, l359, (function (values,v1102){
9514         checkArgs(arguments, 2);
9515         return (function(){
9516             return (function(v1103){
9517                 return l191.fvalue(values, l190.fvalue(pv, "(typeof ", v1103, " == 'function')"));
9518             })(l192.fvalue(pv, v1102));
9519         })();
9520     }));
9521     var v1104 = ({car: v1101, cdr: (function(){
9522         var symbol = l319;
9523         var value = symbol.value;
9524         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9525         return value;
9526     })()});
9527     return ((l319).value = v1104);
9528 })();
9529 var l360 = {name: "WRITE-STRING"};
9530 (function(){
9531     var v1105 = l47.fvalue(pv, l360, (function (values,v1106){
9532         checkArgs(arguments, 2);
9533         return (function(){
9534             return (function(v1107){
9535                 return l190.fvalue(values, "(function(){", (function(){
9536                     var symbol = l155;
9537                     var value = symbol.value;
9538                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9539                     return value;
9540                 })(), l194.fvalue(pv, l190.fvalue(pv, "var ", "x", " = ", v1107, ";", (function(){
9541                     var symbol = l155;
9542                     var value = symbol.value;
9543                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9544                     return value;
9545                 })()), l190.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
9546                     var symbol = l155;
9547                     var value = symbol.value;
9548                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9549                     return value;
9550                 })(), l194.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
9551                     var symbol = l155;
9552                     var value = symbol.value;
9553                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9554                     return value;
9555                 })())), l190.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){
9556                     var symbol = l155;
9557                     var value = symbol.value;
9558                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9559                     return value;
9560                 })())), "})()");
9561             })(l192.fvalue(pv, v1106));
9562         })();
9563     }));
9564     var v1108 = ({car: v1105, cdr: (function(){
9565         var symbol = l319;
9566         var value = symbol.value;
9567         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9568         return value;
9569     })()});
9570     return ((l319).value = v1108);
9571 })();
9572 var l361 = {name: "MAKE-ARRAY"};
9573 (function(){
9574     var v1109 = l47.fvalue(pv, l361, (function (values,v1110){
9575         checkArgs(arguments, 2);
9576         return (function(){
9577             return (function(v1111){
9578                 return l190.fvalue(values, "(function(){", (function(){
9579                     var symbol = l155;
9580                     var value = symbol.value;
9581                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9582                     return value;
9583                 })(), l194.fvalue(pv, "var r = [];", (function(){
9584                     var symbol = l155;
9585                     var value = symbol.value;
9586                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9587                     return value;
9588                 })(), "for (var i = 0; i < ", v1111, "; i++)", (function(){
9589                     var symbol = l155;
9590                     var value = symbol.value;
9591                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9592                     return value;
9593                 })(), l194.fvalue(pv, "r.push(", l192.fvalue(pv, l5.value), ");", (function(){
9594                     var symbol = l155;
9595                     var value = symbol.value;
9596                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9597                     return value;
9598                 })()), "return r;", (function(){
9599                     var symbol = l155;
9600                     var value = symbol.value;
9601                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9602                     return value;
9603                 })()), "})()");
9604             })(l192.fvalue(pv, v1110));
9605         })();
9606     }));
9607     var v1112 = ({car: v1109, cdr: (function(){
9608         var symbol = l319;
9609         var value = symbol.value;
9610         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9611         return value;
9612     })()});
9613     return ((l319).value = v1112);
9614 })();
9615 var l362 = {name: "ARRAYP"};
9616 (function(){
9617     var v1113 = l47.fvalue(pv, l362, (function (values,v1114){
9618         checkArgs(arguments, 2);
9619         return (function(){
9620             return (function(v1115){
9621                 return l191.fvalue(values, l190.fvalue(pv, "(function(){", (function(){
9622                     var symbol = l155;
9623                     var value = symbol.value;
9624                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9625                     return value;
9626                 })(), l194.fvalue(pv, "var x = ", v1115, ";", (function(){
9627                     var symbol = l155;
9628                     var value = symbol.value;
9629                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9630                     return value;
9631                 })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
9632             })(l192.fvalue(pv, v1114));
9633         })();
9634     }));
9635     var v1116 = ({car: v1113, cdr: (function(){
9636         var symbol = l319;
9637         var value = symbol.value;
9638         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9639         return value;
9640     })()});
9641     return ((l319).value = v1116);
9642 })();
9643 var l363 = {name: "AREF"};
9644 (function(){
9645     var v1117 = l47.fvalue(pv, l363, (function (values,v1118,v1119){
9646         checkArgs(arguments, 3);
9647         return (function(){
9648             return (function(v1120,v1121){
9649                 return l190.fvalue(values, "(function(){", (function(){
9650                     var symbol = l155;
9651                     var value = symbol.value;
9652                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9653                     return value;
9654                 })(), l194.fvalue(pv, "var x = ", "(", v1120, ")[", v1121, "];", (function(){
9655                     var symbol = l155;
9656                     var value = symbol.value;
9657                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9658                     return value;
9659                 })(), "if (x === undefined) throw 'Out of range';", (function(){
9660                     var symbol = l155;
9661                     var value = symbol.value;
9662                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9663                     return value;
9664                 })(), "return x;", (function(){
9665                     var symbol = l155;
9666                     var value = symbol.value;
9667                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9668                     return value;
9669                 })()), "})()");
9670             })(l192.fvalue(pv, v1118),l192.fvalue(pv, v1119));
9671         })();
9672     }));
9673     var v1122 = ({car: v1117, cdr: (function(){
9674         var symbol = l319;
9675         var value = symbol.value;
9676         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9677         return value;
9678     })()});
9679     return ((l319).value = v1122);
9680 })();
9681 var l364 = {name: "ASET"};
9682 (function(){
9683     var v1123 = l47.fvalue(pv, l364, (function (values,v1124,v1125,v1126){
9684         checkArgs(arguments, 4);
9685         return (function(){
9686             return (function(v1127,v1128,v1129){
9687                 return l190.fvalue(values, "(function(){", (function(){
9688                     var symbol = l155;
9689                     var value = symbol.value;
9690                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9691                     return value;
9692                 })(), l194.fvalue(pv, "var x = ", v1127, ";", (function(){
9693                     var symbol = l155;
9694                     var value = symbol.value;
9695                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9696                     return value;
9697                 })(), "var i = ", v1128, ";", (function(){
9698                     var symbol = l155;
9699                     var value = symbol.value;
9700                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9701                     return value;
9702                 })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
9703                     var symbol = l155;
9704                     var value = symbol.value;
9705                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9706                     return value;
9707                 })(), "return x[i] = ", v1129, ";", (function(){
9708                     var symbol = l155;
9709                     var value = symbol.value;
9710                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9711                     return value;
9712                 })()), "})()");
9713             })(l192.fvalue(pv, v1124),l192.fvalue(pv, v1125),l192.fvalue(pv, v1126));
9714         })();
9715     }));
9716     var v1130 = ({car: v1123, cdr: (function(){
9717         var symbol = l319;
9718         var value = symbol.value;
9719         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9720         return value;
9721     })()});
9722     return ((l319).value = v1130);
9723 })();
9724 var l365 = {name: "GET-UNIX-TIME"};
9725 (function(){
9726     var v1131 = l47.fvalue(pv, l365, (function (values){
9727         checkArgsAtMost(arguments, 1);
9728         return (function(){
9729             return (function(){
9730                 return l190.fvalue(values, "(Math.round(new Date() / 1000))");
9731             })();
9732         })();
9733     }));
9734     var v1132 = ({car: v1131, cdr: (function(){
9735         var symbol = l319;
9736         var value = symbol.value;
9737         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9738         return value;
9739     })()});
9740     return ((l319).value = v1132);
9741 })();
9742 var l366 = {name: "VALUES-ARRAY"};
9743 (function(){
9744     var v1133 = l47.fvalue(pv, l366, (function (values,v1134){
9745         checkArgs(arguments, 2);
9746         return (function(){
9747             return (function(v1135){
9748                 return ((function(){
9749                     var symbol = l195;
9750                     var value = symbol.value;
9751                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9752                     return value;
9753                 })() !== l5.value ? l190.fvalue(values, "values.apply(this, ", v1135, ")") : l190.fvalue(values, "pv.apply(this, ", v1135, ")"));
9754             })(l192.fvalue(pv, v1134));
9755         })();
9756     }));
9757     var v1136 = ({car: v1133, cdr: (function(){
9758         var symbol = l319;
9759         var value = symbol.value;
9760         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9761         return value;
9762     })()});
9763     return ((l319).value = v1136);
9764 })();
9765 (function(){
9766     var v1137 = l47.fvalue(pv, l164, (function (values){
9767         var v1138= l5.value;
9768         for (var i = arguments.length-1; i>=1; i--)
9769             v1138 = {car: arguments[i], cdr:
9770         v1138};
9771         return (function(){
9772             return ((function(){
9773                 var symbol = l195;
9774                 var value = symbol.value;
9775                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9776                 return value;
9777             })() !== l5.value ? l190.fvalue(values, "values(", l158.fvalue(pv, l81.fvalue(pv, (function(){
9778                 var symbol = l192;
9779                 var func = symbol.fvalue;
9780                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9781                 return func;
9782             })(), v1138), ", "), ")") : l190.fvalue(values, "pv(", l158.fvalue(pv, l81.fvalue(pv, (function(){
9783                 var symbol = l192;
9784                 var func = symbol.fvalue;
9785                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9786                 return func;
9787             })(), v1138), ", "), ")"));
9788         })();
9789     }));
9790     var v1139 = ({car: v1137, cdr: (function(){
9791         var symbol = l319;
9792         var value = symbol.value;
9793         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9794         return value;
9795     })()});
9796     return ((l319).value = v1139);
9797 })();
9798 (function(){
9799     (l221).fvalue = (function(v1142){
9800         ((v1142)["fname"] = "MACRO");
9801         return v1142;
9802     })((function (values,v1140){
9803         checkArgs(arguments, 2);
9804         return (function(){
9805             return (((function(){
9806                 var tmp = v1140;
9807                 return (typeof tmp == 'object' && 'name' in tmp);
9808             })()?l4.value: l5.value) !== l5.value ? (function(v1141){
9809                 return (((l198.fvalue(pv, v1141) === l221)?l4.value: l5.value) !== l5.value ? v1141 : l5.value);
9810             })(l210.fvalue(pv, v1140, (function(){
9811                 var symbol = l211;
9812                 var value = symbol.value;
9813                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9814                 return value;
9815             })(), l112)) : l5.value);
9816         })();
9817     }));
9818     return l221;
9819 })();
9820 (function(){
9821     (l119).fvalue = (function(v1147){
9822         ((v1147)["fname"] = "LS-MACROEXPAND-1");
9823         return v1147;
9824     })((function (values,v1143){
9825         checkArgs(arguments, 2);
9826         return (function(){
9827             return (function(v1144){
9828                 return (v1144 !== l5.value ? (function(v1145){
9829                     (l62.fvalue(pv, v1145) !== l5.value ? (function(v1146){
9830                         l201.fvalue(pv, v1144, v1146);
9831                         return (v1145 = v1146);
9832                     })(l271.fvalue(pv, v1145)) : l5.value);
9833                     return (function(){
9834                         var f = v1145;
9835                         var args = [values];
9836                         var tail = ((function(){
9837                             var tmp = v1143;
9838                             return tmp === l5.value? l5.value: tmp.cdr;
9839                         })());
9840                         while (tail != l5.value){
9841                             args.push(tail.car);
9842                             tail = tail.cdr;
9843                         }
9844                         return (typeof f === 'function'? f : f.fvalue).apply(this, args);
9845                     })();
9846                 })(l199.fvalue(pv, v1144)) : v1143);
9847             })(l221.fvalue(pv, (function(){
9848                 var tmp = v1143;
9849                 return tmp === l5.value? l5.value: tmp.car;
9850             })()));
9851         })();
9852     }));
9853     return l119;
9854 })();
9855 var l367 = {name: "COMPILE-FUNCALL"};
9856 var l368 = {name: "G764"};
9857 (function(){
9858     (l367).fvalue = (function(v1152){
9859         ((v1152)["fname"] = "COMPILE-FUNCALL");
9860         return v1152;
9861     })((function (values,v1148,v1149){
9862         checkArgs(arguments, 3);
9863         return (function(){
9864             return (function(){
9865                 var v1150 = ((function(){
9866                     var symbol = l195;
9867                     var value = symbol.value;
9868                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9869                     return value;
9870                 })() !== l5.value ? "values" : "pv");
9871                 var v1151 = l156.fvalue(pv, "(", l158.fvalue(pv, ({car: v1150, cdr: l81.fvalue(pv, (function(){
9872                     var symbol = l192;
9873                     var func = symbol.fvalue;
9874                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9875                     return func;
9876                 })(), v1149)}), ", "), ")");
9877                 return (l266.fvalue(pv, v1148) !== l5.value ? l156.fvalue(values, l266.fvalue(pv, v1148), v1151) : ((((function(){
9878                     var tmp = v1148;
9879                     return (typeof tmp == 'object' && 'name' in tmp);
9880                 })()?l4.value: l5.value) !== l5.value ? (((l144.fvalue(pv, v1148) === l135.fvalue(pv, "COMMON-LISP"))?l4.value: l5.value) !== l5.value ? (function(){
9881                     var symbol = l368;
9882                     var value = symbol.value;
9883                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9884                     return value;
9885                 })() : l5.value) : l5.value) !== l5.value ? l190.fvalue(values, l192.fvalue(pv, l47.fvalue(pv, l185, v1148)), ".fvalue", v1151) : l190.fvalue(values, l192.fvalue(pv, l47.fvalue(pv, l112, v1148)), v1151)));
9886             })();
9887         })();
9888     }));
9889     return l367;
9890 })();
9891 (function(){
9892     (l253).fvalue = (function(v1155){
9893         ((v1155)["fname"] = "LS-COMPILE-BLOCK");
9894         return v1155;
9895     })((function (values,v1153,v1154){
9896         checkArgsAtLeast(arguments, 2);
9897         checkArgsAtMost(arguments, 3);
9898         var v1154;
9899         switch(arguments.length-1){
9900         case 1:
9901             v1154=l5.value;
9902         default: break;
9903         }
9904         return (function(){
9905             return (v1154 !== l5.value ? l190.fvalue(values, l253.fvalue(pv, l95.fvalue(pv, v1153)), "return ", l192.fvalue(pv, (function(){
9906                 var tmp = l94.fvalue(pv, v1153);
9907                 return tmp === l5.value? l5.value: tmp.car;
9908             })(), (function(){
9909                 var symbol = l195;
9910                 var value = symbol.value;
9911                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9912                 return value;
9913             })()), ";") : l159.fvalue(values, l98.fvalue(pv, (function(){
9914                 var symbol = l218;
9915                 var func = symbol.fvalue;
9916                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9917                 return func;
9918             })(), l81.fvalue(pv, (function(){
9919                 var symbol = l192;
9920                 var func = symbol.fvalue;
9921                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9922                 return func;
9923             })(), v1153)), l156.fvalue(pv, ";", (function(){
9924                 var symbol = l155;
9925                 var value = symbol.value;
9926                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9927                 return value;
9928             })())));
9929         })();
9930     }));
9931     return l253;
9932 })();
9933 (function(){
9934     (l192).fvalue = (function(v1165){
9935         ((v1165)["fname"] = "LS-COMPILE");
9936         return v1165;
9937     })((function (values,v1156,v1157){
9938         checkArgsAtLeast(arguments, 2);
9939         checkArgsAtMost(arguments, 3);
9940         var v1157;
9941         switch(arguments.length-1){
9942         case 1:
9943             v1157=l5.value;
9944         default: break;
9945         }
9946         return (function(){
9947             return (function(v1158){
9948                 try {
9949                     var tmp;
9950                     tmp = l195.value;
9951                     l195.value = v1158;
9952                     v1158 = tmp;
9953                     return (((function(){
9954                         var tmp = v1156;
9955                         return (typeof tmp == 'object' && 'name' in tmp);
9956                     })()?l4.value: l5.value) !== l5.value ? (function(v1159){
9957                         return ((v1159 !== l5.value ? l29.fvalue(pv, l96.fvalue(pv, l225, l200.fvalue(pv, v1159))) : l5.value) !== l5.value ? l199.fvalue(values, v1159) : ((function(v1160){
9958                             return (v1160 !== l5.value ? v1160 : l96.fvalue(pv, l227, l200.fvalue(pv, v1159)));
9959                         })(l143.fvalue(pv, v1156)) !== l5.value ? l190.fvalue(values, l192.fvalue(pv, l47.fvalue(pv, l185, v1156)), ".value") : l192.fvalue(values, l47.fvalue(pv, l339, l47.fvalue(pv, l185, v1156)))));
9960                     })(l210.fvalue(pv, v1156, (function(){
9961                         var symbol = l211;
9962                         var value = symbol.value;
9963                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9964                         return value;
9965                     })(), l113)) : (l89.fvalue(pv, v1156) !== l5.value ? l19.fvalue(values, v1156) : (((typeof(v1156) == "string")?l4.value: l5.value) !== l5.value ? l190.fvalue(values, "\"", l166.fvalue(pv, v1156), "\"") : (((function(){
9966                         var x = v1156;
9967                         return typeof x === 'object' && 'length' in x;
9968                     })()?l4.value: l5.value) !== l5.value ? l261.fvalue(values, v1156) : (l62.fvalue(pv, v1156) !== l5.value ? (function(v1161,v1162){
9969                         return (l105.fvalue(pv, v1161, (function(){
9970                             var symbol = l229;
9971                             var value = symbol.value;
9972                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9973                             return value;
9974                         })()) !== l5.value ? (function(v1163){
9975                             return (function(){
9976                                 var f = v1163;
9977                                 var args = [values];
9978                                 var tail = (v1162);
9979                                 while (tail != l5.value){
9980                                     args.push(tail.car);
9981                                     tail = tail.cdr;
9982                                 }
9983                                 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
9984                             })();
9985                         })(l43.fvalue(pv, l105.fvalue(pv, v1161, (function(){
9986                             var symbol = l229;
9987                             var value = symbol.value;
9988                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9989                             return value;
9990                         })()))) : ((l105.fvalue(pv, v1161, (function(){
9991                             var symbol = l319;
9992                             var value = symbol.value;
9993                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9994                             return value;
9995                         })()) !== l5.value ? l29.fvalue(pv, l223.fvalue(pv, v1161, l112, l226)) : l5.value) !== l5.value ? (function(v1164){
9996                             return (function(){
9997                                 var f = v1164;
9998                                 var args = [values];
9999                                 var tail = (v1162);
10000                                 while (tail != l5.value){
10001                                     args.push(tail.car);
10002                                     tail = tail.cdr;
10003                                 }
10004                                 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
10005                             })();
10006                         })(l43.fvalue(pv, l105.fvalue(pv, v1161, (function(){
10007                             var symbol = l319;
10008                             var value = symbol.value;
10009                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10010                             return value;
10011                         })()))) : (l221.fvalue(pv, v1161) !== l5.value ? l192.fvalue(values, l119.fvalue(pv, v1156), v1157) : l367.fvalue(values, v1161, v1162))));
10012                     })((function(){
10013                         var tmp = v1156;
10014                         return tmp === l5.value? l5.value: tmp.car;
10015                     })(),(function(){
10016                         var tmp = v1156;
10017                         return tmp === l5.value? l5.value: tmp.cdr;
10018                     })()) : (function(){
10019                         throw l156.fvalue(pv, "How should I compile ", l165.fvalue(pv, v1156), "?");
10020                     })())))));
10021                 }
10022                 finally {
10023                     l195.value = v1158;
10024                 }
10025             })(v1157);
10026         })();
10027     }));
10028     return l192;
10029 })();
10030 var l369 = {name: "LS-COMPILE-TOPLEVEL"};
10031 (function(){
10032     (l369).fvalue = (function(v1172){
10033         ((v1172)["fname"] = "LS-COMPILE-TOPLEVEL");
10034         return v1172;
10035     })((function (values,v1166,v1167){
10036         checkArgsAtLeast(arguments, 2);
10037         checkArgsAtMost(arguments, 3);
10038         var v1167;
10039         switch(arguments.length-1){
10040         case 1:
10041             v1167=l5.value;
10042         default: break;
10043         }
10044         return (function(){
10045             return (function(v1168){
10046                 try {
10047                     var tmp;
10048                     tmp = l216.value;
10049                     l216.value = v1168;
10050                     v1168 = tmp;
10051                     return ((((function(){
10052                         var tmp = v1166;
10053                         return (typeof tmp == 'object' && 'car' in tmp);
10054                     })()?l4.value: l5.value) !== l5.value ? (((function(){
10055                         var tmp = v1166;
10056                         return tmp === l5.value? l5.value: tmp.car;
10057                     })() === l122)?l4.value: l5.value) : l5.value) !== l5.value ? (function(v1170){
10058                         return l158.fvalue(values, l98.fvalue(pv, (function(){
10059                             var symbol = l218;
10060                             var func = symbol.fvalue;
10061                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10062                             return func;
10063                         })(), v1170));
10064                     })(l81.fvalue(pv, (function (values,v1169){
10065                         checkArgs(arguments, 2);
10066                         return l369.fvalue(values, v1169, l4.value);
10067                     }), (function(){
10068                         var tmp = v1166;
10069                         return tmp === l5.value? l5.value: tmp.cdr;
10070                     })())) : (function(v1171){
10071                         return l190.fvalue(values, l159.fvalue(pv, l219.fvalue(pv), l190.fvalue(pv, ";", (function(){
10072                             var symbol = l155;
10073                             var value = symbol.value;
10074                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10075                             return value;
10076                         })())), (v1171 !== l5.value ? l190.fvalue(pv, v1171, ";", (function(){
10077                             var symbol = l155;
10078                             var value = symbol.value;
10079                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10080                             return value;
10081                         })()) : l5.value));
10082                     })(l192.fvalue(pv, v1166, v1167)));
10083                 }
10084                 finally {
10085                     l216.value = v1168;
10086                 }
10087             })(l5.value);
10088         })();
10089     }));
10090     return l369;
10091 })();
10092 (function(){
10093     (l271).fvalue = (function(v1174){
10094         ((v1174)["fname"] = "EVAL");
10095         return v1174;
10096     })((function (values,v1173){
10097         checkArgs(arguments, 2);
10098         return (function(){
10099             return (function(){
10100                 var string = l369.fvalue(pv, v1173, l4.value);
10101                 if (typeof string != 'string')
10102                     throw 'The value ' + string + ' is not a type string.';
10103                 return (function(){
10104                     var v = eval.apply(window, [string]);
10105                     if (typeof v !== 'object' || !('multiple-value' in v)){
10106                         v = [v];
10107                         v['multiple-value'] = true;
10108                     }
10109                     return values.apply(this, v);
10110                 })();
10111             })();
10112         })();
10113     }));
10114     return l271;
10115 })();
10116 var l370 = {name: "&BODY"};
10117 var l371 = QIList(l234,l235,l233,l370,l22,l17,l145,l65,l66,l23,l24,l25,l330,l332,l21,l21,l329,l331,l57,l68,l351,l363,l362,l105,l48,l207,l20,l20,l95,l34,l41,l39,l35,l32,l32,l55,l283,l36,l40,l37,l33,l33,l349,l87,l108,l135,l148,l42,l267,l45,l338,l350,l112,l359,l18,l117,l154,l291,l82,l231,l146,l49,l89,l89,l152,l143,l268,l6,l94,l75,l275,l278,l88,l86,l54,l30,l31,l83,l84,l50,l2,l120,l3,l10,l12,l1,l9,l101,l100,l109,l72,l73,l111,l52,l53,l56,l342,l28,l343,l353,l271,l104,l153,l130,l47,l85,l62,l80,l361,l131,l336,l81,l96,l91,l326,l114,l293,l115,l294,l126,l5,l29,l93,l92,l13,l333,l58,l136,l138,l134,l183,l90,l165,l168,l228,l59,l60,l122,l71,l51,l185,l127,l97,l98,l99,l15,l282,l69,l70,l123,l124,l43,l255,l121,l118,l103,l346,l106,l107,l345,l102,l263,l337,l144,l340,l339,l335,l4,l289,l44,l284,l27,l8,l292,l164,l163,l113,l167,l7,l110,l360,l26,l5);
10118 l153.fvalue(values, l371);
10119 ((l145).value = (function(){
10120     var symbol = l141;
10121     var value = symbol.value;
10122     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10123     return value;
10124 })());
10125 (function(){
10126     var string = "var lisp";
10127     if (typeof string != 'string')
10128         throw 'The value ' + string + ' is not a type string.';
10129     return (function(){
10130         var v = eval.apply(window, [string]);
10131         if (typeof v !== 'object' || !('multiple-value' in v)){
10132             v = [v];
10133             v['multiple-value'] = true;
10134         }
10135         return values.apply(this, v);
10136     })();
10137 })();
10138 (lisp = {});
10139 (lisp.read = (function(){
10140     var symbol = l189;
10141     var func = symbol.fvalue;
10142     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10143     return func;
10144 })());
10145 (lisp.print = (function(){
10146     var symbol = l165;
10147     var func = symbol.fvalue;
10148     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10149     return func;
10150 })());
10151 (lisp.eval = (function(){
10152     var symbol = l271;
10153     var func = symbol.fvalue;
10154     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10155     return func;
10156 })());
10157 (lisp.compile = (function (values,v1175){
10158     checkArgs(arguments, 2);
10159     return l369.fvalue(values, v1175, l4.value);
10160 }));
10161 (lisp.evalString = (function (values,v1176){
10162     checkArgs(arguments, 2);
10163     return l271.fvalue(values, l189.fvalue(pv, v1176));
10164 }));
10165 (lisp.compileString = (function (values,v1177){
10166     checkArgs(arguments, 2);
10167     return l369.fvalue(values, l189.fvalue(pv, v1177), l4.value);
10168 }));
10169 var l372 = {name: "OP"};
10170 var l373 = {name: "SYM"};
10171 var l374 = {name: "X"};
10172 var l375 = {name: "ARGS"};
10173 var l376 = {name: "BODY"};
10174 var l377 = {name: "DECLS"};
10175 var l378 = {name: "DECL"};
10176 var l379 = {name: "NAME"};
10177 var l380 = {name: "ARG"};
10178 var l381 = {name: "FORM"};
10179 var l382 = {name: "PACKAGE-DESIGNATOR"};
10180 var l383 = {name: "CLAUSULES"};
10181 var l384 = {name: "VALUE"};
10182 var l385 = {name: "C"};
10183 var l386 = {name: "INTEGER"};
10184 var l387 = {name: "PLACE"};
10185 var l388 = {name: "DUMMIES"};
10186 var l389 = {name: "VALS"};
10187 var l390 = {name: "NEWVAL"};
10188 var l391 = {name: "SETTER"};
10189 var l392 = {name: "GETTER"};
10190 var l393 = {name: "G"};
10191 var l394 = {name: "PAIRS"};
10192 var l395 = {name: "VARS"};
10193 var l396 = {name: "STORE-VARS"};
10194 var l397 = {name: "WRITER-FORM"};
10195 var l398 = {name: "READER-FORM"};
10196 var l399 = {name: "RESULT"};
10197 var l400 = {name: "ACCESS-FN"};
10198 var l401 = {name: "LAMBDA-LIST"};
10199 var l402 = {name: "VALUE-FROM"};
10200 var l403 = {name: "VARIABLES"};
10201 var l404 = {name: "HEAD"};
10202 var l405 = {name: "TAIL"};
10203 var l406 = {name: "COLLECT"};
10204 var l407 = {name: "VARLIST"};
10205 var l408 = {name: "ENDLIST"};
10206 var l409 = {name: "V"};
10207 var l410 = {name: "ASSIGNMENTS"};
10208 var l411 = {name: "FORM1"};
10209 var l412 = {name: "FORMS"};
10210 var l413 = {name: "!FORM"};
10211 var l414 = {name: "CLAUSULE"};
10212 var l415 = {name: "ITER"};
10213 var l416 = {name: "G!TO"};
10214 var l417 = {name: "VAR"};
10215 var l418 = {name: "TO"};
10216 var l419 = {name: "G!LIST"};
10217 var l420 = {name: "DELTA"};
10218 var l421 = {name: "CONDITION"};
10219 var l422 = {name: "DOCSTRING"};
10220 var l423 = QIList(QIList(QIList(l319,l113,l5,QIList(l225,l5),l5),QIList(l303,l113,l5,QIList(l225,l5),l5),QIList(l302,l113,l5,QIList(l225,l5),l5),QIList(l301,l113,l5,QIList(l225,l5),l5),QIList(l300,l113,l5,QIList(l225,l5),l5),QIList(l299,l113,l5,QIList(l225,l5),l5),QIList(l298,l113,l5,QIList(l225,l5),l5),QIList(l297,l113,l5,QIList(l225,l5),l5),QIList(l296,l113,l5,QIList(l225,l5),l5),QIList(l295,l113,l5,QIList(l225,l5),l5),QIList(l286,l113,l5,QIList(l225,l5),l5),QIList(l285,l113,l5,QIList(l225,l5),l5),QIList(l279,l113,l5,QIList(l225,l5),l5),QIList(l269,l113,l5,QIList(l225,l5),l5),QIList(l259,l113,l5,QIList(l225,l5),l5),QIList(l258,l113,l5,QIList(l225,l5),l5),QIList(l232,l113,l5,QIList(l225,l5),l5),QIList(l229,l113,l5,QIList(l225,l5),l5),QIList(l216,l113,l5,QIList(l225,l5),l5),QIList(l212,l113,l5,QIList(l225,l5),l5),QIList(l211,l113,l5,QIList(l225,l5),l5),QIList(l195,l113,l5,QIList(l225,l5),l5),QIList(l184,l113,l5,QIList(l225,l5),l5),QIList(l155,l113,l5,QIList(l225,l5),l5),QIList(l145,l113,l5,QIList(l225,l5),l5),QIList(l142,l113,l5,QIList(l225,l5),l5),QIList(l141,l113,l5,QIList(l225,l5),l5),QIList(l140,l113,l5,QIList(l225,l5),l5),QIList(l129,l113,l5,QIList(l225,l5),l5),QIList(l116,l113,l5,QIList(l225,l5),l5),QIList(l17,l113,l5,QIList(l225,l5),l5),QIList(l5,l113,l5,QIList(l227,l225,l5),l5),QIList(l4,l113,l5,QIList(l227,l225,l5),l5),l5),QIList(QIList(l328,l221,QIList(l112,QIList(l6,QIList(l372,l373,l5),QIList(l186,QIList(l320,QIList(l188,l372,l5),QIList(l374,l234,l375,l5),QIList(l275,QIList(QIList(l375,QIList(l30,l374,l375,l5),l5),l5),QIList(l324,l375,QIList(l191,QIList(l327,l375,QIList(l188,l373,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l324,l221,QIList(l112,QIList(l6,QIList(l375,l234,l376,l5),QIList(l8,QIList(l335,l375,l5),QIList(l353,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l5),l5),QIList(l186,QIList(l323,QIList(l188,l375,l5),QIList(l6,QIList(QIList(l188,l375,l5),l5),QIList(l190,"return ",QIList(l187,l376,l5),";",l155,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l322,l221,QIList(l112,QIList(l6,QIList(l377,l234,l376,l5),QIList(l186,QIList(l193,QIList(l187,QIList(l81,QIList(l6,QIList(l378,l5),QIList(l186,QIList(l190,"var ",QIList(l188,QIList(l42,l378,l5),l5)," = ",QIList(l188,QIList(l44,l378,l5),l5),";",l155,l5),l5),l5),l377,l5),l5),QIList(l187,QIList(l81,QIList(l6,QIList(l378,l5),QIList(l186,QIList(l190,"if (typeof ",QIList(l188,QIList(l42,l378,l5),l5)," != '",QIList(l188,QIList(l43,l378,l5),l5),"')",l155,QIList(l194,"throw 'The value ' + ",QIList(l188,QIList(l42,l378,l5),l5)," + ' is not a type ",QIList(l188,QIList(l43,l378,l5),l5),".';",l155,l5),l5),l5),l5),l377,l5),l5),QIList(l190,"return ",QIList(l122,QIList(l187,l376,l5),l5),";",l155,l5),l5),l5),l5),l5),l5,l5),QIList(l321,l221,QIList(l112,QIList(l6,QIList(l379,l375,l234,l376,l5),QIList(l186,QIList(l320,QIList(l188,l379,l5),QIList(l188,l375,l5),QIList(l275,QIList(l188,QIList(l81,QIList(l6,QIList(l380,l5),QIList(l186,QIList(QIList(l188,l380,l5),QIList(l192,QIList(l188,l380,l5),l5),l5),l5),l5),l375,l5),l5),QIList(l187,l376,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l320,l221,QIList(l112,QIList(l6,QIList(l379,l375,l234,l376,l5),QIList(l186,QIList(l51,QIList(l47,QIList(l185,QIList(l188,l379,l5),l5),QIList(l6,QIList(l188,l375,l5),QIList(l207,QIList(l188,l379,l5),QIList(l187,l376,l5),l5),l5),l5),l319,l5),l5),l5),l5),l5,l5),QIList(l186,l221,QIList(l112,QIList(l6,QIList(l374,l5),QIList(l305,l374,l5),l5),l5),l5,l5),QIList(l272,l221,QIList(l112,QIList(l6,QIList(l379,l375,l381,l5),QIList(l186,QIList(l230,QIList(l188,l379,l5),QIList(l188,l375,l5),QIList(l192,QIList(l188,l381,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l230,l221,QIList(l112,QIList(l6,QIList(l379,l375,l234,l376,l5),QIList(l186,QIList(l51,QIList(l47,QIList(l185,QIList(l188,l379,l5),l5),QIList(l6,QIList(l188,l375,l5),QIList(l207,QIList(l188,l379,l5),QIList(l187,l376,l5),l5),l5),l5),l229,l5),l5),l5),l5),l5,l5),QIList(l193,l221,QIList(l112,QIList(l6,QIList(l234,l376,l5),QIList(l186,QIList(l190,"(function(){",l155,QIList(l194,QIList(l187,l376,l5),l5),"})()",l5),l5),l5),l5),l5,l5),QIList(l157,l221,QIList(l112,QIList(l6,QIList(l113,l234,l381,l5),QIList(l186,QIList(l118,QIList(l188,l113,l5),QIList(l156,QIList(l188,l113,l5),QIList(l122,QIList(l187,l381,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l146,l221,QIList(l112,QIList(l6,QIList(l382,l5),QIList(l186,QIList(l270,QIList(l118,l145,QIList(l133,QIList(l188,l382,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l125,l221,QIList(l112,QIList(l6,QIList(l374,l234,l383,l5),QIList(l275,QIList(QIList(l384,QIList(l18,l5),l5),l5),QIList(l186,QIList(l275,QIList(QIList(QIList(l188,l384,l5),QIList(l188,l374,l5),l5),l5),QIList(l54,QIList(l187,QIList(l81,QIList(l6,QIList(l385,l5),QIList(l231,QIList(l342,QIList(l32,l385,l5),l4,l5),QIList(l186,QIList(QIList(l4,QIList(l187,QIList(l46,l385,l5),l5),l5),l5),l5),QIList(l186,QIList(QIList(QIList(l188,QIList(l56,QIList(l32,l385,l5),QIList(l386,QIList(l185,l89,l5),l5),QIList(l30,QIList(l185,l31,l5),l5),QIList(l106,QIList(l185,l345,l5),l5),QIList(l48,QIList(l185,l48,l5),l5),QIList(l13,QIList(l185,l13,l5),l5),l5),l5),QIList(l188,l384,l5),l5),QIList(l187,QIList(l58,QIList(l46,l385,l5),QIList(l47,l5,l5),l5),l5),l5),l5),l5),l5),l383,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l221,QIList(l112,QIList(l6,QIList(l374,l387,l5),QIList(l114,QIList(l388,l389,l390,l391,l392,l5),QIList(l117,l387,l5),QIList(l275,QIList(QIList(l393,QIList(l18,l5),l5),l5),QIList(l186,QIList(l278,QIList(QIList(QIList(l188,l393,l5),QIList(l188,l374,l5),l5),QIList(l187,QIList(l81,QIList(l112,l47,l5),l388,l389,l5),l5),QIList(QIList(l188,QIList(l32,l390,l5),l5),QIList(l30,QIList(l188,l393,l5),QIList(l188,l392,l5),l5),l5),QIList(l187,QIList(l33,l390,l5),l5),l5),QIList(l188,l391,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l121,l221,QIList(l112,QIList(l6,QIList(l234,l394,l5),QIList(l54,QIList(QIList(l13,l394,l5),l5,l5),QIList(QIList(l13,QIList(l33,l394,l5),l5),QIList(l353,"Odd number of arguments to setf.",l5),l5),QIList(QIList(l13,QIList(l37,l394,l5),l5),QIList(l275,QIList(QIList(l387,QIList(l42,l394,l5),l5),QIList(l384,QIList(l43,l394,l5),l5),l5),QIList(l114,QIList(l395,l389,l396,l397,l398,l5),QIList(l117,l387,l5),QIList(l186,QIList(l278,QIList(l188,QIList(l81,QIList(l112,l47,l5),l395,l389,l5),l5),QIList(l114,QIList(l188,l396,l5),QIList(l188,l384,l5),QIList(l188,l397,l5),l5),l5),l5),l5),l5),l5),QIList(l4,QIList(l186,QIList(l122,QIList(l187,QIList(l72,QIList(QIList(l394,l394,QIList(l37,l394,l5),l5),QIList(l399,QIList(l185,l5,l5),QIList(l30,QIList(l186,QIList(l121,QIList(l188,QIList(l32,l394,l5),l5),QIList(l188,QIList(l35,l394,l5),l5),l5),l5),l399,l5),l5),l5),QIList(QIList(l13,l394,l5),QIList(l70,l399,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l120,l221,QIList(l112,QIList(l6,QIList(l400,l401,l234,l376,l5),QIList(l8,QIList(l335,l400,l5),QIList(l353,"ACCESS-FN must be a symbol.",l5),l5),QIList(l186,QIList(l122,QIList(l51,QIList(l30,QIList(l185,QIList(l188,l400,l5),l5),QIList(l6,QIList(l188,l401,l5),QIList(l187,l376,l5),l5),l5),l116,l5),QIList(l185,QIList(l188,l400,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l115,l221,QIList(l112,QIList(l6,QIList(l402,l5),QIList(l186,QIList(l293,QIList(l112,l47,l5),QIList(l188,l402,l5),l5),l5),l5),l5),l5,l5),QIList(l114,l221,QIList(l112,QIList(l6,QIList(l403,l402,l234,l376,l5),QIList(l186,QIList(l293,QIList(l6,QIList(l233,QIList(l187,l403,l5),l234,QIList(l188,QIList(l18,l5),l5),l5),QIList(l187,l376,l5),l5),QIList(l188,l402,l5),l5),l5),l5),l5),l5,l5),QIList(l80,l221,QIList(l112,QIList(l6,QIList(l234,l376,l5),QIList(l186,QIList(l16,l4,QIList(l187,l376,l5),l5),l5),l5),l5),l5,l5),QIList(l77,l221,QIList(l112,QIList(l6,QIList(l234,l376,l5),QIList(l275,QIList(QIList(l404,QIList(l18,l5),l5),QIList(l405,QIList(l18,l5),l5),l5),QIList(l186,QIList(l278,QIList(QIList(QIList(l188,l404,l5),QIList(l30,QIList(l185,l79,l5),l5,l5),l5),QIList(QIList(l188,l405,l5),QIList(l188,l404,l5),l5),l5),QIList(l267,QIList(QIList(l406,QIList(l374,l5),QIList(l124,QIList(l188,l405,l5),QIList(l30,l374,l5,l5),l5),QIList(l118,QIList(l188,l405,l5),QIList(l33,QIList(l188,l405,l5),l5),l5),l374,l5),l5),QIList(l187,l376,l5),l5),QIList(l33,QIList(l188,l404,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l73,l221,QIList(l112,QIList(l6,QIList(l407,l408,l234,l376,l5),QIList(l186,QIList(l207,l5,QIList(l278,QIList(l188,QIList(l81,QIList(l6,QIList(l374,l5),QIList(l47,QIList(l42,l374,l5),QIList(l43,l374,l5),l5),l5),l407,l5),l5),QIList(l16,l4,QIList(l7,QIList(l188,QIList(l32,l408,l5),l5),QIList(l15,QIList(l122,QIList(l187,QIList(l33,l408,l5),l5),l5),l5),l5),QIList(l289,QIList(l187,l376,l5),l5),QIList(l118,QIList(l187,QIList(l351,QIList(l112,l68,l5),QIList(l81,QIList(l6,QIList(l409,l5),QIList(l57,QIList(l31,QIList(l37,l409,l5),l5),QIList(l47,QIList(l42,l409,l5),QIList(l44,l409,l5),l5),l5),l5),l407,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l72,l221,QIList(l112,QIList(l6,QIList(l407,l408,l234,l376,l5),QIList(l186,QIList(l207,l5,QIList(l275,QIList(l188,QIList(l81,QIList(l6,QIList(l374,l5),QIList(l47,QIList(l42,l374,l5),QIList(l43,l374,l5),l5),l5),l407,l5),l5),QIList(l16,l4,QIList(l7,QIList(l188,QIList(l32,l408,l5),l5),QIList(l15,QIList(l122,QIList(l187,QIList(l33,l408,l5),l5),l5),l5),l5),QIList(l289,QIList(l187,l376,l5),l5),QIList(l71,QIList(l187,QIList(l351,QIList(l112,l68,l5),QIList(l81,QIList(l6,QIList(l409,l5),QIList(l57,QIList(l31,QIList(l37,l409,l5),l5),QIList(l47,QIList(l42,l409,l5),QIList(l44,l409,l5),l5),l5),l5),l407,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l71,l221,QIList(l112,QIList(l6,QIList(l234,l394,l5),QIList(l275,QIList(QIList(l410,QIList(l185,l5,l5),l5),l5),QIList(l16,l4,QIList(l54,QIList(QIList(l13,l394,l5),QIList(l15,l5),l5),QIList(QIList(l13,QIList(l33,l394,l5),l5),QIList(l353,"Odd paris in PSETQ",l5),l5),QIList(l4,QIList(l275,QIList(QIList(l113,QIList(l32,l394,l5),l5),QIList(l384,QIList(l35,l394,l5),l5),l5),QIList(l51,QIList(l186,QIList(QIList(l188,l113,l5),QIList(l188,QIList(l18,l5),l5),QIList(l188,l384,l5),l5),l5),l410,l5),QIList(l118,l394,QIList(l37,l394,l5),l5),l5),l5),l5),l5),QIList(l118,l410,QIList(l70,l410,l5),l5),QIList(l186,QIList(l275,QIList(l188,QIList(l81,QIList(l112,l33,l5),l410,l5),l5),QIList(l118,QIList(l187,QIList(l63,QIList(l112,l68,l5),QIList(l81,QIList(l112,l95,l5),l410,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l60,l221,QIList(l112,QIList(l6,QIList(l411,l399,l234,l376,l5),QIList(l186,QIList(l59,QIList(l122,QIList(l188,l411,l5),QIList(l188,l399,l5),l5),QIList(l187,l376,l5),l5),l5),l5),l5),l5,l5),QIList(l59,l221,QIList(l112,QIList(l6,QIList(l381,l234,l376,l5),QIList(l275,QIList(QIList(l384,QIList(l18,l5),l5),l5),QIList(l186,QIList(l275,QIList(QIList(QIList(l188,l384,l5),QIList(l188,l381,l5),l5),l5),QIList(l187,l376,l5),QIList(l188,l384,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l58,l221,QIList(l112,QIList(l6,QIList(l234,l412,l5),QIList(l54,QIList(QIList(l13,l412,l5),l5,l5),QIList(QIList(l13,QIList(l33,l412,l5),l5),QIList(l32,l412,l5),l5),QIList(l4,QIList(l275,QIList(QIList(l393,QIList(l18,l5),l5),l5),QIList(l186,QIList(l275,QIList(QIList(QIList(l188,l393,l5),QIList(l188,QIList(l32,l412,l5),l5),l5),l5),QIList(l231,QIList(l188,l393,l5),QIList(l188,l393,l5),QIList(l58,QIList(l187,QIList(l33,l412,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l57,l221,QIList(l112,QIList(l6,QIList(l234,l412,l5),QIList(l54,QIList(QIList(l13,l412,l5),l4,l5),QIList(QIList(l13,QIList(l33,l412,l5),l5),QIList(l32,l412,l5),l5),QIList(l4,QIList(l186,QIList(l231,QIList(l188,QIList(l32,l412,l5),l5),QIList(l57,QIList(l187,QIList(l33,l412,l5),l5),l5),l5,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l56,l221,QIList(l112,QIList(l6,QIList(l381,l234,l383,l5),QIList(l186,QIList(l55,QIList(l188,l381,l5),QIList(l187,QIList(l68,l383,QIList(l186,QIList(QIList(l4,QIList(l353,"ECASE expression failed.",l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l55,l221,QIList(l112,QIList(l6,QIList(l381,l234,l383,l5),QIList(l275,QIList(QIList(l413,QIList(l18,l5),l5),l5),QIList(l186,QIList(l275,QIList(QIList(QIList(l188,l413,l5),QIList(l188,l381,l5),l5),l5),QIList(l54,QIList(l187,QIList(l81,QIList(l6,QIList(l414,l5),QIList(l231,QIList(l342,QIList(l32,l414,l5),l4,l5),l414,QIList(l186,QIList(QIList(l28,QIList(l188,l413,l5),QIList(l185,QIList(l188,QIList(l32,l414,l5),l5),l5),l5),QIList(l187,QIList(l33,l414,l5),l5),l5),l5),l5),l5),l383,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l54,l221,QIList(l112,QIList(l6,QIList(l234,l383,l5),QIList(l231,QIList(l13,l383,l5),l5,QIList(l231,QIList(l342,QIList(l34,l383,l5),l4,l5),QIList(l186,QIList(l122,QIList(l187,QIList(l36,l383,l5),l5),l5),l5),QIList(l186,QIList(l231,QIList(l188,QIList(l34,l383,l5),l5),QIList(l122,QIList(l187,QIList(l36,l383,l5),l5),l5),QIList(l54,QIList(l187,QIList(l33,l383,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l53,l221,QIList(l112,QIList(l6,QIList(l415,l234,l376,l5),QIList(l275,QIList(QIList(l416,QIList(l18,l5),l5),QIList(l417,QIList(l42,l415,l5),l5),QIList(l418,QIList(l43,l415,l5),l5),QIList(l399,QIList(l44,l415,l5),l5),l5),QIList(l186,QIList(l207,l5,QIList(l275,QIList(QIList(QIList(l188,l417,l5),0,l5),QIList(QIList(l188,l416,l5),QIList(l188,l418,l5),l5),l5),QIList(l262,QIList(l330,QIList(l188,l417,l5),QIList(l188,l416,l5),l5),QIList(l289,QIList(l187,l376,l5),l5),QIList(l49,QIList(l188,l417,l5),l5),l5),QIList(l188,l399,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l52,l221,QIList(l112,QIList(l6,QIList(l415,l234,l376,l5),QIList(l275,QIList(QIList(l417,QIList(l42,l415,l5),l5),QIList(l419,QIList(l18,l5),l5),l5),QIList(l186,QIList(l207,l5,QIList(l275,QIList(QIList(QIList(l188,l419,l5),QIList(l188,QIList(l43,l415,l5),l5),l5),QIList(QIList(l188,l417,l5),l5,l5),l5),QIList(l262,QIList(l188,l419,l5),QIList(l118,QIList(l188,l417,l5),QIList(l32,QIList(l188,l419,l5),l5),l5),QIList(l289,QIList(l187,l376,l5),l5),QIList(l118,QIList(l188,l419,l5),QIList(l33,QIList(l188,l419,l5),l5),l5),l5),QIList(l188,QIList(l44,l415,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l221,QIList(l112,QIList(l6,QIList(l374,l387,l5),QIList(l186,QIList(l118,QIList(l188,l387,l5),QIList(l30,QIList(l188,l374,l5),QIList(l188,l387,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l50,l221,QIList(l112,QIList(l6,QIList(l374,l233,QIList(l420,1,l5),l5),QIList(l186,QIList(l118,QIList(l188,l374,l5),QIList(l66,QIList(l188,l374,l5),QIList(l188,l420,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l49,l221,QIList(l112,QIList(l6,QIList(l374,l233,QIList(l420,1,l5),l5),QIList(l186,QIList(l118,QIList(l188,l374,l5),QIList(l65,QIList(l188,l374,l5),QIList(l188,l420,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l16,l221,QIList(l112,QIList(l6,QIList(l421,l234,l376,l5),QIList(l186,QIList(l207,l5,QIList(l262,QIList(l188,l421,l5),QIList(l187,l376,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l15,l221,QIList(l112,QIList(l6,QIList(l233,l384,l5),QIList(l186,QIList(l282,l5,QIList(l188,l384,l5),l5),l5),l5),l5),l5,l5),QIList(l12,l221,QIList(l112,QIList(l6,QIList(l379,l375,l234,l376,l5),QIList(l186,QIList(l122,QIList(l338,QIList(l185,QIList(l188,l379,l5),l5),QIList(l11,QIList(l188,QIList(l337,l379,l5),l5),QIList(l188,l375,l5),QIList(l187,QIList(l231,QIList(l57,QIList(l345,QIList(l32,l376,l5),l5),QIList(l29,QIList(l13,QIList(l33,l376,l5),l5),l5),l5),QIList(l186,QIList(QIList(l188,QIList(l32,l376,l5),l5),QIList(l207,QIList(l188,l379,l5),QIList(l187,QIList(l33,l376,l5),l5),l5),l5),l5),QIList(l186,QIList(QIList(l207,QIList(l188,l379,l5),QIList(l187,l376,l5),l5),l5),l5),l5),l5),l5),l5),QIList(l185,QIList(l188,l379,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l11,l221,QIList(l112,QIList(l6,QIList(l379,l375,l234,l376,l5),QIList(l275,QIList(QIList(l374,QIList(l18,"FN",l5),l5),l5),QIList(l186,QIList(l275,QIList(QIList(QIList(l188,l374,l5),QIList(l6,QIList(l188,l375,l5),QIList(l187,l376,l5),l5),l5),l5),QIList(l357,QIList(l188,l374,l5),"fname",QIList(l188,l379,l5),l5),QIList(l188,l374,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l10,l221,QIList(l112,QIList(l6,QIList(l379,l384,l233,l422,l5),QIList(l186,QIList(l122,QIList(l118,QIList(l188,l379,l5),QIList(l188,l384,l5),l5),QIList(l187,QIList(l7,QIList(l345,l422,l5),QIList(l186,QIList(QIList(l357,QIList(l185,QIList(l188,l379,l5),l5),"vardoc",QIList(l188,l422,l5),l5),l5),l5),l5),l5),QIList(l185,QIList(l188,l379,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l9,l221,QIList(l112,QIList(l6,QIList(l379,l384,l233,l422,l5),QIList(l186,QIList(l122,QIList(l2,QIList(l225,QIList(l188,l379,l5),l5),l5),QIList(l8,QIList(l20,QIList(l185,QIList(l188,l379,l5),l5),l5),QIList(l118,QIList(l188,l379,l5),QIList(l188,l384,l5),l5),l5),QIList(l187,QIList(l7,QIList(l345,l422,l5),QIList(l186,QIList(QIList(l357,QIList(l185,QIList(l188,l379,l5),l5),"vardoc",QIList(l188,l422,l5),l5),l5),l5),l5),l5),QIList(l185,QIList(l188,l379,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l8,l221,QIList(l112,QIList(l6,QIList(l421,l234,l376,l5),QIList(l186,QIList(l231,QIList(l188,l421,l5),l5,QIList(l122,QIList(l187,l376,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l7,l221,QIList(l112,QIList(l6,QIList(l421,l234,l376,l5),QIList(l186,QIList(l231,QIList(l188,l421,l5),QIList(l122,QIList(l187,l376,l5),l5),l5,l5),l5),l5),l5),l5,l5),QIList(l6,l221,QIList(l112,QIList(l6,QIList(l375,l234,l376,l5),QIList(l186,QIList(l112,QIList(l6,QIList(l188,l375,l5),QIList(l187,l376,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l3,l221,QIList(l112,QIList(l6,QIList(l379,l384,l233,l422,l5),QIList(l186,QIList(l122,QIList(l2,QIList(l225,QIList(l188,l379,l5),l5),l5),QIList(l2,QIList(l227,QIList(l188,l379,l5),l5),l5),QIList(l118,QIList(l188,l379,l5),QIList(l188,l384,l5),l5),QIList(l187,QIList(l7,QIList(l345,l422,l5),QIList(l186,QIList(QIList(l357,QIList(l185,QIList(l188,l379,l5),l5),"vardoc",QIList(l188,l422,l5),l5),l5),l5),l5),l5),QIList(l185,QIList(l188,l379,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l2,l221,QIList(l112,QIList(l6,QIList(l234,l377,l5),QIList(l186,QIList(l270,QIList(l187,QIList(l81,QIList(l6,QIList(l378,l5),QIList(l186,QIList(l224,QIList(l185,QIList(l188,l378,l5),l5),l5),l5),l5),l377,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l1,l221,QIList(l112,QIList(l6,QIList(l379,l375,l234,l376,l5),QIList(l186,QIList(l270,QIList(l220,QIList(l185,QIList(l188,l379,l5),l5),QIList(l185,QIList(l112,QIList(l6,QIList(l188,QIList(l81,QIList(l112,QIList(l6,QIList(l374,l5),QIList(l231,QIList(l342,l374,QIList(l185,l370,l5),l5),QIList(l185,l234,l5),l374,l5),l5),l5),l375,l5),l5),QIList(l187,l376,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),l5),l5,l5,l5);
10221 ((l211).value = l423);
10222 var l424 = QIList(QIList(l422,"l422"),QIList(l421,"l421"),QIList(l420,"l420"),QIList(l419,"l419"),QIList(l418,"l418"),QIList(l417,"l417"),QIList(l416,"l416"),QIList(l415,"l415"),QIList(l414,"l414"),QIList(l413,"l413"),QIList(l412,"l412"),QIList(l411,"l411"),QIList(l410,"l410"),QIList(l409,"l409"),QIList(l408,"l408"),QIList(l407,"l407"),QIList(l406,"l406"),QIList(l405,"l405"),QIList(l404,"l404"),QIList(l403,"l403"),QIList(l402,"l402"),QIList(l401,"l401"),QIList(l400,"l400"),QIList(l399,"l399"),QIList(l398,"l398"),QIList(l397,"l397"),QIList(l396,"l396"),QIList(l395,"l395"),QIList(l394,"l394"),QIList(l393,"l393"),QIList(l392,"l392"),QIList(l391,"l391"),QIList(l390,"l390"),QIList(l389,"l389"),QIList(l388,"l388"),QIList(l387,"l387"),QIList(l386,"l386"),QIList(l385,"l385"),QIList(l384,"l384"),QIList(l383,"l383"),QIList(l382,"l382"),QIList(l381,"l381"),QIList(l380,"l380"),QIList(l379,"l379"),QIList(l378,"l378"),QIList(l377,"l377"),QIList(l376,"l376"),QIList(l375,"l375"),QIList(l374,"l374"),QIList(l373,"l373"),QIList(l372,"l372"),QIList(l370,"l370"),QIList(l369,"l369"),QIList(l368,"l368"),QIList(l367,"l367"),QIList(l366,"l366"),QIList(l365,"l365"),QIList(l364,"l364"),QIList(l363,"l363"),QIList(l362,"l362"),QIList(l361,"l361"),QIList(l360,"l360"),QIList(l359,"l359"),QIList(l358,"l358"),QIList(l357,"l357"),QIList(l356,"l356"),QIList(l355,"l355"),QIList(l354,"l354"),QIList(l353,"l353"),QIList(l352,"l352"),QIList(l351,"l351"),QIList(l350,"l350"),QIList(l349,"l349"),QIList(l348,"l348"),QIList(l347,"l347"),QIList(l346,"l346"),QIList(l345,"l345"),QIList(l344,"l344"),QIList(l343,"l343"),QIList(l342,"l342"),QIList(l341,"l341"),QIList(l340,"l340"),QIList(l339,"l339"),QIList(l338,"l338"),QIList(l337,"l337"),QIList(l336,"l336"),QIList(l335,"l335"),QIList(l334,"l334"),QIList(l333,"l333"),QIList(l332,"l332"),QIList(l331,"l331"),QIList(l330,"l330"),QIList(l329,"l329"),QIList(l328,"l328"),QIList(l327,"l327"),QIList(l326,"l326"),QIList(l325,"l325"),QIList(l324,"l324"),QIList(l323,"l323"),QIList(l322,"l322"),QIList(l321,"l321"),QIList(l320,"l320"),QIList(l319,"l319"),QIList(l318,"l318"),QIList(l317,"l317"),QIList(l316,"l316"),QIList(l315,"l315"),QIList(l314,"l314"),QIList(l313,"l313"),QIList(l312,"l312"),QIList(l311,"l311"),QIList(l310,"l310"),QIList(l309,"l309"),QIList(l308,"l308"),QIList(l307,"l307"),QIList(l306,"l306"),QIList(l305,"l305"),QIList(l304,"l304"),QIList(l303,"l303"),QIList(l302,"l302"),QIList(l301,"l301"),QIList(l300,"l300"),QIList(l299,"l299"),QIList(l298,"l298"),QIList(l297,"l297"),QIList(l296,"l296"),QIList(l295,"l295"),QIList(l294,"l294"),QIList(l293,"l293"),QIList(l292,"l292"),QIList(l291,"l291"),QIList(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(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(l214,"l214"),QIList(l213,"l213"),QIList(l212,"l212"),QIList(l211,"l211"),QIList(l210,"l210"),QIList(l209,"l209"),QIList(l208,"l208"),QIList(l207,"l207"),QIList(l206,"l206"),QIList(l205,"l205"),QIList(l204,"l204"),QIList(l203,"l203"),QIList(l202,"l202"),QIList(l201,"l201"),QIList(l200,"l200"),QIList(l199,"l199"),QIList(l198,"l198"),QIList(l197,"l197"),QIList(l196,"l196"),QIList(l195,"l195"),QIList(l194,"l194"),QIList(l193,"l193"),QIList(l192,"l192"),QIList(l191,"l191"),QIList(l190,"l190"),QIList(l189,"l189"),QIList(l188,"l188"),QIList(l187,"l187"),QIList(l186,"l186"),QIList(l185,"l185"),QIList(l184,"l184"),QIList(l183,"l183"),QIList(l182,"l182"),QIList(l181,"l181"),QIList(l180,"l180"),QIList(l179,"l179"),QIList(l178,"l178"),QIList(l177,"l177"),QIList(l176,"l176"),QIList(l175,"l175"),QIList(l174,"l174"),QIList(l173,"l173"),QIList(l172,"l172"),QIList(l171,"l171"),QIList(l170,"l170"),QIList(l169,"l169"),QIList(l168,"l168"),QIList(l167,"l167"),QIList(l166,"l166"),QIList(l165,"l165"),QIList(l164,"l164"),QIList(l163,"l163"),QIList(l162,"l162"),QIList(l161,"l161"),QIList(l160,"l160"),QIList(l159,"l159"),QIList(l158,"l158"),QIList(l157,"l157"),QIList(l156,"l156"),QIList(l155,"l155"),QIList(l154,"l154"),QIList(l153,"l153"),QIList(l152,"l152"),QIList(l151,"l151"),QIList(l150,"l150"),QIList(l149,"l149"),QIList(l148,"l148"),QIList(l147,"l147"),QIList(l146,"l146"),QIList(l145,"l145"),QIList(l144,"l144"),QIList(l143,"l143"),QIList(l142,"l142"),QIList(l141,"l141"),QIList(l140,"l140"),QIList(l139,"l139"),QIList(l138,"l138"),QIList(l137,"l137"),QIList(l136,"l136"),QIList(l135,"l135"),QIList(l134,"l134"),QIList(l133,"l133"),QIList(l132,"l132"),QIList(l131,"l131"),QIList(l130,"l130"),QIList(l129,"l129"),QIList(l128,"l128"),QIList(l127,"l127"),QIList(l126,"l126"),QIList(l125,"l125"),QIList(l124,"l124"),QIList(l123,"l123"),QIList(l122,"l122"),QIList(l121,"l121"),QIList(l120,"l120"),QIList(l119,"l119"),QIList(l118,"l118"),QIList(l117,"l117"),QIList(l116,"l116"),QIList(l115,"l115"),QIList(l114,"l114"),QIList(l113,"l113"),QIList(l112,"l112"),QIList(l111,"l111"),QIList(l110,"l110"),QIList(l109,"l109"),QIList(l108,"l108"),QIList(l107,"l107"),QIList(l106,"l106"),QIList(l105,"l105"),QIList(l104,"l104"),QIList(l103,"l103"),QIList(l102,"l102"),QIList(l101,"l101"),QIList(l100,"l100"),QIList(l99,"l99"),QIList(l98,"l98"),QIList(l97,"l97"),QIList(l96,"l96"),QIList(l95,"l95"),QIList(l94,"l94"),QIList(l93,"l93"),QIList(l92,"l92"),QIList(l91,"l91"),QIList(l90,"l90"),QIList(l89,"l89"),QIList(l88,"l88"),QIList(l87,"l87"),QIList(l86,"l86"),QIList(l85,"l85"),QIList(l84,"l84"),QIList(l83,"l83"),QIList(l82,"l82"),QIList(l81,"l81"),QIList(l80,"l80"),QIList(l79,"l79"),QIList(l78,"l78"),QIList(l77,"l77"),QIList(l76,"l76"),QIList(l75,"l75"),QIList(l74,"l74"),QIList(l73,"l73"),QIList(l72,"l72"),QIList(l71,"l71"),QIList(l70,"l70"),QIList(l69,"l69"),QIList(l68,"l68"),QIList(l67,"l67"),QIList(l66,"l66"),QIList(l65,"l65"),QIList(l64,"l64"),QIList(l63,"l63"),QIList(l62,"l62"),QIList(l61,"l61"),QIList(l60,"l60"),QIList(l59,"l59"),QIList(l58,"l58"),QIList(l57,"l57"),QIList(l56,"l56"),QIList(l55,"l55"),QIList(l54,"l54"),QIList(l53,"l53"),QIList(l52,"l52"),QIList(l51,"l51"),QIList(l50,"l50"),QIList(l49,"l49"),QIList(l48,"l48"),QIList(l47,"l47"),QIList(l46,"l46"),QIList(l45,"l45"),QIList(l44,"l44"),QIList(l43,"l43"),QIList(l42,"l42"),QIList(l41,"l41"),QIList(l40,"l40"),QIList(l39,"l39"),QIList(l38,"l38"),QIList(l37,"l37"),QIList(l36,"l36"),QIList(l35,"l35"),QIList(l34,"l34"),QIList(l33,"l33"),QIList(l32,"l32"),QIList(l31,"l31"),QIList(l30,"l30"),QIList(l29,"l29"),QIList(l28,"l28"),QIList(l27,"l27"),QIList(l26,"l26"),QIList(l25,"l25"),QIList(l24,"l24"),QIList(l23,"l23"),QIList(l22,"l22"),QIList(l21,"l21"),QIList(l20,"l20"),QIList(l19,"l19"),QIList(l18,"l18"),QIList(l17,"l17"),QIList(l16,"l16"),QIList(l15,"l15"),QIList(l14,"l14"),QIList(l13,"l13"),QIList(l12,"l12"),QIList(l11,"l11"),QIList(l10,"l10"),QIList(l9,"l9"),QIList(l8,"l8"),QIList(l7,"l7"),QIList(l6,"l6"),QIList(l5,"l5"),QIList(l4,"l4"),QIList(l3,"l3"),QIList(l2,"l2"),QIList(l1,"l1"),l5);
10223 (function(){
10224     l147.fvalue(pv, l422);
10225     l147.fvalue(pv, l421);
10226     l147.fvalue(pv, l420);
10227     l147.fvalue(pv, l419);
10228     l147.fvalue(pv, l418);
10229     l147.fvalue(pv, l417);
10230     l147.fvalue(pv, l416);
10231     l147.fvalue(pv, l415);
10232     l147.fvalue(pv, l414);
10233     l147.fvalue(pv, l413);
10234     l147.fvalue(pv, l412);
10235     l147.fvalue(pv, l411);
10236     l147.fvalue(pv, l410);
10237     l147.fvalue(pv, l409);
10238     l147.fvalue(pv, l408);
10239     l147.fvalue(pv, l407);
10240     l147.fvalue(pv, l406);
10241     l147.fvalue(pv, l405);
10242     l147.fvalue(pv, l404);
10243     l147.fvalue(pv, l403);
10244     l147.fvalue(pv, l402);
10245     l147.fvalue(pv, l401);
10246     l147.fvalue(pv, l400);
10247     l147.fvalue(pv, l399);
10248     l147.fvalue(pv, l398);
10249     l147.fvalue(pv, l397);
10250     l147.fvalue(pv, l396);
10251     l147.fvalue(pv, l395);
10252     l147.fvalue(pv, l394);
10253     l147.fvalue(pv, l393);
10254     l147.fvalue(pv, l392);
10255     l147.fvalue(pv, l391);
10256     l147.fvalue(pv, l390);
10257     l147.fvalue(pv, l389);
10258     l147.fvalue(pv, l388);
10259     l147.fvalue(pv, l387);
10260     l147.fvalue(pv, l386);
10261     l147.fvalue(pv, l385);
10262     l147.fvalue(pv, l384);
10263     l147.fvalue(pv, l383);
10264     l147.fvalue(pv, l382);
10265     l147.fvalue(pv, l381);
10266     l147.fvalue(pv, l380);
10267     l147.fvalue(pv, l379);
10268     l147.fvalue(pv, l378);
10269     l147.fvalue(pv, l377);
10270     l147.fvalue(pv, l376);
10271     l147.fvalue(pv, l375);
10272     l147.fvalue(pv, l374);
10273     l147.fvalue(pv, l373);
10274     l147.fvalue(pv, l372);
10275     l147.fvalue(pv, l370);
10276     l147.fvalue(pv, l369);
10277     l147.fvalue(pv, l368);
10278     l147.fvalue(pv, l367);
10279     l147.fvalue(pv, l366);
10280     l147.fvalue(pv, l365);
10281     l147.fvalue(pv, l364);
10282     l147.fvalue(pv, l363);
10283     l147.fvalue(pv, l362);
10284     l147.fvalue(pv, l361);
10285     l147.fvalue(pv, l360);
10286     l147.fvalue(pv, l359);
10287     l147.fvalue(pv, l358);
10288     l147.fvalue(pv, l357);
10289     l147.fvalue(pv, l356);
10290     l147.fvalue(pv, l355);
10291     l147.fvalue(pv, l354);
10292     l147.fvalue(pv, l353);
10293     l147.fvalue(pv, l352);
10294     l147.fvalue(pv, l351);
10295     l147.fvalue(pv, l350);
10296     l147.fvalue(pv, l349);
10297     l147.fvalue(pv, l348);
10298     l147.fvalue(pv, l347);
10299     l147.fvalue(pv, l346);
10300     l147.fvalue(pv, l345);
10301     l147.fvalue(pv, l344);
10302     l147.fvalue(pv, l343);
10303     l147.fvalue(pv, l342);
10304     l147.fvalue(pv, l341);
10305     l147.fvalue(pv, l340);
10306     l147.fvalue(pv, l339);
10307     l147.fvalue(pv, l338);
10308     l147.fvalue(pv, l337);
10309     l147.fvalue(pv, l336);
10310     l147.fvalue(pv, l335);
10311     l147.fvalue(pv, l334);
10312     l147.fvalue(pv, l333);
10313     l147.fvalue(pv, l332);
10314     l147.fvalue(pv, l331);
10315     l147.fvalue(pv, l330);
10316     l147.fvalue(pv, l329);
10317     l147.fvalue(pv, l328);
10318     l147.fvalue(pv, l327);
10319     l147.fvalue(pv, l326);
10320     l147.fvalue(pv, l325);
10321     l147.fvalue(pv, l324);
10322     l147.fvalue(pv, l323);
10323     l147.fvalue(pv, l322);
10324     l147.fvalue(pv, l321);
10325     l147.fvalue(pv, l320);
10326     l147.fvalue(pv, l319);
10327     l147.fvalue(pv, l318);
10328     l147.fvalue(pv, l317);
10329     l147.fvalue(pv, l316);
10330     l147.fvalue(pv, l315);
10331     l147.fvalue(pv, l314);
10332     l147.fvalue(pv, l313);
10333     l147.fvalue(pv, l312);
10334     l147.fvalue(pv, l311);
10335     l147.fvalue(pv, l310);
10336     l147.fvalue(pv, l309);
10337     l147.fvalue(pv, l308);
10338     l147.fvalue(pv, l307);
10339     l147.fvalue(pv, l306);
10340     l147.fvalue(pv, l305);
10341     l147.fvalue(pv, l304);
10342     l147.fvalue(pv, l303);
10343     l147.fvalue(pv, l302);
10344     l147.fvalue(pv, l301);
10345     l147.fvalue(pv, l300);
10346     l147.fvalue(pv, l299);
10347     l147.fvalue(pv, l298);
10348     l147.fvalue(pv, l297);
10349     l147.fvalue(pv, l296);
10350     l147.fvalue(pv, l295);
10351     l147.fvalue(pv, l294);
10352     l147.fvalue(pv, l293);
10353     l147.fvalue(pv, l292);
10354     l147.fvalue(pv, l291);
10355     l147.fvalue(pv, l289);
10356     l147.fvalue(pv, l288);
10357     l147.fvalue(pv, l287);
10358     l147.fvalue(pv, l286);
10359     l147.fvalue(pv, l285);
10360     l147.fvalue(pv, l284);
10361     l147.fvalue(pv, l283);
10362     l147.fvalue(pv, l282);
10363     l147.fvalue(pv, l281);
10364     l147.fvalue(pv, l280);
10365     l147.fvalue(pv, l279);
10366     l147.fvalue(pv, l278);
10367     l147.fvalue(pv, l277);
10368     l147.fvalue(pv, l276);
10369     l147.fvalue(pv, l275);
10370     l147.fvalue(pv, l274);
10371     l147.fvalue(pv, l273);
10372     l147.fvalue(pv, l272);
10373     l147.fvalue(pv, l271);
10374     l147.fvalue(pv, l270);
10375     l147.fvalue(pv, l269);
10376     l147.fvalue(pv, l268);
10377     l147.fvalue(pv, l267);
10378     l147.fvalue(pv, l266);
10379     l147.fvalue(pv, l265);
10380     l147.fvalue(pv, l264);
10381     l147.fvalue(pv, l263);
10382     l147.fvalue(pv, l262);
10383     l147.fvalue(pv, l261);
10384     l147.fvalue(pv, l260);
10385     l147.fvalue(pv, l259);
10386     l147.fvalue(pv, l258);
10387     l147.fvalue(pv, l257);
10388     l147.fvalue(pv, l256);
10389     l147.fvalue(pv, l255);
10390     l147.fvalue(pv, l254);
10391     l147.fvalue(pv, l253);
10392     l147.fvalue(pv, l252);
10393     l147.fvalue(pv, l251);
10394     l147.fvalue(pv, l250);
10395     l147.fvalue(pv, l249);
10396     l147.fvalue(pv, l248);
10397     l147.fvalue(pv, l247);
10398     l147.fvalue(pv, l246);
10399     l147.fvalue(pv, l245);
10400     l147.fvalue(pv, l244);
10401     l147.fvalue(pv, l243);
10402     l147.fvalue(pv, l242);
10403     l147.fvalue(pv, l241);
10404     l147.fvalue(pv, l240);
10405     l147.fvalue(pv, l239);
10406     l147.fvalue(pv, l238);
10407     l147.fvalue(pv, l237);
10408     l147.fvalue(pv, l235);
10409     l147.fvalue(pv, l234);
10410     l147.fvalue(pv, l233);
10411     l147.fvalue(pv, l232);
10412     l147.fvalue(pv, l231);
10413     l147.fvalue(pv, l230);
10414     l147.fvalue(pv, l229);
10415     l147.fvalue(pv, l228);
10416     l147.fvalue(pv, l227);
10417     l147.fvalue(pv, l226);
10418     l147.fvalue(pv, l225);
10419     l147.fvalue(pv, l224);
10420     l147.fvalue(pv, l223);
10421     l147.fvalue(pv, l222);
10422     l147.fvalue(pv, l221);
10423     l147.fvalue(pv, l220);
10424     l147.fvalue(pv, l219);
10425     l147.fvalue(pv, l218);
10426     l147.fvalue(pv, l217);
10427     l147.fvalue(pv, l216);
10428     l147.fvalue(pv, l215);
10429     l147.fvalue(pv, l214);
10430     l147.fvalue(pv, l213);
10431     l147.fvalue(pv, l212);
10432     l147.fvalue(pv, l211);
10433     l147.fvalue(pv, l210);
10434     l147.fvalue(pv, l209);
10435     l147.fvalue(pv, l208);
10436     l147.fvalue(pv, l207);
10437     l147.fvalue(pv, l206);
10438     l147.fvalue(pv, l205);
10439     l147.fvalue(pv, l204);
10440     l147.fvalue(pv, l203);
10441     l147.fvalue(pv, l202);
10442     l147.fvalue(pv, l201);
10443     l147.fvalue(pv, l200);
10444     l147.fvalue(pv, l199);
10445     l147.fvalue(pv, l198);
10446     l147.fvalue(pv, l197);
10447     l147.fvalue(pv, l196);
10448     l147.fvalue(pv, l195);
10449     l147.fvalue(pv, l194);
10450     l147.fvalue(pv, l193);
10451     l147.fvalue(pv, l192);
10452     l147.fvalue(pv, l191);
10453     l147.fvalue(pv, l190);
10454     l147.fvalue(pv, l189);
10455     l147.fvalue(pv, l188);
10456     l147.fvalue(pv, l187);
10457     l147.fvalue(pv, l186);
10458     l147.fvalue(pv, l185);
10459     l147.fvalue(pv, l184);
10460     l147.fvalue(pv, l183);
10461     l147.fvalue(pv, l182);
10462     l147.fvalue(pv, l181);
10463     l147.fvalue(pv, l180);
10464     l147.fvalue(pv, l179);
10465     l147.fvalue(pv, l178);
10466     l147.fvalue(pv, l177);
10467     l147.fvalue(pv, l176);
10468     l147.fvalue(pv, l175);
10469     l147.fvalue(pv, l174);
10470     l147.fvalue(pv, l173);
10471     l147.fvalue(pv, l172);
10472     l147.fvalue(pv, l171);
10473     l147.fvalue(pv, l170);
10474     l147.fvalue(pv, l169);
10475     l147.fvalue(pv, l168);
10476     l147.fvalue(pv, l167);
10477     l147.fvalue(pv, l166);
10478     l147.fvalue(pv, l165);
10479     l147.fvalue(pv, l164);
10480     l147.fvalue(pv, l163);
10481     l147.fvalue(pv, l162);
10482     l147.fvalue(pv, l161);
10483     l147.fvalue(pv, l160);
10484     l147.fvalue(pv, l159);
10485     l147.fvalue(pv, l158);
10486     l147.fvalue(pv, l157);
10487     l147.fvalue(pv, l156);
10488     l147.fvalue(pv, l155);
10489     l147.fvalue(pv, l154);
10490     l147.fvalue(pv, l153);
10491     l147.fvalue(pv, l152);
10492     l147.fvalue(pv, l151);
10493     l147.fvalue(pv, l150);
10494     l147.fvalue(pv, l149);
10495     l147.fvalue(pv, l148);
10496     l147.fvalue(pv, l147);
10497     l147.fvalue(pv, l146);
10498     l147.fvalue(pv, l145);
10499     l147.fvalue(pv, l144);
10500     l147.fvalue(pv, l143);
10501     l147.fvalue(pv, l142);
10502     l147.fvalue(pv, l141);
10503     l147.fvalue(pv, l140);
10504     l147.fvalue(pv, l139);
10505     l147.fvalue(pv, l138);
10506     l147.fvalue(pv, l137);
10507     l147.fvalue(pv, l136);
10508     l147.fvalue(pv, l135);
10509     l147.fvalue(pv, l134);
10510     l147.fvalue(pv, l133);
10511     l147.fvalue(pv, l132);
10512     l147.fvalue(pv, l131);
10513     l147.fvalue(pv, l130);
10514     l147.fvalue(pv, l129);
10515     l147.fvalue(pv, l128);
10516     l147.fvalue(pv, l127);
10517     l147.fvalue(pv, l126);
10518     l147.fvalue(pv, l125);
10519     l147.fvalue(pv, l124);
10520     l147.fvalue(pv, l123);
10521     l147.fvalue(pv, l122);
10522     l147.fvalue(pv, l121);
10523     l147.fvalue(pv, l120);
10524     l147.fvalue(pv, l119);
10525     l147.fvalue(pv, l118);
10526     l147.fvalue(pv, l117);
10527     l147.fvalue(pv, l116);
10528     l147.fvalue(pv, l115);
10529     l147.fvalue(pv, l114);
10530     l147.fvalue(pv, l113);
10531     l147.fvalue(pv, l112);
10532     l147.fvalue(pv, l111);
10533     l147.fvalue(pv, l110);
10534     l147.fvalue(pv, l109);
10535     l147.fvalue(pv, l108);
10536     l147.fvalue(pv, l107);
10537     l147.fvalue(pv, l106);
10538     l147.fvalue(pv, l105);
10539     l147.fvalue(pv, l104);
10540     l147.fvalue(pv, l103);
10541     l147.fvalue(pv, l102);
10542     l147.fvalue(pv, l101);
10543     l147.fvalue(pv, l100);
10544     l147.fvalue(pv, l99);
10545     l147.fvalue(pv, l98);
10546     l147.fvalue(pv, l97);
10547     l147.fvalue(pv, l96);
10548     l147.fvalue(pv, l95);
10549     l147.fvalue(pv, l94);
10550     l147.fvalue(pv, l93);
10551     l147.fvalue(pv, l92);
10552     l147.fvalue(pv, l91);
10553     l147.fvalue(pv, l90);
10554     l147.fvalue(pv, l89);
10555     l147.fvalue(pv, l88);
10556     l147.fvalue(pv, l87);
10557     l147.fvalue(pv, l86);
10558     l147.fvalue(pv, l85);
10559     l147.fvalue(pv, l84);
10560     l147.fvalue(pv, l83);
10561     l147.fvalue(pv, l82);
10562     l147.fvalue(pv, l81);
10563     l147.fvalue(pv, l80);
10564     l147.fvalue(pv, l79);
10565     l147.fvalue(pv, l78);
10566     l147.fvalue(pv, l77);
10567     l147.fvalue(pv, l76);
10568     l147.fvalue(pv, l75);
10569     l147.fvalue(pv, l74);
10570     l147.fvalue(pv, l73);
10571     l147.fvalue(pv, l72);
10572     l147.fvalue(pv, l71);
10573     l147.fvalue(pv, l70);
10574     l147.fvalue(pv, l69);
10575     l147.fvalue(pv, l68);
10576     l147.fvalue(pv, l67);
10577     l147.fvalue(pv, l66);
10578     l147.fvalue(pv, l65);
10579     l147.fvalue(pv, l64);
10580     l147.fvalue(pv, l63);
10581     l147.fvalue(pv, l62);
10582     l147.fvalue(pv, l61);
10583     l147.fvalue(pv, l60);
10584     l147.fvalue(pv, l59);
10585     l147.fvalue(pv, l58);
10586     l147.fvalue(pv, l57);
10587     l147.fvalue(pv, l56);
10588     l147.fvalue(pv, l55);
10589     l147.fvalue(pv, l54);
10590     l147.fvalue(pv, l53);
10591     l147.fvalue(pv, l52);
10592     l147.fvalue(pv, l51);
10593     l147.fvalue(pv, l50);
10594     l147.fvalue(pv, l49);
10595     l147.fvalue(pv, l48);
10596     l147.fvalue(pv, l47);
10597     l147.fvalue(pv, l46);
10598     l147.fvalue(pv, l45);
10599     l147.fvalue(pv, l44);
10600     l147.fvalue(pv, l43);
10601     l147.fvalue(pv, l42);
10602     l147.fvalue(pv, l41);
10603     l147.fvalue(pv, l40);
10604     l147.fvalue(pv, l39);
10605     l147.fvalue(pv, l38);
10606     l147.fvalue(pv, l37);
10607     l147.fvalue(pv, l36);
10608     l147.fvalue(pv, l35);
10609     l147.fvalue(pv, l34);
10610     l147.fvalue(pv, l33);
10611     l147.fvalue(pv, l32);
10612     l147.fvalue(pv, l31);
10613     l147.fvalue(pv, l30);
10614     l147.fvalue(pv, l29);
10615     l147.fvalue(pv, l28);
10616     l147.fvalue(pv, l27);
10617     l147.fvalue(pv, l26);
10618     l147.fvalue(pv, l25);
10619     l147.fvalue(pv, l24);
10620     l147.fvalue(pv, l23);
10621     l147.fvalue(pv, l22);
10622     l147.fvalue(pv, l21);
10623     l147.fvalue(pv, l20);
10624     l147.fvalue(pv, l19);
10625     l147.fvalue(pv, l18);
10626     l147.fvalue(pv, l17);
10627     l147.fvalue(pv, l16);
10628     l147.fvalue(pv, l15);
10629     l147.fvalue(pv, l14);
10630     l147.fvalue(pv, l13);
10631     l147.fvalue(pv, l12);
10632     l147.fvalue(pv, l11);
10633     l147.fvalue(pv, l10);
10634     l147.fvalue(pv, l9);
10635     l147.fvalue(pv, l8);
10636     l147.fvalue(pv, l7);
10637     l147.fvalue(pv, l6);
10638     l147.fvalue(pv, l5);
10639     l147.fvalue(pv, l4);
10640     l147.fvalue(pv, l3);
10641     l147.fvalue(pv, l2);
10642     l147.fvalue(pv, l1);
10643     ((l258).value = l424);
10644     ((l212).value = 1177);
10645     ((l17).value = 448);
10646     return ((l279).value = 332);
10647 })();
10648 ((l259).value = 424);