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(v97){
 886         ((v97)["fname"] = "REVAPPEND");
 887         return v97;
 888     })((function (values,v93,v94){
 889         checkArgs(arguments, 3);
 890         return (function(){
 891             (function(){
 892                 return (function(){
 893                     while(v93 !== l5.value){
 894                         (function(){
 895                             var v95 = (function(){
 896                                 var tmp = v93;
 897                                 return tmp === l5.value? l5.value: tmp.car;
 898                             })();
 899                             var v96 = ({car: v95, cdr: v94});
 900                             return (v94 = v96);
 901                         })();
 902                         (v93 = (function(){
 903                             var tmp = v93;
 904                             return tmp === l5.value? l5.value: tmp.cdr;
 905                         })());
 906                     }return l5.value;
 907                 })();
 908             })();
 909             return v94;
 910         })();
 911     }));
 912     return l69;
 913 })();
 914 var l70 = {name: "REVERSE"};
 915 (function(){
 916     (l70).fvalue = (function(v99){
 917         ((v99)["fname"] = "REVERSE");
 918         return v99;
 919     })((function (values,v98){
 920         checkArgs(arguments, 2);
 921         return (function(){
 922             return l69.fvalue(values, v98, l5);
 923         })();
 924     }));
 925     return l70;
 926 })();
 927 var l71 = {name: "PSETQ"};
 928 l71;
 929 var l72 = {name: "DO"};
 930 l72;
 931 var l73 = {name: "DO*"};
 932 l73;
 933 var l74 = {name: "LIST-LENGTH"};
 934 (function(){
 935     (l74).fvalue = (function(v102){
 936         ((v102)["fname"] = "LIST-LENGTH");
 937         return v102;
 938     })((function (values,v100){
 939         checkArgs(arguments, 2);
 940         return (function(){
 941             return (function(v101){
 942                 (function(){
 943                     return (function(){
 944                         while(l29.fvalue(pv, l13.fvalue(pv, v100)) !== l5.value){
 945                             (v101 = (function(){
 946                                 var x1 = v101;
 947                                 if (typeof x1 !== 'number') throw 'Not a number!';
 948                                 return x1+1;
 949                             })());
 950                             (v100 = (function(){
 951                                 var tmp = v100;
 952                                 return tmp === l5.value? l5.value: tmp.cdr;
 953                             })());
 954                         }return l5.value;
 955                     })();
 956                 })();
 957                 return v101;
 958             })(0);
 959         })();
 960     }));
 961     return l74;
 962 })();
 963 var l75 = {name: "LENGTH"};
 964 (function(){
 965     (l75).fvalue = (function(v104){
 966         ((v104)["fname"] = "LENGTH");
 967         return v104;
 968     })((function (values,v103){
 969         checkArgs(arguments, 2);
 970         return (function(){
 971             return (((typeof(v103) == "string")?l4.value: l5.value) !== l5.value ? (function(){
 972                 var x = v103;
 973                 if (typeof x != 'string')
 974                     throw 'The value ' + x + ' is not a type string.';
 975                 return x.length;
 976             })() : (((function(){
 977                 var x = v103;
 978                 return typeof x === 'object' && 'length' in x;
 979             })()?l4.value: l5.value) !== l5.value ? (function(){
 980                 var tmp = (v103)["length"];
 981                 return tmp == undefined? l5.value: tmp ;
 982             })() : (l62.fvalue(pv, v103) !== l5.value ? l74.fvalue(values, v103) : l5.value)));
 983         })();
 984     }));
 985     return l75;
 986 })();
 987 var l76 = {name: "CONCAT-TWO"};
 988 (function(){
 989     (l76).fvalue = (function(v107){
 990         ((v107)["fname"] = "CONCAT-TWO");
 991         return v107;
 992     })((function (values,v105,v106){
 993         checkArgs(arguments, 3);
 994         return (function(){
 995             return (function(){
 996                 var string1 = v105;
 997                 var string2 = v106;
 998                 if (typeof string1 != 'string')
 999                     throw 'The value ' + string1 + ' is not a type string.';
1000                 if (typeof string2 != 'string')
1001                     throw 'The value ' + string2 + ' is not a type string.';
1002                 return string1.concat(string2);
1003             })();
1004         })();
1005     }));
1006     return l76;
1007 })();
1008 var l77 = {name: "WITH-COLLECT"};
1009 l77;
1010 var l78 = {name: "MAP1"};
1011 var l79 = {name: "SENTINEL"};
1012 (function(){
1013     (l78).fvalue = (function(v114){
1014         ((v114)["fname"] = "MAP1");
1015         return v114;
1016     })((function (values,v108,v109){
1017         checkArgs(arguments, 3);
1018         return (function(){
1019             return (function(){
1020                 var v110 = ({car: l79, cdr: l5.value});
1021                 var v111 = v110;
1022                 (function(v113){
1023                     return (function(){
1024                         return (function(){
1025                             while(v109 !== l5.value){
1026                                 v113(pv, (function(){
1027                                     var f = v108;
1028                                     return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
1029                                         var tmp = v109;
1030                                         return tmp === l5.value? l5.value: tmp.car;
1031                                     })())
1032                                 })());
1033                                 (v109 = (function(){
1034                                     var tmp = v109;
1035                                     return tmp === l5.value? l5.value: tmp.cdr;
1036                                 })());
1037                             }return l5.value;
1038                         })();
1039                     })();
1040                 })((function (values,v112){
1041                     checkArgs(arguments, 2);
1042                     (function(){
1043                         var x = v111;
1044                         if (typeof x != 'object')
1045                             throw 'The value ' + x + ' is not a type object.';
1046                         return (x.cdr = ({car: v112, cdr: l5.value}), x);
1047                     })();
1048                     (v111 = (function(){
1049                         var tmp = v111;
1050                         return tmp === l5.value? l5.value: tmp.cdr;
1051                     })());
1052                     return v112;
1053                 }));
1054                 return (function(){
1055                     var tmp = v110;
1056                     return tmp === l5.value? l5.value: tmp.cdr;
1057                 })();
1058             })();
1059         })();
1060     }));
1061     return l78;
1062 })();
1063 var l80 = {name: "LOOP"};
1064 l80;
1065 var l81 = {name: "MAPCAR"};
1066 (function(){
1067     (l81).fvalue = (function(v126){
1068         ((v126)["fname"] = "MAPCAR");
1069         return v126;
1070     })((function (values,v116,v117){
1071         checkArgsAtLeast(arguments, 3);
1072         var v115= l5.value;
1073         for (var i = arguments.length-1; i>=3; i--)
1074             v115 = {car: arguments[i], cdr:
1075         v115};
1076         return (function(){
1077             return (function(v118){
1078                 return (function(){
1079                     var v119 = ({car: l79, cdr: l5.value});
1080                     var v120 = v119;
1081                     (function(v122){
1082                         return (function(){
1083                             try {
1084                                 return (function(){
1085                                     return (function(){
1086                                         while(l4.value !== l5.value){
1087                                             (function(v123){
1088                                                 (function(){
1089                                                     return (function(v124){
1090                                                         return (function(){
1091                                                             try {
1092                                                                 return (function(){
1093                                                                     while(l4.value !== l5.value){
1094                                                                         (l13.fvalue(pv, v124) !== l5.value ? (function(){
1095                                                                             throw ({type: 'block', id: 54, values: l5.value, message: 'Return from unknown block NIL.'})
1096                                                                         })() : l5.value);
1097                                                                         (function(){
1098                                                                             (l13.fvalue(pv, (function(){
1099                                                                                 var tmp = v124;
1100                                                                                 return tmp === l5.value? l5.value: tmp.car;
1101                                                                             })()) !== l5.value ? (function(){
1102                                                                                 throw ({type: 'block', id: 51, values: l5.value, message: 'Return from unknown block LOOP.'})
1103                                                                             })() : l5.value);
1104                                                                             (function(){
1105                                                                                 var x = v124;
1106                                                                                 if (typeof x != 'object')
1107                                                                                     throw 'The value ' + x + ' is not a type object.';
1108                                                                                 return (x.car = l36.fvalue(pv, v124), x);
1109                                                                             })();
1110                                                                             return l5.value;
1111                                                                         })();
1112                                                                         (function(v125){
1113                                                                             return (v124 = v125);
1114                                                                         })((function(){
1115                                                                             var tmp = v124;
1116                                                                             return tmp === l5.value? l5.value: tmp.cdr;
1117                                                                         })());
1118                                                                     }return l5.value;
1119                                                                 })();
1120                                                             }
1121                                                             catch (cf){
1122                                                                 if (cf.type == 'block' && cf.id == 54)
1123                                                                     return cf.values;
1124                                                                 else
1125                                                                     throw cf;
1126                                                             }
1127                                                         })();
1128                                                     })(v118);
1129                                                 })();
1130                                                 return v122(pv, (function(){
1131                                                     var f = v116;
1132                                                     var args = [pv];
1133                                                     var tail = (v123);
1134                                                     while (tail != l5.value){
1135                                                         args.push(tail.car);
1136                                                         tail = tail.cdr;
1137                                                     }
1138                                                     return (typeof f === 'function'? f : f.fvalue).apply(this, args);
1139                                                 })());
1140                                             })(l78.fvalue(pv, (function(){
1141                                                 var symbol = l32;
1142                                                 var func = symbol.fvalue;
1143                                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1144                                                 return func;
1145                                             })(), v118));
1146                                         }return l5.value;
1147                                     })();
1148                                 })();
1149                             }
1150                             catch (cf){
1151                                 if (cf.type == 'block' && cf.id == 51)
1152                                     return cf.values;
1153                                 else
1154                                     throw cf;
1155                             }
1156                         })();
1157                     })((function (values,v121){
1158                         checkArgs(arguments, 2);
1159                         (function(){
1160                             var x = v120;
1161                             if (typeof x != 'object')
1162                                 throw 'The value ' + x + ' is not a type object.';
1163                             return (x.cdr = ({car: v121, cdr: l5.value}), x);
1164                         })();
1165                         (v120 = (function(){
1166                             var tmp = v120;
1167                             return tmp === l5.value? l5.value: tmp.cdr;
1168                         })());
1169                         return v121;
1170                     }));
1171                     return (function(){
1172                         var tmp = v119;
1173                         return tmp === l5.value? l5.value: tmp.cdr;
1174                     })();
1175                 })();
1176             })(({car: v117, cdr: v115}));
1177         })();
1178     }));
1179     return l81;
1180 })();
1181 var l82 = {name: "IDENTITY"};
1182 (function(){
1183     (l82).fvalue = (function(v128){
1184         ((v128)["fname"] = "IDENTITY");
1185         return v128;
1186     })((function (values,v127){
1187         checkArgs(arguments, 2);
1188         return (function(){
1189             return v127;
1190         })();
1191     }));
1192     return l82;
1193 })();
1194 var l83 = {name: "CONSTANTLY"};
1195 (function(){
1196     (l83).fvalue = (function(v131){
1197         ((v131)["fname"] = "CONSTANTLY");
1198         return v131;
1199     })((function (values,v129){
1200         checkArgs(arguments, 2);
1201         return (function(){
1202             return (function (values){
1203                 var v130= l5.value;
1204                 for (var i = arguments.length-1; i>=1; i--)
1205                     v130 = {car: arguments[i], cdr:
1206                 v130};
1207                 return v129;
1208             });
1209         })();
1210     }));
1211     return l83;
1212 })();
1213 var l84 = {name: "COPY-LIST"};
1214 (function(){
1215     (l84).fvalue = (function(v133){
1216         ((v133)["fname"] = "COPY-LIST");
1217         return v133;
1218     })((function (values,v132){
1219         checkArgs(arguments, 2);
1220         return (function(){
1221             return l81.fvalue(values, (function(){
1222                 var symbol = l82;
1223                 var func = symbol.fvalue;
1224                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1225                 return func;
1226             })(), v132);
1227         })();
1228     }));
1229     return l84;
1230 })();
1231 var l85 = {name: "LIST*"};
1232 (function(){
1233     (l85).fvalue = (function(v138){
1234         ((v138)["fname"] = "LIST*");
1235         return v138;
1236     })((function (values,v135){
1237         checkArgsAtLeast(arguments, 2);
1238         var v134= l5.value;
1239         for (var i = arguments.length-1; i>=2; i--)
1240             v134 = {car: arguments[i], cdr:
1241         v134};
1242         return (function(){
1243             return (l13.fvalue(pv, v134) !== l5.value ? v135 : (l13.fvalue(pv, (function(){
1244                 var tmp = v134;
1245                 return tmp === l5.value? l5.value: tmp.cdr;
1246             })()) !== l5.value ? ({car: v135, cdr: (function(){
1247                 var tmp = v134;
1248                 return tmp === l5.value? l5.value: tmp.car;
1249             })()}) : (function(){
1250                 (function(){
1251                     return (function(v136){
1252                         return (function(){
1253                             try {
1254                                 return (function(){
1255                                     while(l4.value !== l5.value){
1256                                         (l13.fvalue(pv, l37.fvalue(pv, v136)) !== l5.value ? (function(){
1257                                             throw ({type: 'block', id: 60, values: (function(){
1258                                                 var x = v136;
1259                                                 if (typeof x != 'object')
1260                                                     throw 'The value ' + x + ' is not a type object.';
1261                                                 return (x.cdr = l35.fvalue(pv, v136), x);
1262                                             })(), message: 'Return from unknown block NIL.'})
1263                                         })() : l5.value);
1264                                         l5.value;
1265                                         (function(v137){
1266                                             return (v136 = v137);
1267                                         })((function(){
1268                                             var tmp = v136;
1269                                             return tmp === l5.value? l5.value: tmp.cdr;
1270                                         })());
1271                                     }return l5.value;
1272                                 })();
1273                             }
1274                             catch (cf){
1275                                 if (cf.type == 'block' && cf.id == 60)
1276                                     return cf.values;
1277                                 else
1278                                     throw cf;
1279                             }
1280                         })();
1281                     })(v134);
1282                 })();
1283                 return ({car: v135, cdr: v134});
1284             })()));
1285         })();
1286     }));
1287     return l85;
1288 })();
1289 var l86 = {name: "CODE-CHAR"};
1290 (function(){
1291     (l86).fvalue = (function(v140){
1292         ((v140)["fname"] = "CODE-CHAR");
1293         return v140;
1294     })((function (values,v139){
1295         checkArgs(arguments, 2);
1296         return (function(){
1297             return v139;
1298         })();
1299     }));
1300     return l86;
1301 })();
1302 var l87 = {name: "CHAR-CODE"};
1303 (function(){
1304     (l87).fvalue = (function(v142){
1305         ((v142)["fname"] = "CHAR-CODE");
1306         return v142;
1307     })((function (values,v141){
1308         checkArgs(arguments, 2);
1309         return (function(){
1310             return v141;
1311         })();
1312     }));
1313     return l87;
1314 })();
1315 var l88 = {name: "CHAR="};
1316 (function(){
1317     (l88).fvalue = (function(v145){
1318         ((v145)["fname"] = "CHAR=");
1319         return v145;
1320     })((function (values,v143,v144){
1321         checkArgs(arguments, 3);
1322         return (function(){
1323             return (function(){
1324                 var x1 = v143;
1325                 if (typeof x1 !== 'number') throw 'Not a number!';
1326                 var x2 = v144;
1327                 if (typeof x2 !== 'number') throw 'Not a number!';
1328                 return (x1==x2?l4.value: l5.value);
1329             })();
1330         })();
1331     }));
1332     return l88;
1333 })();
1334 var l89 = {name: "INTEGERP"};
1335 (function(){
1336     (l89).fvalue = (function(v147){
1337         ((v147)["fname"] = "INTEGERP");
1338         return v147;
1339     })((function (values,v146){
1340         checkArgs(arguments, 2);
1341         return (function(){
1342             return (((typeof (v146) == "number")?l4.value: l5.value) !== l5.value ? (function(){
1343                 var x1 = (function(){
1344                     var x = v146;
1345                     if (typeof x != 'number')
1346                         throw 'The value ' + x + ' is not a type number.';
1347                     return Math.floor(x);
1348                 })();
1349                 if (typeof x1 !== 'number') throw 'Not a number!';
1350                 var x2 = v146;
1351                 if (typeof x2 !== 'number') throw 'Not a number!';
1352                 return (x1==x2?l4.value: l5.value);
1353             })() : l5.value);
1354         })();
1355     }));
1356     return l89;
1357 })();
1358 var l90 = {name: "PLUSP"};
1359 (function(){
1360     (l90).fvalue = (function(v149){
1361         ((v149)["fname"] = "PLUSP");
1362         return v149;
1363     })((function (values,v148){
1364         checkArgs(arguments, 2);
1365         return (function(){
1366             return (function(){
1367                 var x1 = v148;
1368                 if (typeof x1 !== 'number') throw 'Not a number!';
1369                 return (0<x1?l4.value: l5.value);
1370             })();
1371         })();
1372     }));
1373     return l90;
1374 })();
1375 var l91 = {name: "MINUSP"};
1376 (function(){
1377     (l91).fvalue = (function(v151){
1378         ((v151)["fname"] = "MINUSP");
1379         return v151;
1380     })((function (values,v150){
1381         checkArgs(arguments, 2);
1382         return (function(){
1383             return (function(){
1384                 var x1 = v150;
1385                 if (typeof x1 !== 'number') throw 'Not a number!';
1386                 return (x1<0?l4.value: l5.value);
1387             })();
1388         })();
1389     }));
1390     return l91;
1391 })();
1392 (function(){
1393     (l62).fvalue = (function(v154){
1394         ((v154)["fname"] = "LISTP");
1395         return v154;
1396     })((function (values,v152){
1397         checkArgs(arguments, 2);
1398         return (function(){
1399             return (function(v153){
1400                 return (v153 !== l5.value ? v153 : l13.fvalue(values, v152));
1401             })(((function(){
1402                 var tmp = v152;
1403                 return (typeof tmp == 'object' && 'car' in tmp);
1404             })()?l4.value: l5.value));
1405         })();
1406     }));
1407     return l62;
1408 })();
1409 var l92 = {name: "NTHCDR"};
1410 (function(){
1411     (l92).fvalue = (function(v157){
1412         ((v157)["fname"] = "NTHCDR");
1413         return v157;
1414     })((function (values,v155,v156){
1415         checkArgs(arguments, 3);
1416         return (function(){
1417             (function(){
1418                 return (function(){
1419                     while((l90.fvalue(pv, v155) !== l5.value ? v156 : l5.value) !== l5.value){
1420                         (v155 = l25.fvalue(pv, v155));
1421                         (v156 = (function(){
1422                             var tmp = v156;
1423                             return tmp === l5.value? l5.value: tmp.cdr;
1424                         })());
1425                     }return l5.value;
1426                 })();
1427             })();
1428             return v156;
1429         })();
1430     }));
1431     return l92;
1432 })();
1433 var l93 = {name: "NTH"};
1434 (function(){
1435     (l93).fvalue = (function(v160){
1436         ((v160)["fname"] = "NTH");
1437         return v160;
1438     })((function (values,v158,v159){
1439         checkArgs(arguments, 3);
1440         return (function(){
1441             return (function(){
1442                 var tmp = l92.fvalue(pv, v158, v159);
1443                 return tmp === l5.value? l5.value: tmp.car;
1444             })();
1445         })();
1446     }));
1447     return l93;
1448 })();
1449 var l94 = {name: "LAST"};
1450 (function(){
1451     (l94).fvalue = (function(v162){
1452         ((v162)["fname"] = "LAST");
1453         return v162;
1454     })((function (values,v161){
1455         checkArgs(arguments, 2);
1456         return (function(){
1457             (function(){
1458                 return (function(){
1459                     while(((function(){
1460                         var tmp = (function(){
1461                             var tmp = v161;
1462                             return tmp === l5.value? l5.value: tmp.cdr;
1463                         })();
1464                         return (typeof tmp == 'object' && 'car' in tmp);
1465                     })()?l4.value: l5.value) !== l5.value){
1466                         (v161 = (function(){
1467                             var tmp = v161;
1468                             return tmp === l5.value? l5.value: tmp.cdr;
1469                         })());
1470                     }return l5.value;
1471                 })();
1472             })();
1473             return v161;
1474         })();
1475     }));
1476     return l94;
1477 })();
1478 var l95 = {name: "BUTLAST"};
1479 (function(){
1480     (l95).fvalue = (function(v164){
1481         ((v164)["fname"] = "BUTLAST");
1482         return v164;
1483     })((function (values,v163){
1484         checkArgs(arguments, 2);
1485         return (function(){
1486             return (((function(){
1487                 var tmp = (function(){
1488                     var tmp = v163;
1489                     return tmp === l5.value? l5.value: tmp.cdr;
1490                 })();
1491                 return (typeof tmp == 'object' && 'car' in tmp);
1492             })()?l4.value: l5.value) !== l5.value ? ({car: (function(){
1493                 var tmp = v163;
1494                 return tmp === l5.value? l5.value: tmp.car;
1495             })(), cdr: l95.fvalue(pv, (function(){
1496                 var tmp = v163;
1497                 return tmp === l5.value? l5.value: tmp.cdr;
1498             })())}) : l5.value);
1499         })();
1500     }));
1501     return l95;
1502 })();
1503 var l96 = {name: "MEMBER"};
1504 (function(){
1505     (l96).fvalue = (function(v167){
1506         ((v167)["fname"] = "MEMBER");
1507         return v167;
1508     })((function (values,v165,v166){
1509         checkArgs(arguments, 3);
1510         return (function(){
1511             return (function(){
1512                 try {
1513                     return (function(){
1514                         while(v166 !== l5.value){
1515                             (l28.fvalue(pv, v165, (function(){
1516                                 var tmp = v166;
1517                                 return tmp === l5.value? l5.value: tmp.car;
1518                             })()) !== l5.value ? (function(){
1519                                 var values = mv;
1520                                 throw ({type: 'block', id: 75, values: v166, message: 'Return from unknown block NIL.'})
1521                             })() : l5.value);
1522                             (v166 = (function(){
1523                                 var tmp = v166;
1524                                 return tmp === l5.value? l5.value: tmp.cdr;
1525                             })());
1526                         }return l5.value;
1527                     })();
1528                 }
1529                 catch (cf){
1530                     if (cf.type == 'block' && cf.id == 75)
1531                         return values.apply(this, forcemv(cf.values));
1532                     else
1533                         throw cf;
1534                 }
1535             })();
1536         })();
1537     }));
1538     return l96;
1539 })();
1540 var l97 = {name: "REMOVE"};
1541 (function(){
1542     (l97).fvalue = (function(v170){
1543         ((v170)["fname"] = "REMOVE");
1544         return v170;
1545     })((function (values,v168,v169){
1546         checkArgs(arguments, 3);
1547         return (function(){
1548             return (l13.fvalue(pv, v169) !== l5.value ? l5.value : (l28.fvalue(pv, v168, (function(){
1549                 var tmp = v169;
1550                 return tmp === l5.value? l5.value: tmp.car;
1551             })()) !== l5.value ? l97.fvalue(values, v168, (function(){
1552                 var tmp = v169;
1553                 return tmp === l5.value? l5.value: tmp.cdr;
1554             })()) : ({car: (function(){
1555                 var tmp = v169;
1556                 return tmp === l5.value? l5.value: tmp.car;
1557             })(), cdr: l97.fvalue(pv, v168, (function(){
1558                 var tmp = v169;
1559                 return tmp === l5.value? l5.value: tmp.cdr;
1560             })())})));
1561         })();
1562     }));
1563     return l97;
1564 })();
1565 var l98 = {name: "REMOVE-IF"};
1566 (function(){
1567     (l98).fvalue = (function(v173){
1568         ((v173)["fname"] = "REMOVE-IF");
1569         return v173;
1570     })((function (values,v171,v172){
1571         checkArgs(arguments, 3);
1572         return (function(){
1573             return (l13.fvalue(pv, v172) !== l5.value ? l5.value : ((function(){
1574                 var f = v171;
1575                 return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
1576                     var tmp = v172;
1577                     return tmp === l5.value? l5.value: tmp.car;
1578                 })())
1579             })() !== l5.value ? l98.fvalue(values, v171, (function(){
1580                 var tmp = v172;
1581                 return tmp === l5.value? l5.value: tmp.cdr;
1582             })()) : ({car: (function(){
1583                 var tmp = v172;
1584                 return tmp === l5.value? l5.value: tmp.car;
1585             })(), cdr: l98.fvalue(pv, v171, (function(){
1586                 var tmp = v172;
1587                 return tmp === l5.value? l5.value: tmp.cdr;
1588             })())})));
1589         })();
1590     }));
1591     return l98;
1592 })();
1593 var l99 = {name: "REMOVE-IF-NOT"};
1594 (function(){
1595     (l99).fvalue = (function(v176){
1596         ((v176)["fname"] = "REMOVE-IF-NOT");
1597         return v176;
1598     })((function (values,v174,v175){
1599         checkArgs(arguments, 3);
1600         return (function(){
1601             return (l13.fvalue(pv, v175) !== l5.value ? l5.value : ((function(){
1602                 var f = v174;
1603                 return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
1604                     var tmp = v175;
1605                     return tmp === l5.value? l5.value: tmp.car;
1606                 })())
1607             })() !== l5.value ? ({car: (function(){
1608                 var tmp = v175;
1609                 return tmp === l5.value? l5.value: tmp.car;
1610             })(), cdr: l99.fvalue(pv, v174, (function(){
1611                 var tmp = v175;
1612                 return tmp === l5.value? l5.value: tmp.cdr;
1613             })())}) : l99.fvalue(values, v174, (function(){
1614                 var tmp = v175;
1615                 return tmp === l5.value? l5.value: tmp.cdr;
1616             })())));
1617         })();
1618     }));
1619     return l99;
1620 })();
1621 var l100 = {name: "DIGIT-CHAR-P"};
1622 (function(){
1623     (l100).fvalue = (function(v178){
1624         ((v178)["fname"] = "DIGIT-CHAR-P");
1625         return v178;
1626     })((function (values,v177){
1627         checkArgs(arguments, 2);
1628         return (function(){
1629             return (((function(){
1630                 var x1 = v177;
1631                 if (typeof x1 !== 'number') throw 'Not a number!';
1632                 return (48<=x1?l4.value: l5.value);
1633             })() !== l5.value ? (function(){
1634                 var x1 = v177;
1635                 if (typeof x1 !== 'number') throw 'Not a number!';
1636                 return (x1<=57?l4.value: l5.value);
1637             })() : l5.value) !== l5.value ? (function(){
1638                 var x1 = v177;
1639                 if (typeof x1 !== 'number') throw 'Not a number!';
1640                 return x1-48;
1641             })() : l5.value);
1642         })();
1643     }));
1644     return l100;
1645 })();
1646 var l101 = {name: "DIGIT-CHAR"};
1647 (function(){
1648     (l101).fvalue = (function(v180){
1649         ((v180)["fname"] = "DIGIT-CHAR");
1650         return v180;
1651     })((function (values,v179){
1652         checkArgs(arguments, 2);
1653         return (function(){
1654             return ((function(){
1655                 var x1 = v179;
1656                 if (typeof x1 !== 'number') throw 'Not a number!';
1657                 return (0<=x1 && x1<=9?l4.value: l5.value);
1658             })() !== l5.value ? (function(){
1659                 var string = "0123456789";
1660                 var index = v179;
1661                 if (typeof string != 'string')
1662                     throw 'The value ' + string + ' is not a type string.';
1663                 if (typeof index != 'number')
1664                     throw 'The value ' + index + ' is not a type number.';
1665                 return string.charCodeAt(index);
1666             })() : l5.value);
1667         })();
1668     }));
1669     return l101;
1670 })();
1671 var l102 = {name: "SUBSEQ"};
1672 (function(){
1673     (l102).fvalue = (function(v184){
1674         ((v184)["fname"] = "SUBSEQ");
1675         return v184;
1676     })((function (values,v181,v182,v183){
1677         checkArgsAtLeast(arguments, 3);
1678         checkArgsAtMost(arguments, 4);
1679         var v183;
1680         switch(arguments.length-1){
1681         case 2:
1682             v183=l5.value;
1683         default: break;
1684         }
1685         return (function(){
1686             return (((typeof(v181) == "string")?l4.value: l5.value) !== l5.value ? (v183 !== l5.value ? (function(){
1687                 var str = v181;
1688                 var a = v182;
1689                 var b;
1690                 b = v183;
1691                 return str.slice(a,b);
1692             })() : (function(){
1693                 var str = v181;
1694                 var a = v182;
1695                 var b;
1696                 return str.slice(a,b);
1697             })()) : (function(){
1698                 throw "Unsupported argument.";
1699             })());
1700         })();
1701     }));
1702     return l102;
1703 })();
1704 var l103 = {name: "DO-SEQUENCE"};
1705 l103;
1706 var l104 = {name: "SOME"};
1707 (function(){
1708     (l104).fvalue = (function(v194){
1709         ((v194)["fname"] = "SOME");
1710         return v194;
1711     })((function (values,v185,v186){
1712         checkArgs(arguments, 3);
1713         return (function(){
1714             try {
1715                 return (function(v187){
1716                     return (((typeof(v187) == "string")?l4.value: l5.value) !== l5.value ? (function(v188){
1717                         return (function(){
1718                             return (function(v189,v190){
1719                                 (function(){
1720                                     while((function(){
1721                                         var x1 = v189;
1722                                         if (typeof x1 !== 'number') throw 'Not a number!';
1723                                         var x2 = v190;
1724                                         if (typeof x2 !== 'number') throw 'Not a number!';
1725                                         return (x1<x2?l4.value: l5.value);
1726                                     })() !== l5.value){
1727                                         (function(){
1728                                             (function(v191){
1729                                                 return ((function(){
1730                                                     var f = v185;
1731                                                     return (typeof f === 'function'? f: f.fvalue)(pv, v191)
1732                                                 })() !== l5.value ? (function(){
1733                                                     var values = mv;
1734                                                     throw ({type: 'block', id: 82, values: l4.value, message: 'Return from unknown block SOME.'})
1735                                                 })() : l5.value);
1736                                             })((function(){
1737                                                 var string = v187;
1738                                                 var index = v189;
1739                                                 if (typeof string != 'string')
1740                                                     throw 'The value ' + string + ' is not a type string.';
1741                                                 if (typeof index != 'number')
1742                                                     throw 'The value ' + index + ' is not a type number.';
1743                                                 return string.charCodeAt(index);
1744                                             })());
1745                                             return l5.value;
1746                                         })();
1747                                         (v189 = (function(){
1748                                             var x1 = v189;
1749                                             if (typeof x1 !== 'number') throw 'Not a number!';
1750                                             return x1+1;
1751                                         })());
1752                                     }return l5.value;
1753                                 })();
1754                                 return l5.value;
1755                             })(0,l75.fvalue(pv, v187));
1756                         })();
1757                     })(0) : (l62.fvalue(pv, v187) !== l5.value ? (function(){
1758                         return (function(v192,v193){
1759                             (function(){
1760                                 while(v192 !== l5.value){
1761                                     (v193 = (function(){
1762                                         var tmp = v192;
1763                                         return tmp === l5.value? l5.value: tmp.car;
1764                                     })());
1765                                     (function(){
1766                                         ((function(){
1767                                             var f = v185;
1768                                             return (typeof f === 'function'? f: f.fvalue)(pv, v193)
1769                                         })() !== l5.value ? (function(){
1770                                             var values = mv;
1771                                             throw ({type: 'block', id: 82, values: l4.value, message: 'Return from unknown block SOME.'})
1772                                         })() : l5.value);
1773                                         return l5.value;
1774                                     })();
1775                                     (v192 = (function(){
1776                                         var tmp = v192;
1777                                         return tmp === l5.value? l5.value: tmp.cdr;
1778                                     })());
1779                                 }return l5.value;
1780                             })();
1781                             return l5.value;
1782                         })(v187,l5.value);
1783                     })() : (function(){
1784                         throw "type-error!";
1785                     })()));
1786                 })(v186);
1787             }
1788             catch (cf){
1789                 if (cf.type == 'block' && cf.id == 82)
1790                     return values.apply(this, forcemv(cf.values));
1791                 else
1792                     throw cf;
1793             }
1794         })();
1795     }));
1796     return l104;
1797 })();
1798 var l105 = {name: "EVERY"};
1799 (function(){
1800     (l105).fvalue = (function(v204){
1801         ((v204)["fname"] = "EVERY");
1802         return v204;
1803     })((function (values,v195,v196){
1804         checkArgs(arguments, 3);
1805         return (function(){
1806             try {
1807                 (function(v197){
1808                     return (((typeof(v197) == "string")?l4.value: l5.value) !== l5.value ? (function(v198){
1809                         return (function(){
1810                             return (function(v199,v200){
1811                                 (function(){
1812                                     while((function(){
1813                                         var x1 = v199;
1814                                         if (typeof x1 !== 'number') throw 'Not a number!';
1815                                         var x2 = v200;
1816                                         if (typeof x2 !== 'number') throw 'Not a number!';
1817                                         return (x1<x2?l4.value: l5.value);
1818                                     })() !== l5.value){
1819                                         (function(){
1820                                             (function(v201){
1821                                                 return ((function(){
1822                                                     var f = v195;
1823                                                     return (typeof f === 'function'? f: f.fvalue)(pv, v201)
1824                                                 })() !== l5.value ? l5.value : (function(){
1825                                                     var values = mv;
1826                                                     throw ({type: 'block', id: 85, values: l5.value, message: 'Return from unknown block EVERY.'})
1827                                                 })());
1828                                             })((function(){
1829                                                 var string = v197;
1830                                                 var index = v199;
1831                                                 if (typeof string != 'string')
1832                                                     throw 'The value ' + string + ' is not a type string.';
1833                                                 if (typeof index != 'number')
1834                                                     throw 'The value ' + index + ' is not a type number.';
1835                                                 return string.charCodeAt(index);
1836                                             })());
1837                                             return l5.value;
1838                                         })();
1839                                         (v199 = (function(){
1840                                             var x1 = v199;
1841                                             if (typeof x1 !== 'number') throw 'Not a number!';
1842                                             return x1+1;
1843                                         })());
1844                                     }return l5.value;
1845                                 })();
1846                                 return l5.value;
1847                             })(0,l75.fvalue(pv, v197));
1848                         })();
1849                     })(0) : (l62.fvalue(pv, v197) !== l5.value ? (function(){
1850                         return (function(v202,v203){
1851                             (function(){
1852                                 while(v202 !== l5.value){
1853                                     (v203 = (function(){
1854                                         var tmp = v202;
1855                                         return tmp === l5.value? l5.value: tmp.car;
1856                                     })());
1857                                     (function(){
1858                                         ((function(){
1859                                             var f = v195;
1860                                             return (typeof f === 'function'? f: f.fvalue)(pv, v203)
1861                                         })() !== l5.value ? l5.value : (function(){
1862                                             var values = mv;
1863                                             throw ({type: 'block', id: 85, values: l5.value, message: 'Return from unknown block EVERY.'})
1864                                         })());
1865                                         return l5.value;
1866                                     })();
1867                                     (v202 = (function(){
1868                                         var tmp = v202;
1869                                         return tmp === l5.value? l5.value: tmp.cdr;
1870                                     })());
1871                                 }return l5.value;
1872                             })();
1873                             return l5.value;
1874                         })(v197,l5.value);
1875                     })() : (function(){
1876                         throw "type-error!";
1877                     })()));
1878                 })(v196);
1879                 return l4.value;
1880             }
1881             catch (cf){
1882                 if (cf.type == 'block' && cf.id == 85)
1883                     return values.apply(this, forcemv(cf.values));
1884                 else
1885                     throw cf;
1886             }
1887         })();
1888     }));
1889     return l105;
1890 })();
1891 var l106 = {name: "ASSOC"};
1892 (function(){
1893     (l106).fvalue = (function(v207){
1894         ((v207)["fname"] = "ASSOC");
1895         return v207;
1896     })((function (values,v205,v206){
1897         checkArgs(arguments, 3);
1898         return (function(){
1899             (function(){
1900                 try {
1901                     return (function(){
1902                         while(v206 !== l5.value){
1903                             (l28.fvalue(pv, v205, l34.fvalue(pv, v206)) !== l5.value ? (function(){
1904                                 throw ({type: 'block', id: 89, values: l5.value, message: 'Return from unknown block NIL.'})
1905                             })() : (v206 = (function(){
1906                                 var tmp = v206;
1907                                 return tmp === l5.value? l5.value: tmp.cdr;
1908                             })()));
1909                         }return l5.value;
1910                     })();
1911                 }
1912                 catch (cf){
1913                     if (cf.type == 'block' && cf.id == 89)
1914                         return cf.values;
1915                     else
1916                         throw cf;
1917                 }
1918             })();
1919             return (function(){
1920                 var tmp = v206;
1921                 return tmp === l5.value? l5.value: tmp.car;
1922             })();
1923         })();
1924     }));
1925     return l106;
1926 })();
1927 var l107 = {name: "STRING"};
1928 (function(){
1929     (l107).fvalue = (function(v209){
1930         ((v209)["fname"] = "STRING");
1931         return v209;
1932     })((function (values,v208){
1933         checkArgs(arguments, 2);
1934         return (function(){
1935             return (((typeof(v208) == "string")?l4.value: l5.value) !== l5.value ? v208 : (((function(){
1936                 var tmp = v208;
1937                 return (typeof tmp == 'object' && 'name' in tmp);
1938             })()?l4.value: l5.value) !== l5.value ? (v208).name : (function(){
1939                 var x = v208;
1940                 if (typeof x != 'number')
1941                     throw 'The value ' + x + ' is not a type number.';
1942                 return String.fromCharCode(x);
1943             })()));
1944         })();
1945     }));
1946     return l107;
1947 })();
1948 var l108 = {name: "STRING="};
1949 (function(){
1950     (l108).fvalue = (function(v212){
1951         ((v212)["fname"] = "STRING=");
1952         return v212;
1953     })((function (values,v210,v211){
1954         checkArgs(arguments, 3);
1955         return (function(){
1956             return ((v210 == v211)?l4.value: l5.value);
1957         })();
1958     }));
1959     return l108;
1960 })();
1961 var l109 = {name: "FDEFINITION"};
1962 (function(){
1963     (l109).fvalue = (function(v214){
1964         ((v214)["fname"] = "FDEFINITION");
1965         return v214;
1966     })((function (values,v213){
1967         checkArgs(arguments, 2);
1968         return (function(){
1969             return (((typeof v213 == 'function')?l4.value: l5.value) !== l5.value ? v213 : (((function(){
1970                 var tmp = v213;
1971                 return (typeof tmp == 'object' && 'name' in tmp);
1972             })()?l4.value: l5.value) !== l5.value ? (function(){
1973                 var symbol = v213;
1974                 var func = symbol.fvalue;
1975                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1976                 return func;
1977             })() : (function(){
1978                 throw "Invalid function";
1979             })()));
1980         })();
1981     }));
1982     return l109;
1983 })();
1984 var l110 = {name: "DISASSEMBLE"};
1985 var l111 = {name: "WRITE-LINE"};
1986 (function(){
1987     (l110).fvalue = (function(v216){
1988         ((v216)["fname"] = "DISASSEMBLE");
1989         return v216;
1990     })((function (values,v215){
1991         checkArgs(arguments, 2);
1992         return (function(){
1993             l111.fvalue(pv, (l109.fvalue(pv, v215)).toString());
1994             return l5.value;
1995         })();
1996     }));
1997     return l110;
1998 })();
1999 var l112 = {name: "DOCUMENTATION"};
2000 var l113 = {name: "FUNCTION"};
2001 var l114 = {name: "VARIABLE"};
2002 (function(){
2003     (l112).fvalue = (function(v221){
2004         ((v221)["fname"] = "DOCUMENTATION");
2005         return v221;
2006     })((function(){
2007         var func = (function (values,v217,v218){
2008             checkArgs(arguments, 3);
2009             return (function(){
2010                 return (function(v219){
2011                     return (l28.fvalue(pv, v219, l113) !== l5.value ? (function(v220){
2012                         return (function(){
2013                             var tmp = (v220)["docstring"];
2014                             return tmp == undefined? l5.value: tmp ;
2015                         })();
2016                     })(l109.fvalue(pv, v217)) : (l28.fvalue(pv, v219, l114) !== l5.value ? (function(){
2017                         (((function(){
2018                             var tmp = v217;
2019                             return (typeof tmp == 'object' && 'name' in tmp);
2020                         })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
2021                             throw "Wrong argument type! it should be a symbol";
2022                         })());
2023                         return (function(){
2024                             var tmp = (v217)["vardoc"];
2025                             return tmp == undefined? l5.value: tmp ;
2026                         })();
2027                     })() : (function(){
2028                         throw "ECASE expression failed.";
2029                     })()));
2030                 })(v218);
2031             })();
2032         });
2033         func.docstring = 'Return the documentation of X. TYPE must be the symbol VARIABLE or FUNCTION.';
2034         return func;
2035     })());
2036     return l112;
2037 })();
2038 var l115 = {name: "MULTIPLE-VALUE-BIND"};
2039 l115;
2040 var l116 = {name: "MULTIPLE-VALUE-LIST"};
2041 l116;
2042 var l117 = {name: "*SETF-EXPANDERS*"};
2043 (function(){
2044     (((l117.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l117).value = l5.value));
2045     return l117;
2046 })();
2047 var l118 = {name: "GET-SETF-EXPANSION"};
2048 var l119 = {name: "SETQ"};
2049 var l120 = {name: "LS-MACROEXPAND-1"};
2050 (function(){
2051     (l118).fvalue = (function(v227){
2052         ((v227)["fname"] = "GET-SETF-EXPANSION");
2053         return v227;
2054     })((function (values,v222){
2055         checkArgs(arguments, 2);
2056         return (function(){
2057             return (((function(){
2058                 var tmp = v222;
2059                 return (typeof tmp == 'object' && 'name' in tmp);
2060             })()?l4.value: l5.value) !== l5.value ? (function(v223){
2061                 return values(l5.value, l5.value, l47.fvalue(pv, v223), l47.fvalue(pv, l119, v222, v223), v222);
2062             })(l18.fvalue(pv)) : (function(v224){
2063                 return (function(){
2064                     var v225 = (function(){
2065                         var tmp = v224;
2066                         return tmp === l5.value? l5.value: tmp.car;
2067                     })();
2068                     var v226 = (function(){
2069                         var tmp = l106.fvalue(pv, v225, (function(){
2070                             var symbol = l117;
2071                             var value = symbol.value;
2072                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2073                             return value;
2074                         })());
2075                         return tmp === l5.value? l5.value: tmp.cdr;
2076                     })();
2077                     (l13.fvalue(pv, v226) !== l5.value ? (function(){
2078                         throw "Unknown generalized reference.";
2079                     })() : l5.value);
2080                     return (function(){
2081                         var f = v226;
2082                         var args = [values];
2083                         var tail = ((function(){
2084                             var tmp = v224;
2085                             return tmp === l5.value? l5.value: tmp.cdr;
2086                         })());
2087                         while (tail != l5.value){
2088                             args.push(tail.car);
2089                             tail = tail.cdr;
2090                         }
2091                         return (typeof f === 'function'? f : f.fvalue).apply(this, args);
2092                     })();
2093                 })();
2094             })(l120.fvalue(pv, v222)));
2095         })();
2096     }));
2097     return l118;
2098 })();
2099 var l121 = {name: "DEFINE-SETF-EXPANDER"};
2100 l121;
2101 var l122 = {name: "SETF"};
2102 l122;
2103 var l123 = {name: "PROGN"};
2104 var l124 = {name: "RPLACA"};
2105 (function(){
2106     (function(){
2107         var v228 = ({car: l32, cdr: (function (values,v229){
2108             checkArgs(arguments, 2);
2109             return (function(v230,v231){
2110                 return values(l47.fvalue(pv, v230), l47.fvalue(pv, v229), l47.fvalue(pv, v231), l47.fvalue(pv, l123, l47.fvalue(pv, l124, v230, v231), v231), l47.fvalue(pv, l32, v230));
2111             })(l18.fvalue(pv),l18.fvalue(pv));
2112         })});
2113         var v232 = ({car: v228, cdr: (function(){
2114             var symbol = l117;
2115             var value = symbol.value;
2116             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2117             return value;
2118         })()});
2119         return ((l117).value = v232);
2120     })();
2121     return l32;
2122 })();
2123 var l125 = {name: "RPLACD"};
2124 (function(){
2125     (function(){
2126         var v233 = ({car: l33, cdr: (function (values,v234){
2127             checkArgs(arguments, 2);
2128             return (function(v235,v236){
2129                 return values(l47.fvalue(pv, v235), l47.fvalue(pv, v234), l47.fvalue(pv, v236), l47.fvalue(pv, l123, l47.fvalue(pv, l125, v235, v236), v236), l47.fvalue(pv, l32, v235));
2130             })(l18.fvalue(pv),l18.fvalue(pv));
2131         })});
2132         var v237 = ({car: v233, cdr: (function(){
2133             var symbol = l117;
2134             var value = symbol.value;
2135             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2136             return value;
2137         })()});
2138         return ((l117).value = v237);
2139     })();
2140     return l33;
2141 })();
2142 var l126 = {name: "TYPECASE"};
2143 l126;
2144 var l127 = {name: "NCONC"};
2145 (function(){
2146     (l127).fvalue = (function(v253){
2147         ((v253)["fname"] = "NCONC");
2148         return v253;
2149     })((function (values){
2150         var v238= l5.value;
2151         for (var i = arguments.length-1; i>=1; i--)
2152             v238 = {car: arguments[i], cdr:
2153         v238};
2154         return (function(){
2155             return (function(v240){
2156                 return (function(){
2157                     return (function(v241){
2158                         return (function(){
2159                             try {
2160                                 return (function(){
2161                                     while(l4.value !== l5.value){
2162                                         (l13.fvalue(pv, v241) !== l5.value ? (function(){
2163                                             var values = mv;
2164                                             throw ({type: 'block', id: 98, values: l5.value, message: 'Return from unknown block NIL.'})
2165                                         })() : l5.value);
2166                                         (function(){
2167                                             (function(v242){
2168                                                 return (function(v243){
2169                                                     return (((function(){
2170                                                         var tmp = v243;
2171                                                         return (typeof tmp == 'object' && 'car' in tmp);
2172                                                     })()?l4.value: l5.value) !== l5.value ? (function(){
2173                                                         var v244 = v242;
2174                                                         var v245 = v244;
2175                                                         (function(){
2176                                                             return (function(v246){
2177                                                                 return (function(){
2178                                                                     try {
2179                                                                         return (function(){
2180                                                                             while(l4.value !== l5.value){
2181                                                                                 (l14.fvalue(pv, v246) !== l5.value ? (function(){
2182                                                                                     throw ({type: 'block', id: 100, values: l5.value, message: 'Return from unknown block NIL.'})
2183                                                                                 })() : l5.value);
2184                                                                                 (function(){
2185                                                                                     (function(v247){
2186                                                                                         return (function(v248){
2187                                                                                             return (((function(){
2188                                                                                                 var tmp = v248;
2189                                                                                                 return (typeof tmp == 'object' && 'car' in tmp);
2190                                                                                             })()?l4.value: l5.value) !== l5.value ? (function(){
2191                                                                                                 (function(){
2192                                                                                                     var x = l94.fvalue(pv, v245);
2193                                                                                                     if (typeof x != 'object')
2194                                                                                                         throw 'The value ' + x + ' is not a type object.';
2195                                                                                                     return (x.cdr = v247, x);
2196                                                                                                 })();
2197                                                                                                 return (function(){
2198                                                                                                     return (function(){
2199                                                                                                         var func = (function (values,v250){
2200                                                                                                             var v250;
2201                                                                                                             switch(arguments.length-1){
2202                                                                                                             case 0:
2203                                                                                                                 v250=l5.value;
2204                                                                                                             default: break;
2205                                                                                                             }
2206                                                                                                             var v249= l5.value;
2207                                                                                                             for (var i = arguments.length-1; i>=2; i--)
2208                                                                                                                 v249 = {car: arguments[i], cdr:
2209                                                                                                             v249};
2210                                                                                                             return (v245 = v250);
2211                                                                                                         });
2212                                                                                                         var args = [pv];
2213                                                                                                         return (function(){
2214                                                                                                             var values = mv;
2215                                                                                                             var vs;
2216                                                                                                             vs = v247;
2217                                                                                                             if (typeof vs === 'object' && 'multiple-value' in vs)
2218                                                                                                                 args = args.concat(vs);
2219                                                                                                             else
2220                                                                                                                 args.push(vs);
2221                                                                                                             return func.apply(window, args);
2222                                                                                                         })();
2223                                                                                                     })();
2224                                                                                                 })();
2225                                                                                             })() : (l13.fvalue(pv, v248) !== l5.value ? (function(){
2226                                                                                                 var x = l94.fvalue(pv, v245);
2227                                                                                                 if (typeof x != 'object')
2228                                                                                                     throw 'The value ' + x + ' is not a type object.';
2229                                                                                                 return (x.cdr = l5.value, x);
2230                                                                                             })() : (l48.fvalue(pv, v248) !== l5.value ? ((function(){
2231                                                                                                 var tmp = v246;
2232                                                                                                 return tmp === l5.value? l5.value: tmp.cdr;
2233                                                                                             })() !== l5.value ? v240(pv, v247) : (function(){
2234                                                                                                 var x = l94.fvalue(pv, v245);
2235                                                                                                 if (typeof x != 'object')
2236                                                                                                     throw 'The value ' + x + ' is not a type object.';
2237                                                                                                 return (x.cdr = v247, x);
2238                                                                                             })()) : l5.value)));
2239                                                                                         })(v247);
2240                                                                                     })((function(){
2241                                                                                         var tmp = v246;
2242                                                                                         return tmp === l5.value? l5.value: tmp.car;
2243                                                                                     })());
2244                                                                                     return l5.value;
2245                                                                                 })();
2246                                                                                 (function(v251){
2247                                                                                     return (v246 = v251);
2248                                                                                 })((function(){
2249                                                                                     var tmp = v246;
2250                                                                                     return tmp === l5.value? l5.value: tmp.cdr;
2251                                                                                 })());
2252                                                                             }return l5.value;
2253                                                                         })();
2254                                                                     }
2255                                                                     catch (cf){
2256                                                                         if (cf.type == 'block' && cf.id == 100)
2257                                                                             return cf.values;
2258                                                                         else
2259                                                                             throw cf;
2260                                                                     }
2261                                                                 })();
2262                                                             })((function(){
2263                                                                 var tmp = v241;
2264                                                                 return tmp === l5.value? l5.value: tmp.cdr;
2265                                                             })());
2266                                                         })();
2267                                                         return (function(){
2268                                                             var values = mv;
2269                                                             throw ({type: 'block', id: 98, values: v244, message: 'Return from unknown block NIL.'})
2270                                                         })();
2271                                                     })() : (l13.fvalue(pv, v243) !== l5.value ? l5.value : (l48.fvalue(pv, v243) !== l5.value ? ((function(){
2272                                                         var tmp = v241;
2273                                                         return tmp === l5.value? l5.value: tmp.cdr;
2274                                                     })() !== l5.value ? v240(pv, v242) : (function(){
2275                                                         var values = mv;
2276                                                         throw ({type: 'block', id: 98, values: v242, message: 'Return from unknown block NIL.'})
2277                                                     })()) : l5.value)));
2278                                                 })(v242);
2279                                             })((function(){
2280                                                 var tmp = v241;
2281                                                 return tmp === l5.value? l5.value: tmp.car;
2282                                             })());
2283                                             return l5.value;
2284                                         })();
2285                                         (function(v252){
2286                                             return (v241 = v252);
2287                                         })((function(){
2288                                             var tmp = v241;
2289                                             return tmp === l5.value? l5.value: tmp.cdr;
2290                                         })());
2291                                     }return l5.value;
2292                                 })();
2293                             }
2294                             catch (cf){
2295                                 if (cf.type == 'block' && cf.id == 98)
2296                                     return values.apply(this, forcemv(cf.values));
2297                                 else
2298                                     throw cf;
2299                             }
2300                         })();
2301                     })(v238);
2302                 })();
2303             })((function (values,v239){
2304                 checkArgs(arguments, 2);
2305                 return (function(){
2306                     throw "type-error in nconc";
2307                 })();
2308             }));
2309         })();
2310     }));
2311     return l127;
2312 })();
2313 var l128 = {name: "NRECONC"};
2314 (function(){
2315     (l128).fvalue = (function(v262){
2316         ((v262)["fname"] = "NRECONC");
2317         return v262;
2318     })((function (values,v254,v255){
2319         checkArgs(arguments, 3);
2320         return (function(){
2321             return (function(){
2322                 return (function(v256,v257,v258){
2323                     return (function(){
2324                         try {
2325                             return (function(){
2326                                 while(l4.value !== l5.value){
2327                                     (l48.fvalue(pv, v257) !== l5.value ? (function(){
2328                                         var values = mv;
2329                                         throw ({type: 'block', id: 103, values: v258, message: 'Return from unknown block NIL.'})
2330                                     })() : l5.value);
2331                                     (function(){
2332                                         (function(){
2333                                             var x = v257;
2334                                             if (typeof x != 'object')
2335                                                 throw 'The value ' + x + ' is not a type object.';
2336                                             return (x.cdr = v258, x);
2337                                         })();
2338                                         return l5.value;
2339                                     })();
2340                                     (function(v259,v260,v261){
2341                                         return (v256 = v259, v257 = v260, v258 = v261);
2342                                     })((l14.fvalue(pv, v256) !== l5.value ? v256 : (function(){
2343                                         var tmp = v256;
2344                                         return tmp === l5.value? l5.value: tmp.cdr;
2345                                     })()),v256,v257);
2346                                 }return l5.value;
2347                             })();
2348                         }
2349                         catch (cf){
2350                             if (cf.type == 'block' && cf.id == 103)
2351                                 return values.apply(this, forcemv(cf.values));
2352                             else
2353                                 throw cf;
2354                         }
2355                     })();
2356                 })((function(){
2357                     var tmp = v254;
2358                     return tmp === l5.value? l5.value: tmp.cdr;
2359                 })(),v254,v255);
2360             })();
2361         })();
2362     }));
2363     return l128;
2364 })();
2365 var l129 = {name: "NOTANY"};
2366 (function(){
2367     (l129).fvalue = (function(v265){
2368         ((v265)["fname"] = "NOTANY");
2369         return v265;
2370     })((function (values,v263,v264){
2371         checkArgs(arguments, 3);
2372         return (function(){
2373             return l29.fvalue(values, l104.fvalue(pv, v263, v264));
2374         })();
2375     }));
2376     return l129;
2377 })();
2378 var l130 = {name: "*PACKAGE-LIST*"};
2379 (function(){
2380     (((l130.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l130).value = l5.value));
2381     return l130;
2382 })();
2383 var l131 = {name: "LIST-ALL-PACKAGES"};
2384 (function(){
2385     (l131).fvalue = (function(v266){
2386         ((v266)["fname"] = "LIST-ALL-PACKAGES");
2387         return v266;
2388     })((function (values){
2389         checkArgsAtMost(arguments, 1);
2390         return (function(){
2391             return (function(){
2392                 var symbol = l130;
2393                 var value = symbol.value;
2394                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2395                 return value;
2396             })();
2397         })();
2398     }));
2399     return l131;
2400 })();
2401 var l132 = {name: "MAKE-PACKAGE"};
2402 var l133 = {name: "USE", 'package': 'KEYWORD'};
2403 var l134 = {name: "FIND-PACKAGE-OR-FAIL"};
2404 (function(){
2405     (l132).fvalue = (function(v273){
2406         ((v273)["fname"] = "MAKE-PACKAGE");
2407         return v273;
2408     })((function (values,v267){
2409         checkArgsAtLeast(arguments, 2);
2410         var v268;
2411         var i;
2412         for (i=2; i<arguments.length; i+=2){
2413             if (arguments[i] === l133.value){
2414                 v268 = arguments[i+1];
2415                 break;
2416             }
2417         }
2418         if (i == arguments.length){
2419             v268 = l5.value;
2420         }
2421         for (i=2; i<arguments.length; i+=2){
2422             if (arguments[i] !== l133.value)
2423                 throw 'Unknown keyword argument ' + arguments[i].name;
2424         }
2425         return (function(){
2426             return (function(v269,v270){
2427                 ((v269)["packageName"] = v267);
2428                 ((v269)["symbols"] = {});
2429                 ((v269)["exports"] = {});
2430                 ((v269)["use"] = v270);
2431                 (function(){
2432                     var v271 = v269;
2433                     var v272 = ({car: v271, cdr: (function(){
2434                         var symbol = l130;
2435                         var value = symbol.value;
2436                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2437                         return value;
2438                     })()});
2439                     return ((l130).value = v272);
2440                 })();
2441                 return v269;
2442             })({},l81.fvalue(pv, (function(){
2443                 var symbol = l134;
2444                 var func = symbol.fvalue;
2445                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2446                 return func;
2447             })(), v268));
2448         })();
2449     }));
2450     return l132;
2451 })();
2452 var l135 = {name: "PACKAGEP"};
2453 (function(){
2454     (l135).fvalue = (function(v275){
2455         ((v275)["fname"] = "PACKAGEP");
2456         return v275;
2457     })((function (values,v274){
2458         checkArgs(arguments, 2);
2459         return (function(){
2460             return (((typeof (v274) === 'object')?l4.value: l5.value) !== l5.value ? ((("symbols") in (v274))?l4.value: l5.value) : l5.value);
2461         })();
2462     }));
2463     return l135;
2464 })();
2465 var l136 = {name: "FIND-PACKAGE"};
2466 var l137 = {name: "PACKAGE-NAME"};
2467 (function(){
2468     (l136).fvalue = (function(v280){
2469         ((v280)["fname"] = "FIND-PACKAGE");
2470         return v280;
2471     })((function (values,v276){
2472         checkArgs(arguments, 2);
2473         return (function(){
2474             try {
2475                 (l135.fvalue(pv, v276) !== l5.value ? (function(){
2476                     var values = mv;
2477                     throw ({type: 'block', id: 108, values: v276, message: 'Return from unknown block FIND-PACKAGE.'})
2478                 })() : l5.value);
2479                 return (function(v277){
2480                     return (function(){
2481                         try {
2482                             return (function(v278,v279){
2483                                 (function(){
2484                                     while(v278 !== l5.value){
2485                                         (v279 = (function(){
2486                                             var tmp = v278;
2487                                             return tmp === l5.value? l5.value: tmp.car;
2488                                         })());
2489                                         (function(){
2490                                             (l108.fvalue(pv, l137.fvalue(pv, v279), v277) !== l5.value ? (function(){
2491                                                 var values = mv;
2492                                                 throw ({type: 'block', id: 109, values: v279, message: 'Return from unknown block NIL.'})
2493                                             })() : l5.value);
2494                                             return l5.value;
2495                                         })();
2496                                         (v278 = (function(){
2497                                             var tmp = v278;
2498                                             return tmp === l5.value? l5.value: tmp.cdr;
2499                                         })());
2500                                     }return l5.value;
2501                                 })();
2502                                 return l5.value;
2503                             })((function(){
2504                                 var symbol = l130;
2505                                 var value = symbol.value;
2506                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2507                                 return value;
2508                             })(),l5.value);
2509                         }
2510                         catch (cf){
2511                             if (cf.type == 'block' && cf.id == 109)
2512                                 return values.apply(this, forcemv(cf.values));
2513                             else
2514                                 throw cf;
2515                         }
2516                     })();
2517                 })(l107.fvalue(pv, v276));
2518             }
2519             catch (cf){
2520                 if (cf.type == 'block' && cf.id == 108)
2521                     return values.apply(this, forcemv(cf.values));
2522                 else
2523                     throw cf;
2524             }
2525         })();
2526     }));
2527     return l136;
2528 })();
2529 (function(){
2530     (l134).fvalue = (function(v283){
2531         ((v283)["fname"] = "FIND-PACKAGE-OR-FAIL");
2532         return v283;
2533     })((function (values,v281){
2534         checkArgs(arguments, 2);
2535         return (function(){
2536             return (function(v282){
2537                 return (v282 !== l5.value ? v282 : (function(){
2538                     throw "Package unknown.";
2539                 })());
2540             })(l136.fvalue(pv, v281));
2541         })();
2542     }));
2543     return l134;
2544 })();
2545 (function(){
2546     (l137).fvalue = (function(v286){
2547         ((v286)["fname"] = "PACKAGE-NAME");
2548         return v286;
2549     })((function (values,v284){
2550         checkArgs(arguments, 2);
2551         return (function(){
2552             return (function(v285){
2553                 return (function(){
2554                     var tmp = (v285)["packageName"];
2555                     return tmp == undefined? l5.value: tmp ;
2556                 })();
2557             })(l134.fvalue(pv, v284));
2558         })();
2559     }));
2560     return l137;
2561 })();
2562 var l138 = {name: "%PACKAGE-SYMBOLS"};
2563 (function(){
2564     (l138).fvalue = (function(v289){
2565         ((v289)["fname"] = "%PACKAGE-SYMBOLS");
2566         return v289;
2567     })((function (values,v287){
2568         checkArgs(arguments, 2);
2569         return (function(){
2570             return (function(v288){
2571                 return (function(){
2572                     var tmp = (v288)["symbols"];
2573                     return tmp == undefined? l5.value: tmp ;
2574                 })();
2575             })(l134.fvalue(pv, v287));
2576         })();
2577     }));
2578     return l138;
2579 })();
2580 var l139 = {name: "PACKAGE-USE-LIST"};
2581 (function(){
2582     (l139).fvalue = (function(v292){
2583         ((v292)["fname"] = "PACKAGE-USE-LIST");
2584         return v292;
2585     })((function (values,v290){
2586         checkArgs(arguments, 2);
2587         return (function(){
2588             return (function(v291){
2589                 return (function(){
2590                     var tmp = (v291)["use"];
2591                     return tmp == undefined? l5.value: tmp ;
2592                 })();
2593             })(l134.fvalue(pv, v290));
2594         })();
2595     }));
2596     return l139;
2597 })();
2598 var l140 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
2599 (function(){
2600     (l140).fvalue = (function(v295){
2601         ((v295)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
2602         return v295;
2603     })((function (values,v293){
2604         checkArgs(arguments, 2);
2605         return (function(){
2606             return (function(v294){
2607                 return (function(){
2608                     var tmp = (v294)["exports"];
2609                     return tmp == undefined? l5.value: tmp ;
2610                 })();
2611             })(l134.fvalue(pv, v293));
2612         })();
2613     }));
2614     return l140;
2615 })();
2616 var l141 = {name: "*COMMON-LISP-PACKAGE*"};
2617 (function(){
2618     (((l141.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l141).value = l132.fvalue(pv, "CL")));
2619     return l141;
2620 })();
2621 var l142 = {name: "*USER-PACKAGE*"};
2622 (function(){
2623     (((l142.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l142).value = l132.fvalue(pv, "CL-USER", l133.value, l47.fvalue(pv, (function(){
2624         var symbol = l141;
2625         var value = symbol.value;
2626         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2627         return value;
2628     })()))));
2629     return l142;
2630 })();
2631 var l143 = {name: "*KEYWORD-PACKAGE*"};
2632 (function(){
2633     (((l143.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l143).value = l132.fvalue(pv, "KEYWORD")));
2634     return l143;
2635 })();
2636 var l144 = {name: "KEYWORDP"};
2637 var l145 = {name: "SYMBOL-PACKAGE"};
2638 (function(){
2639     (l144).fvalue = (function(v297){
2640         ((v297)["fname"] = "KEYWORDP");
2641         return v297;
2642     })((function (values,v296){
2643         checkArgs(arguments, 2);
2644         return (function(){
2645             return (((function(){
2646                 var tmp = v296;
2647                 return (typeof tmp == 'object' && 'name' in tmp);
2648             })()?l4.value: l5.value) !== l5.value ? ((l145.fvalue(pv, v296) === (function(){
2649                 var symbol = l143;
2650                 var value = symbol.value;
2651                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2652                 return value;
2653             })())?l4.value: l5.value) : l5.value);
2654         })();
2655     }));
2656     return l144;
2657 })();
2658 var l146 = {name: "*PACKAGE*"};
2659 (function(){
2660     (((l146.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l146).value = (function(){
2661         var symbol = l141;
2662         var value = symbol.value;
2663         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2664         return value;
2665     })()));
2666     return l146;
2667 })();
2668 var l147 = {name: "IN-PACKAGE"};
2669 l147;
2670 var l148 = {name: "%INTERN-SYMBOL"};
2671 (function(){
2672     (l148).fvalue = (function(v301){
2673         ((v301)["fname"] = "%INTERN-SYMBOL");
2674         return v301;
2675     })((function (values,v298){
2676         checkArgs(arguments, 2);
2677         return (function(){
2678             return (function(){
2679                 var v299 = (((("package") in (v298))?l4.value: l5.value) !== l5.value ? l134.fvalue(pv, (function(){
2680                     var tmp = (v298)["package"];
2681                     return tmp == undefined? l5.value: tmp ;
2682                 })()) : (function(){
2683                     var symbol = l141;
2684                     var value = symbol.value;
2685                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2686                     return value;
2687                 })());
2688                 var v300 = l138.fvalue(pv, v299);
2689                 ((v298)["package"] = v299);
2690                 (((v299 === (function(){
2691                     var symbol = l143;
2692                     var value = symbol.value;
2693                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2694                     return value;
2695                 })())?l4.value: l5.value) !== l5.value ? ((v298)["value"] = v298) : l5.value);
2696                 return ((v300)[(v298).name] = v298);
2697             })();
2698         })();
2699     }));
2700     return l148;
2701 })();
2702 var l149 = {name: "FIND-SYMBOL"};
2703 var l150 = {name: "EXTERNAL", 'package': 'KEYWORD'};
2704 var l151 = {name: "INTERNAL", 'package': 'KEYWORD'};
2705 var l152 = {name: "INHERIT", 'package': 'KEYWORD'};
2706 (function(){
2707     (l149).fvalue = (function(v310){
2708         ((v310)["fname"] = "FIND-SYMBOL");
2709         return v310;
2710     })((function (values,v302,v303){
2711         checkArgsAtLeast(arguments, 2);
2712         checkArgsAtMost(arguments, 3);
2713         var v303;
2714         switch(arguments.length-1){
2715         case 1:
2716             v303=(function(){
2717                 var symbol = l146;
2718                 var value = symbol.value;
2719                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2720                 return value;
2721             })();
2722         default: break;
2723         }
2724         return (function(){
2725             return (function(){
2726                 var v304 = l134.fvalue(pv, v303);
2727                 var v305 = l140.fvalue(pv, v304);
2728                 var v306 = l138.fvalue(pv, v304);
2729                 return ((((v302) in (v305))?l4.value: l5.value) !== l5.value ? values((function(){
2730                     var tmp = (v305)[v302];
2731                     return tmp == undefined? l5.value: tmp ;
2732                 })(), l150.value) : ((((v302) in (v306))?l4.value: l5.value) !== l5.value ? values((function(){
2733                     var tmp = (v306)[v302];
2734                     return tmp == undefined? l5.value: tmp ;
2735                 })(), l151.value) : (function(){
2736                     try {
2737                         return (function(v307,v308){
2738                             (function(){
2739                                 while(v307 !== l5.value){
2740                                     (v308 = (function(){
2741                                         var tmp = v307;
2742                                         return tmp === l5.value? l5.value: tmp.car;
2743                                     })());
2744                                     (function(){
2745                                         (function(v309){
2746                                             return ((((v302) in (v309))?l4.value: l5.value) !== l5.value ? (function(){
2747                                                 var values = mv;
2748                                                 throw ({type: 'block', id: 118, values: values((function(){
2749                                                     var tmp = (v309)[v302];
2750                                                     return tmp == undefined? l5.value: tmp ;
2751                                                 })(), l152.value), message: 'Return from unknown block NIL.'})
2752                                             })() : l5.value);
2753                                         })(l140.fvalue(pv, v308));
2754                                         return l5.value;
2755                                     })();
2756                                     (v307 = (function(){
2757                                         var tmp = v307;
2758                                         return tmp === l5.value? l5.value: tmp.cdr;
2759                                     })());
2760                                 }return l5.value;
2761                             })();
2762                             return values(l5.value, l5.value);
2763                         })(l139.fvalue(pv, v304),l5.value);
2764                     }
2765                     catch (cf){
2766                         if (cf.type == 'block' && cf.id == 118)
2767                             return values.apply(this, forcemv(cf.values));
2768                         else
2769                             throw cf;
2770                     }
2771                 })()));
2772             })();
2773         })();
2774     }));
2775     return l149;
2776 })();
2777 var l153 = {name: "INTERN"};
2778 var l154 = {name: "EXPORT"};
2779 (function(){
2780     (l153).fvalue = (function(v319){
2781         ((v319)["fname"] = "INTERN");
2782         return v319;
2783     })((function (values,v311,v312){
2784         checkArgsAtLeast(arguments, 2);
2785         checkArgsAtMost(arguments, 3);
2786         var v312;
2787         switch(arguments.length-1){
2788         case 1:
2789             v312=(function(){
2790                 var symbol = l146;
2791                 var value = symbol.value;
2792                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2793                 return value;
2794             })();
2795         default: break;
2796         }
2797         return (function(){
2798             return (function(v313){
2799                 return (function(){
2800                     var func = (function (values,v315,v316){
2801                         var v315;
2802                         var v316;
2803                         switch(arguments.length-1){
2804                         case 0:
2805                             v315=l5.value;
2806                         case 1:
2807                             v316=l5.value;
2808                         default: break;
2809                         }
2810                         var v314= l5.value;
2811                         for (var i = arguments.length-1; i>=3; i--)
2812                             v314 = {car: arguments[i], cdr:
2813                         v314};
2814                         return (v316 !== l5.value ? values(v315, v316) : (function(v317){
2815                             (function(){
2816                                 var tmp = (v317)[v311];
2817                                 return tmp == undefined? l5.value: tmp ;
2818                             })();
2819                             return (function(v318){
2820                                 ((v318)["package"] = v313);
2821                                 (((v313 === (function(){
2822                                     var symbol = l143;
2823                                     var value = symbol.value;
2824                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2825                                     return value;
2826                                 })())?l4.value: l5.value) !== l5.value ? (function(){
2827                                     ((v318)["value"] = v318);
2828                                     return l154.fvalue(pv, l47.fvalue(pv, v318), v313);
2829                                 })() : l5.value);
2830                                 ((v317)[v311] = v318);
2831                                 return values(v318, l5.value);
2832                             })((function(){
2833                                 var name = v311;
2834                                 if (typeof name != 'string')
2835                                     throw 'The value ' + name + ' is not a type string.';
2836                                 return ({name: name});
2837                             })());
2838                         })(l138.fvalue(pv, v313)));
2839                     });
2840                     var args = [values];
2841                     return (function(){
2842                         var values = mv;
2843                         var vs;
2844                         vs = l149.fvalue(values, v311, v313);
2845                         if (typeof vs === 'object' && 'multiple-value' in vs)
2846                             args = args.concat(vs);
2847                         else
2848                             args.push(vs);
2849                         return func.apply(window, args);
2850                     })();
2851                 })();
2852             })(l134.fvalue(pv, v312));
2853         })();
2854     }));
2855     return l153;
2856 })();
2857 (function(){
2858     (l145).fvalue = (function(v321){
2859         ((v321)["fname"] = "SYMBOL-PACKAGE");
2860         return v321;
2861     })((function (values,v320){
2862         checkArgs(arguments, 2);
2863         return (function(){
2864             (((function(){
2865                 var tmp = v320;
2866                 return (typeof tmp == 'object' && 'name' in tmp);
2867             })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
2868                 throw "it is not a symbol";
2869             })());
2870             return (function(){
2871                 var tmp = (v320)["package"];
2872                 return tmp == undefined? l5.value: tmp ;
2873             })();
2874         })();
2875     }));
2876     return l145;
2877 })();
2878 (function(){
2879     (l154).fvalue = (function(v327){
2880         ((v327)["fname"] = "EXPORT");
2881         return v327;
2882     })((function (values,v322,v323){
2883         checkArgsAtLeast(arguments, 2);
2884         checkArgsAtMost(arguments, 3);
2885         var v323;
2886         switch(arguments.length-1){
2887         case 1:
2888             v323=(function(){
2889                 var symbol = l146;
2890                 var value = symbol.value;
2891                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2892                 return value;
2893             })();
2894         default: break;
2895         }
2896         return (function(){
2897             return (function(v324){
2898                 return (function(){
2899                     return (function(v325,v326){
2900                         (function(){
2901                             while(v325 !== l5.value){
2902                                 (v326 = (function(){
2903                                     var tmp = v325;
2904                                     return tmp === l5.value? l5.value: tmp.car;
2905                                 })());
2906                                 (function(){
2907                                     ((v324)[(v326).name] = v326);
2908                                     return l5.value;
2909                                 })();
2910                                 (v325 = (function(){
2911                                     var tmp = v325;
2912                                     return tmp === l5.value? l5.value: tmp.cdr;
2913                                 })());
2914                             }return l5.value;
2915                         })();
2916                         return l4.value;
2917                     })(v322,l5.value);
2918                 })();
2919             })(l140.fvalue(pv, v323));
2920         })();
2921     }));
2922     return l154;
2923 })();
2924 var l155 = {name: "GET-UNIVERSAL-TIME"};
2925 (function(){
2926     (l155).fvalue = (function(v328){
2927         ((v328)["fname"] = "GET-UNIVERSAL-TIME");
2928         return v328;
2929     })((function (values){
2930         checkArgsAtMost(arguments, 1);
2931         return (function(){
2932             return (function(){
2933                 var x1 = (Math.round(new Date() / 1000));
2934                 if (typeof x1 !== 'number') throw 'Not a number!';
2935                 return x1+2208988800;
2936             })();
2937         })();
2938     }));
2939     return l155;
2940 })();
2941 var l156 = {name: "*NEWLINE*"};
2942 (function(){
2943     (((l156.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l156).value = l107.fvalue(pv, l86.fvalue(pv, 10))));
2944     return l156;
2945 })();
2946 var l157 = {name: "CONCAT"};
2947 (function(){
2948     (l157).fvalue = (function(v330){
2949         ((v330)["fname"] = "CONCAT");
2950         return v330;
2951     })((function (values){
2952         var v329= l5.value;
2953         for (var i = arguments.length-1; i>=1; i--)
2954             v329 = {car: arguments[i], cdr:
2955         v329};
2956         return (function(){
2957             return l63.fvalue(values, (function(){
2958                 var symbol = l76;
2959                 var func = symbol.fvalue;
2960                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2961                 return func;
2962             })(), v329, l64.value, "");
2963         })();
2964     }));
2965     return l157;
2966 })();
2967 var l158 = {name: "CONCATF"};
2968 l158;
2969 var l159 = {name: "JOIN"};
2970 (function(){
2971     (l159).fvalue = (function(v333){
2972         ((v333)["fname"] = "JOIN");
2973         return v333;
2974     })((function (values,v331,v332){
2975         checkArgsAtLeast(arguments, 2);
2976         checkArgsAtMost(arguments, 3);
2977         var v332;
2978         switch(arguments.length-1){
2979         case 1:
2980             v332="";
2981         default: break;
2982         }
2983         return (function(){
2984             return (l13.fvalue(pv, v331) !== l5.value ? "" : (l13.fvalue(pv, (function(){
2985                 var tmp = v331;
2986                 return tmp === l5.value? l5.value: tmp.cdr;
2987             })()) !== l5.value ? (function(){
2988                 var tmp = v331;
2989                 return tmp === l5.value? l5.value: tmp.car;
2990             })() : l157.fvalue(values, (function(){
2991                 var tmp = v331;
2992                 return tmp === l5.value? l5.value: tmp.car;
2993             })(), v332, l159.fvalue(pv, (function(){
2994                 var tmp = v331;
2995                 return tmp === l5.value? l5.value: tmp.cdr;
2996             })(), v332))));
2997         })();
2998     }));
2999     return l159;
3000 })();
3001 var l160 = {name: "JOIN-TRAILING"};
3002 (function(){
3003     (l160).fvalue = (function(v336){
3004         ((v336)["fname"] = "JOIN-TRAILING");
3005         return v336;
3006     })((function (values,v334,v335){
3007         checkArgsAtLeast(arguments, 2);
3008         checkArgsAtMost(arguments, 3);
3009         var v335;
3010         switch(arguments.length-1){
3011         case 1:
3012             v335="";
3013         default: break;
3014         }
3015         return (function(){
3016             return (l13.fvalue(pv, v334) !== l5.value ? "" : l157.fvalue(values, (function(){
3017                 var tmp = v334;
3018                 return tmp === l5.value? l5.value: tmp.car;
3019             })(), v335, l160.fvalue(pv, (function(){
3020                 var tmp = v334;
3021                 return tmp === l5.value? l5.value: tmp.cdr;
3022             })(), v335)));
3023         })();
3024     }));
3025     return l160;
3026 })();
3027 var l161 = {name: "MAPCONCAT"};
3028 (function(){
3029     (l161).fvalue = (function(v339){
3030         ((v339)["fname"] = "MAPCONCAT");
3031         return v339;
3032     })((function (values,v337,v338){
3033         checkArgs(arguments, 3);
3034         return (function(){
3035             return l159.fvalue(values, l81.fvalue(pv, v337, v338));
3036         })();
3037     }));
3038     return l161;
3039 })();
3040 var l162 = {name: "VECTOR-TO-LIST"};
3041 (function(){
3042     (l162).fvalue = (function(v347){
3043         ((v347)["fname"] = "VECTOR-TO-LIST");
3044         return v347;
3045     })((function (values,v340){
3046         checkArgs(arguments, 2);
3047         return (function(){
3048             return (function(v341,v342){
3049                 return (function(){
3050                     return (function(v343,v344){
3051                         (function(){
3052                             while((function(){
3053                                 var x1 = v343;
3054                                 if (typeof x1 !== 'number') throw 'Not a number!';
3055                                 var x2 = v344;
3056                                 if (typeof x2 !== 'number') throw 'Not a number!';
3057                                 return (x1<x2?l4.value: l5.value);
3058                             })() !== l5.value){
3059                                 (function(){
3060                                     (function(){
3061                                         var v345 = (function(){
3062                                             var x = (v340)[v343];
3063                                             if (x === undefined) throw 'Out of range';
3064                                             return x;
3065                                         })();
3066                                         var v346 = ({car: v345, cdr: v341});
3067                                         return (v341 = v346);
3068                                     })();
3069                                     return l5.value;
3070                                 })();
3071                                 (v343 = (function(){
3072                                     var x1 = v343;
3073                                     if (typeof x1 !== 'number') throw 'Not a number!';
3074                                     return x1+1;
3075                                 })());
3076                             }return l5.value;
3077                         })();
3078                         return l70.fvalue(values, v341);
3079                     })(0,v342);
3080                 })();
3081             })(l5.value,l75.fvalue(pv, v340));
3082         })();
3083     }));
3084     return l162;
3085 })();
3086 var l163 = {name: "LIST-TO-VECTOR"};
3087 (function(){
3088     (l163).fvalue = (function(v353){
3089         ((v353)["fname"] = "LIST-TO-VECTOR");
3090         return v353;
3091     })((function (values,v348){
3092         checkArgs(arguments, 2);
3093         return (function(){
3094             return (function(v349,v350){
3095                 return (function(){
3096                     return (function(v351,v352){
3097                         (function(){
3098                             while(v351 !== l5.value){
3099                                 (v352 = (function(){
3100                                     var tmp = v351;
3101                                     return tmp === l5.value? l5.value: tmp.car;
3102                                 })());
3103                                 (function(){
3104                                     (function(){
3105                                         var x = v349;
3106                                         var i = v350;
3107                                         if (i < 0 || i >= x.length) throw 'Out of range';
3108                                         return x[i] = v352;
3109                                     })();
3110                                     (v350 = (function(){
3111                                         var x1 = v350;
3112                                         if (typeof x1 !== 'number') throw 'Not a number!';
3113                                         return x1+1;
3114                                     })());
3115                                     return l5.value;
3116                                 })();
3117                                 (v351 = (function(){
3118                                     var tmp = v351;
3119                                     return tmp === l5.value? l5.value: tmp.cdr;
3120                                 })());
3121                             }return l5.value;
3122                         })();
3123                         return v349;
3124                     })(v348,l5.value);
3125                 })();
3126             })((function(){
3127                 var r = [];
3128                 for (var i = 0; i < l75.fvalue(pv, v348); i++)
3129                     r.push(l5.value);
3130                 return r;
3131             })(),0);
3132         })();
3133     }));
3134     return l163;
3135 })();
3136 var l164 = {name: "VALUES-LIST"};
3137 (function(){
3138     (l164).fvalue = (function(v355){
3139         ((v355)["fname"] = "VALUES-LIST");
3140         return v355;
3141     })((function (values,v354){
3142         checkArgs(arguments, 2);
3143         return (function(){
3144             return values.apply(this, l163.fvalue(pv, v354));
3145         })();
3146     }));
3147     return l164;
3148 })();
3149 var l165 = {name: "VALUES"};
3150 (function(){
3151     (l165).fvalue = (function(v357){
3152         ((v357)["fname"] = "VALUES");
3153         return v357;
3154     })((function (values){
3155         var v356= l5.value;
3156         for (var i = arguments.length-1; i>=1; i--)
3157             v356 = {car: arguments[i], cdr:
3158         v356};
3159         return (function(){
3160             return l164.fvalue(values, v356);
3161         })();
3162     }));
3163     return l165;
3164 })();
3165 (function(){
3166     (l19).fvalue = (function(v363){
3167         ((v363)["fname"] = "INTEGER-TO-STRING");
3168         return v363;
3169     })((function (values,v358){
3170         checkArgs(arguments, 2);
3171         return (function(){
3172             return (l26.fvalue(pv, v358) !== l5.value ? "0" : (l91.fvalue(pv, v358) !== l5.value ? l157.fvalue(values, "-", l19.fvalue(pv, (function(){
3173                 var x1 = v358;
3174                 if (typeof x1 !== 'number') throw 'Not a number!';
3175                 return 0-x1;
3176             })())) : (function(v359){
3177                 (function(){
3178                     return (function(){
3179                         while(l29.fvalue(pv, l26.fvalue(pv, v358)) !== l5.value){
3180                             (function(){
3181                                 var v360 = (function(){
3182                                     var x = v358;
3183                                     var y = 10;
3184                                     if (typeof x != 'number')
3185                                         throw 'The value ' + x + ' is not a type number.';
3186                                     if (typeof y != 'number')
3187                                         throw 'The value ' + y + ' is not a type number.';
3188                                     return x%y;
3189                                 })();
3190                                 var v361 = ({car: v360, cdr: v359});
3191                                 return (v359 = v361);
3192                             })();
3193                             (v358 = l27.fvalue(pv, v358, 10));
3194                         }return l5.value;
3195                     })();
3196                 })();
3197                 return l161.fvalue(values, (function (values,v362){
3198                     checkArgs(arguments, 2);
3199                     return l107.fvalue(values, l101.fvalue(pv, v362));
3200                 }), v359);
3201             })(l5.value)));
3202         })();
3203     }));
3204     return l19;
3205 })();
3206 var l166 = {name: "PRIN1-TO-STRING"};
3207 var l167 = {name: "ESCAPE-STRING"};
3208 (function(){
3209     (l166).fvalue = (function(v372){
3210         ((v372)["fname"] = "PRIN1-TO-STRING");
3211         return v372;
3212     })((function (values,v364){
3213         checkArgs(arguments, 2);
3214         return (function(){
3215             return (((function(){
3216                 var tmp = v364;
3217                 return (typeof tmp == 'object' && 'name' in tmp);
3218             })()?l4.value: l5.value) !== l5.value ? (function(){
3219                 var func = (function (values,v366,v367){
3220                     var v366;
3221                     var v367;
3222                     switch(arguments.length-1){
3223                     case 0:
3224                         v366=l5.value;
3225                     case 1:
3226                         v367=l5.value;
3227                     default: break;
3228                     }
3229                     var v365= l5.value;
3230                     for (var i = arguments.length-1; i>=3; i--)
3231                         v365 = {car: arguments[i], cdr:
3232                     v365};
3233                     return ((v367 !== l5.value ? ((v366 === v364)?l4.value: l5.value) : l5.value) !== l5.value ? (v364).name : (function(v368,v369){
3234                         return l157.fvalue(values, (l13.fvalue(pv, v368) !== l5.value ? "#" : (((v368 === l136.fvalue(pv, "KEYWORD"))?l4.value: l5.value) !== l5.value ? "" : l137.fvalue(pv, v368))), ":", v369);
3235                     })(l145.fvalue(pv, v364),(v364).name));
3236                 });
3237                 var args = [values];
3238                 return (function(){
3239                     var values = mv;
3240                     var vs;
3241                     vs = l149.fvalue(values, (v364).name, (function(){
3242                         var symbol = l146;
3243                         var value = symbol.value;
3244                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3245                         return value;
3246                     })());
3247                     if (typeof vs === 'object' && 'multiple-value' in vs)
3248                         args = args.concat(vs);
3249                     else
3250                         args.push(vs);
3251                     return func.apply(window, args);
3252                 })();
3253             })() : (l89.fvalue(pv, v364) !== l5.value ? l19.fvalue(values, v364) : (((typeof(v364) == "string")?l4.value: l5.value) !== l5.value ? l157.fvalue(values, "\"", l167.fvalue(pv, v364), "\"") : (((typeof v364 == 'function')?l4.value: l5.value) !== l5.value ? (function(v370){
3254                 return (v370 !== l5.value ? l157.fvalue(values, "#<FUNCTION ", v370, ">") : l157.fvalue(values, "#<FUNCTION>"));
3255             })((function(){
3256                 var tmp = (v364)["fname"];
3257                 return tmp == undefined? l5.value: tmp ;
3258             })()) : (l62.fvalue(pv, v364) !== l5.value ? l157.fvalue(values, "(", l160.fvalue(pv, l81.fvalue(pv, (function(){
3259                 var symbol = l166;
3260                 var func = symbol.fvalue;
3261                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3262                 return func;
3263             })(), l95.fvalue(pv, v364)), " "), (function(v371){
3264                 return (l13.fvalue(pv, (function(){
3265                     var tmp = v371;
3266                     return tmp === l5.value? l5.value: tmp.cdr;
3267                 })()) !== l5.value ? l166.fvalue(pv, (function(){
3268                     var tmp = v371;
3269                     return tmp === l5.value? l5.value: tmp.car;
3270                 })()) : l157.fvalue(pv, l166.fvalue(pv, (function(){
3271                     var tmp = v371;
3272                     return tmp === l5.value? l5.value: tmp.car;
3273                 })()), " . ", l166.fvalue(pv, (function(){
3274                     var tmp = v371;
3275                     return tmp === l5.value? l5.value: tmp.cdr;
3276                 })())));
3277             })(l94.fvalue(pv, v364)), ")") : (((function(){
3278                 var x = v364;
3279                 return typeof x === 'object' && 'length' in x;
3280             })()?l4.value: l5.value) !== l5.value ? l157.fvalue(values, "#", (l26.fvalue(pv, l75.fvalue(pv, v364)) !== l5.value ? "()" : l166.fvalue(pv, l162.fvalue(pv, v364)))) : (l135.fvalue(pv, v364) !== l5.value ? l157.fvalue(values, "#<PACKAGE ", l137.fvalue(pv, v364), ">") : l5.value)))))));
3281         })();
3282     }));
3283     return l166;
3284 })();
3285 (function(){
3286     (l111).fvalue = (function(v374){
3287         ((v374)["fname"] = "WRITE-LINE");
3288         return v374;
3289     })((function (values,v373){
3290         checkArgs(arguments, 2);
3291         return (function(){
3292             (function(){
3293                 var x = v373;
3294                 if (typeof x != 'string')
3295                     throw 'The value ' + x + ' is not a type string.';
3296                 return lisp.write(x);
3297             })();
3298             (function(){
3299                 var x = (function(){
3300                     var symbol = l156;
3301                     var value = symbol.value;
3302                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3303                     return value;
3304                 })();
3305                 if (typeof x != 'string')
3306                     throw 'The value ' + x + ' is not a type string.';
3307                 return lisp.write(x);
3308             })();
3309             return v373;
3310         })();
3311     }));
3312     return l111;
3313 })();
3314 var l168 = {name: "WARN"};
3315 (function(){
3316     (l168).fvalue = (function(v376){
3317         ((v376)["fname"] = "WARN");
3318         return v376;
3319     })((function (values,v375){
3320         checkArgs(arguments, 2);
3321         return (function(){
3322             (function(){
3323                 var x = "WARNING: ";
3324                 if (typeof x != 'string')
3325                     throw 'The value ' + x + ' is not a type string.';
3326                 return lisp.write(x);
3327             })();
3328             return l111.fvalue(values, v375);
3329         })();
3330     }));
3331     return l168;
3332 })();
3333 var l169 = {name: "PRINT"};
3334 (function(){
3335     (l169).fvalue = (function(v378){
3336         ((v378)["fname"] = "PRINT");
3337         return v378;
3338     })((function (values,v377){
3339         checkArgs(arguments, 2);
3340         return (function(){
3341             l111.fvalue(pv, l166.fvalue(pv, v377));
3342             return v377;
3343         })();
3344     }));
3345     return l169;
3346 })();
3347 var l170 = {name: "MAKE-STRING-STREAM"};
3348 (function(){
3349     (l170).fvalue = (function(v380){
3350         ((v380)["fname"] = "MAKE-STRING-STREAM");
3351         return v380;
3352     })((function (values,v379){
3353         checkArgs(arguments, 2);
3354         return (function(){
3355             return ({car: v379, cdr: 0});
3356         })();
3357     }));
3358     return l170;
3359 })();
3360 var l171 = {name: "%PEEK-CHAR"};
3361 (function(){
3362     (l171).fvalue = (function(v382){
3363         ((v382)["fname"] = "%PEEK-CHAR");
3364         return v382;
3365     })((function (values,v381){
3366         checkArgs(arguments, 2);
3367         return (function(){
3368             return ((function(){
3369                 var x1 = (function(){
3370                     var tmp = v381;
3371                     return tmp === l5.value? l5.value: tmp.cdr;
3372                 })();
3373                 if (typeof x1 !== 'number') throw 'Not a number!';
3374                 var x2 = l75.fvalue(pv, (function(){
3375                     var tmp = v381;
3376                     return tmp === l5.value? l5.value: tmp.car;
3377                 })());
3378                 if (typeof x2 !== 'number') throw 'Not a number!';
3379                 return (x1<x2?l4.value: l5.value);
3380             })() !== l5.value ? (function(){
3381                 var string = (function(){
3382                     var tmp = v381;
3383                     return tmp === l5.value? l5.value: tmp.car;
3384                 })();
3385                 var index = (function(){
3386                     var tmp = v381;
3387                     return tmp === l5.value? l5.value: tmp.cdr;
3388                 })();
3389                 if (typeof string != 'string')
3390                     throw 'The value ' + string + ' is not a type string.';
3391                 if (typeof index != 'number')
3392                     throw 'The value ' + index + ' is not a type number.';
3393                 return string.charCodeAt(index);
3394             })() : l5.value);
3395         })();
3396     }));
3397     return l171;
3398 })();
3399 var l172 = {name: "%READ-CHAR"};
3400 (function(){
3401     (l172).fvalue = (function(v385){
3402         ((v385)["fname"] = "%READ-CHAR");
3403         return v385;
3404     })((function (values,v383){
3405         checkArgs(arguments, 2);
3406         return (function(){
3407             return ((function(){
3408                 var x1 = (function(){
3409                     var tmp = v383;
3410                     return tmp === l5.value? l5.value: tmp.cdr;
3411                 })();
3412                 if (typeof x1 !== 'number') throw 'Not a number!';
3413                 var x2 = l75.fvalue(pv, (function(){
3414                     var tmp = v383;
3415                     return tmp === l5.value? l5.value: tmp.car;
3416                 })());
3417                 if (typeof x2 !== 'number') throw 'Not a number!';
3418                 return (x1<x2?l4.value: l5.value);
3419             })() !== l5.value ? (function(v384){
3420                 (function(){
3421                     var x = v383;
3422                     if (typeof x != 'object')
3423                         throw 'The value ' + x + ' is not a type object.';
3424                     return (x.cdr = l24.fvalue(pv, (function(){
3425                         var tmp = v383;
3426                         return tmp === l5.value? l5.value: tmp.cdr;
3427                     })()), x);
3428                 })();
3429                 return v384;
3430             })((function(){
3431                 var string = (function(){
3432                     var tmp = v383;
3433                     return tmp === l5.value? l5.value: tmp.car;
3434                 })();
3435                 var index = (function(){
3436                     var tmp = v383;
3437                     return tmp === l5.value? l5.value: tmp.cdr;
3438                 })();
3439                 if (typeof string != 'string')
3440                     throw 'The value ' + string + ' is not a type string.';
3441                 if (typeof index != 'number')
3442                     throw 'The value ' + index + ' is not a type number.';
3443                 return string.charCodeAt(index);
3444             })()) : l5.value);
3445         })();
3446     }));
3447     return l172;
3448 })();
3449 var l173 = {name: "WHITESPACEP"};
3450 (function(){
3451     (l173).fvalue = (function(v389){
3452         ((v389)["fname"] = "WHITESPACEP");
3453         return v389;
3454     })((function (values,v386){
3455         checkArgs(arguments, 2);
3456         return (function(){
3457             return (function(v387){
3458                 return (v387 !== l5.value ? v387 : (function(v388){
3459                     return (v388 !== l5.value ? v388 : l88.fvalue(values, v386, 9));
3460                 })(l88.fvalue(pv, v386, 10)));
3461             })(l88.fvalue(pv, v386, 32));
3462         })();
3463     }));
3464     return l173;
3465 })();
3466 var l174 = {name: "SKIP-WHITESPACES"};
3467 (function(){
3468     (l174).fvalue = (function(v392){
3469         ((v392)["fname"] = "SKIP-WHITESPACES");
3470         return v392;
3471     })((function (values,v390){
3472         checkArgs(arguments, 2);
3473         return (function(){
3474             return (function(v391){
3475                 (v391 = l171.fvalue(pv, v390));
3476                 return (function(){
3477                     return (function(){
3478                         while((v391 !== l5.value ? l173.fvalue(pv, v391) : l5.value) !== l5.value){
3479                             l172.fvalue(pv, v390);
3480                             (v391 = l171.fvalue(pv, v390));
3481                         }return l5.value;
3482                     })();
3483                 })();
3484             })(l5.value);
3485         })();
3486     }));
3487     return l174;
3488 })();
3489 var l175 = {name: "TERMINALP"};
3490 (function(){
3491     (l175).fvalue = (function(v397){
3492         ((v397)["fname"] = "TERMINALP");
3493         return v397;
3494     })((function (values,v393){
3495         checkArgs(arguments, 2);
3496         return (function(){
3497             return (function(v394){
3498                 return (v394 !== l5.value ? v394 : (function(v395){
3499                     return (v395 !== l5.value ? v395 : (function(v396){
3500                         return (v396 !== l5.value ? v396 : l88.fvalue(values, 40, v393));
3501                     })(l88.fvalue(pv, 41, v393)));
3502                 })(l173.fvalue(pv, v393)));
3503             })(l13.fvalue(pv, v393));
3504         })();
3505     }));
3506     return l175;
3507 })();
3508 var l176 = {name: "READ-UNTIL"};
3509 (function(){
3510     (l176).fvalue = (function(v402){
3511         ((v402)["fname"] = "READ-UNTIL");
3512         return v402;
3513     })((function (values,v398,v399){
3514         checkArgs(arguments, 3);
3515         return (function(){
3516             return (function(v400,v401){
3517                 (v401 = l171.fvalue(pv, v398));
3518                 (function(){
3519                     return (function(){
3520                         while((v401 !== l5.value ? l29.fvalue(pv, (function(){
3521                             var f = v399;
3522                             return (typeof f === 'function'? f: f.fvalue)(pv, v401)
3523                         })()) : l5.value) !== l5.value){
3524                             (v400 = l157.fvalue(pv, v400, l107.fvalue(pv, v401)));
3525                             l172.fvalue(pv, v398);
3526                             (v401 = l171.fvalue(pv, v398));
3527                         }return l5.value;
3528                     })();
3529                 })();
3530                 return v400;
3531             })("",l5.value);
3532         })();
3533     }));
3534     return l176;
3535 })();
3536 var l177 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
3537 (function(){
3538     (l177).fvalue = (function(v406){
3539         ((v406)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
3540         return v406;
3541     })((function (values,v403){
3542         checkArgs(arguments, 2);
3543         return (function(){
3544             return (function(v404){
3545                 l174.fvalue(pv, v403);
3546                 (v404 = l171.fvalue(pv, v403));
3547                 return (function(){
3548                     return (function(){
3549                         while((v404 !== l5.value ? l88.fvalue(pv, v404, 59) : l5.value) !== l5.value){
3550                             l176.fvalue(pv, v403, (function (values,v405){
3551                                 checkArgs(arguments, 2);
3552                                 return l88.fvalue(values, v405, 10);
3553                             }));
3554                             l174.fvalue(pv, v403);
3555                             (v404 = l171.fvalue(pv, v403));
3556                         }return l5.value;
3557                     })();
3558                 })();
3559             })(l5.value);
3560         })();
3561     }));
3562     return l177;
3563 })();
3564 var l178 = {name: "%READ-LIST"};
3565 var l179 = {name: "LS-READ"};
3566 (function(){
3567     (l178).fvalue = (function(v410){
3568         ((v410)["fname"] = "%READ-LIST");
3569         return v410;
3570     })((function (values,v407){
3571         checkArgs(arguments, 2);
3572         return (function(){
3573             l177.fvalue(pv, v407);
3574             return (function(v408){
3575                 return (l13.fvalue(pv, v408) !== l5.value ? (function(){
3576                     throw "Unspected EOF";
3577                 })() : (l88.fvalue(pv, v408, 41) !== l5.value ? (function(){
3578                     l172.fvalue(pv, v407);
3579                     return l5.value;
3580                 })() : (l88.fvalue(pv, v408, 46) !== l5.value ? (function(){
3581                     l172.fvalue(pv, v407);
3582                     return (function(v409){
3583                         l177.fvalue(pv, v407);
3584                         (l88.fvalue(pv, l172.fvalue(pv, v407), 41) !== l5.value ? l5.value : (function(){
3585                             throw "')' was expected.";
3586                         })());
3587                         return v409;
3588                     })(l179.fvalue(pv, v407));
3589                 })() : ({car: l179.fvalue(pv, v407), cdr: l178.fvalue(pv, v407)}))));
3590             })(l171.fvalue(pv, v407));
3591         })();
3592     }));
3593     return l178;
3594 })();
3595 var l180 = {name: "READ-STRING"};
3596 (function(){
3597     (l180).fvalue = (function(v414){
3598         ((v414)["fname"] = "READ-STRING");
3599         return v414;
3600     })((function (values,v411){
3601         checkArgs(arguments, 2);
3602         return (function(){
3603             return (function(v412,v413){
3604                 (v413 = l172.fvalue(pv, v411));
3605                 (function(){
3606                     return (function(){
3607                         while(l29.fvalue(pv, l28.fvalue(pv, v413, 34)) !== l5.value){
3608                             (l13.fvalue(pv, v413) !== l5.value ? (function(){
3609                                 throw "Unexpected EOF";
3610                             })() : l5.value);
3611                             (l28.fvalue(pv, v413, 92) !== l5.value ? (v413 = l172.fvalue(pv, v411)) : l5.value);
3612                             (v412 = l157.fvalue(pv, v412, l107.fvalue(pv, v413)));
3613                             (v413 = l172.fvalue(pv, v411));
3614                         }return l5.value;
3615                     })();
3616                 })();
3617                 return v412;
3618             })("",l5.value);
3619         })();
3620     }));
3621     return l180;
3622 })();
3623 var l181 = {name: "READ-SHARP"};
3624 (function(){
3625     (l181).fvalue = (function(v419){
3626         ((v419)["fname"] = "READ-SHARP");
3627         return v419;
3628     })((function (values,v415){
3629         checkArgs(arguments, 2);
3630         return (function(){
3631             l172.fvalue(pv, v415);
3632             return (function(v416){
3633                 return (l28.fvalue(pv, v416, 39) !== l5.value ? l47.fvalue(values, l113, l179.fvalue(pv, v415)) : (l28.fvalue(pv, v416, 40) !== l5.value ? l163.fvalue(values, l178.fvalue(pv, v415)) : (l28.fvalue(pv, v416, 58) !== l5.value ? (function(){
3634                     var name = (function(){
3635                         var x = l176.fvalue(pv, v415, (function(){
3636                             var symbol = l175;
3637                             var func = symbol.fvalue;
3638                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3639                             return func;
3640                         })());
3641                         if (typeof x != 'string')
3642                             throw 'The value ' + x + ' is not a type string.';
3643                         return x.toUpperCase();
3644                     })();
3645                     if (typeof name != 'string')
3646                         throw 'The value ' + name + ' is not a type string.';
3647                     return ({name: name});
3648                 })() : (l28.fvalue(pv, v416, 92) !== l5.value ? (function(v417){
3649                     return (l108.fvalue(pv, v417, "space") !== l5.value ? l87.fvalue(values, 32) : (l108.fvalue(pv, v417, "tab") !== l5.value ? l87.fvalue(values, 9) : (l108.fvalue(pv, v417, "newline") !== l5.value ? l87.fvalue(values, 10) : l87.fvalue(values, (function(){
3650                         var string = v417;
3651                         var index = 0;
3652                         if (typeof string != 'string')
3653                             throw 'The value ' + string + ' is not a type string.';
3654                         if (typeof index != 'number')
3655                             throw 'The value ' + index + ' is not a type number.';
3656                         return string.charCodeAt(index);
3657                     })()))));
3658                 })(l157.fvalue(pv, l107.fvalue(pv, l172.fvalue(pv, v415)), l176.fvalue(pv, v415, (function(){
3659                     var symbol = l175;
3660                     var func = symbol.fvalue;
3661                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3662                     return func;
3663                 })()))) : (l28.fvalue(pv, v416, 43) !== l5.value ? (function(v418){
3664                     return (l108.fvalue(pv, v418, "common-lisp") !== l5.value ? (function(){
3665                         l179.fvalue(pv, v415);
3666                         return l179.fvalue(values, v415);
3667                     })() : (l108.fvalue(pv, v418, "ecmalisp") !== l5.value ? l179.fvalue(values, v415) : (function(){
3668                         throw "Unknown reader form.";
3669                     })()));
3670                 })(l176.fvalue(pv, v415, (function(){
3671                     var symbol = l175;
3672                     var func = symbol.fvalue;
3673                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3674                     return func;
3675                 })())) : (function(){
3676                     throw "ECASE expression failed.";
3677                 })())))));
3678             })(l172.fvalue(pv, v415));
3679         })();
3680     }));
3681     return l181;
3682 })();
3683 var l182 = {name: "READ-SYMBOL"};
3684 (function(){
3685     (l182).fvalue = (function(v427){
3686         ((v427)["fname"] = "READ-SYMBOL");
3687         return v427;
3688     })((function (values,v420){
3689         checkArgs(arguments, 2);
3690         return (function(){
3691             return (function(v421,v422,v423,v424,v425){
3692                 (v425 = 0);
3693                 (function(){
3694                     return (function(){
3695                         while(((function(){
3696                             var x1 = v425;
3697                             if (typeof x1 !== 'number') throw 'Not a number!';
3698                             var x2 = v421;
3699                             if (typeof x2 !== 'number') throw 'Not a number!';
3700                             return (x1<x2?l4.value: l5.value);
3701                         })() !== l5.value ? l29.fvalue(pv, l88.fvalue(pv, (function(){
3702                             var string = v420;
3703                             var index = v425;
3704                             if (typeof string != 'string')
3705                                 throw 'The value ' + string + ' is not a type string.';
3706                             if (typeof index != 'number')
3707                                 throw 'The value ' + index + ' is not a type number.';
3708                             return string.charCodeAt(index);
3709                         })(), 58)) : l5.value) !== l5.value){
3710                             (v425 = (function(){
3711                                 var x1 = v425;
3712                                 if (typeof x1 !== 'number') throw 'Not a number!';
3713                                 return x1+1;
3714                             })());
3715                         }return l5.value;
3716                     })();
3717                 })();
3718                 ((function(){
3719                     var x1 = v425;
3720                     if (typeof x1 !== 'number') throw 'Not a number!';
3721                     var x2 = v421;
3722                     if (typeof x2 !== 'number') throw 'Not a number!';
3723                     return (x1==x2?l4.value: l5.value);
3724                 })() !== l5.value ? (function(){
3725                     (v423 = v420);
3726                     (v422 = (function(){
3727                         var symbol = l146;
3728                         var value = symbol.value;
3729                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3730                         return value;
3731                     })());
3732                     return (v424 = l4.value);
3733                 })() : (function(){
3734                     (l26.fvalue(pv, v425) !== l5.value ? (v422 = "KEYWORD") : (v422 = (function(){
3735                         var x = l102.fvalue(pv, v420, 0, v425);
3736                         if (typeof x != 'string')
3737                             throw 'The value ' + x + ' is not a type string.';
3738                         return x.toUpperCase();
3739                     })()));
3740                     (v425 = (function(){
3741                         var x1 = v425;
3742                         if (typeof x1 !== 'number') throw 'Not a number!';
3743                         return x1+1;
3744                     })());
3745                     (l88.fvalue(pv, (function(){
3746                         var string = v420;
3747                         var index = v425;
3748                         if (typeof string != 'string')
3749                             throw 'The value ' + string + ' is not a type string.';
3750                         if (typeof index != 'number')
3751                             throw 'The value ' + index + ' is not a type number.';
3752                         return string.charCodeAt(index);
3753                     })(), 58) !== l5.value ? (function(){
3754                         (v424 = l4.value);
3755                         return (v425 = (function(){
3756                             var x1 = v425;
3757                             if (typeof x1 !== 'number') throw 'Not a number!';
3758                             return x1+1;
3759                         })());
3760                     })() : l5.value);
3761                     return (v423 = l102.fvalue(pv, v420, v425));
3762                 })());
3763                 (v423 = (function(){
3764                     var x = v423;
3765                     if (typeof x != 'string')
3766                         throw 'The value ' + x + ' is not a type string.';
3767                     return x.toUpperCase();
3768                 })());
3769                 (v422 = l136.fvalue(pv, v422));
3770                 return ((function(v426){
3771                     return (v426 !== l5.value ? v426 : ((v422 === l136.fvalue(pv, "KEYWORD"))?l4.value: l5.value));
3772                 })(v424) !== l5.value ? l153.fvalue(values, v423, v422) : l149.fvalue(values, v423, v422));
3773             })(l75.fvalue(pv, v420),l5.value,l5.value,l5.value,l5.value);
3774         })();
3775     }));
3776     return l182;
3777 })();
3778 var l183 = {name: "!PARSE-INTEGER"};
3779 (function(){
3780     (l183).fvalue = (function(v438){
3781         ((v438)["fname"] = "!PARSE-INTEGER");
3782         return v438;
3783     })((function (values,v428,v429){
3784         checkArgs(arguments, 3);
3785         return (function(){
3786             return (function(){
3787                 try {
3788                     return (function(v430,v431,v432,v433){
3789                         (l26.fvalue(pv, v432) !== l5.value ? (function(){
3790                             var values = mv;
3791                             throw ({type: 'block', id: 158, values: values(l5.value, 0), message: 'Return from unknown block NIL.'})
3792                         })() : l5.value);
3793                         (function(v434){
3794                             return (l28.fvalue(pv, v434, 43) !== l5.value ? (v431 = (function(){
3795                                 var x1 = v431;
3796                                 if (typeof x1 !== 'number') throw 'Not a number!';
3797                                 return x1+1;
3798                             })()) : (l28.fvalue(pv, v434, 45) !== l5.value ? (function(){
3799                                 (v433 = -1);
3800                                 return (v431 = (function(){
3801                                     var x1 = v431;
3802                                     if (typeof x1 !== 'number') throw 'Not a number!';
3803                                     return x1+1;
3804                                 })());
3805                             })() : l5.value));
3806                         })((function(){
3807                             var string = v428;
3808                             var index = 0;
3809                             if (typeof string != 'string')
3810                                 throw 'The value ' + string + ' is not a type string.';
3811                             if (typeof index != 'number')
3812                                 throw 'The value ' + index + ' is not a type number.';
3813                             return string.charCodeAt(index);
3814                         })());
3815                         (((function(){
3816                             var x1 = v431;
3817                             if (typeof x1 !== 'number') throw 'Not a number!';
3818                             var x2 = v432;
3819                             if (typeof x2 !== 'number') throw 'Not a number!';
3820                             return (x1<x2?l4.value: l5.value);
3821                         })() !== l5.value ? (v430 = l100.fvalue(pv, (function(){
3822                             var string = v428;
3823                             var index = v431;
3824                             if (typeof string != 'string')
3825                                 throw 'The value ' + string + ' is not a type string.';
3826                             if (typeof index != 'number')
3827                                 throw 'The value ' + index + ' is not a type number.';
3828                             return string.charCodeAt(index);
3829                         })())) : l5.value) !== l5.value ? l5.value : (function(){
3830                             var values = mv;
3831                             throw ({type: 'block', id: 158, values: values(l5.value, v431), message: 'Return from unknown block NIL.'})
3832                         })());
3833                         (v431 = (function(){
3834                             var x1 = v431;
3835                             if (typeof x1 !== 'number') throw 'Not a number!';
3836                             return x1+1;
3837                         })());
3838                         (function(){
3839                             try {
3840                                 return (function(){
3841                                     while((function(){
3842                                         var x1 = v431;
3843                                         if (typeof x1 !== 'number') throw 'Not a number!';
3844                                         var x2 = v432;
3845                                         if (typeof x2 !== 'number') throw 'Not a number!';
3846                                         return (x1<x2?l4.value: l5.value);
3847                                     })() !== l5.value){
3848                                         (function(v435){
3849                                             (v435 !== l5.value ? l5.value : (function(){
3850                                                 throw ({type: 'block', id: 159, values: l5.value, message: 'Return from unknown block NIL.'})
3851                                             })());
3852                                             (v430 = (function(){
3853                                                 var x1 = (function(){
3854                                                     var x1 = v430;
3855                                                     if (typeof x1 !== 'number') throw 'Not a number!';
3856                                                     return x1*10;
3857                                                 })();
3858                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3859                                                 var x2 = v435;
3860                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3861                                                 return x1+x2;
3862                                             })());
3863                                             return (v431 = (function(){
3864                                                 var x1 = v431;
3865                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3866                                                 return x1+1;
3867                                             })());
3868                                         })(l100.fvalue(pv, (function(){
3869                                             var string = v428;
3870                                             var index = v431;
3871                                             if (typeof string != 'string')
3872                                                 throw 'The value ' + string + ' is not a type string.';
3873                                             if (typeof index != 'number')
3874                                                 throw 'The value ' + index + ' is not a type number.';
3875                                             return string.charCodeAt(index);
3876                                         })()));
3877                                     }return l5.value;
3878                                 })();
3879                             }
3880                             catch (cf){
3881                                 if (cf.type == 'block' && cf.id == 159)
3882                                     return cf.values;
3883                                 else
3884                                     throw cf;
3885                             }
3886                         })();
3887                         return ((function(v436){
3888                             return (v436 !== l5.value ? v436 : (function(v437){
3889                                 return (v437 !== l5.value ? v437 : l88.fvalue(pv, (function(){
3890                                     var string = v428;
3891                                     var index = v431;
3892                                     if (typeof string != 'string')
3893                                         throw 'The value ' + string + ' is not a type string.';
3894                                     if (typeof index != 'number')
3895                                         throw 'The value ' + index + ' is not a type number.';
3896                                     return string.charCodeAt(index);
3897                                 })(), 32));
3898                             })((function(){
3899                                 var x1 = v431;
3900                                 if (typeof x1 !== 'number') throw 'Not a number!';
3901                                 var x2 = v432;
3902                                 if (typeof x2 !== 'number') throw 'Not a number!';
3903                                 return (x1==x2?l4.value: l5.value);
3904                             })()));
3905                         })(v429) !== l5.value ? values((function(){
3906                             var x1 = v433;
3907                             if (typeof x1 !== 'number') throw 'Not a number!';
3908                             var x2 = v430;
3909                             if (typeof x2 !== 'number') throw 'Not a number!';
3910                             return x1*x2;
3911                         })(), v431) : values(l5.value, v431));
3912                     })(0,0,l75.fvalue(pv, v428),1);
3913                 }
3914                 catch (cf){
3915                     if (cf.type == 'block' && cf.id == 158)
3916                         return values.apply(this, forcemv(cf.values));
3917                     else
3918                         throw cf;
3919                 }
3920             })();
3921         })();
3922     }));
3923     return l183;
3924 })();
3925 var l184 = {name: "PARSE-INTEGER"};
3926 (function(){
3927     (l184).fvalue = (function(v440){
3928         ((v440)["fname"] = "PARSE-INTEGER");
3929         return v440;
3930     })((function (values,v439){
3931         checkArgs(arguments, 2);
3932         return (function(){
3933             return l183.fvalue(values, v439, l5.value);
3934         })();
3935     }));
3936     return l184;
3937 })();
3938 var l185 = {name: "*EOF*"};
3939 (function(){
3940     (((l185.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l185).value = l18.fvalue(pv)));
3941     return l185;
3942 })();
3943 var l186 = {name: "QUOTE"};
3944 var l187 = {name: "BACKQUOTE"};
3945 var l188 = {name: "UNQUOTE-SPLICING"};
3946 var l189 = {name: "UNQUOTE"};
3947 (function(){
3948     (l179).fvalue = (function(v446){
3949         ((v446)["fname"] = "LS-READ");
3950         return v446;
3951     })((function (values,v441){
3952         checkArgs(arguments, 2);
3953         return (function(){
3954             l177.fvalue(pv, v441);
3955             return (function(v442){
3956                 return ((function(v443){
3957                     return (v443 !== l5.value ? v443 : l88.fvalue(pv, v442, 41));
3958                 })(l13.fvalue(pv, v442)) !== l5.value ? (function(){
3959                     var symbol = l185;
3960                     var value = symbol.value;
3961                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3962                     return value;
3963                 })() : (l88.fvalue(pv, v442, 40) !== l5.value ? (function(){
3964                     l172.fvalue(pv, v441);
3965                     return l178.fvalue(values, v441);
3966                 })() : (l88.fvalue(pv, v442, 39) !== l5.value ? (function(){
3967                     l172.fvalue(pv, v441);
3968                     return l47.fvalue(values, l186, l179.fvalue(pv, v441));
3969                 })() : (l88.fvalue(pv, v442, 96) !== l5.value ? (function(){
3970                     l172.fvalue(pv, v441);
3971                     return l47.fvalue(values, l187, l179.fvalue(pv, v441));
3972                 })() : (l88.fvalue(pv, v442, 34) !== l5.value ? (function(){
3973                     l172.fvalue(pv, v441);
3974                     return l180.fvalue(values, v441);
3975                 })() : (l88.fvalue(pv, v442, 44) !== l5.value ? (function(){
3976                     l172.fvalue(pv, v441);
3977                     return (l28.fvalue(pv, l171.fvalue(pv, v441), 64) !== l5.value ? (function(){
3978                         l172.fvalue(pv, v441);
3979                         return l47.fvalue(values, l188, l179.fvalue(pv, v441));
3980                     })() : l47.fvalue(values, l189, l179.fvalue(pv, v441)));
3981                 })() : (l88.fvalue(pv, v442, 35) !== l5.value ? l181.fvalue(values, v441) : (function(v444){
3982                     return (function(v445){
3983                         return (v445 !== l5.value ? v445 : l182.fvalue(values, v444));
3984                     })(pv(l183.fvalue(pv, v444, l5.value)));
3985                 })(l176.fvalue(pv, v441, (function(){
3986                     var symbol = l175;
3987                     var func = symbol.fvalue;
3988                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3989                     return func;
3990                 })())))))))));
3991             })(l171.fvalue(pv, v441));
3992         })();
3993     }));
3994     return l179;
3995 })();
3996 var l190 = {name: "LS-READ-FROM-STRING"};
3997 (function(){
3998     (l190).fvalue = (function(v448){
3999         ((v448)["fname"] = "LS-READ-FROM-STRING");
4000         return v448;
4001     })((function (values,v447){
4002         checkArgs(arguments, 2);
4003         return (function(){
4004             return l179.fvalue(values, l170.fvalue(pv, v447));
4005         })();
4006     }));
4007     return l190;
4008 })();
4009 var l191 = {name: "CODE"};
4010 (function(){
4011     (l191).fvalue = (function(v451){
4012         ((v451)["fname"] = "CODE");
4013         return v451;
4014     })((function (values){
4015         var v449= l5.value;
4016         for (var i = arguments.length-1; i>=1; i--)
4017             v449 = {car: arguments[i], cdr:
4018         v449};
4019         return (function(){
4020             return l161.fvalue(values, (function (values,v450){
4021                 checkArgs(arguments, 2);
4022                 return (l13.fvalue(pv, v450) !== l5.value ? "" : (l89.fvalue(pv, v450) !== l5.value ? l19.fvalue(values, v450) : (((typeof(v450) == "string")?l4.value: l5.value) !== l5.value ? v450 : (function(){
4023                     throw "Unknown argument.";
4024                 })())));
4025             }), v449);
4026         })();
4027     }));
4028     return l191;
4029 })();
4030 var l192 = {name: "JS!BOOL"};
4031 var l193 = {name: "LS-COMPILE"};
4032 (function(){
4033     (l192).fvalue = (function(v453){
4034         ((v453)["fname"] = "JS!BOOL");
4035         return v453;
4036     })((function (values,v452){
4037         checkArgs(arguments, 2);
4038         return (function(){
4039             return l191.fvalue(values, "(", v452, "?", l193.fvalue(pv, l4.value), ": ", l193.fvalue(pv, l5.value), ")");
4040         })();
4041     }));
4042     return l192;
4043 })();
4044 var l194 = {name: "JS!SELFCALL"};
4045 l194;
4046 var l195 = {name: "INDENT"};
4047 (function(){
4048     (l195).fvalue = (function(v460){
4049         ((v460)["fname"] = "INDENT");
4050         return v460;
4051     })((function (values){
4052         var v454= l5.value;
4053         for (var i = arguments.length-1; i>=1; i--)
4054             v454 = {car: arguments[i], cdr:
4055         v454};
4056         return (function(){
4057             return (function(v455){
4058                 return (function(v456,v457,v458){
4059                     (l90.fvalue(pv, l75.fvalue(pv, v455)) !== l5.value ? (v456 = l157.fvalue(pv, v456, "    ")) : l5.value);
4060                     (function(){
4061                         return (function(){
4062                             while((function(){
4063                                 var x1 = v457;
4064                                 if (typeof x1 !== 'number') throw 'Not a number!';
4065                                 var x2 = v458;
4066                                 if (typeof x2 !== 'number') throw 'Not a number!';
4067                                 return (x1<x2?l4.value: l5.value);
4068                             })() !== l5.value){
4069                                 (function(v459){
4070                                     return (v456 = l157.fvalue(pv, v456, v459));
4071                                 })(((l88.fvalue(pv, (function(){
4072                                     var string = v455;
4073                                     var index = v457;
4074                                     if (typeof string != 'string')
4075                                         throw 'The value ' + string + ' is not a type string.';
4076                                     if (typeof index != 'number')
4077                                         throw 'The value ' + index + ' is not a type number.';
4078                                     return string.charCodeAt(index);
4079                                 })(), 10) !== l5.value ? ((function(){
4080                                     var x1 = v457;
4081                                     if (typeof x1 !== 'number') throw 'Not a number!';
4082                                     var x2 = l25.fvalue(pv, v458);
4083                                     if (typeof x2 !== 'number') throw 'Not a number!';
4084                                     return (x1<x2?l4.value: l5.value);
4085                                 })() !== l5.value ? l29.fvalue(pv, l88.fvalue(pv, (function(){
4086                                     var string = v455;
4087                                     var index = l24.fvalue(pv, v457);
4088                                     if (typeof string != 'string')
4089                                         throw 'The value ' + string + ' is not a type string.';
4090                                     if (typeof index != 'number')
4091                                         throw 'The value ' + index + ' is not a type number.';
4092                                     return string.charCodeAt(index);
4093                                 })(), 10)) : l5.value) : l5.value) !== l5.value ? l157.fvalue(pv, l107.fvalue(pv, 10), "    ") : l107.fvalue(pv, (function(){
4094                                     var string = v455;
4095                                     var index = v457;
4096                                     if (typeof string != 'string')
4097                                         throw 'The value ' + string + ' is not a type string.';
4098                                     if (typeof index != 'number')
4099                                         throw 'The value ' + index + ' is not a type number.';
4100                                     return string.charCodeAt(index);
4101                                 })())));
4102                                 (v457 = (function(){
4103                                     var x1 = v457;
4104                                     if (typeof x1 !== 'number') throw 'Not a number!';
4105                                     return x1+1;
4106                                 })());
4107                             }return l5.value;
4108                         })();
4109                     })();
4110                     return v456;
4111                 })("",0,l75.fvalue(pv, v455));
4112             })((function(){
4113                 var f = (function(){
4114                     var symbol = l191;
4115                     var func = symbol.fvalue;
4116                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4117                     return func;
4118                 })();
4119                 var args = [pv];
4120                 var tail = (v454);
4121                 while (tail != l5.value){
4122                     args.push(tail.car);
4123                     tail = tail.cdr;
4124                 }
4125                 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
4126             })());
4127         })();
4128     }));
4129     return l195;
4130 })();
4131 var l196 = {name: "*MULTIPLE-VALUE-P*"};
4132 (function(){
4133     (((l196.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l196).value = l5.value));
4134     return l196;
4135 })();
4136 var l197 = {name: "MAKE-BINDING"};
4137 (function(){
4138     (l197).fvalue = (function(v465){
4139         ((v465)["fname"] = "MAKE-BINDING");
4140         return v465;
4141     })((function (values,v461,v462,v463,v464){
4142         checkArgsAtLeast(arguments, 4);
4143         checkArgsAtMost(arguments, 5);
4144         var v464;
4145         switch(arguments.length-1){
4146         case 3:
4147             v464=l5.value;
4148         default: break;
4149         }
4150         return (function(){
4151             return l47.fvalue(values, v461, v462, v463, v464);
4152         })();
4153     }));
4154     return l197;
4155 })();
4156 var l198 = {name: "BINDING-NAME"};
4157 (function(){
4158     (l198).fvalue = (function(v467){
4159         ((v467)["fname"] = "BINDING-NAME");
4160         return v467;
4161     })((function (values,v466){
4162         checkArgs(arguments, 2);
4163         return (function(){
4164             return l42.fvalue(values, v466);
4165         })();
4166     }));
4167     return l198;
4168 })();
4169 var l199 = {name: "BINDING-TYPE"};
4170 (function(){
4171     (l199).fvalue = (function(v469){
4172         ((v469)["fname"] = "BINDING-TYPE");
4173         return v469;
4174     })((function (values,v468){
4175         checkArgs(arguments, 2);
4176         return (function(){
4177             return l43.fvalue(values, v468);
4178         })();
4179     }));
4180     return l199;
4181 })();
4182 var l200 = {name: "BINDING-VALUE"};
4183 (function(){
4184     (l200).fvalue = (function(v471){
4185         ((v471)["fname"] = "BINDING-VALUE");
4186         return v471;
4187     })((function (values,v470){
4188         checkArgs(arguments, 2);
4189         return (function(){
4190             return l44.fvalue(values, v470);
4191         })();
4192     }));
4193     return l200;
4194 })();
4195 var l201 = {name: "BINDING-DECLARATIONS"};
4196 (function(){
4197     (l201).fvalue = (function(v473){
4198         ((v473)["fname"] = "BINDING-DECLARATIONS");
4199         return v473;
4200     })((function (values,v472){
4201         checkArgs(arguments, 2);
4202         return (function(){
4203             return l45.fvalue(values, v472);
4204         })();
4205     }));
4206     return l201;
4207 })();
4208 var l202 = {name: "SET-BINDING-VALUE"};
4209 (function(){
4210     (l202).fvalue = (function(v476){
4211         ((v476)["fname"] = "SET-BINDING-VALUE");
4212         return v476;
4213     })((function (values,v474,v475){
4214         checkArgs(arguments, 3);
4215         return (function(){
4216             return (function(){
4217                 var x = l37.fvalue(pv, v474);
4218                 if (typeof x != 'object')
4219                     throw 'The value ' + x + ' is not a type object.';
4220                 return (x.car = v475, x);
4221             })();
4222         })();
4223     }));
4224     return l202;
4225 })();
4226 var l203 = {name: "SET-BINDING-DECLARATIONS"};
4227 (function(){
4228     (l203).fvalue = (function(v479){
4229         ((v479)["fname"] = "SET-BINDING-DECLARATIONS");
4230         return v479;
4231     })((function (values,v477,v478){
4232         checkArgs(arguments, 3);
4233         return (function(){
4234             return (function(){
4235                 var x = l40.fvalue(pv, v477);
4236                 if (typeof x != 'object')
4237                     throw 'The value ' + x + ' is not a type object.';
4238                 return (x.car = v478, x);
4239             })();
4240         })();
4241     }));
4242     return l203;
4243 })();
4244 var l204 = {name: "PUSH-BINDING-DECLARATION"};
4245 (function(){
4246     (l204).fvalue = (function(v482){
4247         ((v482)["fname"] = "PUSH-BINDING-DECLARATION");
4248         return v482;
4249     })((function (values,v480,v481){
4250         checkArgs(arguments, 3);
4251         return (function(){
4252             return l203.fvalue(values, v481, ({car: v480, cdr: l201.fvalue(pv, v481)}));
4253         })();
4254     }));
4255     return l204;
4256 })();
4257 var l205 = {name: "MAKE-LEXENV"};
4258 (function(){
4259     (l205).fvalue = (function(v483){
4260         ((v483)["fname"] = "MAKE-LEXENV");
4261         return v483;
4262     })((function (values){
4263         checkArgsAtMost(arguments, 1);
4264         return (function(){
4265             return l47.fvalue(values, l5.value, l5.value, l5.value, l5.value);
4266         })();
4267     }));
4268     return l205;
4269 })();
4270 var l206 = {name: "COPY-LEXENV"};
4271 (function(){
4272     (l206).fvalue = (function(v485){
4273         ((v485)["fname"] = "COPY-LEXENV");
4274         return v485;
4275     })((function (values,v484){
4276         checkArgs(arguments, 2);
4277         return (function(){
4278             return l84.fvalue(values, v484);
4279         })();
4280     }));
4281     return l206;
4282 })();
4283 var l207 = {name: "PUSH-TO-LEXENV"};
4284 var l208 = {name: "BLOCK"};
4285 var l209 = {name: "GOTAG"};
4286 (function(){
4287     (l207).fvalue = (function(v490){
4288         ((v490)["fname"] = "PUSH-TO-LEXENV");
4289         return v490;
4290     })((function (values,v486,v487,v488){
4291         checkArgs(arguments, 4);
4292         return (function(){
4293             return (function(v489){
4294                 return (l28.fvalue(pv, v489, l114) !== l5.value ? (function(){
4295                     var x = v487;
4296                     if (typeof x != 'object')
4297                         throw 'The value ' + x + ' is not a type object.';
4298                     return (x.car = ({car: v486, cdr: (function(){
4299                         var tmp = v487;
4300                         return tmp === l5.value? l5.value: tmp.car;
4301                     })()}), x);
4302                 })() : (l28.fvalue(pv, v489, l113) !== l5.value ? (function(){
4303                     var x = (function(){
4304                         var tmp = v487;
4305                         return tmp === l5.value? l5.value: tmp.cdr;
4306                     })();
4307                     if (typeof x != 'object')
4308                         throw 'The value ' + x + ' is not a type object.';
4309                     return (x.car = ({car: v486, cdr: l35.fvalue(pv, v487)}), x);
4310                 })() : (l28.fvalue(pv, v489, l208) !== l5.value ? (function(){
4311                     var x = l37.fvalue(pv, v487);
4312                     if (typeof x != 'object')
4313                         throw 'The value ' + x + ' is not a type object.';
4314                     return (x.car = ({car: v486, cdr: l39.fvalue(pv, v487)}), x);
4315                 })() : (l28.fvalue(pv, v489, l209) !== l5.value ? (function(){
4316                     var x = l40.fvalue(pv, v487);
4317                     if (typeof x != 'object')
4318                         throw 'The value ' + x + ' is not a type object.';
4319                     return (x.car = ({car: v486, cdr: l41.fvalue(pv, v487)}), x);
4320                 })() : (function(){
4321                     throw "ECASE expression failed.";
4322                 })()))));
4323             })(v488);
4324         })();
4325     }));
4326     return l207;
4327 })();
4328 var l210 = {name: "EXTEND-LEXENV"};
4329 (function(){
4330     (l210).fvalue = (function(v497){
4331         ((v497)["fname"] = "EXTEND-LEXENV");
4332         return v497;
4333     })((function (values,v491,v492,v493){
4334         checkArgs(arguments, 4);
4335         return (function(){
4336             return (function(v494){
4337                 return (function(){
4338                     return (function(v495,v496){
4339                         (function(){
4340                             while(v495 !== l5.value){
4341                                 (v496 = (function(){
4342                                     var tmp = v495;
4343                                     return tmp === l5.value? l5.value: tmp.car;
4344                                 })());
4345                                 (function(){
4346                                     l207.fvalue(pv, v496, v494, v493);
4347                                     return l5.value;
4348                                 })();
4349                                 (v495 = (function(){
4350                                     var tmp = v495;
4351                                     return tmp === l5.value? l5.value: tmp.cdr;
4352                                 })());
4353                             }return l5.value;
4354                         })();
4355                         return v494;
4356                     })(l70.fvalue(pv, v491),l5.value);
4357                 })();
4358             })(l206.fvalue(pv, v492));
4359         })();
4360     }));
4361     return l210;
4362 })();
4363 var l211 = {name: "LOOKUP-IN-LEXENV"};
4364 (function(){
4365     (l211).fvalue = (function(v502){
4366         ((v502)["fname"] = "LOOKUP-IN-LEXENV");
4367         return v502;
4368     })((function (values,v498,v499,v500){
4369         checkArgs(arguments, 4);
4370         return (function(){
4371             return l106.fvalue(values, v498, (function(v501){
4372                 return (l28.fvalue(pv, v501, l114) !== l5.value ? l42.fvalue(pv, v499) : (l28.fvalue(pv, v501, l113) !== l5.value ? l43.fvalue(pv, v499) : (l28.fvalue(pv, v501, l208) !== l5.value ? l44.fvalue(pv, v499) : (l28.fvalue(pv, v501, l209) !== l5.value ? l45.fvalue(pv, v499) : (function(){
4373                     throw "ECASE expression failed.";
4374                 })()))));
4375             })(v500));
4376         })();
4377     }));
4378     return l211;
4379 })();
4380 var l212 = {name: "*ENVIRONMENT*"};
4381 (function(){
4382     (((l212.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l212).value = l205.fvalue(pv)));
4383     return l212;
4384 })();
4385 var l213 = {name: "*VARIABLE-COUNTER*"};
4386 (function(){
4387     (((l213.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l213).value = 0));
4388     return l213;
4389 })();
4390 var l214 = {name: "GVARNAME"};
4391 (function(){
4392     (l214).fvalue = (function(v504){
4393         ((v504)["fname"] = "GVARNAME");
4394         return v504;
4395     })((function (values,v503){
4396         checkArgs(arguments, 2);
4397         return (function(){
4398             return l191.fvalue(values, "v", ((l213).value = (function(){
4399                 var x1 = (function(){
4400                     var symbol = l213;
4401                     var value = symbol.value;
4402                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4403                     return value;
4404                 })();
4405                 if (typeof x1 !== 'number') throw 'Not a number!';
4406                 return x1+1;
4407             })()));
4408         })();
4409     }));
4410     return l214;
4411 })();
4412 var l215 = {name: "TRANSLATE-VARIABLE"};
4413 (function(){
4414     (l215).fvalue = (function(v506){
4415         ((v506)["fname"] = "TRANSLATE-VARIABLE");
4416         return v506;
4417     })((function (values,v505){
4418         checkArgs(arguments, 2);
4419         return (function(){
4420             return l200.fvalue(values, l211.fvalue(pv, v505, (function(){
4421                 var symbol = l212;
4422                 var value = symbol.value;
4423                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4424                 return value;
4425             })(), l114));
4426         })();
4427     }));
4428     return l215;
4429 })();
4430 var l216 = {name: "EXTEND-LOCAL-ENV"};
4431 (function(){
4432     (l216).fvalue = (function(v512){
4433         ((v512)["fname"] = "EXTEND-LOCAL-ENV");
4434         return v512;
4435     })((function (values,v507){
4436         checkArgs(arguments, 2);
4437         return (function(){
4438             return (function(v508){
4439                 return (function(){
4440                     return (function(v509,v510){
4441                         (function(){
4442                             while(v509 !== l5.value){
4443                                 (v510 = (function(){
4444                                     var tmp = v509;
4445                                     return tmp === l5.value? l5.value: tmp.car;
4446                                 })());
4447                                 (function(){
4448                                     (function(v511){
4449                                         return l207.fvalue(pv, v511, v508, l114);
4450                                     })(l197.fvalue(pv, v510, l114, l214.fvalue(pv, v510)));
4451                                     return l5.value;
4452                                 })();
4453                                 (v509 = (function(){
4454                                     var tmp = v509;
4455                                     return tmp === l5.value? l5.value: tmp.cdr;
4456                                 })());
4457                             }return l5.value;
4458                         })();
4459                         return v508;
4460                     })(v507,l5.value);
4461                 })();
4462             })(l206.fvalue(pv, (function(){
4463                 var symbol = l212;
4464                 var value = symbol.value;
4465                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4466                 return value;
4467             })()));
4468         })();
4469     }));
4470     return l216;
4471 })();
4472 var l217 = {name: "*TOPLEVEL-COMPILATIONS*"};
4473 (function(){
4474     (((l217.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l217).value = l5.value));
4475     return l217;
4476 })();
4477 var l218 = {name: "TOPLEVEL-COMPILATION"};
4478 (function(){
4479     (l218).fvalue = (function(v516){
4480         ((v516)["fname"] = "TOPLEVEL-COMPILATION");
4481         return v516;
4482     })((function (values,v513){
4483         checkArgs(arguments, 2);
4484         return (function(){
4485             return (function(){
4486                 var v514 = v513;
4487                 var v515 = ({car: v514, cdr: (function(){
4488                     var symbol = l217;
4489                     var value = symbol.value;
4490                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4491                     return value;
4492                 })()});
4493                 return ((l217).value = v515);
4494             })();
4495         })();
4496     }));
4497     return l218;
4498 })();
4499 var l219 = {name: "NULL-OR-EMPTY-P"};
4500 (function(){
4501     (l219).fvalue = (function(v518){
4502         ((v518)["fname"] = "NULL-OR-EMPTY-P");
4503         return v518;
4504     })((function (values,v517){
4505         checkArgs(arguments, 2);
4506         return (function(){
4507             return l26.fvalue(values, l75.fvalue(pv, v517));
4508         })();
4509     }));
4510     return l219;
4511 })();
4512 var l220 = {name: "GET-TOPLEVEL-COMPILATIONS"};
4513 (function(){
4514     (l220).fvalue = (function(v519){
4515         ((v519)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
4516         return v519;
4517     })((function (values){
4518         checkArgsAtMost(arguments, 1);
4519         return (function(){
4520             return l70.fvalue(values, l98.fvalue(pv, (function(){
4521                 var symbol = l219;
4522                 var func = symbol.fvalue;
4523                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4524                 return func;
4525             })(), (function(){
4526                 var symbol = l217;
4527                 var value = symbol.value;
4528                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4529                 return value;
4530             })()));
4531         })();
4532     }));
4533     return l220;
4534 })();
4535 var l221 = {name: "%COMPILE-DEFMACRO"};
4536 var l222 = {name: "MACRO"};
4537 (function(){
4538     (l221).fvalue = (function(v522){
4539         ((v522)["fname"] = "%COMPILE-DEFMACRO");
4540         return v522;
4541     })((function (values,v520,v521){
4542         checkArgs(arguments, 3);
4543         return (function(){
4544             l218.fvalue(pv, l193.fvalue(pv, l47.fvalue(pv, l186, v520)));
4545             l207.fvalue(pv, l197.fvalue(pv, v520, l222, v521), (function(){
4546                 var symbol = l212;
4547                 var value = symbol.value;
4548                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4549                 return value;
4550             })(), l113);
4551             return v520;
4552         })();
4553     }));
4554     return l221;
4555 })();
4556 var l223 = {name: "GLOBAL-BINDING"};
4557 (function(){
4558     (l223).fvalue = (function(v528){
4559         ((v528)["fname"] = "GLOBAL-BINDING");
4560         return v528;
4561     })((function (values,v523,v524,v525){
4562         checkArgs(arguments, 4);
4563         return (function(){
4564             return (function(v526){
4565                 return (v526 !== l5.value ? v526 : (function(v527){
4566                     l207.fvalue(pv, v527, (function(){
4567                         var symbol = l212;
4568                         var value = symbol.value;
4569                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4570                         return value;
4571                     })(), v525);
4572                     return v527;
4573                 })(l197.fvalue(pv, v523, v524, l5.value)));
4574             })(l211.fvalue(pv, v523, (function(){
4575                 var symbol = l212;
4576                 var value = symbol.value;
4577                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4578                 return value;
4579             })(), v525));
4580         })();
4581     }));
4582     return l223;
4583 })();
4584 var l224 = {name: "CLAIMP"};
4585 (function(){
4586     (l224).fvalue = (function(v533){
4587         ((v533)["fname"] = "CLAIMP");
4588         return v533;
4589     })((function (values,v529,v530,v531){
4590         checkArgs(arguments, 4);
4591         return (function(){
4592             return (function(v532){
4593                 return (v532 !== l5.value ? l96.fvalue(values, v531, l201.fvalue(pv, v532)) : l5.value);
4594             })(l211.fvalue(pv, v529, (function(){
4595                 var symbol = l212;
4596                 var value = symbol.value;
4597                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4598                 return value;
4599             })(), v530));
4600         })();
4601     }));
4602     return l224;
4603 })();
4604 var l225 = {name: "!PROCLAIM"};
4605 var l226 = {name: "SPECIAL"};
4606 var l227 = {name: "NOTINLINE"};
4607 var l228 = {name: "CONSTANT"};
4608 (function(){
4609     (l225).fvalue = (function(v545){
4610         ((v545)["fname"] = "!PROCLAIM");
4611         return v545;
4612     })((function (values,v534){
4613         checkArgs(arguments, 2);
4614         return (function(){
4615             return (function(v535){
4616                 return (l28.fvalue(pv, v535, l226) !== l5.value ? (function(){
4617                     return (function(v536,v537){
4618                         (function(){
4619                             while(v536 !== l5.value){
4620                                 (v537 = (function(){
4621                                     var tmp = v536;
4622                                     return tmp === l5.value? l5.value: tmp.car;
4623                                 })());
4624                                 (function(){
4625                                     (function(v538){
4626                                         return l204.fvalue(pv, l226, v538);
4627                                     })(l223.fvalue(pv, v537, l114, l114));
4628                                     return l5.value;
4629                                 })();
4630                                 (v536 = (function(){
4631                                     var tmp = v536;
4632                                     return tmp === l5.value? l5.value: tmp.cdr;
4633                                 })());
4634                             }return l5.value;
4635                         })();
4636                         return l5.value;
4637                     })((function(){
4638                         var tmp = v534;
4639                         return tmp === l5.value? l5.value: tmp.cdr;
4640                     })(),l5.value);
4641                 })() : (l28.fvalue(pv, v535, l227) !== l5.value ? (function(){
4642                     return (function(v539,v540){
4643                         (function(){
4644                             while(v539 !== l5.value){
4645                                 (v540 = (function(){
4646                                     var tmp = v539;
4647                                     return tmp === l5.value? l5.value: tmp.car;
4648                                 })());
4649                                 (function(){
4650                                     (function(v541){
4651                                         return l204.fvalue(pv, l227, v541);
4652                                     })(l223.fvalue(pv, v540, l113, l113));
4653                                     return l5.value;
4654                                 })();
4655                                 (v539 = (function(){
4656                                     var tmp = v539;
4657                                     return tmp === l5.value? l5.value: tmp.cdr;
4658                                 })());
4659                             }return l5.value;
4660                         })();
4661                         return l5.value;
4662                     })((function(){
4663                         var tmp = v534;
4664                         return tmp === l5.value? l5.value: tmp.cdr;
4665                     })(),l5.value);
4666                 })() : (l28.fvalue(pv, v535, l228) !== l5.value ? (function(){
4667                     return (function(v542,v543){
4668                         (function(){
4669                             while(v542 !== l5.value){
4670                                 (v543 = (function(){
4671                                     var tmp = v542;
4672                                     return tmp === l5.value? l5.value: tmp.car;
4673                                 })());
4674                                 (function(){
4675                                     (function(v544){
4676                                         return l204.fvalue(pv, l228, v544);
4677                                     })(l223.fvalue(pv, v543, l114, l114));
4678                                     return l5.value;
4679                                 })();
4680                                 (v542 = (function(){
4681                                     var tmp = v542;
4682                                     return tmp === l5.value? l5.value: tmp.cdr;
4683                                 })());
4684                             }return l5.value;
4685                         })();
4686                         return l5.value;
4687                     })((function(){
4688                         var tmp = v534;
4689                         return tmp === l5.value? l5.value: tmp.cdr;
4690                     })(),l5.value);
4691                 })() : l5.value)));
4692             })((function(){
4693                 var tmp = v534;
4694                 return tmp === l5.value? l5.value: tmp.car;
4695             })());
4696         })();
4697     }));
4698     return l225;
4699 })();
4700 var l229 = {name: "PROCLAIM"};
4701 (l229).fvalue = (function(){
4702     var symbol = l225;
4703     var func = symbol.fvalue;
4704     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4705     return func;
4706 })();
4707 var l230 = {name: "*COMPILATIONS*"};
4708 (function(){
4709     (((l230.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l230).value = l5.value));
4710     return l230;
4711 })();
4712 var l231 = {name: "DEFINE-COMPILATION"};
4713 l231;
4714 var l232 = {name: "IF"};
4715 (function(){
4716     var v546 = l47.fvalue(pv, l232, (function (values,v547,v548,v549){
4717         checkArgs(arguments, 4);
4718         return (function(){
4719             return l191.fvalue(values, "(", l193.fvalue(pv, v547), " !== ", l193.fvalue(pv, l5.value), " ? ", l193.fvalue(pv, v548, (function(){
4720                 var symbol = l196;
4721                 var value = symbol.value;
4722                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4723                 return value;
4724             })()), " : ", l193.fvalue(pv, v549, (function(){
4725                 var symbol = l196;
4726                 var value = symbol.value;
4727                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4728                 return value;
4729             })()), ")");
4730         })();
4731     }));
4732     var v550 = ({car: v546, cdr: (function(){
4733         var symbol = l230;
4734         var value = symbol.value;
4735         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4736         return value;
4737     })()});
4738     return ((l230).value = v550);
4739 })();
4740 var l233 = {name: "*LL-KEYWORDS*"};
4741 var l234 = {name: "&OPTIONAL"};
4742 var l235 = {name: "&REST"};
4743 var l236 = {name: "&KEY"};
4744 var l237 = QIList(l234,l235,l236,l5);
4745 (function(){
4746     (((l233.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l233).value = l237));
4747     return l233;
4748 })();
4749 var l238 = {name: "LIST-UNTIL-KEYWORD"};
4750 (function(){
4751     (l238).fvalue = (function(v553){
4752         ((v553)["fname"] = "LIST-UNTIL-KEYWORD");
4753         return v553;
4754     })((function (values,v551){
4755         checkArgs(arguments, 2);
4756         return (function(){
4757             return ((function(v552){
4758                 return (v552 !== l5.value ? v552 : l96.fvalue(pv, (function(){
4759                     var tmp = v551;
4760                     return tmp === l5.value? l5.value: tmp.car;
4761                 })(), (function(){
4762                     var symbol = l233;
4763                     var value = symbol.value;
4764                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4765                     return value;
4766                 })()));
4767             })(l13.fvalue(pv, v551)) !== l5.value ? l5.value : ({car: (function(){
4768                 var tmp = v551;
4769                 return tmp === l5.value? l5.value: tmp.car;
4770             })(), cdr: l238.fvalue(pv, (function(){
4771                 var tmp = v551;
4772                 return tmp === l5.value? l5.value: tmp.cdr;
4773             })())}));
4774         })();
4775     }));
4776     return l238;
4777 })();
4778 var l239 = {name: "LL-SECTION"};
4779 (function(){
4780     (l239).fvalue = (function(v556){
4781         ((v556)["fname"] = "LL-SECTION");
4782         return v556;
4783     })((function (values,v554,v555){
4784         checkArgs(arguments, 3);
4785         return (function(){
4786             return l238.fvalue(values, (function(){
4787                 var tmp = l96.fvalue(pv, v554, v555);
4788                 return tmp === l5.value? l5.value: tmp.cdr;
4789             })());
4790         })();
4791     }));
4792     return l239;
4793 })();
4794 var l240 = {name: "LL-REQUIRED-ARGUMENTS"};
4795 (function(){
4796     (l240).fvalue = (function(v558){
4797         ((v558)["fname"] = "LL-REQUIRED-ARGUMENTS");
4798         return v558;
4799     })((function (values,v557){
4800         checkArgs(arguments, 2);
4801         return (function(){
4802             return l238.fvalue(values, v557);
4803         })();
4804     }));
4805     return l240;
4806 })();
4807 var l241 = {name: "LL-OPTIONAL-ARGUMENTS-CANONICAL"};
4808 (function(){
4809     (l241).fvalue = (function(v560){
4810         ((v560)["fname"] = "LL-OPTIONAL-ARGUMENTS-CANONICAL");
4811         return v560;
4812     })((function (values,v559){
4813         checkArgs(arguments, 2);
4814         return (function(){
4815             return l81.fvalue(values, (function(){
4816                 var symbol = l61;
4817                 var func = symbol.fvalue;
4818                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4819                 return func;
4820             })(), l239.fvalue(pv, l234, v559));
4821         })();
4822     }));
4823     return l241;
4824 })();
4825 var l242 = {name: "LL-OPTIONAL-ARGUMENTS"};
4826 (function(){
4827     (l242).fvalue = (function(v562){
4828         ((v562)["fname"] = "LL-OPTIONAL-ARGUMENTS");
4829         return v562;
4830     })((function (values,v561){
4831         checkArgs(arguments, 2);
4832         return (function(){
4833             return l81.fvalue(values, (function(){
4834                 var symbol = l32;
4835                 var func = symbol.fvalue;
4836                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4837                 return func;
4838             })(), l241.fvalue(pv, v561));
4839         })();
4840     }));
4841     return l242;
4842 })();
4843 var l243 = {name: "LL-REST-ARGUMENT"};
4844 (function(){
4845     (l243).fvalue = (function(v565){
4846         ((v565)["fname"] = "LL-REST-ARGUMENT");
4847         return v565;
4848     })((function (values,v563){
4849         checkArgs(arguments, 2);
4850         return (function(){
4851             return (function(v564){
4852                 ((function(){
4853                     var tmp = v564;
4854                     return tmp === l5.value? l5.value: tmp.cdr;
4855                 })() !== l5.value ? (function(){
4856                     throw "Bad lambda-list";
4857                 })() : l5.value);
4858                 return (function(){
4859                     var tmp = v564;
4860                     return tmp === l5.value? l5.value: tmp.car;
4861                 })();
4862             })(l239.fvalue(pv, l235, v563));
4863         })();
4864     }));
4865     return l243;
4866 })();
4867 var l244 = {name: "LL-KEYWORD-ARGUMENTS-CANONICAL"};
4868 (function(){
4869     (l244).fvalue = (function(v570){
4870         ((v570)["fname"] = "LL-KEYWORD-ARGUMENTS-CANONICAL");
4871         return v570;
4872     })((function (values,v566){
4873         checkArgs(arguments, 2);
4874         return (function(){
4875             return (function(v569){
4876                 return l81.fvalue(values, v569, l239.fvalue(pv, l236, v566));
4877             })((function (values,v567){
4878                 checkArgs(arguments, 2);
4879                 return (function(v568){
4880                     return ({car: (l62.fvalue(pv, (function(){
4881                         var tmp = v568;
4882                         return tmp === l5.value? l5.value: tmp.car;
4883                     })()) !== l5.value ? (function(){
4884                         var tmp = v568;
4885                         return tmp === l5.value? l5.value: tmp.car;
4886                     })() : l47.fvalue(pv, l153.fvalue(pv, ((function(){
4887                         var tmp = v568;
4888                         return tmp === l5.value? l5.value: tmp.car;
4889                     })()).name, "KEYWORD"), (function(){
4890                         var tmp = v568;
4891                         return tmp === l5.value? l5.value: tmp.car;
4892                     })())), cdr: (function(){
4893                         var tmp = v568;
4894                         return tmp === l5.value? l5.value: tmp.cdr;
4895                     })()});
4896                 })(l61.fvalue(pv, v567));
4897             }));
4898         })();
4899     }));
4900     return l244;
4901 })();
4902 var l245 = {name: "LL-KEYWORD-ARGUMENTS"};
4903 (function(){
4904     (l245).fvalue = (function(v573){
4905         ((v573)["fname"] = "LL-KEYWORD-ARGUMENTS");
4906         return v573;
4907     })((function (values,v571){
4908         checkArgs(arguments, 2);
4909         return (function(){
4910             return l81.fvalue(values, (function (values,v572){
4911                 checkArgs(arguments, 2);
4912                 return l43.fvalue(values, l42.fvalue(pv, v572));
4913             }), l244.fvalue(pv, v571));
4914         })();
4915     }));
4916     return l245;
4917 })();
4918 var l246 = {name: "LL-SVARS"};
4919 (function(){
4920     (l246).fvalue = (function(v576){
4921         ((v576)["fname"] = "LL-SVARS");
4922         return v576;
4923     })((function (values,v574){
4924         checkArgs(arguments, 2);
4925         return (function(){
4926             return (function(v575){
4927                 return l97.fvalue(values, l5.value, l81.fvalue(pv, (function(){
4928                     var symbol = l44;
4929                     var func = symbol.fvalue;
4930                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4931                     return func;
4932                 })(), v575));
4933             })(l68.fvalue(pv, l244.fvalue(pv, v574), l241.fvalue(pv, v574)));
4934         })();
4935     }));
4936     return l246;
4937 })();
4938 var l247 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
4939 (function(){
4940     (l247).fvalue = (function(v579){
4941         ((v579)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
4942         return v579;
4943     })((function (values,v578){
4944         checkArgsAtLeast(arguments, 2);
4945         var v577= l5.value;
4946         for (var i = arguments.length-1; i>=2; i--)
4947             v577 = {car: arguments[i], cdr:
4948         v577};
4949         return (function(){
4950             return (v578 !== l5.value ? l191.fvalue(values, "(function(){", (function(){
4951                 var symbol = l156;
4952                 var value = symbol.value;
4953                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4954                 return value;
4955             })(), l195.fvalue(pv, "var func = ", l159.fvalue(pv, v577), ";", (function(){
4956                 var symbol = l156;
4957                 var value = symbol.value;
4958                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4959                 return value;
4960             })(), "func.docstring = '", v578, "';", (function(){
4961                 var symbol = l156;
4962                 var value = symbol.value;
4963                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4964                 return value;
4965             })(), "return func;", (function(){
4966                 var symbol = l156;
4967                 var value = symbol.value;
4968                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4969                 return value;
4970             })()), "})()") : (function(){
4971                 var f = (function(){
4972                     var symbol = l191;
4973                     var func = symbol.fvalue;
4974                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4975                     return func;
4976                 })();
4977                 var args = [values];
4978                 var tail = (v577);
4979                 while (tail != l5.value){
4980                     args.push(tail.car);
4981                     tail = tail.cdr;
4982                 }
4983                 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
4984             })());
4985         })();
4986     }));
4987     return l247;
4988 })();
4989 var l248 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"};
4990 var l249 = {name: "N/A"};
4991 (function(){
4992     (l248).fvalue = (function(v585){
4993         ((v585)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT");
4994         return v585;
4995     })((function (values,v580,v581,v582){
4996         checkArgs(arguments, 4);
4997         return (function(){
4998             return (function(v583,v584){
4999                 return (function(){
5000                     try {
5001                         (((function(){
5002                             var x1 = v583;
5003                             if (typeof x1 !== 'number') throw 'Not a number!';
5004                             return (1<x1?l4.value: l5.value);
5005                         })() !== l5.value ? l28.fvalue(pv, v583, v584) : l5.value) !== l5.value ? (function(){
5006                             var values = mv;
5007                             throw ({type: 'block', id: 207, values: l191.fvalue(values, "checkArgs(arguments, ", v583, ");", (function(){
5008                                 var symbol = l156;
5009                                 var value = symbol.value;
5010                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5011                                 return value;
5012                             })()), message: 'Return from unknown block NIL.'})
5013                         })() : l5.value);
5014                         return l191.fvalue(values, ((function(){
5015                             var x1 = v583;
5016                             if (typeof x1 !== 'number') throw 'Not a number!';
5017                             return (1<x1?l4.value: l5.value);
5018                         })() !== l5.value ? l191.fvalue(pv, "checkArgsAtLeast(arguments, ", v583, ");", (function(){
5019                             var symbol = l156;
5020                             var value = symbol.value;
5021                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5022                             return value;
5023                         })()) : l5.value), (((typeof (v584) == "number")?l4.value: l5.value) !== l5.value ? l191.fvalue(pv, "checkArgsAtMost(arguments, ", v584, ");", (function(){
5024                             var symbol = l156;
5025                             var value = symbol.value;
5026                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5027                             return value;
5028                         })()) : l5.value));
5029                     }
5030                     catch (cf){
5031                         if (cf.type == 'block' && cf.id == 207)
5032                             return values.apply(this, forcemv(cf.values));
5033                         else
5034                             throw cf;
5035                     }
5036                 })();
5037             })(l24.fvalue(pv, v580),(v582 !== l5.value ? l249 : (function(){
5038                 var x1 = v580;
5039                 if (typeof x1 !== 'number') throw 'Not a number!';
5040                 var x2 = v581;
5041                 if (typeof x2 !== 'number') throw 'Not a number!';
5042                 return 1+x1+x2;
5043             })()));
5044         })();
5045     }));
5046     return l248;
5047 })();
5048 var l250 = {name: "COMPILE-LAMBDA-OPTIONAL"};
5049 (function(){
5050     (l250).fvalue = (function(v598){
5051         ((v598)["fname"] = "COMPILE-LAMBDA-OPTIONAL");
5052         return v598;
5053     })((function (values,v586){
5054         checkArgs(arguments, 2);
5055         return (function(){
5056             return (function(){
5057                 var v587 = l241.fvalue(pv, v586);
5058                 var v588 = l75.fvalue(pv, l240.fvalue(pv, v586));
5059                 var v589 = l75.fvalue(pv, v587);
5060                 return (v587 !== l5.value ? l191.fvalue(values, l161.fvalue(pv, (function (values,v590){
5061                     checkArgs(arguments, 2);
5062                     return l191.fvalue(values, "var ", l215.fvalue(pv, l42.fvalue(pv, v590)), "; ", (function(){
5063                         var symbol = l156;
5064                         var value = symbol.value;
5065                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5066                         return value;
5067                     })(), (l44.fvalue(pv, v590) !== l5.value ? l191.fvalue(pv, "var ", l215.fvalue(pv, l44.fvalue(pv, v590)), " = ", l193.fvalue(pv, l4.value), "; ", (function(){
5068                         var symbol = l156;
5069                         var value = symbol.value;
5070                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5071                         return value;
5072                     })()) : l5.value));
5073                 }), v587), "switch(arguments.length-1){", (function(){
5074                     var symbol = l156;
5075                     var value = symbol.value;
5076                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5077                     return value;
5078                 })(), (function(v591,v592){
5079                     return (function(){
5080                         (function(){
5081                             return (function(){
5082                                 while((function(){
5083                                     var x1 = v592;
5084                                     if (typeof x1 !== 'number') throw 'Not a number!';
5085                                     var x2 = v589;
5086                                     if (typeof x2 !== 'number') throw 'Not a number!';
5087                                     return (x1<x2?l4.value: l5.value);
5088                                 })() !== l5.value){
5089                                     (function(v593){
5090                                         (function(){
5091                                             var v594 = l191.fvalue(pv, "case ", (function(){
5092                                                 var x1 = v592;
5093                                                 if (typeof x1 !== 'number') throw 'Not a number!';
5094                                                 var x2 = v588;
5095                                                 if (typeof x2 !== 'number') throw 'Not a number!';
5096                                                 return x1+x2;
5097                                             })(), ":", (function(){
5098                                                 var symbol = l156;
5099                                                 var value = symbol.value;
5100                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5101                                                 return value;
5102                                             })(), l195.fvalue(pv, l215.fvalue(pv, (function(){
5103                                                 var tmp = v593;
5104                                                 return tmp === l5.value? l5.value: tmp.car;
5105                                             })()), "=", l193.fvalue(pv, l35.fvalue(pv, v593)), ";", (function(){
5106                                                 var symbol = l156;
5107                                                 var value = symbol.value;
5108                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5109                                                 return value;
5110                                             })()), (l44.fvalue(pv, v593) !== l5.value ? l195.fvalue(pv, l215.fvalue(pv, l44.fvalue(pv, v593)), "=", l193.fvalue(pv, l5.value), ";", (function(){
5111                                                 var symbol = l156;
5112                                                 var value = symbol.value;
5113                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5114                                                 return value;
5115                                             })()) : l5.value));
5116                                             var v595 = ({car: v594, cdr: v591});
5117                                             return (v591 = v595);
5118                                         })();
5119                                         return (v592 = (function(){
5120                                             var x1 = v592;
5121                                             if (typeof x1 !== 'number') throw 'Not a number!';
5122                                             return x1+1;
5123                                         })());
5124                                     })(l93.fvalue(pv, v592, v587));
5125                                 }return l5.value;
5126                             })();
5127                         })();
5128                         (function(){
5129                             var v596 = l191.fvalue(pv, "default: break;", (function(){
5130                                 var symbol = l156;
5131                                 var value = symbol.value;
5132                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5133                                 return value;
5134                             })());
5135                             var v597 = ({car: v596, cdr: v591});
5136                             return (v591 = v597);
5137                         })();
5138                         return l159.fvalue(pv, l70.fvalue(pv, v591));
5139                     })();
5140                 })(l5.value,0), "}", (function(){
5141                     var symbol = l156;
5142                     var value = symbol.value;
5143                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5144                     return value;
5145                 })()) : l5.value);
5146             })();
5147         })();
5148     }));
5149     return l250;
5150 })();
5151 var l251 = {name: "COMPILE-LAMBDA-REST"};
5152 (function(){
5153     (l251).fvalue = (function(v604){
5154         ((v604)["fname"] = "COMPILE-LAMBDA-REST");
5155         return v604;
5156     })((function (values,v599){
5157         checkArgs(arguments, 2);
5158         return (function(){
5159             return (function(v600,v601,v602){
5160                 return (v602 !== l5.value ? (function(v603){
5161                     return l191.fvalue(values, "var ", v603, "= ", l193.fvalue(pv, l5.value), ";", (function(){
5162                         var symbol = l156;
5163                         var value = symbol.value;
5164                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5165                         return value;
5166                     })(), "for (var i = arguments.length-1; i>=", (function(){
5167                         var x1 = v600;
5168                         if (typeof x1 !== 'number') throw 'Not a number!';
5169                         var x2 = v601;
5170                         if (typeof x2 !== 'number') throw 'Not a number!';
5171                         return 1+x1+x2;
5172                     })(), "; i--)", (function(){
5173                         var symbol = l156;
5174                         var value = symbol.value;
5175                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5176                         return value;
5177                     })(), l195.fvalue(pv, v603, " = {car: arguments[i], cdr: "), v603, "};", (function(){
5178                         var symbol = l156;
5179                         var value = symbol.value;
5180                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5181                         return value;
5182                     })());
5183                 })(l215.fvalue(pv, v602)) : l5.value);
5184             })(l75.fvalue(pv, l240.fvalue(pv, v599)),l75.fvalue(pv, l242.fvalue(pv, v599)),l243.fvalue(pv, v599));
5185         })();
5186     }));
5187     return l251;
5188 })();
5189 var l252 = {name: "COMPILE-LAMBDA-PARSE-KEYWORDS"};
5190 (function(){
5191     (l252).fvalue = (function(v615){
5192         ((v615)["fname"] = "COMPILE-LAMBDA-PARSE-KEYWORDS");
5193         return v615;
5194     })((function (values,v605){
5195         checkArgs(arguments, 2);
5196         return (function(){
5197             return (function(v606,v607,v608){
5198                 return l191.fvalue(values, l161.fvalue(pv, (function (values,v609){
5199                     checkArgs(arguments, 2);
5200                     return (function(v610){
5201                         return l191.fvalue(values, "var ", l215.fvalue(pv, v610), "; ", (function(){
5202                             var symbol = l156;
5203                             var value = symbol.value;
5204                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5205                             return value;
5206                         })(), (l44.fvalue(pv, v609) !== l5.value ? l191.fvalue(pv, "var ", l215.fvalue(pv, l44.fvalue(pv, v609)), " = ", l193.fvalue(pv, l5.value), ";", (function(){
5207                             var symbol = l156;
5208                             var value = symbol.value;
5209                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5210                             return value;
5211                         })()) : l5.value));
5212                     })(l43.fvalue(pv, (function(){
5213                         var tmp = v609;
5214                         return tmp === l5.value? l5.value: tmp.car;
5215                     })()));
5216                 }), v608), (function(v613){
5217                     return (v608 !== l5.value ? l191.fvalue(pv, "var i;", (function(){
5218                         var symbol = l156;
5219                         var value = symbol.value;
5220                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5221                         return value;
5222                     })(), l161.fvalue(pv, v613, v608)) : l5.value);
5223                 })((function (values,v611){
5224                     checkArgs(arguments, 2);
5225                     return l191.fvalue(values, "for (i=", (function(){
5226                         var x1 = v606;
5227                         if (typeof x1 !== 'number') throw 'Not a number!';
5228                         var x2 = v607;
5229                         if (typeof x2 !== 'number') throw 'Not a number!';
5230                         return 1+x1+x2;
5231                     })(), "; i<arguments.length; i+=2){", (function(){
5232                         var symbol = l156;
5233                         var value = symbol.value;
5234                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5235                         return value;
5236                     })(), l195.fvalue(pv, "if (arguments[i] === ", l193.fvalue(pv, l34.fvalue(pv, v611)), "){", (function(){
5237                         var symbol = l156;
5238                         var value = symbol.value;
5239                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5240                         return value;
5241                     })(), l195.fvalue(pv, l215.fvalue(pv, l35.fvalue(pv, (function(){
5242                         var tmp = v611;
5243                         return tmp === l5.value? l5.value: tmp.car;
5244                     })())), " = arguments[i+1];", (function(){
5245                         var symbol = l156;
5246                         var value = symbol.value;
5247                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5248                         return value;
5249                     })(), (function(v612){
5250                         return (v612 !== l5.value ? l191.fvalue(pv, l215.fvalue(pv, v612), " = ", l193.fvalue(pv, l4.value), ";", (function(){
5251                             var symbol = l156;
5252                             var value = symbol.value;
5253                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5254                             return value;
5255                         })()) : l5.value);
5256                     })(l44.fvalue(pv, v611)), "break;", (function(){
5257                         var symbol = l156;
5258                         var value = symbol.value;
5259                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5260                         return value;
5261                     })()), "}", (function(){
5262                         var symbol = l156;
5263                         var value = symbol.value;
5264                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5265                         return value;
5266                     })()), "}", (function(){
5267                         var symbol = l156;
5268                         var value = symbol.value;
5269                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5270                         return value;
5271                     })(), "if (i == arguments.length){", (function(){
5272                         var symbol = l156;
5273                         var value = symbol.value;
5274                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5275                         return value;
5276                     })(), l195.fvalue(pv, l215.fvalue(pv, l35.fvalue(pv, (function(){
5277                         var tmp = v611;
5278                         return tmp === l5.value? l5.value: tmp.car;
5279                     })())), " = ", l193.fvalue(pv, l35.fvalue(pv, v611)), ";", (function(){
5280                         var symbol = l156;
5281                         var value = symbol.value;
5282                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5283                         return value;
5284                     })()), "}", (function(){
5285                         var symbol = l156;
5286                         var value = symbol.value;
5287                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5288                         return value;
5289                     })());
5290                 })), (v608 !== l5.value ? l191.fvalue(pv, "for (i=", (function(){
5291                     var x1 = v606;
5292                     if (typeof x1 !== 'number') throw 'Not a number!';
5293                     var x2 = v607;
5294                     if (typeof x2 !== 'number') throw 'Not a number!';
5295                     return 1+x1+x2;
5296                 })(), "; i<arguments.length; i+=2){", (function(){
5297                     var symbol = l156;
5298                     var value = symbol.value;
5299                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5300                     return value;
5301                 })(), l195.fvalue(pv, "if (", l159.fvalue(pv, l81.fvalue(pv, (function (values,v614){
5302                     checkArgs(arguments, 2);
5303                     return l157.fvalue(values, "arguments[i] !== ", l193.fvalue(pv, l34.fvalue(pv, v614)));
5304                 }), v608), " && "), ")", (function(){
5305                     var symbol = l156;
5306                     var value = symbol.value;
5307                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5308                     return value;
5309                 })(), l195.fvalue(pv, "throw 'Unknown keyword argument ' + arguments[i].name;", (function(){
5310                     var symbol = l156;
5311                     var value = symbol.value;
5312                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5313                     return value;
5314                 })())), "}", (function(){
5315                     var symbol = l156;
5316                     var value = symbol.value;
5317                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5318                     return value;
5319                 })()) : l5.value));
5320             })(l75.fvalue(pv, l240.fvalue(pv, v605)),l75.fvalue(pv, l242.fvalue(pv, v605)),l244.fvalue(pv, v605));
5321         })();
5322     }));
5323     return l252;
5324 })();
5325 var l253 = {name: "COMPILE-LAMBDA"};
5326 var l254 = {name: "LS-COMPILE-BLOCK"};
5327 (function(){
5328     (l253).fvalue = (function(v628){
5329         ((v628)["fname"] = "COMPILE-LAMBDA");
5330         return v628;
5331     })((function (values,v616,v617){
5332         checkArgs(arguments, 3);
5333         return (function(){
5334             return (function(v618,v619,v620,v621,v622){
5335                 ((((typeof((function(){
5336                     var tmp = v617;
5337                     return tmp === l5.value? l5.value: tmp.car;
5338                 })()) == "string")?l4.value: l5.value) !== l5.value ? l29.fvalue(pv, l13.fvalue(pv, (function(){
5339                     var tmp = v617;
5340                     return tmp === l5.value? l5.value: tmp.cdr;
5341                 })())) : l5.value) !== l5.value ? (function(){
5342                     (v622 = (function(){
5343                         var tmp = v617;
5344                         return tmp === l5.value? l5.value: tmp.car;
5345                     })());
5346                     return (v617 = (function(){
5347                         var tmp = v617;
5348                         return tmp === l5.value? l5.value: tmp.cdr;
5349                     })());
5350                 })() : l5.value);
5351                 return (function(v623,v624,v625){
5352                     try {
5353                         var tmp;
5354                         tmp = l212.value;
5355                         l212.value = v625;
5356                         v625 = tmp;
5357                         return l247.fvalue(values, v622, "(function (", l159.fvalue(pv, ({car: "values", cdr: l81.fvalue(pv, (function(){
5358                             var symbol = l215;
5359                             var func = symbol.fvalue;
5360                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5361                             return func;
5362                         })(), l68.fvalue(pv, v618, v619))}), ","), "){", (function(){
5363                             var symbol = l156;
5364                             var value = symbol.value;
5365                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5366                             return value;
5367                         })(), l195.fvalue(pv, l248.fvalue(pv, v623, v624, (function(v626){
5368                             return (v626 !== l5.value ? v626 : v620);
5369                         })(v621)), l250.fvalue(pv, v616), l251.fvalue(pv, v616), l252.fvalue(pv, v616), (function(v627){
5370                             try {
5371                                 var tmp;
5372                                 tmp = l196.value;
5373                                 l196.value = v627;
5374                                 v627 = tmp;
5375                                 return l254.fvalue(pv, v617, l4.value);
5376                             }
5377                             finally {
5378                                 l196.value = v627;
5379                             }
5380                         })(l4.value)), "})");
5381                     }
5382                     finally {
5383                         l212.value = v625;
5384                     }
5385                 })(l75.fvalue(pv, v618),l75.fvalue(pv, v619),l216.fvalue(pv, l68.fvalue(pv, l61.fvalue(pv, v621), v618, v619, v620, l246.fvalue(pv, v616))));
5386             })(l240.fvalue(pv, v616),l242.fvalue(pv, v616),l245.fvalue(pv, v616),l243.fvalue(pv, v616),l5.value);
5387         })();
5388     }));
5389     return l253;
5390 })();
5391 var l255 = {name: "SETQ-PAIR"};
5392 var l256 = {name: "SET"};
5393 (function(){
5394     (l255).fvalue = (function(v632){
5395         ((v632)["fname"] = "SETQ-PAIR");
5396         return v632;
5397     })((function (values,v629,v630){
5398         checkArgs(arguments, 3);
5399         return (function(){
5400             return (function(v631){
5401                 return ((((l199.fvalue(pv, v631) === l114)?l4.value: l5.value) !== l5.value ? (l29.fvalue(pv, l96.fvalue(pv, l226, l201.fvalue(pv, v631))) !== l5.value ? l29.fvalue(pv, l96.fvalue(pv, l228, l201.fvalue(pv, v631))) : l5.value) : l5.value) !== l5.value ? l191.fvalue(values, l200.fvalue(pv, v631), " = ", l193.fvalue(pv, v630)) : l193.fvalue(values, l47.fvalue(pv, l256, l47.fvalue(pv, l186, v629), v630)));
5402             })(l211.fvalue(pv, v629, (function(){
5403                 var symbol = l212;
5404                 var value = symbol.value;
5405                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5406                 return value;
5407             })(), l114));
5408         })();
5409     }));
5410     return l255;
5411 })();
5412 (function(){
5413     var v633 = l47.fvalue(pv, l119, (function (values){
5414         var v634= l5.value;
5415         for (var i = arguments.length-1; i>=1; i--)
5416             v634 = {car: arguments[i], cdr:
5417         v634};
5418         return (function(){
5419             return (function(v635){
5420                 (function(){
5421                     try {
5422                         return (function(){
5423                             while(l4.value !== l5.value){
5424                                 (l13.fvalue(pv, v634) !== l5.value ? (function(){
5425                                     throw ({type: 'block', id: 215, values: l5.value, message: 'Return from unknown block NIL.'})
5426                                 })() : (l13.fvalue(pv, (function(){
5427                                     var tmp = v634;
5428                                     return tmp === l5.value? l5.value: tmp.cdr;
5429                                 })()) !== l5.value ? (function(){
5430                                     throw "Odd paris in SETQ";
5431                                 })() : (function(){
5432                                     (v635 = l157.fvalue(pv, v635, l157.fvalue(pv, l255.fvalue(pv, (function(){
5433                                         var tmp = v634;
5434                                         return tmp === l5.value? l5.value: tmp.car;
5435                                     })(), l35.fvalue(pv, v634)), (l13.fvalue(pv, l37.fvalue(pv, v634)) !== l5.value ? "" : ", "))));
5436                                     return (v634 = l37.fvalue(pv, v634));
5437                                 })()));
5438                             }return l5.value;
5439                         })();
5440                     }
5441                     catch (cf){
5442                         if (cf.type == 'block' && cf.id == 215)
5443                             return cf.values;
5444                         else
5445                             throw cf;
5446                     }
5447                 })();
5448                 return l191.fvalue(values, "(", v635, ")");
5449             })("");
5450         })();
5451     }));
5452     var v636 = ({car: v633, cdr: (function(){
5453         var symbol = l230;
5454         var value = symbol.value;
5455         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5456         return value;
5457     })()});
5458     return ((l230).value = v636);
5459 })();
5460 var l257 = {name: "JS-VREF"};
5461 (function(){
5462     var v637 = l47.fvalue(pv, l257, (function (values,v638){
5463         checkArgs(arguments, 2);
5464         return (function(){
5465             return v638;
5466         })();
5467     }));
5468     var v639 = ({car: v637, cdr: (function(){
5469         var symbol = l230;
5470         var value = symbol.value;
5471         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5472         return value;
5473     })()});
5474     return ((l230).value = v639);
5475 })();
5476 var l258 = {name: "JS-VSET"};
5477 (function(){
5478     var v640 = l47.fvalue(pv, l258, (function (values,v641,v642){
5479         checkArgs(arguments, 3);
5480         return (function(){
5481             return l191.fvalue(values, "(", v641, " = ", l193.fvalue(pv, v642), ")");
5482         })();
5483     }));
5484     var v643 = ({car: v640, cdr: (function(){
5485         var symbol = l230;
5486         var value = symbol.value;
5487         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5488         return value;
5489     })()});
5490     return ((l230).value = v643);
5491 })();
5492 (function(){
5493     (l167).fvalue = (function(v650){
5494         ((v650)["fname"] = "ESCAPE-STRING");
5495         return v650;
5496     })((function (values,v644){
5497         checkArgs(arguments, 2);
5498         return (function(){
5499             return (function(v645,v646,v647){
5500                 (function(){
5501                     return (function(){
5502                         while((function(){
5503                             var x1 = v646;
5504                             if (typeof x1 !== 'number') throw 'Not a number!';
5505                             var x2 = v647;
5506                             if (typeof x2 !== 'number') throw 'Not a number!';
5507                             return (x1<x2?l4.value: l5.value);
5508                         })() !== l5.value){
5509                             (function(v648){
5510                                 ((function(v649){
5511                                     return (v649 !== l5.value ? v649 : l88.fvalue(pv, v648, 92));
5512                                 })(l88.fvalue(pv, v648, 34)) !== l5.value ? (v645 = l157.fvalue(pv, v645, "\\")) : l5.value);
5513                                 (l88.fvalue(pv, v648, 10) !== l5.value ? (function(){
5514                                     (v645 = l157.fvalue(pv, v645, "\\"));
5515                                     return (v648 = 110);
5516                                 })() : l5.value);
5517                                 return (v645 = l157.fvalue(pv, v645, l107.fvalue(pv, v648)));
5518                             })((function(){
5519                                 var string = v644;
5520                                 var index = v646;
5521                                 if (typeof string != 'string')
5522                                     throw 'The value ' + string + ' is not a type string.';
5523                                 if (typeof index != 'number')
5524                                     throw 'The value ' + index + ' is not a type number.';
5525                                 return string.charCodeAt(index);
5526                             })());
5527                             (v646 = (function(){
5528                                 var x1 = v646;
5529                                 if (typeof x1 !== 'number') throw 'Not a number!';
5530                                 return x1+1;
5531                             })());
5532                         }return l5.value;
5533                     })();
5534                 })();
5535                 return v645;
5536             })("",0,l75.fvalue(pv, v644));
5537         })();
5538     }));
5539     return l167;
5540 })();
5541 var l259 = {name: "*LITERAL-SYMBOLS*"};
5542 (function(){
5543     (((l259.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l259).value = l5.value));
5544     return l259;
5545 })();
5546 var l260 = {name: "*LITERAL-COUNTER*"};
5547 (function(){
5548     (((l260.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l260).value = 0));
5549     return l260;
5550 })();
5551 var l261 = {name: "GENLIT"};
5552 (function(){
5553     (l261).fvalue = (function(v651){
5554         ((v651)["fname"] = "GENLIT");
5555         return v651;
5556     })((function (values){
5557         checkArgsAtMost(arguments, 1);
5558         return (function(){
5559             return l191.fvalue(values, "l", ((l260).value = (function(){
5560                 var x1 = (function(){
5561                     var symbol = l260;
5562                     var value = symbol.value;
5563                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5564                     return value;
5565                 })();
5566                 if (typeof x1 !== 'number') throw 'Not a number!';
5567                 return x1+1;
5568             })()));
5569         })();
5570     }));
5571     return l261;
5572 })();
5573 var l262 = {name: "LITERAL"};
5574 (function(){
5575     (l262).fvalue = (function(v668){
5576         ((v668)["fname"] = "LITERAL");
5577         return v668;
5578     })((function (values,v652,v653){
5579         checkArgsAtLeast(arguments, 2);
5580         checkArgsAtMost(arguments, 3);
5581         var v653;
5582         switch(arguments.length-1){
5583         case 1:
5584             v653=l5.value;
5585         default: break;
5586         }
5587         return (function(){
5588             return (l89.fvalue(pv, v652) !== l5.value ? l19.fvalue(values, v652) : (((typeof(v652) == "string")?l4.value: l5.value) !== l5.value ? l191.fvalue(values, "\"", l167.fvalue(pv, v652), "\"") : (((function(){
5589                 var tmp = v652;
5590                 return (typeof tmp == 'object' && 'name' in tmp);
5591             })()?l4.value: l5.value) !== l5.value ? (function(v654){
5592                 return (v654 !== l5.value ? v654 : (function(v656,v657){
5593                     (function(){
5594                         var v658 = ({car: v652, cdr: v656});
5595                         var v659 = ({car: v658, cdr: (function(){
5596                             var symbol = l259;
5597                             var value = symbol.value;
5598                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5599                             return value;
5600                         })()});
5601                         return ((l259).value = v659);
5602                     })();
5603                     l218.fvalue(pv, l191.fvalue(pv, "var ", v656, " = ", v657));
5604                     return v656;
5605                 })(l261.fvalue(pv),(function(v655){
5606                     return (l13.fvalue(pv, v655) !== l5.value ? l191.fvalue(pv, "{name: \"", l167.fvalue(pv, (v652).name), "\"}") : l193.fvalue(pv, l47.fvalue(pv, l153, (v652).name, l137.fvalue(pv, v655))));
5607                 })(l145.fvalue(pv, v652))));
5608             })((function(){
5609                 var tmp = l106.fvalue(pv, v652, (function(){
5610                     var symbol = l259;
5611                     var value = symbol.value;
5612                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5613                     return value;
5614                 })());
5615                 return tmp === l5.value? l5.value: tmp.cdr;
5616             })()) : (((function(){
5617                 var tmp = v652;
5618                 return (typeof tmp == 'object' && 'car' in tmp);
5619             })()?l4.value: l5.value) !== l5.value ? (function(){
5620                 var v660 = l95.fvalue(pv, v652);
5621                 var v661 = l94.fvalue(pv, v652);
5622                 var v662 = l191.fvalue(pv, "QIList(", l160.fvalue(pv, l81.fvalue(pv, (function (values,v663){
5623                     checkArgs(arguments, 2);
5624                     return l262.fvalue(values, v663, l4.value);
5625                 }), v660), ","), l262.fvalue(pv, (function(){
5626                     var tmp = v661;
5627                     return tmp === l5.value? l5.value: tmp.car;
5628                 })(), l4.value), ",", l262.fvalue(pv, (function(){
5629                     var tmp = v661;
5630                     return tmp === l5.value? l5.value: tmp.cdr;
5631                 })(), l4.value), ")");
5632                 return (v653 !== l5.value ? v662 : (function(v664){
5633                     l218.fvalue(pv, l191.fvalue(pv, "var ", v664, " = ", v662));
5634                     return v664;
5635                 })(l261.fvalue(pv)));
5636             })() : (((function(){
5637                 var x = v652;
5638                 return typeof x === 'object' && 'length' in x;
5639             })()?l4.value: l5.value) !== l5.value ? (function(v665){
5640                 return (function(v666){
5641                     return (v653 !== l5.value ? v666 : (function(v667){
5642                         l218.fvalue(pv, l191.fvalue(pv, "var ", v667, " = ", v666));
5643                         return v667;
5644                     })(l261.fvalue(pv)));
5645                 })(l157.fvalue(pv, "[", l159.fvalue(pv, l81.fvalue(pv, (function(){
5646                     var symbol = l262;
5647                     var func = symbol.fvalue;
5648                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5649                     return func;
5650                 })(), v665), ", "), "]"));
5651             })(l162.fvalue(pv, v652)) : l5.value)))));
5652         })();
5653     }));
5654     return l262;
5655 })();
5656 (function(){
5657     var v669 = l47.fvalue(pv, l186, (function (values,v670){
5658         checkArgs(arguments, 2);
5659         return (function(){
5660             return l262.fvalue(values, v670);
5661         })();
5662     }));
5663     var v671 = ({car: v669, cdr: (function(){
5664         var symbol = l230;
5665         var value = symbol.value;
5666         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5667         return value;
5668     })()});
5669     return ((l230).value = v671);
5670 })();
5671 var l263 = {name: "%WHILE"};
5672 (function(){
5673     var v672 = l47.fvalue(pv, l263, (function (values,v674){
5674         checkArgsAtLeast(arguments, 2);
5675         var v673= l5.value;
5676         for (var i = arguments.length-1; i>=2; i--)
5677             v673 = {car: arguments[i], cdr:
5678         v673};
5679         return (function(){
5680             return l191.fvalue(values, "(function(){", (function(){
5681                 var symbol = l156;
5682                 var value = symbol.value;
5683                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5684                 return value;
5685             })(), l195.fvalue(pv, "while(", l193.fvalue(pv, v674), " !== ", l193.fvalue(pv, l5.value), "){", (function(){
5686                 var symbol = l156;
5687                 var value = symbol.value;
5688                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5689                 return value;
5690             })(), l195.fvalue(pv, l254.fvalue(pv, v673)), "}", "return ", l193.fvalue(pv, l5.value), ";", (function(){
5691                 var symbol = l156;
5692                 var value = symbol.value;
5693                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5694                 return value;
5695             })()), "})()");
5696         })();
5697     }));
5698     var v675 = ({car: v672, cdr: (function(){
5699         var symbol = l230;
5700         var value = symbol.value;
5701         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5702         return value;
5703     })()});
5704     return ((l230).value = v675);
5705 })();
5706 var l264 = {name: "SYMBOL-FUNCTION"};
5707 (function(){
5708     var v676 = l47.fvalue(pv, l113, (function (values,v677){
5709         checkArgs(arguments, 2);
5710         return (function(){
5711             return ((l62.fvalue(pv, v677) !== l5.value ? (((function(){
5712                 var tmp = v677;
5713                 return tmp === l5.value? l5.value: tmp.car;
5714             })() === l6)?l4.value: l5.value) : l5.value) !== l5.value ? l253.fvalue(values, l35.fvalue(pv, v677), l37.fvalue(pv, v677)) : (((function(){
5715                 var tmp = v677;
5716                 return (typeof tmp == 'object' && 'name' in tmp);
5717             })()?l4.value: l5.value) !== l5.value ? (function(v678){
5718                 return (v678 !== l5.value ? l200.fvalue(values, v678) : l193.fvalue(values, l47.fvalue(pv, l264, l47.fvalue(pv, l186, v677))));
5719             })(l211.fvalue(pv, v677, (function(){
5720                 var symbol = l212;
5721                 var value = symbol.value;
5722                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5723                 return value;
5724             })(), l113)) : l5.value));
5725         })();
5726     }));
5727     var v679 = ({car: v676, cdr: (function(){
5728         var symbol = l230;
5729         var value = symbol.value;
5730         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5731         return value;
5732     })()});
5733     return ((l230).value = v679);
5734 })();
5735 var l265 = {name: "MAKE-FUNCTION-BINDING"};
5736 (function(){
5737     (l265).fvalue = (function(v681){
5738         ((v681)["fname"] = "MAKE-FUNCTION-BINDING");
5739         return v681;
5740     })((function (values,v680){
5741         checkArgs(arguments, 2);
5742         return (function(){
5743             return l197.fvalue(values, v680, l113, l214.fvalue(pv, v680));
5744         })();
5745     }));
5746     return l265;
5747 })();
5748 var l266 = {name: "COMPILE-FUNCTION-DEFINITION"};
5749 (function(){
5750     (l266).fvalue = (function(v683){
5751         ((v683)["fname"] = "COMPILE-FUNCTION-DEFINITION");
5752         return v683;
5753     })((function (values,v682){
5754         checkArgs(arguments, 2);
5755         return (function(){
5756             return l253.fvalue(values, (function(){
5757                 var tmp = v682;
5758                 return tmp === l5.value? l5.value: tmp.car;
5759             })(), (function(){
5760                 var tmp = v682;
5761                 return tmp === l5.value? l5.value: tmp.cdr;
5762             })());
5763         })();
5764     }));
5765     return l266;
5766 })();
5767 var l267 = {name: "TRANSLATE-FUNCTION"};
5768 (function(){
5769     (l267).fvalue = (function(v686){
5770         ((v686)["fname"] = "TRANSLATE-FUNCTION");
5771         return v686;
5772     })((function (values,v684){
5773         checkArgs(arguments, 2);
5774         return (function(){
5775             return (function(v685){
5776                 return l200.fvalue(values, v685);
5777             })(l211.fvalue(pv, v684, (function(){
5778                 var symbol = l212;
5779                 var value = symbol.value;
5780                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5781                 return value;
5782             })(), l113));
5783         })();
5784     }));
5785     return l267;
5786 })();
5787 var l268 = {name: "FLET"};
5788 (function(){
5789     var v687 = l47.fvalue(pv, l268, (function (values,v689){
5790         checkArgsAtLeast(arguments, 2);
5791         var v688= l5.value;
5792         for (var i = arguments.length-1; i>=2; i--)
5793             v688 = {car: arguments[i], cdr:
5794         v688};
5795         return (function(){
5796             return (function(){
5797                 try {
5798                     var v694 = l212.value;
5799                     var v690 = l81.fvalue(pv, (function(){
5800                         var symbol = l32;
5801                         var func = symbol.fvalue;
5802                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5803                         return func;
5804                     })(), v689);
5805                     var v691 = l81.fvalue(pv, (function(){
5806                         var symbol = l33;
5807                         var func = symbol.fvalue;
5808                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5809                         return func;
5810                     })(), v689);
5811                     var v692 = l81.fvalue(pv, (function(){
5812                         var symbol = l266;
5813                         var func = symbol.fvalue;
5814                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5815                         return func;
5816                     })(), v691);
5817                     ((l212).value = l210.fvalue(pv, l81.fvalue(pv, (function(){
5818                         var symbol = l265;
5819                         var func = symbol.fvalue;
5820                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5821                         return func;
5822                     })(), v690), (function(){
5823                         var symbol = l212;
5824                         var value = symbol.value;
5825                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5826                         return value;
5827                     })(), l113));
5828                     return l191.fvalue(values, "(function(", l159.fvalue(pv, l81.fvalue(pv, (function(){
5829                         var symbol = l267;
5830                         var func = symbol.fvalue;
5831                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5832                         return func;
5833                     })(), v690), ","), "){", (function(){
5834                         var symbol = l156;
5835                         var value = symbol.value;
5836                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5837                         return value;
5838                     })(), (function(v693){
5839                         return l195.fvalue(pv, v693);
5840                     })(l254.fvalue(pv, v688, l4.value)), "})(", l159.fvalue(pv, v692, ","), ")");
5841                 }
5842                 finally {
5843                     l212.value = v694;
5844                 }
5845             })();
5846         })();
5847     }));
5848     var v695 = ({car: v687, cdr: (function(){
5849         var symbol = l230;
5850         var value = symbol.value;
5851         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5852         return value;
5853     })()});
5854     return ((l230).value = v695);
5855 })();
5856 var l269 = {name: "LABELS"};
5857 (function(){
5858     var v696 = l47.fvalue(pv, l269, (function (values,v698){
5859         checkArgsAtLeast(arguments, 2);
5860         var v697= l5.value;
5861         for (var i = arguments.length-1; i>=2; i--)
5862             v697 = {car: arguments[i], cdr:
5863         v697};
5864         return (function(){
5865             return (function(){
5866                 try {
5867                     var v701 = l212.value;
5868                     var v699 = l81.fvalue(pv, (function(){
5869                         var symbol = l32;
5870                         var func = symbol.fvalue;
5871                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5872                         return func;
5873                     })(), v698);
5874                     ((l212).value = l210.fvalue(pv, l81.fvalue(pv, (function(){
5875                         var symbol = l265;
5876                         var func = symbol.fvalue;
5877                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5878                         return func;
5879                     })(), v699), (function(){
5880                         var symbol = l212;
5881                         var value = symbol.value;
5882                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5883                         return value;
5884                     })(), l113));
5885                     return l191.fvalue(values, "(function(){", (function(){
5886                         var symbol = l156;
5887                         var value = symbol.value;
5888                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5889                         return value;
5890                     })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v700){
5891                         checkArgs(arguments, 2);
5892                         return l191.fvalue(values, "var ", l267.fvalue(pv, (function(){
5893                             var tmp = v700;
5894                             return tmp === l5.value? l5.value: tmp.car;
5895                         })()), " = ", l253.fvalue(pv, l35.fvalue(pv, v700), l37.fvalue(pv, v700)), ";", (function(){
5896                             var symbol = l156;
5897                             var value = symbol.value;
5898                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5899                             return value;
5900                         })());
5901                     }), v698), l254.fvalue(pv, v697, l4.value)), "})()");
5902                 }
5903                 finally {
5904                     l212.value = v701;
5905                 }
5906             })();
5907         })();
5908     }));
5909     var v702 = ({car: v696, cdr: (function(){
5910         var symbol = l230;
5911         var value = symbol.value;
5912         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5913         return value;
5914     })()});
5915     return ((l230).value = v702);
5916 })();
5917 var l270 = {name: "*COMPILING-FILE*"};
5918 (function(){
5919     (((l270.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l270).value = l5.value));
5920     return l270;
5921 })();
5922 var l271 = {name: "EVAL-WHEN-COMPILE"};
5923 var l272 = {name: "EVAL"};
5924 (function(){
5925     var v703 = l47.fvalue(pv, l271, (function (values){
5926         var v704= l5.value;
5927         for (var i = arguments.length-1; i>=1; i--)
5928             v704 = {car: arguments[i], cdr:
5929         v704};
5930         return (function(){
5931             return ((function(){
5932                 var symbol = l270;
5933                 var value = symbol.value;
5934                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5935                 return value;
5936             })() !== l5.value ? (function(){
5937                 l272.fvalue(pv, ({car: l123, cdr: v704}));
5938                 return l5.value;
5939             })() : l193.fvalue(values, ({car: l123, cdr: v704})));
5940         })();
5941     }));
5942     var v705 = ({car: v703, cdr: (function(){
5943         var symbol = l230;
5944         var value = symbol.value;
5945         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5946         return value;
5947     })()});
5948     return ((l230).value = v705);
5949 })();
5950 var l273 = {name: "DEFINE-TRANSFORMATION"};
5951 l273;
5952 (function(){
5953     var v706 = l47.fvalue(pv, l123, (function (values){
5954         var v707= l5.value;
5955         for (var i = arguments.length-1; i>=1; i--)
5956             v707 = {car: arguments[i], cdr:
5957         v707};
5958         return (function(){
5959             return (l13.fvalue(pv, (function(){
5960                 var tmp = v707;
5961                 return tmp === l5.value? l5.value: tmp.cdr;
5962             })()) !== l5.value ? l193.fvalue(values, (function(){
5963                 var tmp = v707;
5964                 return tmp === l5.value? l5.value: tmp.car;
5965             })(), (function(){
5966                 var symbol = l196;
5967                 var value = symbol.value;
5968                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5969                 return value;
5970             })()) : l191.fvalue(values, "(function(){", (function(){
5971                 var symbol = l156;
5972                 var value = symbol.value;
5973                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5974                 return value;
5975             })(), l195.fvalue(pv, l254.fvalue(pv, v707, l4.value)), "})()"));
5976         })();
5977     }));
5978     var v708 = ({car: v706, cdr: (function(){
5979         var symbol = l230;
5980         var value = symbol.value;
5981         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5982         return value;
5983     })()});
5984     return ((l230).value = v708);
5985 })();
5986 var l274 = {name: "SPECIAL-VARIABLE-P"};
5987 (function(){
5988     (l274).fvalue = (function(v710){
5989         ((v710)["fname"] = "SPECIAL-VARIABLE-P");
5990         return v710;
5991     })((function (values,v709){
5992         checkArgs(arguments, 2);
5993         return (function(){
5994             return (l224.fvalue(pv, v709, l114, l226) !== l5.value ? l4.value : l5.value);
5995         })();
5996     }));
5997     return l274;
5998 })();
5999 var l275 = {name: "LET-BINDING-WRAPPER"};
6000 (function(){
6001     (l275).fvalue = (function(v717){
6002         ((v717)["fname"] = "LET-BINDING-WRAPPER");
6003         return v717;
6004     })((function (values,v711,v712){
6005         checkArgs(arguments, 3);
6006         return (function(){
6007             try {
6008                 (l13.fvalue(pv, v711) !== l5.value ? (function(){
6009                     var values = mv;
6010                     throw ({type: 'block', id: 233, values: v712, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
6011                 })() : l5.value);
6012                 return l191.fvalue(values, "try {", (function(){
6013                     var symbol = l156;
6014                     var value = symbol.value;
6015                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6016                     return value;
6017                 })(), l195.fvalue(pv, "var tmp;", (function(){
6018                     var symbol = l156;
6019                     var value = symbol.value;
6020                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6021                     return value;
6022                 })(), l161.fvalue(pv, (function (values,v713){
6023                     checkArgs(arguments, 2);
6024                     return (function(v714){
6025                         return l191.fvalue(values, "tmp = ", v714, ".value;", (function(){
6026                             var symbol = l156;
6027                             var value = symbol.value;
6028                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6029                             return value;
6030                         })(), v714, ".value = ", (function(){
6031                             var tmp = v713;
6032                             return tmp === l5.value? l5.value: tmp.cdr;
6033                         })(), ";", (function(){
6034                             var symbol = l156;
6035                             var value = symbol.value;
6036                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6037                             return value;
6038                         })(), (function(){
6039                             var tmp = v713;
6040                             return tmp === l5.value? l5.value: tmp.cdr;
6041                         })(), " = tmp;", (function(){
6042                             var symbol = l156;
6043                             var value = symbol.value;
6044                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6045                             return value;
6046                         })());
6047                     })(l193.fvalue(pv, l47.fvalue(pv, l186, (function(){
6048                         var tmp = v713;
6049                         return tmp === l5.value? l5.value: tmp.car;
6050                     })())));
6051                 }), v711), v712, (function(){
6052                     var symbol = l156;
6053                     var value = symbol.value;
6054                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6055                     return value;
6056                 })()), "}", (function(){
6057                     var symbol = l156;
6058                     var value = symbol.value;
6059                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6060                     return value;
6061                 })(), "finally {", (function(){
6062                     var symbol = l156;
6063                     var value = symbol.value;
6064                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6065                     return value;
6066                 })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v715){
6067                     checkArgs(arguments, 2);
6068                     return (function(v716){
6069                         return l191.fvalue(values, v716, ".value", " = ", (function(){
6070                             var tmp = v715;
6071                             return tmp === l5.value? l5.value: tmp.cdr;
6072                         })(), ";", (function(){
6073                             var symbol = l156;
6074                             var value = symbol.value;
6075                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6076                             return value;
6077                         })());
6078                     })(l193.fvalue(pv, l47.fvalue(pv, l186, (function(){
6079                         var tmp = v715;
6080                         return tmp === l5.value? l5.value: tmp.car;
6081                     })())));
6082                 }), v711)), "}", (function(){
6083                     var symbol = l156;
6084                     var value = symbol.value;
6085                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6086                     return value;
6087                 })());
6088             }
6089             catch (cf){
6090                 if (cf.type == 'block' && cf.id == 233)
6091                     return values.apply(this, forcemv(cf.values));
6092                 else
6093                     throw cf;
6094             }
6095         })();
6096     }));
6097     return l275;
6098 })();
6099 var l276 = {name: "LET"};
6100 (function(){
6101     var v718 = l47.fvalue(pv, l276, (function (values,v720){
6102         checkArgsAtLeast(arguments, 2);
6103         var v719= l5.value;
6104         for (var i = arguments.length-1; i>=2; i--)
6105             v719 = {car: arguments[i], cdr:
6106         v719};
6107         return (function(){
6108             return (function(){
6109                 try {
6110                     var v730 = l212.value;
6111                     var v721 = l81.fvalue(pv, (function(){
6112                         var symbol = l61;
6113                         var func = symbol.fvalue;
6114                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6115                         return func;
6116                     })(), v720);
6117                     var v722 = l81.fvalue(pv, (function(){
6118                         var symbol = l42;
6119                         var func = symbol.fvalue;
6120                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6121                         return func;
6122                     })(), v721);
6123                     var v723 = l81.fvalue(pv, (function(){
6124                         var symbol = l193;
6125                         var func = symbol.fvalue;
6126                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6127                         return func;
6128                     })(), l81.fvalue(pv, (function(){
6129                         var symbol = l43;
6130                         var func = symbol.fvalue;
6131                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6132                         return func;
6133                     })(), v721));
6134                     ((l212).value = l216.fvalue(pv, l98.fvalue(pv, (function(){
6135                         var symbol = l274;
6136                         var func = symbol.fvalue;
6137                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6138                         return func;
6139                     })(), v722)));
6140                     var v724 = l5.value;
6141                     return l191.fvalue(values, "(function(", l159.fvalue(pv, l81.fvalue(pv, (function (values,v725){
6142                         checkArgs(arguments, 2);
6143                         return (l274.fvalue(pv, v725) !== l5.value ? (function(v726){
6144                             (function(){
6145                                 var v727 = ({car: v725, cdr: v726});
6146                                 var v728 = ({car: v727, cdr: v724});
6147                                 return (v724 = v728);
6148                             })();
6149                             return v726;
6150                         })(l214.fvalue(pv, v725)) : l215.fvalue(values, v725));
6151                     }), v722), ","), "){", (function(){
6152                         var symbol = l156;
6153                         var value = symbol.value;
6154                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6155                         return value;
6156                     })(), (function(v729){
6157                         return l195.fvalue(pv, l275.fvalue(pv, v724, v729));
6158                     })(l254.fvalue(pv, v719, l4.value)), "})(", l159.fvalue(pv, v723, ","), ")");
6159                 }
6160                 finally {
6161                     l212.value = v730;
6162                 }
6163             })();
6164         })();
6165     }));
6166     var v731 = ({car: v718, cdr: (function(){
6167         var symbol = l230;
6168         var value = symbol.value;
6169         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6170         return value;
6171     })()});
6172     return ((l230).value = v731);
6173 })();
6174 var l277 = {name: "LET*-INITIALIZE-VALUE"};
6175 (function(){
6176     (l277).fvalue = (function(v738){
6177         ((v738)["fname"] = "LET*-INITIALIZE-VALUE");
6178         return v738;
6179     })((function (values,v732){
6180         checkArgs(arguments, 2);
6181         return (function(){
6182             return (function(v733,v734){
6183                 return (l274.fvalue(pv, v733) !== l5.value ? l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l119, v733, v734)), ";", (function(){
6184                     var symbol = l156;
6185                     var value = symbol.value;
6186                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6187                     return value;
6188                 })()) : (function(){
6189                     var v735 = l214.fvalue(pv, v733);
6190                     var v736 = l197.fvalue(pv, v733, l114, v735);
6191                     return (function(v737){
6192                         l207.fvalue(pv, v736, (function(){
6193                             var symbol = l212;
6194                             var value = symbol.value;
6195                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6196                             return value;
6197                         })(), l114);
6198                         return v737;
6199                     })(l191.fvalue(pv, "var ", v735, " = ", l193.fvalue(pv, v734), ";", (function(){
6200                         var symbol = l156;
6201                         var value = symbol.value;
6202                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6203                         return value;
6204                     })()));
6205                 })());
6206             })(l42.fvalue(pv, v732),l43.fvalue(pv, v732));
6207         })();
6208     }));
6209     return l277;
6210 })();
6211 var l278 = {name: "LET*-BINDING-WRAPPER"};
6212 (function(){
6213     (l278).fvalue = (function(v747){
6214         ((v747)["fname"] = "LET*-BINDING-WRAPPER");
6215         return v747;
6216     })((function (values,v739,v740){
6217         checkArgs(arguments, 3);
6218         return (function(){
6219             try {
6220                 (l13.fvalue(pv, v739) !== l5.value ? (function(){
6221                     var values = mv;
6222                     throw ({type: 'block', id: 236, values: v740, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
6223                 })() : l5.value);
6224                 return (function(v742){
6225                     return l191.fvalue(values, "try {", (function(){
6226                         var symbol = l156;
6227                         var value = symbol.value;
6228                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6229                         return value;
6230                     })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v743){
6231                         checkArgs(arguments, 2);
6232                         return (function(v744){
6233                             return l191.fvalue(values, "var ", (function(){
6234                                 var tmp = v743;
6235                                 return tmp === l5.value? l5.value: tmp.cdr;
6236                             })(), " = ", v744, ".value;", (function(){
6237                                 var symbol = l156;
6238                                 var value = symbol.value;
6239                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6240                                 return value;
6241                             })());
6242                         })(l193.fvalue(pv, l47.fvalue(pv, l186, (function(){
6243                             var tmp = v743;
6244                             return tmp === l5.value? l5.value: tmp.car;
6245                         })())));
6246                     }), v742), v740), "}", (function(){
6247                         var symbol = l156;
6248                         var value = symbol.value;
6249                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6250                         return value;
6251                     })(), "finally {", (function(){
6252                         var symbol = l156;
6253                         var value = symbol.value;
6254                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6255                         return value;
6256                     })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v745){
6257                         checkArgs(arguments, 2);
6258                         return (function(v746){
6259                             return l191.fvalue(values, v746, ".value", " = ", (function(){
6260                                 var tmp = v745;
6261                                 return tmp === l5.value? l5.value: tmp.cdr;
6262                             })(), ";", (function(){
6263                                 var symbol = l156;
6264                                 var value = symbol.value;
6265                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6266                                 return value;
6267                             })());
6268                         })(l193.fvalue(pv, l47.fvalue(pv, l186, (function(){
6269                             var tmp = v745;
6270                             return tmp === l5.value? l5.value: tmp.car;
6271                         })())));
6272                     }), v742)), "}", (function(){
6273                         var symbol = l156;
6274                         var value = symbol.value;
6275                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6276                         return value;
6277                     })());
6278                 })(l81.fvalue(pv, (function (values,v741){
6279                     checkArgs(arguments, 2);
6280                     return ({car: v741, cdr: l214.fvalue(pv, v741)});
6281                 }), l99.fvalue(pv, (function(){
6282                     var symbol = l274;
6283                     var func = symbol.fvalue;
6284                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6285                     return func;
6286                 })(), v739)));
6287             }
6288             catch (cf){
6289                 if (cf.type == 'block' && cf.id == 236)
6290                     return values.apply(this, forcemv(cf.values));
6291                 else
6292                     throw cf;
6293             }
6294         })();
6295     }));
6296     return l278;
6297 })();
6298 var l279 = {name: "LET*"};
6299 (function(){
6300     var v748 = l47.fvalue(pv, l279, (function (values,v750){
6301         checkArgsAtLeast(arguments, 2);
6302         var v749= l5.value;
6303         for (var i = arguments.length-1; i>=2; i--)
6304             v749 = {car: arguments[i], cdr:
6305         v749};
6306         return (function(){
6307             return (function(v751,v752){
6308                 try {
6309                     var tmp;
6310                     tmp = l212.value;
6311                     l212.value = v752;
6312                     v752 = tmp;
6313                     return l191.fvalue(values, "(function(){", (function(){
6314                         var symbol = l156;
6315                         var value = symbol.value;
6316                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6317                         return value;
6318                     })(), l195.fvalue(pv, (function(v753,v754){
6319                         return l278.fvalue(pv, v753, v754);
6320                     })(l99.fvalue(pv, (function(){
6321                         var symbol = l274;
6322                         var func = symbol.fvalue;
6323                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6324                         return func;
6325                     })(), l81.fvalue(pv, (function(){
6326                         var symbol = l42;
6327                         var func = symbol.fvalue;
6328                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6329                         return func;
6330                     })(), v751)),l157.fvalue(pv, l161.fvalue(pv, (function(){
6331                         var symbol = l277;
6332                         var func = symbol.fvalue;
6333                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6334                         return func;
6335                     })(), v751), l254.fvalue(pv, v749, l4.value)))), "})()");
6336                 }
6337                 finally {
6338                     l212.value = v752;
6339                 }
6340             })(l81.fvalue(pv, (function(){
6341                 var symbol = l61;
6342                 var func = symbol.fvalue;
6343                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6344                 return func;
6345             })(), v750),l206.fvalue(pv, (function(){
6346                 var symbol = l212;
6347                 var value = symbol.value;
6348                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6349                 return value;
6350             })()));
6351         })();
6352     }));
6353     var v755 = ({car: v748, cdr: (function(){
6354         var symbol = l230;
6355         var value = symbol.value;
6356         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6357         return value;
6358     })()});
6359     return ((l230).value = v755);
6360 })();
6361 var l280 = {name: "*BLOCK-COUNTER*"};
6362 (function(){
6363     (((l280.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l280).value = 0));
6364     return l280;
6365 })();
6366 var l281 = {name: "MULTIPLE-VALUE"};
6367 var l282 = {name: "USED"};
6368 (function(){
6369     var v756 = l47.fvalue(pv, l208, (function (values,v758){
6370         checkArgsAtLeast(arguments, 2);
6371         var v757= l5.value;
6372         for (var i = arguments.length-1; i>=2; i--)
6373             v757 = {car: arguments[i], cdr:
6374         v757};
6375         return (function(){
6376             return (function(){
6377                 var v759 = ((l280).value = (function(){
6378                     var x1 = (function(){
6379                         var symbol = l280;
6380                         var value = symbol.value;
6381                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6382                         return value;
6383                     })();
6384                     if (typeof x1 !== 'number') throw 'Not a number!';
6385                     return x1+1;
6386                 })());
6387                 var v760 = l197.fvalue(pv, v758, l208, v759);
6388                 ((function(){
6389                     var symbol = l196;
6390                     var value = symbol.value;
6391                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6392                     return value;
6393                 })() !== l5.value ? l204.fvalue(pv, l281, v760) : l5.value);
6394                 return (function(){
6395                     try {
6396                         var v762 = l212.value;
6397                         ((l212).value = l210.fvalue(pv, l47.fvalue(pv, v760), (function(){
6398                             var symbol = l212;
6399                             var value = symbol.value;
6400                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6401                             return value;
6402                         })(), l208));
6403                         var v761 = l254.fvalue(pv, v757, l4.value);
6404                         return (l96.fvalue(pv, l282, l201.fvalue(pv, v760)) !== l5.value ? l191.fvalue(values, "(function(){", (function(){
6405                             var symbol = l156;
6406                             var value = symbol.value;
6407                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6408                             return value;
6409                         })(), l195.fvalue(pv, "try {", (function(){
6410                             var symbol = l156;
6411                             var value = symbol.value;
6412                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6413                             return value;
6414                         })(), l195.fvalue(pv, v761), "}", (function(){
6415                             var symbol = l156;
6416                             var value = symbol.value;
6417                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6418                             return value;
6419                         })(), "catch (cf){", (function(){
6420                             var symbol = l156;
6421                             var value = symbol.value;
6422                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6423                             return value;
6424                         })(), "    if (cf.type == 'block' && cf.id == ", v759, ")", (function(){
6425                             var symbol = l156;
6426                             var value = symbol.value;
6427                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6428                             return value;
6429                         })(), ((function(){
6430                             var symbol = l196;
6431                             var value = symbol.value;
6432                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6433                             return value;
6434                         })() !== l5.value ? "        return values.apply(this, forcemv(cf.values));" : "        return cf.values;"), (function(){
6435                             var symbol = l156;
6436                             var value = symbol.value;
6437                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6438                             return value;
6439                         })(), "    else", (function(){
6440                             var symbol = l156;
6441                             var value = symbol.value;
6442                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6443                             return value;
6444                         })(), "        throw cf;", (function(){
6445                             var symbol = l156;
6446                             var value = symbol.value;
6447                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6448                             return value;
6449                         })(), "}", (function(){
6450                             var symbol = l156;
6451                             var value = symbol.value;
6452                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6453                             return value;
6454                         })()), "})()") : l191.fvalue(values, "(function(){", (function(){
6455                             var symbol = l156;
6456                             var value = symbol.value;
6457                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6458                             return value;
6459                         })(), l195.fvalue(pv, v761), "})()"));
6460                     }
6461                     finally {
6462                         l212.value = v762;
6463                     }
6464                 })();
6465             })();
6466         })();
6467     }));
6468     var v763 = ({car: v756, cdr: (function(){
6469         var symbol = l230;
6470         var value = symbol.value;
6471         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6472         return value;
6473     })()});
6474     return ((l230).value = v763);
6475 })();
6476 var l283 = {name: "RETURN-FROM"};
6477 (function(){
6478     var v764 = l47.fvalue(pv, l283, (function (values,v765,v766){
6479         checkArgsAtLeast(arguments, 2);
6480         checkArgsAtMost(arguments, 3);
6481         var v766;
6482         switch(arguments.length-1){
6483         case 1:
6484             v766=l5.value;
6485         default: break;
6486         }
6487         return (function(){
6488             return (function(){
6489                 var v767 = l211.fvalue(pv, v765, (function(){
6490                     var symbol = l212;
6491                     var value = symbol.value;
6492                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6493                     return value;
6494                 })(), l208);
6495                 var v768 = l96.fvalue(pv, l281, l201.fvalue(pv, v767));
6496                 (l13.fvalue(pv, v767) !== l5.value ? (function(){
6497                     throw l157.fvalue(pv, "Unknown block `", (v765).name, "'.");
6498                 })() : l5.value);
6499                 l204.fvalue(pv, l282, v767);
6500                 return l191.fvalue(values, "(function(){", (function(){
6501                     var symbol = l156;
6502                     var value = symbol.value;
6503                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6504                     return value;
6505                 })(), l195.fvalue(pv, (v768 !== l5.value ? l191.fvalue(pv, "var values = mv;", (function(){
6506                     var symbol = l156;
6507                     var value = symbol.value;
6508                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6509                     return value;
6510                 })()) : l5.value), "throw ({", "type: 'block', ", "id: ", l200.fvalue(pv, v767), ", ", "values: ", l193.fvalue(pv, v766, v768), ", ", "message: 'Return from unknown block ", (v765).name, ".'", "})"), "})()");
6511             })();
6512         })();
6513     }));
6514     var v769 = ({car: v764, cdr: (function(){
6515         var symbol = l230;
6516         var value = symbol.value;
6517         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6518         return value;
6519     })()});
6520     return ((l230).value = v769);
6521 })();
6522 var l284 = {name: "CATCH"};
6523 (function(){
6524     var v770 = l47.fvalue(pv, l284, (function (values,v772){
6525         checkArgsAtLeast(arguments, 2);
6526         var v771= l5.value;
6527         for (var i = arguments.length-1; i>=2; i--)
6528             v771 = {car: arguments[i], cdr:
6529         v771};
6530         return (function(){
6531             return l191.fvalue(values, "(function(){", (function(){
6532                 var symbol = l156;
6533                 var value = symbol.value;
6534                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6535                 return value;
6536             })(), l195.fvalue(pv, "var id = ", l193.fvalue(pv, v772), ";", (function(){
6537                 var symbol = l156;
6538                 var value = symbol.value;
6539                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6540                 return value;
6541             })(), "try {", (function(){
6542                 var symbol = l156;
6543                 var value = symbol.value;
6544                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6545                 return value;
6546             })(), l195.fvalue(pv, l254.fvalue(pv, v771, l4.value)), (function(){
6547                 var symbol = l156;
6548                 var value = symbol.value;
6549                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6550                 return value;
6551             })(), "}", (function(){
6552                 var symbol = l156;
6553                 var value = symbol.value;
6554                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6555                 return value;
6556             })(), "catch (cf){", (function(){
6557                 var symbol = l156;
6558                 var value = symbol.value;
6559                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6560                 return value;
6561             })(), "    if (cf.type == 'catch' && cf.id == id)", (function(){
6562                 var symbol = l156;
6563                 var value = symbol.value;
6564                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6565                 return value;
6566             })(), ((function(){
6567                 var symbol = l196;
6568                 var value = symbol.value;
6569                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6570                 return value;
6571             })() !== l5.value ? "        return values.apply(this, forcemv(cf.values));" : "        return pv.apply(this, forcemv(cf.values));"), (function(){
6572                 var symbol = l156;
6573                 var value = symbol.value;
6574                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6575                 return value;
6576             })(), "    else", (function(){
6577                 var symbol = l156;
6578                 var value = symbol.value;
6579                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6580                 return value;
6581             })(), "        throw cf;", (function(){
6582                 var symbol = l156;
6583                 var value = symbol.value;
6584                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6585                 return value;
6586             })(), "}", (function(){
6587                 var symbol = l156;
6588                 var value = symbol.value;
6589                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6590                 return value;
6591             })()), "})()");
6592         })();
6593     }));
6594     var v773 = ({car: v770, cdr: (function(){
6595         var symbol = l230;
6596         var value = symbol.value;
6597         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6598         return value;
6599     })()});
6600     return ((l230).value = v773);
6601 })();
6602 var l285 = {name: "THROW"};
6603 (function(){
6604     var v774 = l47.fvalue(pv, l285, (function (values,v775,v776){
6605         checkArgs(arguments, 3);
6606         return (function(){
6607             return l191.fvalue(values, "(function(){", (function(){
6608                 var symbol = l156;
6609                 var value = symbol.value;
6610                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6611                 return value;
6612             })(), l195.fvalue(pv, "var values = mv;", (function(){
6613                 var symbol = l156;
6614                 var value = symbol.value;
6615                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6616                 return value;
6617             })(), "throw ({", "type: 'catch', ", "id: ", l193.fvalue(pv, v775), ", ", "values: ", l193.fvalue(pv, v776, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
6618         })();
6619     }));
6620     var v777 = ({car: v774, cdr: (function(){
6621         var symbol = l230;
6622         var value = symbol.value;
6623         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6624         return value;
6625     })()});
6626     return ((l230).value = v777);
6627 })();
6628 var l286 = {name: "*TAGBODY-COUNTER*"};
6629 (function(){
6630     (((l286.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l286).value = 0));
6631     return l286;
6632 })();
6633 var l287 = {name: "*GO-TAG-COUNTER*"};
6634 (function(){
6635     (((l287.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l287).value = 0));
6636     return l287;
6637 })();
6638 var l288 = {name: "GO-TAG-P"};
6639 (function(){
6640     (l288).fvalue = (function(v780){
6641         ((v780)["fname"] = "GO-TAG-P");
6642         return v780;
6643     })((function (values,v778){
6644         checkArgs(arguments, 2);
6645         return (function(){
6646             return (function(v779){
6647                 return (v779 !== l5.value ? v779 : ((function(){
6648                     var tmp = v778;
6649                     return (typeof tmp == 'object' && 'name' in tmp);
6650                 })()?l4.value: l5.value));
6651             })(l89.fvalue(pv, v778));
6652         })();
6653     }));
6654     return l288;
6655 })();
6656 var l289 = {name: "DECLARE-TAGBODY-TAGS"};
6657 (function(){
6658     (l289).fvalue = (function(v786){
6659         ((v786)["fname"] = "DECLARE-TAGBODY-TAGS");
6660         return v786;
6661     })((function (values,v781,v782){
6662         checkArgs(arguments, 3);
6663         return (function(){
6664             return (function(v785){
6665                 return l210.fvalue(values, v785, (function(){
6666                     var symbol = l212;
6667                     var value = symbol.value;
6668                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6669                     return value;
6670                 })(), l209);
6671             })(l81.fvalue(pv, (function (values,v783){
6672                 checkArgs(arguments, 2);
6673                 return (function(v784){
6674                     return l197.fvalue(values, v783, l209, l47.fvalue(pv, v781, v784));
6675                 })(l19.fvalue(pv, ((l287).value = (function(){
6676                     var x1 = (function(){
6677                         var symbol = l287;
6678                         var value = symbol.value;
6679                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6680                         return value;
6681                     })();
6682                     if (typeof x1 !== 'number') throw 'Not a number!';
6683                     return x1+1;
6684                 })())));
6685             }), l99.fvalue(pv, (function(){
6686                 var symbol = l288;
6687                 var func = symbol.fvalue;
6688                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6689                 return func;
6690             })(), v782)));
6691         })();
6692     }));
6693     return l289;
6694 })();
6695 var l290 = {name: "TAGBODY"};
6696 var l291 = QIList(l5,l5);
6697 (function(){
6698     var v787 = l47.fvalue(pv, l290, (function (values){
6699         var v788= l5.value;
6700         for (var i = arguments.length-1; i>=1; i--)
6701             v788 = {car: arguments[i], cdr:
6702         v788};
6703         return (function(){
6704             try {
6705                 (l104.fvalue(pv, (function(){
6706                     var symbol = l288;
6707                     var func = symbol.fvalue;
6708                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6709                     return func;
6710                 })(), v788) !== l5.value ? l5.value : (function(){
6711                     var values = mv;
6712                     throw ({type: 'block', id: 244, values: l193.fvalue(values, ({car: l123, cdr: l68.fvalue(pv, v788, l291)})), message: 'Return from unknown block TAGBODY.'})
6713                 })());
6714                 (l288.fvalue(pv, (function(){
6715                     var tmp = v788;
6716                     return tmp === l5.value? l5.value: tmp.car;
6717                 })()) !== l5.value ? l5.value : (function(){
6718                     var v789 = l18.fvalue(pv, "START");
6719                     var v790 = ({car: v789, cdr: v788});
6720                     return (v788 = v790);
6721                 })());
6722                 return (function(v791){
6723                     return (function(v793,v792){
6724                         try {
6725                             var tmp;
6726                             tmp = l212.value;
6727                             l212.value = v793;
6728                             v793 = tmp;
6729                             (function(v794){
6730                                 return (v792 = l43.fvalue(pv, l200.fvalue(pv, v794)));
6731                             })(l211.fvalue(pv, l42.fvalue(pv, v788), (function(){
6732                                 var symbol = l212;
6733                                 var value = symbol.value;
6734                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6735                                 return value;
6736                             })(), l209));
6737                             return l191.fvalue(values, "(function(){", (function(){
6738                                 var symbol = l156;
6739                                 var value = symbol.value;
6740                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6741                                 return value;
6742                             })(), l195.fvalue(pv, "var tagbody_", v791, " = ", v792, ";", (function(){
6743                                 var symbol = l156;
6744                                 var value = symbol.value;
6745                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6746                                 return value;
6747                             })(), "tbloop:", (function(){
6748                                 var symbol = l156;
6749                                 var value = symbol.value;
6750                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6751                                 return value;
6752                             })(), "while (true) {", (function(){
6753                                 var symbol = l156;
6754                                 var value = symbol.value;
6755                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6756                                 return value;
6757                             })(), l195.fvalue(pv, "try {", (function(){
6758                                 var symbol = l156;
6759                                 var value = symbol.value;
6760                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6761                                 return value;
6762                             })(), l195.fvalue(pv, (function(v795){
6763                                 return l191.fvalue(pv, "switch(tagbody_", v791, "){", (function(){
6764                                     var symbol = l156;
6765                                     var value = symbol.value;
6766                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6767                                     return value;
6768                                 })(), "case ", v792, ":", (function(){
6769                                     var symbol = l156;
6770                                     var value = symbol.value;
6771                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6772                                     return value;
6773                                 })(), (function(){
6774                                     return (function(v796,v797){
6775                                         (function(){
6776                                             while(v796 !== l5.value){
6777                                                 (v797 = (function(){
6778                                                     var tmp = v796;
6779                                                     return tmp === l5.value? l5.value: tmp.car;
6780                                                 })());
6781                                                 (function(){
6782                                                     (v795 = l157.fvalue(pv, v795, (l29.fvalue(pv, l288.fvalue(pv, v797)) !== l5.value ? l195.fvalue(pv, l193.fvalue(pv, v797), ";", (function(){
6783                                                         var symbol = l156;
6784                                                         var value = symbol.value;
6785                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6786                                                         return value;
6787                                                     })()) : (function(v798){
6788                                                         return l191.fvalue(pv, "case ", l43.fvalue(pv, l200.fvalue(pv, v798)), ":", (function(){
6789                                                             var symbol = l156;
6790                                                             var value = symbol.value;
6791                                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6792                                                             return value;
6793                                                         })());
6794                                                     })(l211.fvalue(pv, v797, (function(){
6795                                                         var symbol = l212;
6796                                                         var value = symbol.value;
6797                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6798                                                         return value;
6799                                                     })(), l209)))));
6800                                                     return l5.value;
6801                                                 })();
6802                                                 (v796 = (function(){
6803                                                     var tmp = v796;
6804                                                     return tmp === l5.value? l5.value: tmp.cdr;
6805                                                 })());
6806                                             }return l5.value;
6807                                         })();
6808                                         return v795;
6809                                     })((function(){
6810                                         var tmp = v788;
6811                                         return tmp === l5.value? l5.value: tmp.cdr;
6812                                     })(),l5.value);
6813                                 })(), "default:", (function(){
6814                                     var symbol = l156;
6815                                     var value = symbol.value;
6816                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6817                                     return value;
6818                                 })(), "    break tbloop;", (function(){
6819                                     var symbol = l156;
6820                                     var value = symbol.value;
6821                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6822                                     return value;
6823                                 })(), "}", (function(){
6824                                     var symbol = l156;
6825                                     var value = symbol.value;
6826                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6827                                     return value;
6828                                 })());
6829                             })("")), "}", (function(){
6830                                 var symbol = l156;
6831                                 var value = symbol.value;
6832                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6833                                 return value;
6834                             })(), "catch (jump) {", (function(){
6835                                 var symbol = l156;
6836                                 var value = symbol.value;
6837                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6838                                 return value;
6839                             })(), "    if (jump.type == 'tagbody' && jump.id == ", v791, ")", (function(){
6840                                 var symbol = l156;
6841                                 var value = symbol.value;
6842                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6843                                 return value;
6844                             })(), "        tagbody_", v791, " = jump.label;", (function(){
6845                                 var symbol = l156;
6846                                 var value = symbol.value;
6847                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6848                                 return value;
6849                             })(), "    else", (function(){
6850                                 var symbol = l156;
6851                                 var value = symbol.value;
6852                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6853                                 return value;
6854                             })(), "        throw(jump);", (function(){
6855                                 var symbol = l156;
6856                                 var value = symbol.value;
6857                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6858                                 return value;
6859                             })(), "}", (function(){
6860                                 var symbol = l156;
6861                                 var value = symbol.value;
6862                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6863                                 return value;
6864                             })()), "}", (function(){
6865                                 var symbol = l156;
6866                                 var value = symbol.value;
6867                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6868                                 return value;
6869                             })(), "return ", l193.fvalue(pv, l5.value), ";", (function(){
6870                                 var symbol = l156;
6871                                 var value = symbol.value;
6872                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6873                                 return value;
6874                             })()), "})()");
6875                         }
6876                         finally {
6877                             l212.value = v793;
6878                         }
6879                     })(l289.fvalue(pv, v791, v788),l5.value);
6880                 })((function(){
6881                     var symbol = l286;
6882                     var value = symbol.value;
6883                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6884                     return value;
6885                 })());
6886             }
6887             catch (cf){
6888                 if (cf.type == 'block' && cf.id == 244)
6889                     return values.apply(this, forcemv(cf.values));
6890                 else
6891                     throw cf;
6892             }
6893         })();
6894     }));
6895     var v799 = ({car: v787, cdr: (function(){
6896         var symbol = l230;
6897         var value = symbol.value;
6898         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6899         return value;
6900     })()});
6901     return ((l230).value = v799);
6902 })();
6903 var l292 = {name: "GO"};
6904 (function(){
6905     var v800 = l47.fvalue(pv, l292, (function (values,v801){
6906         checkArgs(arguments, 2);
6907         return (function(){
6908             return (function(v802,v803){
6909                 (l13.fvalue(pv, v802) !== l5.value ? (function(){
6910                     throw l157.fvalue(pv, "Unknown tag `", v803, "'.");
6911                 })() : l5.value);
6912                 return l191.fvalue(values, "(function(){", (function(){
6913                     var symbol = l156;
6914                     var value = symbol.value;
6915                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6916                     return value;
6917                 })(), l195.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l42.fvalue(pv, l200.fvalue(pv, v802)), ", ", "label: ", l43.fvalue(pv, l200.fvalue(pv, v802)), ", ", "message: 'Attempt to GO to non-existing tag ", v803, "'", "})", (function(){
6918                     var symbol = l156;
6919                     var value = symbol.value;
6920                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6921                     return value;
6922                 })()), "})()");
6923             })(l211.fvalue(pv, v801, (function(){
6924                 var symbol = l212;
6925                 var value = symbol.value;
6926                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6927                 return value;
6928             })(), l209),(((function(){
6929                 var tmp = v801;
6930                 return (typeof tmp == 'object' && 'name' in tmp);
6931             })()?l4.value: l5.value) !== l5.value ? (v801).name : (l89.fvalue(pv, v801) !== l5.value ? l19.fvalue(pv, v801) : l5.value)));
6932         })();
6933     }));
6934     var v804 = ({car: v800, cdr: (function(){
6935         var symbol = l230;
6936         var value = symbol.value;
6937         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6938         return value;
6939     })()});
6940     return ((l230).value = v804);
6941 })();
6942 var l293 = {name: "UNWIND-PROTECT"};
6943 (function(){
6944     var v805 = l47.fvalue(pv, l293, (function (values,v807){
6945         checkArgsAtLeast(arguments, 2);
6946         var v806= l5.value;
6947         for (var i = arguments.length-1; i>=2; i--)
6948             v806 = {car: arguments[i], cdr:
6949         v806};
6950         return (function(){
6951             return l191.fvalue(values, "(function(){", (function(){
6952                 var symbol = l156;
6953                 var value = symbol.value;
6954                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6955                 return value;
6956             })(), l195.fvalue(pv, "var ret = ", l193.fvalue(pv, l5.value), ";", (function(){
6957                 var symbol = l156;
6958                 var value = symbol.value;
6959                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6960                 return value;
6961             })(), "try {", (function(){
6962                 var symbol = l156;
6963                 var value = symbol.value;
6964                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6965                 return value;
6966             })(), l195.fvalue(pv, "ret = ", l193.fvalue(pv, v807), ";", (function(){
6967                 var symbol = l156;
6968                 var value = symbol.value;
6969                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6970                 return value;
6971             })()), "} finally {", (function(){
6972                 var symbol = l156;
6973                 var value = symbol.value;
6974                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6975                 return value;
6976             })(), l195.fvalue(pv, l254.fvalue(pv, v806)), "}", (function(){
6977                 var symbol = l156;
6978                 var value = symbol.value;
6979                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6980                 return value;
6981             })(), "return ret;", (function(){
6982                 var symbol = l156;
6983                 var value = symbol.value;
6984                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6985                 return value;
6986             })()), "})()");
6987         })();
6988     }));
6989     var v808 = ({car: v805, cdr: (function(){
6990         var symbol = l230;
6991         var value = symbol.value;
6992         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6993         return value;
6994     })()});
6995     return ((l230).value = v808);
6996 })();
6997 var l294 = {name: "MULTIPLE-VALUE-CALL"};
6998 (function(){
6999     var v809 = l47.fvalue(pv, l294, (function (values,v811){
7000         checkArgsAtLeast(arguments, 2);
7001         var v810= l5.value;
7002         for (var i = arguments.length-1; i>=2; i--)
7003             v810 = {car: arguments[i], cdr:
7004         v810};
7005         return (function(){
7006             return l191.fvalue(values, "(function(){", (function(){
7007                 var symbol = l156;
7008                 var value = symbol.value;
7009                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7010                 return value;
7011             })(), l195.fvalue(pv, "var func = ", l193.fvalue(pv, v811), ";", (function(){
7012                 var symbol = l156;
7013                 var value = symbol.value;
7014                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7015                 return value;
7016             })(), "var args = [", ((function(){
7017                 var symbol = l196;
7018                 var value = symbol.value;
7019                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7020                 return value;
7021             })() !== l5.value ? "values" : "pv"), "];", (function(){
7022                 var symbol = l156;
7023                 var value = symbol.value;
7024                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7025                 return value;
7026             })(), "return ", l191.fvalue(pv, "(function(){", (function(){
7027                 var symbol = l156;
7028                 var value = symbol.value;
7029                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7030                 return value;
7031             })(), l195.fvalue(pv, "var values = mv;", (function(){
7032                 var symbol = l156;
7033                 var value = symbol.value;
7034                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7035                 return value;
7036             })(), "var vs;", (function(){
7037                 var symbol = l156;
7038                 var value = symbol.value;
7039                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7040                 return value;
7041             })(), l161.fvalue(pv, (function (values,v812){
7042                 checkArgs(arguments, 2);
7043                 return l191.fvalue(values, "vs = ", l193.fvalue(pv, v812, l4.value), ";", (function(){
7044                     var symbol = l156;
7045                     var value = symbol.value;
7046                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7047                     return value;
7048                 })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){
7049                     var symbol = l156;
7050                     var value = symbol.value;
7051                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7052                     return value;
7053                 })(), l195.fvalue(pv, "args = args.concat(vs);", (function(){
7054                     var symbol = l156;
7055                     var value = symbol.value;
7056                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7057                     return value;
7058                 })()), "else", (function(){
7059                     var symbol = l156;
7060                     var value = symbol.value;
7061                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7062                     return value;
7063                 })(), l195.fvalue(pv, "args.push(vs);", (function(){
7064                     var symbol = l156;
7065                     var value = symbol.value;
7066                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7067                     return value;
7068                 })()));
7069             }), v810), "return func.apply(window, args);", (function(){
7070                 var symbol = l156;
7071                 var value = symbol.value;
7072                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7073                 return value;
7074             })()), "})()"), ";", (function(){
7075                 var symbol = l156;
7076                 var value = symbol.value;
7077                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7078                 return value;
7079             })()), "})()");
7080         })();
7081     }));
7082     var v813 = ({car: v809, cdr: (function(){
7083         var symbol = l230;
7084         var value = symbol.value;
7085         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7086         return value;
7087     })()});
7088     return ((l230).value = v813);
7089 })();
7090 var l295 = {name: "MULTIPLE-VALUE-PROG1"};
7091 (function(){
7092     var v814 = l47.fvalue(pv, l295, (function (values,v816){
7093         checkArgsAtLeast(arguments, 2);
7094         var v815= l5.value;
7095         for (var i = arguments.length-1; i>=2; i--)
7096             v815 = {car: arguments[i], cdr:
7097         v815};
7098         return (function(){
7099             return l191.fvalue(values, "(function(){", (function(){
7100                 var symbol = l156;
7101                 var value = symbol.value;
7102                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7103                 return value;
7104             })(), l195.fvalue(pv, "var args = ", l193.fvalue(pv, v816, (function(){
7105                 var symbol = l196;
7106                 var value = symbol.value;
7107                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7108                 return value;
7109             })()), ";", (function(){
7110                 var symbol = l156;
7111                 var value = symbol.value;
7112                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7113                 return value;
7114             })(), l254.fvalue(pv, v815), "return args;", (function(){
7115                 var symbol = l156;
7116                 var value = symbol.value;
7117                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7118                 return value;
7119             })()), "})()");
7120         })();
7121     }));
7122     var v817 = ({car: v814, cdr: (function(){
7123         var symbol = l230;
7124         var value = symbol.value;
7125         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7126         return value;
7127     })()});
7128     return ((l230).value = v817);
7129 })();
7130 var l296 = {name: "*COMMA*"};
7131 (function(){
7132     (((l296.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l296).value = l189));
7133     return l296;
7134 })();
7135 var l297 = {name: "*COMMA-ATSIGN*"};
7136 (function(){
7137     (((l297.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l297).value = l188));
7138     return l297;
7139 })();
7140 var l298 = {name: "*BQ-LIST*"};
7141 (function(){
7142     (((l298.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l298).value = (function(){
7143         var name = "BQ-LIST";
7144         if (typeof name != 'string')
7145             throw 'The value ' + name + ' is not a type string.';
7146         return ({name: name});
7147     })()));
7148     return l298;
7149 })();
7150 var l299 = {name: "*BQ-APPEND*"};
7151 (function(){
7152     (((l299.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l299).value = (function(){
7153         var name = "BQ-APPEND";
7154         if (typeof name != 'string')
7155             throw 'The value ' + name + ' is not a type string.';
7156         return ({name: name});
7157     })()));
7158     return l299;
7159 })();
7160 var l300 = {name: "*BQ-LIST**"};
7161 (function(){
7162     (((l300.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l300).value = (function(){
7163         var name = "BQ-LIST*";
7164         if (typeof name != 'string')
7165             throw 'The value ' + name + ' is not a type string.';
7166         return ({name: name});
7167     })()));
7168     return l300;
7169 })();
7170 var l301 = {name: "*BQ-NCONC*"};
7171 (function(){
7172     (((l301.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l301).value = (function(){
7173         var name = "BQ-NCONC";
7174         if (typeof name != 'string')
7175             throw 'The value ' + name + ' is not a type string.';
7176         return ({name: name});
7177     })()));
7178     return l301;
7179 })();
7180 var l302 = {name: "*BQ-CLOBBERABLE*"};
7181 (function(){
7182     (((l302.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l302).value = (function(){
7183         var name = "BQ-CLOBBERABLE";
7184         if (typeof name != 'string')
7185             throw 'The value ' + name + ' is not a type string.';
7186         return ({name: name});
7187     })()));
7188     return l302;
7189 })();
7190 var l303 = {name: "*BQ-QUOTE*"};
7191 (function(){
7192     (((l303.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l303).value = (function(){
7193         var name = "BQ-QUOTE";
7194         if (typeof name != 'string')
7195             throw 'The value ' + name + ' is not a type string.';
7196         return ({name: name});
7197     })()));
7198     return l303;
7199 })();
7200 var l304 = {name: "*BQ-QUOTE-NIL*"};
7201 (function(){
7202     (((l304.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l304).value = l47.fvalue(pv, (function(){
7203         var symbol = l303;
7204         var value = symbol.value;
7205         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7206         return value;
7207     })(), l5.value)));
7208     return l304;
7209 })();
7210 var l305 = {name: "*BQ-SIMPLIFY*"};
7211 (function(){
7212     ((l305).value = l4.value);
7213     return l305;
7214 })();
7215 l187;
7216 var l306 = {name: "BQ-COMPLETELY-PROCESS"};
7217 var l307 = {name: "BQ-PROCESS"};
7218 var l308 = {name: "BQ-SIMPLIFY"};
7219 var l309 = {name: "BQ-REMOVE-TOKENS"};
7220 (function(){
7221     (l306).fvalue = (function(v820){
7222         ((v820)["fname"] = "BQ-COMPLETELY-PROCESS");
7223         return v820;
7224     })((function (values,v818){
7225         checkArgs(arguments, 2);
7226         return (function(){
7227             return (function(v819){
7228                 return l309.fvalue(values, ((function(){
7229                     var symbol = l305;
7230                     var value = symbol.value;
7231                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7232                     return value;
7233                 })() !== l5.value ? l308.fvalue(pv, v819) : v819));
7234             })(l307.fvalue(pv, v818));
7235         })();
7236     }));
7237     return l306;
7238 })();
7239 var l310 = {name: "BRACKET"};
7240 (function(){
7241     (l307).fvalue = (function(v826){
7242         ((v826)["fname"] = "BQ-PROCESS");
7243         return v826;
7244     })((function (values,v821){
7245         checkArgs(arguments, 2);
7246         return (function(){
7247             return (l48.fvalue(pv, v821) !== l5.value ? l47.fvalue(values, (function(){
7248                 var symbol = l303;
7249                 var value = symbol.value;
7250                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7251                 return value;
7252             })(), v821) : ((((function(){
7253                 var tmp = v821;
7254                 return tmp === l5.value? l5.value: tmp.car;
7255             })() === l187)?l4.value: l5.value) !== l5.value ? l307.fvalue(values, l306.fvalue(pv, l35.fvalue(pv, v821))) : ((((function(){
7256                 var tmp = v821;
7257                 return tmp === l5.value? l5.value: tmp.car;
7258             })() === (function(){
7259                 var symbol = l296;
7260                 var value = symbol.value;
7261                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7262                 return value;
7263             })())?l4.value: l5.value) !== l5.value ? l35.fvalue(values, v821) : ((((function(){
7264                 var tmp = v821;
7265                 return tmp === l5.value? l5.value: tmp.car;
7266             })() === (function(){
7267                 var symbol = l297;
7268                 var value = symbol.value;
7269                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7270                 return value;
7271             })())?l4.value: l5.value) !== l5.value ? (function(){
7272                 throw "ill-formed";
7273             })() : (function(){
7274                 return (function(v822,v823){
7275                     return (function(){
7276                         try {
7277                             return (function(){
7278                                 while(l4.value !== l5.value){
7279                                     (l48.fvalue(pv, v822) !== l5.value ? (function(){
7280                                         var values = mv;
7281                                         throw ({type: 'block', id: 253, values: ({car: (function(){
7282                                             var symbol = l299;
7283                                             var value = symbol.value;
7284                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7285                                             return value;
7286                                         })(), cdr: l128.fvalue(pv, v823, l47.fvalue(pv, l47.fvalue(pv, (function(){
7287                                             var symbol = l303;
7288                                             var value = symbol.value;
7289                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7290                                             return value;
7291                                         })(), v822)))}), message: 'Return from unknown block NIL.'})
7292                                     })() : l5.value);
7293                                     (function(){
7294                                         ((((function(){
7295                                             var tmp = v822;
7296                                             return tmp === l5.value? l5.value: tmp.car;
7297                                         })() === (function(){
7298                                             var symbol = l296;
7299                                             var value = symbol.value;
7300                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7301                                             return value;
7302                                         })())?l4.value: l5.value) !== l5.value ? (function(){
7303                                             (l13.fvalue(pv, l37.fvalue(pv, v822)) !== l5.value ? l5.value : (function(){
7304                                                 throw "Malformed";
7305                                             })());
7306                                             return (function(){
7307                                                 var values = mv;
7308                                                 throw ({type: 'block', id: 253, values: ({car: (function(){
7309                                                     var symbol = l299;
7310                                                     var value = symbol.value;
7311                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7312                                                     return value;
7313                                                 })(), cdr: l128.fvalue(pv, v823, l47.fvalue(pv, l35.fvalue(pv, v822)))}), message: 'Return from unknown block NIL.'})
7314                                             })();
7315                                         })() : l5.value);
7316                                         ((((function(){
7317                                             var tmp = v822;
7318                                             return tmp === l5.value? l5.value: tmp.car;
7319                                         })() === (function(){
7320                                             var symbol = l297;
7321                                             var value = symbol.value;
7322                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7323                                             return value;
7324                                         })())?l4.value: l5.value) !== l5.value ? (function(){
7325                                             throw "Dotted";
7326                                         })() : l5.value);
7327                                         return l5.value;
7328                                     })();
7329                                     (function(v824,v825){
7330                                         return (v822 = v824, v823 = v825);
7331                                     })((function(){
7332                                         var tmp = v822;
7333                                         return tmp === l5.value? l5.value: tmp.cdr;
7334                                     })(),({car: l310.fvalue(pv, (function(){
7335                                         var tmp = v822;
7336                                         return tmp === l5.value? l5.value: tmp.car;
7337                                     })()), cdr: v823}));
7338                                 }return l5.value;
7339                             })();
7340                         }
7341                         catch (cf){
7342                             if (cf.type == 'block' && cf.id == 253)
7343                                 return values.apply(this, forcemv(cf.values));
7344                             else
7345                                 throw cf;
7346                         }
7347                     })();
7348                 })(v821,l5);
7349             })()))));
7350         })();
7351     }));
7352     return l307;
7353 })();
7354 (function(){
7355     (l310).fvalue = (function(v828){
7356         ((v828)["fname"] = "BRACKET");
7357         return v828;
7358     })((function (values,v827){
7359         checkArgs(arguments, 2);
7360         return (function(){
7361             return (l48.fvalue(pv, v827) !== l5.value ? l47.fvalue(values, (function(){
7362                 var symbol = l298;
7363                 var value = symbol.value;
7364                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7365                 return value;
7366             })(), l307.fvalue(pv, v827)) : ((((function(){
7367                 var tmp = v827;
7368                 return tmp === l5.value? l5.value: tmp.car;
7369             })() === (function(){
7370                 var symbol = l296;
7371                 var value = symbol.value;
7372                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7373                 return value;
7374             })())?l4.value: l5.value) !== l5.value ? l47.fvalue(values, (function(){
7375                 var symbol = l298;
7376                 var value = symbol.value;
7377                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7378                 return value;
7379             })(), l35.fvalue(pv, v827)) : ((((function(){
7380                 var tmp = v827;
7381                 return tmp === l5.value? l5.value: tmp.car;
7382             })() === (function(){
7383                 var symbol = l297;
7384                 var value = symbol.value;
7385                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7386                 return value;
7387             })())?l4.value: l5.value) !== l5.value ? l35.fvalue(values, v827) : l47.fvalue(values, (function(){
7388                 var symbol = l298;
7389                 var value = symbol.value;
7390                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7391                 return value;
7392             })(), l307.fvalue(pv, v827)))));
7393         })();
7394     }));
7395     return l310;
7396 })();
7397 var l311 = {name: "MAPTREE"};
7398 (function(){
7399     (l311).fvalue = (function(v833){
7400         ((v833)["fname"] = "MAPTREE");
7401         return v833;
7402     })((function (values,v829,v830){
7403         checkArgs(arguments, 3);
7404         return (function(){
7405             return (l48.fvalue(pv, v830) !== l5.value ? (function(){
7406                 var f = v829;
7407                 return (typeof f === 'function'? f: f.fvalue)(values, v830)
7408             })() : (function(v831,v832){
7409                 return ((l28.fvalue(pv, v831, (function(){
7410                     var tmp = v830;
7411                     return tmp === l5.value? l5.value: tmp.car;
7412                 })()) !== l5.value ? l28.fvalue(pv, v832, (function(){
7413                     var tmp = v830;
7414                     return tmp === l5.value? l5.value: tmp.cdr;
7415                 })()) : l5.value) !== l5.value ? v830 : ({car: v831, cdr: v832}));
7416             })((function(){
7417                 var f = v829;
7418                 return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
7419                     var tmp = v830;
7420                     return tmp === l5.value? l5.value: tmp.car;
7421                 })())
7422             })(),l311.fvalue(pv, v829, (function(){
7423                 var tmp = v830;
7424                 return tmp === l5.value? l5.value: tmp.cdr;
7425             })())));
7426         })();
7427     }));
7428     return l311;
7429 })();
7430 var l312 = {name: "BQ-SPLICING-FROB"};
7431 (function(){
7432     (l312).fvalue = (function(v835){
7433         ((v835)["fname"] = "BQ-SPLICING-FROB");
7434         return v835;
7435     })((function (values,v834){
7436         checkArgs(arguments, 2);
7437         return (function(){
7438             return (((function(){
7439                 var tmp = v834;
7440                 return (typeof tmp == 'object' && 'car' in tmp);
7441             })()?l4.value: l5.value) !== l5.value ? (((function(){
7442                 var tmp = v834;
7443                 return tmp === l5.value? l5.value: tmp.car;
7444             })() === (function(){
7445                 var symbol = l297;
7446                 var value = symbol.value;
7447                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7448                 return value;
7449             })())?l4.value: l5.value) : l5.value);
7450         })();
7451     }));
7452     return l312;
7453 })();
7454 var l313 = {name: "BQ-FROB"};
7455 (function(){
7456     (l313).fvalue = (function(v838){
7457         ((v838)["fname"] = "BQ-FROB");
7458         return v838;
7459     })((function (values,v836){
7460         checkArgs(arguments, 2);
7461         return (function(){
7462             return (((function(){
7463                 var tmp = v836;
7464                 return (typeof tmp == 'object' && 'car' in tmp);
7465             })()?l4.value: l5.value) !== l5.value ? (function(v837){
7466                 return (v837 !== l5.value ? v837 : (((function(){
7467                     var tmp = v836;
7468                     return tmp === l5.value? l5.value: tmp.car;
7469                 })() === (function(){
7470                     var symbol = l297;
7471                     var value = symbol.value;
7472                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7473                     return value;
7474                 })())?l4.value: l5.value));
7475             })((((function(){
7476                 var tmp = v836;
7477                 return tmp === l5.value? l5.value: tmp.car;
7478             })() === (function(){
7479                 var symbol = l296;
7480                 var value = symbol.value;
7481                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7482                 return value;
7483             })())?l4.value: l5.value)) : l5.value);
7484         })();
7485     }));
7486     return l313;
7487 })();
7488 var l314 = {name: "BQ-SIMPLIFY-ARGS"};
7489 (function(){
7490     (l308).fvalue = (function(v841){
7491         ((v841)["fname"] = "BQ-SIMPLIFY");
7492         return v841;
7493     })((function (values,v839){
7494         checkArgs(arguments, 2);
7495         return (function(){
7496             return (l48.fvalue(pv, v839) !== l5.value ? v839 : (function(v840){
7497                 return (l29.fvalue(pv, (((function(){
7498                     var tmp = v840;
7499                     return tmp === l5.value? l5.value: tmp.car;
7500                 })() === (function(){
7501                     var symbol = l299;
7502                     var value = symbol.value;
7503                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7504                     return value;
7505                 })())?l4.value: l5.value)) !== l5.value ? v840 : l314.fvalue(values, v840));
7506             })(((((function(){
7507                 var tmp = v839;
7508                 return tmp === l5.value? l5.value: tmp.car;
7509             })() === (function(){
7510                 var symbol = l303;
7511                 var value = symbol.value;
7512                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7513                 return value;
7514             })())?l4.value: l5.value) !== l5.value ? v839 : l311.fvalue(pv, (function(){
7515                 var symbol = l308;
7516                 var func = symbol.fvalue;
7517                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7518                 return func;
7519             })(), v839))));
7520         })();
7521     }));
7522     return l308;
7523 })();
7524 var l315 = {name: "BQ-ATTACH-APPEND"};
7525 var l316 = {name: "BQ-ATTACH-CONSES"};
7526 var l317 = {name: "CDDAR"};
7527 var l318 = {name: "CAADAR"};
7528 (function(){
7529     (l314).fvalue = (function(v847){
7530         ((v847)["fname"] = "BQ-SIMPLIFY-ARGS");
7531         return v847;
7532     })((function (values,v842){
7533         checkArgs(arguments, 2);
7534         return (function(){
7535             return (function(){
7536                 return (function(v843,v844){
7537                     return (function(){
7538                         try {
7539                             return (function(){
7540                                 while(l4.value !== l5.value){
7541                                     (l13.fvalue(pv, v843) !== l5.value ? (function(){
7542                                         var values = mv;
7543                                         throw ({type: 'block', id: 261, values: v844, message: 'Return from unknown block NIL.'})
7544                                     })() : l5.value);
7545                                     l5.value;
7546                                     (function(v845,v846){
7547                                         return (v843 = v845, v844 = v846);
7548                                     })((function(){
7549                                         var tmp = v843;
7550                                         return tmp === l5.value? l5.value: tmp.cdr;
7551                                     })(),(l48.fvalue(pv, (function(){
7552                                         var tmp = v843;
7553                                         return tmp === l5.value? l5.value: tmp.car;
7554                                     })()) !== l5.value ? l315.fvalue(pv, (function(){
7555                                         var symbol = l299;
7556                                         var value = symbol.value;
7557                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7558                                         return value;
7559                                     })(), (function(){
7560                                         var tmp = v843;
7561                                         return tmp === l5.value? l5.value: tmp.car;
7562                                     })(), v844) : ((((l34.fvalue(pv, v843) === (function(){
7563                                         var symbol = l298;
7564                                         var value = symbol.value;
7565                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7566                                         return value;
7567                                     })())?l4.value: l5.value) !== l5.value ? l129.fvalue(pv, (function(){
7568                                         var symbol = l312;
7569                                         var func = symbol.fvalue;
7570                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7571                                         return func;
7572                                     })(), l36.fvalue(pv, v843)) : l5.value) !== l5.value ? l316.fvalue(pv, l36.fvalue(pv, v843), v844) : ((((l34.fvalue(pv, v843) === (function(){
7573                                         var symbol = l300;
7574                                         var value = symbol.value;
7575                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7576                                         return value;
7577                                     })())?l4.value: l5.value) !== l5.value ? l129.fvalue(pv, (function(){
7578                                         var symbol = l312;
7579                                         var func = symbol.fvalue;
7580                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7581                                         return func;
7582                                     })(), l36.fvalue(pv, v843)) : l5.value) !== l5.value ? l316.fvalue(pv, l70.fvalue(pv, (function(){
7583                                         var tmp = l70.fvalue(pv, l36.fvalue(pv, v843));
7584                                         return tmp === l5.value? l5.value: tmp.cdr;
7585                                     })()), l315.fvalue(pv, (function(){
7586                                         var symbol = l299;
7587                                         var value = symbol.value;
7588                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7589                                         return value;
7590                                     })(), (function(){
7591                                         var tmp = l94.fvalue(pv, (function(){
7592                                             var tmp = v843;
7593                                             return tmp === l5.value? l5.value: tmp.car;
7594                                         })());
7595                                         return tmp === l5.value? l5.value: tmp.car;
7596                                     })(), v844)) : ((((l34.fvalue(pv, v843) === (function(){
7597                                         var symbol = l303;
7598                                         var value = symbol.value;
7599                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7600                                         return value;
7601                                     })())?l4.value: l5.value) !== l5.value ? (((function(){
7602                                         var tmp = l38.fvalue(pv, v843);
7603                                         return (typeof tmp == 'object' && 'car' in tmp);
7604                                     })()?l4.value: l5.value) !== l5.value ? (l29.fvalue(pv, l313.fvalue(pv, l38.fvalue(pv, v843))) !== l5.value ? l13.fvalue(pv, l317.fvalue(pv, v843)) : l5.value) : l5.value) : l5.value) !== l5.value ? l316.fvalue(pv, l47.fvalue(pv, l47.fvalue(pv, (function(){
7605                                         var symbol = l303;
7606                                         var value = symbol.value;
7607                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7608                                         return value;
7609                                     })(), l318.fvalue(pv, v843))), v844) : (((l34.fvalue(pv, v843) === (function(){
7610                                         var symbol = l302;
7611                                         var value = symbol.value;
7612                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7613                                         return value;
7614                                     })())?l4.value: l5.value) !== l5.value ? l315.fvalue(pv, (function(){
7615                                         var symbol = l301;
7616                                         var value = symbol.value;
7617                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7618                                         return value;
7619                                     })(), l38.fvalue(pv, v843), v844) : l315.fvalue(pv, (function(){
7620                                         var symbol = l299;
7621                                         var value = symbol.value;
7622                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7623                                         return value;
7624                                     })(), (function(){
7625                                         var tmp = v843;
7626                                         return tmp === l5.value? l5.value: tmp.car;
7627                                     })(), v844)))))));
7628                                 }return l5.value;
7629                             })();
7630                         }
7631                         catch (cf){
7632                             if (cf.type == 'block' && cf.id == 261)
7633                                 return values.apply(this, forcemv(cf.values));
7634                             else
7635                                 throw cf;
7636                         }
7637                     })();
7638                 })(l70.fvalue(pv, (function(){
7639                     var tmp = v842;
7640                     return tmp === l5.value? l5.value: tmp.cdr;
7641                 })()),l5.value);
7642             })();
7643         })();
7644     }));
7645     return l314;
7646 })();
7647 var l319 = {name: "NULL-OR-QUOTED"};
7648 (function(){
7649     (l319).fvalue = (function(v850){
7650         ((v850)["fname"] = "NULL-OR-QUOTED");
7651         return v850;
7652     })((function (values,v848){
7653         checkArgs(arguments, 2);
7654         return (function(){
7655             return (function(v849){
7656                 return (v849 !== l5.value ? v849 : (((function(){
7657                     var tmp = v848;
7658                     return (typeof tmp == 'object' && 'car' in tmp);
7659                 })()?l4.value: l5.value) !== l5.value ? (((function(){
7660                     var tmp = v848;
7661                     return tmp === l5.value? l5.value: tmp.car;
7662                 })() === (function(){
7663                     var symbol = l303;
7664                     var value = symbol.value;
7665                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7666                     return value;
7667                 })())?l4.value: l5.value) : l5.value));
7668             })(l13.fvalue(pv, v848));
7669         })();
7670     }));
7671     return l319;
7672 })();
7673 (function(){
7674     (l315).fvalue = (function(v855){
7675         ((v855)["fname"] = "BQ-ATTACH-APPEND");
7676         return v855;
7677     })((function (values,v851,v852,v853){
7678         checkArgs(arguments, 4);
7679         return (function(){
7680             return ((l319.fvalue(pv, v852) !== l5.value ? l319.fvalue(pv, v853) : l5.value) !== l5.value ? l47.fvalue(values, (function(){
7681                 var symbol = l303;
7682                 var value = symbol.value;
7683                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7684                 return value;
7685             })(), l68.fvalue(pv, l35.fvalue(pv, v852), l35.fvalue(pv, v853))) : ((function(v854){
7686                 return (v854 !== l5.value ? v854 : ((v853 == (function(){
7687                     var symbol = l304;
7688                     var value = symbol.value;
7689                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7690                     return value;
7691                 })())?l4.value: l5.value));
7692             })(l13.fvalue(pv, v853)) !== l5.value ? (l312.fvalue(pv, v852) !== l5.value ? l47.fvalue(values, v851, v852) : v852) : ((((function(){
7693                 var tmp = v853;
7694                 return (typeof tmp == 'object' && 'car' in tmp);
7695             })()?l4.value: l5.value) !== l5.value ? (((function(){
7696                 var tmp = v853;
7697                 return tmp === l5.value? l5.value: tmp.car;
7698             })() === v851)?l4.value: l5.value) : l5.value) !== l5.value ? l85.fvalue(values, (function(){
7699                 var tmp = v853;
7700                 return tmp === l5.value? l5.value: tmp.car;
7701             })(), v852, (function(){
7702                 var tmp = v853;
7703                 return tmp === l5.value? l5.value: tmp.cdr;
7704             })()) : l47.fvalue(values, v851, v852, v853))));
7705         })();
7706     }));
7707     return l315;
7708 })();
7709 (function(){
7710     (l316).fvalue = (function(v860){
7711         ((v860)["fname"] = "BQ-ATTACH-CONSES");
7712         return v860;
7713     })((function (values,v856,v857){
7714         checkArgs(arguments, 3);
7715         return (function(){
7716             return ((l105.fvalue(pv, (function(){
7717                 var symbol = l319;
7718                 var func = symbol.fvalue;
7719                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7720                 return func;
7721             })(), v856) !== l5.value ? l319.fvalue(pv, v857) : l5.value) !== l5.value ? l47.fvalue(values, (function(){
7722                 var symbol = l303;
7723                 var value = symbol.value;
7724                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7725                 return value;
7726             })(), l68.fvalue(pv, l81.fvalue(pv, (function(){
7727                 var symbol = l35;
7728                 var func = symbol.fvalue;
7729                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7730                 return func;
7731             })(), v856), l35.fvalue(pv, v857))) : ((function(v858){
7732                 return (v858 !== l5.value ? v858 : ((v857 == (function(){
7733                     var symbol = l304;
7734                     var value = symbol.value;
7735                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7736                     return value;
7737                 })())?l4.value: l5.value));
7738             })(l13.fvalue(pv, v857)) !== l5.value ? ({car: (function(){
7739                 var symbol = l298;
7740                 var value = symbol.value;
7741                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7742                 return value;
7743             })(), cdr: v856}) : ((((function(){
7744                 var tmp = v857;
7745                 return (typeof tmp == 'object' && 'car' in tmp);
7746             })()?l4.value: l5.value) !== l5.value ? (function(v859){
7747                 return (v859 !== l5.value ? v859 : (((function(){
7748                     var tmp = v857;
7749                     return tmp === l5.value? l5.value: tmp.car;
7750                 })() === (function(){
7751                     var symbol = l300;
7752                     var value = symbol.value;
7753                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7754                     return value;
7755                 })())?l4.value: l5.value));
7756             })((((function(){
7757                 var tmp = v857;
7758                 return tmp === l5.value? l5.value: tmp.car;
7759             })() === (function(){
7760                 var symbol = l298;
7761                 var value = symbol.value;
7762                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7763                 return value;
7764             })())?l4.value: l5.value)) : l5.value) !== l5.value ? ({car: (function(){
7765                 var tmp = v857;
7766                 return tmp === l5.value? l5.value: tmp.car;
7767             })(), cdr: l68.fvalue(pv, v856, (function(){
7768                 var tmp = v857;
7769                 return tmp === l5.value? l5.value: tmp.cdr;
7770             })())}) : ({car: (function(){
7771                 var symbol = l300;
7772                 var value = symbol.value;
7773                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7774                 return value;
7775             })(), cdr: l68.fvalue(pv, v856, l47.fvalue(pv, v857))}))));
7776         })();
7777     }));
7778     return l316;
7779 })();
7780 (function(){
7781     (l309).fvalue = (function(v862){
7782         ((v862)["fname"] = "BQ-REMOVE-TOKENS");
7783         return v862;
7784     })((function (values,v861){
7785         checkArgs(arguments, 2);
7786         return (function(){
7787             return (((v861 === (function(){
7788                 var symbol = l298;
7789                 var value = symbol.value;
7790                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7791                 return value;
7792             })())?l4.value: l5.value) !== l5.value ? l47 : (((v861 === (function(){
7793                 var symbol = l299;
7794                 var value = symbol.value;
7795                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7796                 return value;
7797             })())?l4.value: l5.value) !== l5.value ? l68 : (((v861 === (function(){
7798                 var symbol = l301;
7799                 var value = symbol.value;
7800                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7801                 return value;
7802             })())?l4.value: l5.value) !== l5.value ? l127 : (((v861 === (function(){
7803                 var symbol = l300;
7804                 var value = symbol.value;
7805                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7806                 return value;
7807             })())?l4.value: l5.value) !== l5.value ? l85 : (((v861 === (function(){
7808                 var symbol = l303;
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 ? l186 : (l48.fvalue(pv, v861) !== l5.value ? v861 : ((((function(){
7813                 var tmp = v861;
7814                 return tmp === l5.value? l5.value: tmp.car;
7815             })() === (function(){
7816                 var symbol = l302;
7817                 var value = symbol.value;
7818                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7819                 return value;
7820             })())?l4.value: l5.value) !== l5.value ? l309.fvalue(values, l35.fvalue(pv, v861)) : (((((function(){
7821                 var tmp = v861;
7822                 return tmp === l5.value? l5.value: tmp.car;
7823             })() === (function(){
7824                 var symbol = l300;
7825                 var value = symbol.value;
7826                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7827                 return value;
7828             })())?l4.value: l5.value) !== l5.value ? (((function(){
7829                 var tmp = l37.fvalue(pv, v861);
7830                 return (typeof tmp == 'object' && 'car' in tmp);
7831             })()?l4.value: l5.value) !== l5.value ? l13.fvalue(pv, l40.fvalue(pv, v861)) : l5.value) : l5.value) !== l5.value ? ({car: l30, cdr: l311.fvalue(pv, (function(){
7832                 var symbol = l309;
7833                 var func = symbol.fvalue;
7834                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7835                 return func;
7836             })(), (function(){
7837                 var tmp = v861;
7838                 return tmp === l5.value? l5.value: tmp.cdr;
7839             })())}) : l311.fvalue(values, (function(){
7840                 var symbol = l309;
7841                 var func = symbol.fvalue;
7842                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7843                 return func;
7844             })(), v861)))))))));
7845         })();
7846     }));
7847     return l309;
7848 })();
7849 (function(){
7850     var v863 = l47.fvalue(pv, l187, (function (values,v864){
7851         checkArgs(arguments, 2);
7852         return (function(){
7853             return l193.fvalue(values, l306.fvalue(pv, v864));
7854         })();
7855     }));
7856     var v865 = ({car: v863, cdr: (function(){
7857         var symbol = l230;
7858         var value = symbol.value;
7859         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7860         return value;
7861     })()});
7862     return ((l230).value = v865);
7863 })();
7864 var l320 = {name: "*BUILTINS*"};
7865 (function(){
7866     (((l320.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l320).value = l5.value));
7867     return l320;
7868 })();
7869 var l321 = {name: "DEFINE-RAW-BUILTIN"};
7870 l321;
7871 var l322 = {name: "DEFINE-BUILTIN"};
7872 l322;
7873 var l323 = {name: "TYPE-CHECK"};
7874 l323;
7875 var l324 = {name: "VARIABLE-ARITY-CALL"};
7876 (function(){
7877     (l324).fvalue = (function(v878){
7878         ((v878)["fname"] = "VARIABLE-ARITY-CALL");
7879         return v878;
7880     })((function (values,v866,v867){
7881         checkArgs(arguments, 3);
7882         return (function(){
7883             (((function(){
7884                 var tmp = v866;
7885                 return (typeof tmp == 'object' && 'car' in tmp);
7886             })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
7887                 throw "ARGS must be a non-empty list";
7888             })());
7889             return (function(v868,v869,v870){
7890                 (function(){
7891                     return (function(v871,v872){
7892                         (function(){
7893                             while(v871 !== l5.value){
7894                                 (v872 = (function(){
7895                                     var tmp = v871;
7896                                     return tmp === l5.value? l5.value: tmp.car;
7897                                 })());
7898                                 (function(){
7899                                     (((typeof (v872) == "number")?l4.value: l5.value) !== l5.value ? (function(){
7900                                         var v873 = l19.fvalue(pv, v872);
7901                                         var v874 = ({car: v873, cdr: v869});
7902                                         return (v869 = v874);
7903                                     })() : (function(v875){
7904                                         (function(){
7905                                             var v876 = v875;
7906                                             var v877 = ({car: v876, cdr: v869});
7907                                             return (v869 = v877);
7908                                         })();
7909                                         return (v870 = l157.fvalue(pv, v870, l191.fvalue(pv, "var ", v875, " = ", l193.fvalue(pv, v872), ";", (function(){
7910                                             var symbol = l156;
7911                                             var value = symbol.value;
7912                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7913                                             return value;
7914                                         })(), "if (typeof ", v875, " !== 'number') throw 'Not a number!';", (function(){
7915                                             var symbol = l156;
7916                                             var value = symbol.value;
7917                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7918                                             return value;
7919                                         })())));
7920                                     })(l191.fvalue(pv, "x", (v868 = (function(){
7921                                         var x1 = v868;
7922                                         if (typeof x1 !== 'number') throw 'Not a number!';
7923                                         return x1+1;
7924                                     })()))));
7925                                     return l5.value;
7926                                 })();
7927                                 (v871 = (function(){
7928                                     var tmp = v871;
7929                                     return tmp === l5.value? l5.value: tmp.cdr;
7930                                 })());
7931                             }return l5.value;
7932                         })();
7933                         return l5.value;
7934                     })(v866,l5.value);
7935                 })();
7936                 return l191.fvalue(values, "(function(){", (function(){
7937                     var symbol = l156;
7938                     var value = symbol.value;
7939                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7940                     return value;
7941                 })(), l195.fvalue(pv, v870, (function(){
7942                     var f = v867;
7943                     return (typeof f === 'function'? f: f.fvalue)(pv, l70.fvalue(pv, v869))
7944                 })()), "})()");
7945             })(0,l5,"");
7946         })();
7947     }));
7948     return l324;
7949 })();
7950 var l325 = {name: "VARIABLE-ARITY"};
7951 l325;
7952 var l326 = {name: "NUM-OP-NUM"};
7953 (function(){
7954     (l326).fvalue = (function(v882){
7955         ((v882)["fname"] = "NUM-OP-NUM");
7956         return v882;
7957     })((function (values,v879,v880,v881){
7958         checkArgs(arguments, 4);
7959         return (function(){
7960             return l191.fvalue(values, "(function(){", (function(){
7961                 var symbol = l156;
7962                 var value = symbol.value;
7963                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7964                 return value;
7965             })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v879, ";", (function(){
7966                 var symbol = l156;
7967                 var value = symbol.value;
7968                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7969                 return value;
7970             })()), l191.fvalue(pv, "var ", "y", " = ", v881, ";", (function(){
7971                 var symbol = l156;
7972                 var value = symbol.value;
7973                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7974                 return value;
7975             })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7976                 var symbol = l156;
7977                 var value = symbol.value;
7978                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7979                 return value;
7980             })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7981                 var symbol = l156;
7982                 var value = symbol.value;
7983                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7984                 return value;
7985             })())), l191.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
7986                 var symbol = l156;
7987                 var value = symbol.value;
7988                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7989                 return value;
7990             })(), l195.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
7991                 var symbol = l156;
7992                 var value = symbol.value;
7993                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7994                 return value;
7995             })())), l191.fvalue(pv, "return ", l191.fvalue(pv, "x", v880, "y"), ";", (function(){
7996                 var symbol = l156;
7997                 var value = symbol.value;
7998                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7999                 return value;
8000             })())), "})()");
8001         })();
8002     }));
8003     return l326;
8004 })();
8005 (function(){
8006     var v883 = l47.fvalue(pv, l65, (function (values){
8007         var v884= l5.value;
8008         for (var i = arguments.length-1; i>=1; i--)
8009             v884 = {car: arguments[i], cdr:
8010         v884};
8011         return (function(){
8012             return (l13.fvalue(pv, v884) !== l5.value ? "0" : l324.fvalue(values, v884, (function (values,v885){
8013                 checkArgs(arguments, 2);
8014                 return l191.fvalue(values, "return ", l159.fvalue(pv, v885, "+"), ";", (function(){
8015                     var symbol = l156;
8016                     var value = symbol.value;
8017                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8018                     return value;
8019                 })());
8020             })));
8021         })();
8022     }));
8023     var v886 = ({car: v883, cdr: (function(){
8024         var symbol = l320;
8025         var value = symbol.value;
8026         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8027         return value;
8028     })()});
8029     return ((l320).value = v886);
8030 })();
8031 (function(){
8032     var v887 = l47.fvalue(pv, l66, (function (values,v889){
8033         checkArgsAtLeast(arguments, 2);
8034         var v888= l5.value;
8035         for (var i = arguments.length-1; i>=2; i--)
8036             v888 = {car: arguments[i], cdr:
8037         v888};
8038         return (function(){
8039             return (function(v890){
8040                 return l324.fvalue(values, v890, (function (values,v891){
8041                     checkArgs(arguments, 2);
8042                     return l191.fvalue(values, "return ", (l13.fvalue(pv, v888) !== l5.value ? l157.fvalue(pv, "-", (function(){
8043                         var tmp = v891;
8044                         return tmp === l5.value? l5.value: tmp.car;
8045                     })()) : l159.fvalue(pv, v891, "-")), ";", (function(){
8046                         var symbol = l156;
8047                         var value = symbol.value;
8048                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8049                         return value;
8050                     })());
8051                 }));
8052             })(({car: v889, cdr: v888}));
8053         })();
8054     }));
8055     var v892 = ({car: v887, cdr: (function(){
8056         var symbol = l320;
8057         var value = symbol.value;
8058         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8059         return value;
8060     })()});
8061     return ((l320).value = v892);
8062 })();
8063 (function(){
8064     var v893 = l47.fvalue(pv, l22, (function (values){
8065         var v894= l5.value;
8066         for (var i = arguments.length-1; i>=1; i--)
8067             v894 = {car: arguments[i], cdr:
8068         v894};
8069         return (function(){
8070             return (l13.fvalue(pv, v894) !== l5.value ? "1" : l324.fvalue(values, v894, (function (values,v895){
8071                 checkArgs(arguments, 2);
8072                 return l191.fvalue(values, "return ", l159.fvalue(pv, v895, "*"), ";", (function(){
8073                     var symbol = l156;
8074                     var value = symbol.value;
8075                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8076                     return value;
8077                 })());
8078             })));
8079         })();
8080     }));
8081     var v896 = ({car: v893, cdr: (function(){
8082         var symbol = l320;
8083         var value = symbol.value;
8084         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8085         return value;
8086     })()});
8087     return ((l320).value = v896);
8088 })();
8089 (function(){
8090     var v897 = l47.fvalue(pv, l23, (function (values,v899){
8091         checkArgsAtLeast(arguments, 2);
8092         var v898= l5.value;
8093         for (var i = arguments.length-1; i>=2; i--)
8094             v898 = {car: arguments[i], cdr:
8095         v898};
8096         return (function(){
8097             return (function(v900){
8098                 return l324.fvalue(values, v900, (function (values,v901){
8099                     checkArgs(arguments, 2);
8100                     return l191.fvalue(values, "return ", (l13.fvalue(pv, v898) !== l5.value ? l157.fvalue(pv, "1 /", (function(){
8101                         var tmp = v901;
8102                         return tmp === l5.value? l5.value: tmp.car;
8103                     })()) : l159.fvalue(pv, v901, "/")), ";", (function(){
8104                         var symbol = l156;
8105                         var value = symbol.value;
8106                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8107                         return value;
8108                     })());
8109                 }));
8110             })(({car: v899, cdr: v898}));
8111         })();
8112     }));
8113     var v902 = ({car: v897, cdr: (function(){
8114         var symbol = l320;
8115         var value = symbol.value;
8116         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8117         return value;
8118     })()});
8119     return ((l320).value = v902);
8120 })();
8121 var l327 = {name: "MOD"};
8122 (function(){
8123     var v903 = l47.fvalue(pv, l327, (function (values,v904,v905){
8124         checkArgs(arguments, 3);
8125         return (function(){
8126             return (function(v906,v907){
8127                 return l326.fvalue(values, v906, "%", v907);
8128             })(l193.fvalue(pv, v904),l193.fvalue(pv, v905));
8129         })();
8130     }));
8131     var v908 = ({car: v903, cdr: (function(){
8132         var symbol = l320;
8133         var value = symbol.value;
8134         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8135         return value;
8136     })()});
8137     return ((l320).value = v908);
8138 })();
8139 var l328 = {name: "COMPARISON-CONJUNTION"};
8140 (function(){
8141     (l328).fvalue = (function(v911){
8142         ((v911)["fname"] = "COMPARISON-CONJUNTION");
8143         return v911;
8144     })((function (values,v909,v910){
8145         checkArgs(arguments, 3);
8146         return (function(){
8147             return (l13.fvalue(pv, (function(){
8148                 var tmp = v909;
8149                 return tmp === l5.value? l5.value: tmp.cdr;
8150             })()) !== l5.value ? "true" : (l13.fvalue(pv, l37.fvalue(pv, v909)) !== l5.value ? l157.fvalue(values, (function(){
8151                 var tmp = v909;
8152                 return tmp === l5.value? l5.value: tmp.car;
8153             })(), v910, l35.fvalue(pv, v909)) : l157.fvalue(values, (function(){
8154                 var tmp = v909;
8155                 return tmp === l5.value? l5.value: tmp.car;
8156             })(), v910, l35.fvalue(pv, v909), " && ", l328.fvalue(pv, (function(){
8157                 var tmp = v909;
8158                 return tmp === l5.value? l5.value: tmp.cdr;
8159             })(), v910))));
8160         })();
8161     }));
8162     return l328;
8163 })();
8164 var l329 = {name: "DEFINE-BUILTIN-COMPARISON"};
8165 l329;
8166 var l330 = {name: ">"};
8167 (function(){
8168     var v912 = l47.fvalue(pv, l330, (function (values,v914){
8169         checkArgsAtLeast(arguments, 2);
8170         var v913= l5.value;
8171         for (var i = arguments.length-1; i>=2; i--)
8172             v913 = {car: arguments[i], cdr:
8173         v913};
8174         return (function(){
8175             return (function(v915){
8176                 return l324.fvalue(values, v915, (function (values,v916){
8177                     checkArgs(arguments, 2);
8178                     return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v916, ">")), ";", (function(){
8179                         var symbol = l156;
8180                         var value = symbol.value;
8181                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8182                         return value;
8183                     })());
8184                 }));
8185             })(({car: v914, cdr: v913}));
8186         })();
8187     }));
8188     var v917 = ({car: v912, cdr: (function(){
8189         var symbol = l320;
8190         var value = symbol.value;
8191         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8192         return value;
8193     })()});
8194     return ((l320).value = v917);
8195 })();
8196 var l331 = {name: "<"};
8197 (function(){
8198     var v918 = l47.fvalue(pv, l331, (function (values,v920){
8199         checkArgsAtLeast(arguments, 2);
8200         var v919= l5.value;
8201         for (var i = arguments.length-1; i>=2; i--)
8202             v919 = {car: arguments[i], cdr:
8203         v919};
8204         return (function(){
8205             return (function(v921){
8206                 return l324.fvalue(values, v921, (function (values,v922){
8207                     checkArgs(arguments, 2);
8208                     return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v922, "<")), ";", (function(){
8209                         var symbol = l156;
8210                         var value = symbol.value;
8211                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8212                         return value;
8213                     })());
8214                 }));
8215             })(({car: v920, cdr: v919}));
8216         })();
8217     }));
8218     var v923 = ({car: v918, cdr: (function(){
8219         var symbol = l320;
8220         var value = symbol.value;
8221         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8222         return value;
8223     })()});
8224     return ((l320).value = v923);
8225 })();
8226 var l332 = {name: ">="};
8227 (function(){
8228     var v924 = l47.fvalue(pv, l332, (function (values,v926){
8229         checkArgsAtLeast(arguments, 2);
8230         var v925= l5.value;
8231         for (var i = arguments.length-1; i>=2; i--)
8232             v925 = {car: arguments[i], cdr:
8233         v925};
8234         return (function(){
8235             return (function(v927){
8236                 return l324.fvalue(values, v927, (function (values,v928){
8237                     checkArgs(arguments, 2);
8238                     return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v928, ">=")), ";", (function(){
8239                         var symbol = l156;
8240                         var value = symbol.value;
8241                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8242                         return value;
8243                     })());
8244                 }));
8245             })(({car: v926, cdr: v925}));
8246         })();
8247     }));
8248     var v929 = ({car: v924, cdr: (function(){
8249         var symbol = l320;
8250         var value = symbol.value;
8251         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8252         return value;
8253     })()});
8254     return ((l320).value = v929);
8255 })();
8256 var l333 = {name: "<="};
8257 (function(){
8258     var v930 = l47.fvalue(pv, l333, (function (values,v932){
8259         checkArgsAtLeast(arguments, 2);
8260         var v931= l5.value;
8261         for (var i = arguments.length-1; i>=2; i--)
8262             v931 = {car: arguments[i], cdr:
8263         v931};
8264         return (function(){
8265             return (function(v933){
8266                 return l324.fvalue(values, v933, (function (values,v934){
8267                     checkArgs(arguments, 2);
8268                     return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v934, "<=")), ";", (function(){
8269                         var symbol = l156;
8270                         var value = symbol.value;
8271                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8272                         return value;
8273                     })());
8274                 }));
8275             })(({car: v932, cdr: v931}));
8276         })();
8277     }));
8278     var v935 = ({car: v930, cdr: (function(){
8279         var symbol = l320;
8280         var value = symbol.value;
8281         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8282         return value;
8283     })()});
8284     return ((l320).value = v935);
8285 })();
8286 (function(){
8287     var v936 = l47.fvalue(pv, l21, (function (values,v938){
8288         checkArgsAtLeast(arguments, 2);
8289         var v937= l5.value;
8290         for (var i = arguments.length-1; i>=2; i--)
8291             v937 = {car: arguments[i], cdr:
8292         v937};
8293         return (function(){
8294             return (function(v939){
8295                 return l324.fvalue(values, v939, (function (values,v940){
8296                     checkArgs(arguments, 2);
8297                     return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v940, "==")), ";", (function(){
8298                         var symbol = l156;
8299                         var value = symbol.value;
8300                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8301                         return value;
8302                     })());
8303                 }));
8304             })(({car: v938, cdr: v937}));
8305         })();
8306     }));
8307     var v941 = ({car: v936, cdr: (function(){
8308         var symbol = l320;
8309         var value = symbol.value;
8310         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8311         return value;
8312     })()});
8313     return ((l320).value = v941);
8314 })();
8315 var l334 = {name: "NUMBERP"};
8316 (function(){
8317     var v942 = l47.fvalue(pv, l334, (function (values,v943){
8318         checkArgs(arguments, 2);
8319         return (function(){
8320             return (function(v944){
8321                 return l192.fvalue(values, l191.fvalue(pv, "(typeof (", v944, ") == \"number\")"));
8322             })(l193.fvalue(pv, v943));
8323         })();
8324     }));
8325     var v945 = ({car: v942, cdr: (function(){
8326         var symbol = l320;
8327         var value = symbol.value;
8328         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8329         return value;
8330     })()});
8331     return ((l320).value = v945);
8332 })();
8333 var l335 = {name: "FLOOR"};
8334 (function(){
8335     var v946 = l47.fvalue(pv, l335, (function (values,v947){
8336         checkArgs(arguments, 2);
8337         return (function(){
8338             return (function(v948){
8339                 return l191.fvalue(values, "(function(){", (function(){
8340                     var symbol = l156;
8341                     var value = symbol.value;
8342                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8343                     return value;
8344                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v948, ";", (function(){
8345                     var symbol = l156;
8346                     var value = symbol.value;
8347                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8348                     return value;
8349                 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
8350                     var symbol = l156;
8351                     var value = symbol.value;
8352                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8353                     return value;
8354                 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
8355                     var symbol = l156;
8356                     var value = symbol.value;
8357                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8358                     return value;
8359                 })())), l191.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){
8360                     var symbol = l156;
8361                     var value = symbol.value;
8362                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8363                     return value;
8364                 })())), "})()");
8365             })(l193.fvalue(pv, v947));
8366         })();
8367     }));
8368     var v949 = ({car: v946, cdr: (function(){
8369         var symbol = l320;
8370         var value = symbol.value;
8371         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8372         return value;
8373     })()});
8374     return ((l320).value = v949);
8375 })();
8376 (function(){
8377     var v950 = l47.fvalue(pv, l30, (function (values,v951,v952){
8378         checkArgs(arguments, 3);
8379         return (function(){
8380             return (function(v953,v954){
8381                 return l191.fvalue(values, "({car: ", v953, ", cdr: ", v954, "})");
8382             })(l193.fvalue(pv, v951),l193.fvalue(pv, v952));
8383         })();
8384     }));
8385     var v955 = ({car: v950, cdr: (function(){
8386         var symbol = l320;
8387         var value = symbol.value;
8388         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8389         return value;
8390     })()});
8391     return ((l320).value = v955);
8392 })();
8393 (function(){
8394     var v956 = l47.fvalue(pv, l31, (function (values,v957){
8395         checkArgs(arguments, 2);
8396         return (function(){
8397             return (function(v958){
8398                 return l192.fvalue(values, l191.fvalue(pv, "(function(){", (function(){
8399                     var symbol = l156;
8400                     var value = symbol.value;
8401                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8402                     return value;
8403                 })(), l195.fvalue(pv, "var tmp = ", v958, ";", (function(){
8404                     var symbol = l156;
8405                     var value = symbol.value;
8406                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8407                     return value;
8408                 })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
8409                     var symbol = l156;
8410                     var value = symbol.value;
8411                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8412                     return value;
8413                 })()), "})()"));
8414             })(l193.fvalue(pv, v957));
8415         })();
8416     }));
8417     var v959 = ({car: v956, cdr: (function(){
8418         var symbol = l320;
8419         var value = symbol.value;
8420         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8421         return value;
8422     })()});
8423     return ((l320).value = v959);
8424 })();
8425 (function(){
8426     var v960 = l47.fvalue(pv, l32, (function (values,v961){
8427         checkArgs(arguments, 2);
8428         return (function(){
8429             return (function(v962){
8430                 return l191.fvalue(values, "(function(){", (function(){
8431                     var symbol = l156;
8432                     var value = symbol.value;
8433                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8434                     return value;
8435                 })(), l195.fvalue(pv, "var tmp = ", v962, ";", (function(){
8436                     var symbol = l156;
8437                     var value = symbol.value;
8438                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8439                     return value;
8440                 })(), "return tmp === ", l193.fvalue(pv, l5.value), "? ", l193.fvalue(pv, l5.value), ": tmp.car;", (function(){
8441                     var symbol = l156;
8442                     var value = symbol.value;
8443                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8444                     return value;
8445                 })()), "})()");
8446             })(l193.fvalue(pv, v961));
8447         })();
8448     }));
8449     var v963 = ({car: v960, cdr: (function(){
8450         var symbol = l320;
8451         var value = symbol.value;
8452         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8453         return value;
8454     })()});
8455     return ((l320).value = v963);
8456 })();
8457 (function(){
8458     var v964 = l47.fvalue(pv, l33, (function (values,v965){
8459         checkArgs(arguments, 2);
8460         return (function(){
8461             return (function(v966){
8462                 return l191.fvalue(values, "(function(){", (function(){
8463                     var symbol = l156;
8464                     var value = symbol.value;
8465                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8466                     return value;
8467                 })(), l195.fvalue(pv, "var tmp = ", v966, ";", (function(){
8468                     var symbol = l156;
8469                     var value = symbol.value;
8470                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8471                     return value;
8472                 })(), "return tmp === ", l193.fvalue(pv, l5.value), "? ", l193.fvalue(pv, l5.value), ": tmp.cdr;", (function(){
8473                     var symbol = l156;
8474                     var value = symbol.value;
8475                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8476                     return value;
8477                 })()), "})()");
8478             })(l193.fvalue(pv, v965));
8479         })();
8480     }));
8481     var v967 = ({car: v964, cdr: (function(){
8482         var symbol = l320;
8483         var value = symbol.value;
8484         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8485         return value;
8486     })()});
8487     return ((l320).value = v967);
8488 })();
8489 (function(){
8490     var v968 = l47.fvalue(pv, l124, (function (values,v969,v970){
8491         checkArgs(arguments, 3);
8492         return (function(){
8493             return (function(v971,v972){
8494                 return l191.fvalue(values, "(function(){", (function(){
8495                     var symbol = l156;
8496                     var value = symbol.value;
8497                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8498                     return value;
8499                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v971, ";", (function(){
8500                     var symbol = l156;
8501                     var value = symbol.value;
8502                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8503                     return value;
8504                 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
8505                     var symbol = l156;
8506                     var value = symbol.value;
8507                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8508                     return value;
8509                 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
8510                     var symbol = l156;
8511                     var value = symbol.value;
8512                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8513                     return value;
8514                 })())), l191.fvalue(pv, "return ", l191.fvalue(pv, "(x.car = ", v972, ", x)"), ";", (function(){
8515                     var symbol = l156;
8516                     var value = symbol.value;
8517                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8518                     return value;
8519                 })())), "})()");
8520             })(l193.fvalue(pv, v969),l193.fvalue(pv, v970));
8521         })();
8522     }));
8523     var v973 = ({car: v968, cdr: (function(){
8524         var symbol = l320;
8525         var value = symbol.value;
8526         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8527         return value;
8528     })()});
8529     return ((l320).value = v973);
8530 })();
8531 (function(){
8532     var v974 = l47.fvalue(pv, l125, (function (values,v975,v976){
8533         checkArgs(arguments, 3);
8534         return (function(){
8535             return (function(v977,v978){
8536                 return l191.fvalue(values, "(function(){", (function(){
8537                     var symbol = l156;
8538                     var value = symbol.value;
8539                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8540                     return value;
8541                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v977, ";", (function(){
8542                     var symbol = l156;
8543                     var value = symbol.value;
8544                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8545                     return value;
8546                 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
8547                     var symbol = l156;
8548                     var value = symbol.value;
8549                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8550                     return value;
8551                 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
8552                     var symbol = l156;
8553                     var value = symbol.value;
8554                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8555                     return value;
8556                 })())), l191.fvalue(pv, "return ", l191.fvalue(pv, "(x.cdr = ", v978, ", x)"), ";", (function(){
8557                     var symbol = l156;
8558                     var value = symbol.value;
8559                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8560                     return value;
8561                 })())), "})()");
8562             })(l193.fvalue(pv, v975),l193.fvalue(pv, v976));
8563         })();
8564     }));
8565     var v979 = ({car: v974, cdr: (function(){
8566         var symbol = l320;
8567         var value = symbol.value;
8568         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8569         return value;
8570     })()});
8571     return ((l320).value = v979);
8572 })();
8573 var l336 = {name: "SYMBOLP"};
8574 (function(){
8575     var v980 = l47.fvalue(pv, l336, (function (values,v981){
8576         checkArgs(arguments, 2);
8577         return (function(){
8578             return (function(v982){
8579                 return l192.fvalue(values, l191.fvalue(pv, "(function(){", (function(){
8580                     var symbol = l156;
8581                     var value = symbol.value;
8582                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8583                     return value;
8584                 })(), l195.fvalue(pv, "var tmp = ", v982, ";", (function(){
8585                     var symbol = l156;
8586                     var value = symbol.value;
8587                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8588                     return value;
8589                 })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
8590                     var symbol = l156;
8591                     var value = symbol.value;
8592                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8593                     return value;
8594                 })()), "})()"));
8595             })(l193.fvalue(pv, v981));
8596         })();
8597     }));
8598     var v983 = ({car: v980, cdr: (function(){
8599         var symbol = l320;
8600         var value = symbol.value;
8601         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8602         return value;
8603     })()});
8604     return ((l320).value = v983);
8605 })();
8606 var l337 = {name: "MAKE-SYMBOL"};
8607 (function(){
8608     var v984 = l47.fvalue(pv, l337, (function (values,v985){
8609         checkArgs(arguments, 2);
8610         return (function(){
8611             return (function(v986){
8612                 return l191.fvalue(values, "(function(){", (function(){
8613                     var symbol = l156;
8614                     var value = symbol.value;
8615                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8616                     return value;
8617                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "name", " = ", v986, ";", (function(){
8618                     var symbol = l156;
8619                     var value = symbol.value;
8620                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8621                     return value;
8622                 })()), l191.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){
8623                     var symbol = l156;
8624                     var value = symbol.value;
8625                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8626                     return value;
8627                 })(), l195.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
8628                     var symbol = l156;
8629                     var value = symbol.value;
8630                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8631                     return value;
8632                 })())), l191.fvalue(pv, "return ", "({name: name})", ";", (function(){
8633                     var symbol = l156;
8634                     var value = symbol.value;
8635                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8636                     return value;
8637                 })())), "})()");
8638             })(l193.fvalue(pv, v985));
8639         })();
8640     }));
8641     var v987 = ({car: v984, cdr: (function(){
8642         var symbol = l320;
8643         var value = symbol.value;
8644         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8645         return value;
8646     })()});
8647     return ((l320).value = v987);
8648 })();
8649 var l338 = {name: "SYMBOL-NAME"};
8650 (function(){
8651     var v988 = l47.fvalue(pv, l338, (function (values,v989){
8652         checkArgs(arguments, 2);
8653         return (function(){
8654             return (function(v990){
8655                 return l191.fvalue(values, "(", v990, ").name");
8656             })(l193.fvalue(pv, v989));
8657         })();
8658     }));
8659     var v991 = ({car: v988, cdr: (function(){
8660         var symbol = l320;
8661         var value = symbol.value;
8662         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8663         return value;
8664     })()});
8665     return ((l320).value = v991);
8666 })();
8667 (function(){
8668     var v992 = l47.fvalue(pv, l256, (function (values,v993,v994){
8669         checkArgs(arguments, 3);
8670         return (function(){
8671             return (function(v995,v996){
8672                 return l191.fvalue(values, "(", v995, ").value = ", v996);
8673             })(l193.fvalue(pv, v993),l193.fvalue(pv, v994));
8674         })();
8675     }));
8676     var v997 = ({car: v992, cdr: (function(){
8677         var symbol = l320;
8678         var value = symbol.value;
8679         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8680         return value;
8681     })()});
8682     return ((l320).value = v997);
8683 })();
8684 var l339 = {name: "FSET"};
8685 (function(){
8686     var v998 = l47.fvalue(pv, l339, (function (values,v999,v1000){
8687         checkArgs(arguments, 3);
8688         return (function(){
8689             return (function(v1001,v1002){
8690                 return l191.fvalue(values, "(", v1001, ").fvalue = ", v1002);
8691             })(l193.fvalue(pv, v999),l193.fvalue(pv, v1000));
8692         })();
8693     }));
8694     var v1003 = ({car: v998, cdr: (function(){
8695         var symbol = l320;
8696         var value = symbol.value;
8697         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8698         return value;
8699     })()});
8700     return ((l320).value = v1003);
8701 })();
8702 (function(){
8703     var v1004 = l47.fvalue(pv, l20, (function (values,v1005){
8704         checkArgs(arguments, 2);
8705         return (function(){
8706             return (function(v1006){
8707                 return l192.fvalue(values, l191.fvalue(pv, "(", v1006, ".value !== undefined)"));
8708             })(l193.fvalue(pv, v1005));
8709         })();
8710     }));
8711     var v1007 = ({car: v1004, cdr: (function(){
8712         var symbol = l320;
8713         var value = symbol.value;
8714         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8715         return value;
8716     })()});
8717     return ((l320).value = v1007);
8718 })();
8719 var l340 = {name: "SYMBOL-VALUE"};
8720 (function(){
8721     var v1008 = l47.fvalue(pv, l340, (function (values,v1009){
8722         checkArgs(arguments, 2);
8723         return (function(){
8724             return (function(v1010){
8725                 return l191.fvalue(values, "(function(){", (function(){
8726                     var symbol = l156;
8727                     var value = symbol.value;
8728                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8729                     return value;
8730                 })(), l195.fvalue(pv, "var symbol = ", v1010, ";", (function(){
8731                     var symbol = l156;
8732                     var value = symbol.value;
8733                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8734                     return value;
8735                 })(), "var value = symbol.value;", (function(){
8736                     var symbol = l156;
8737                     var value = symbol.value;
8738                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8739                     return value;
8740                 })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
8741                     var symbol = l156;
8742                     var value = symbol.value;
8743                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8744                     return value;
8745                 })(), "return value;", (function(){
8746                     var symbol = l156;
8747                     var value = symbol.value;
8748                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8749                     return value;
8750                 })()), "})()");
8751             })(l193.fvalue(pv, v1009));
8752         })();
8753     }));
8754     var v1011 = ({car: v1008, cdr: (function(){
8755         var symbol = l320;
8756         var value = symbol.value;
8757         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8758         return value;
8759     })()});
8760     return ((l320).value = v1011);
8761 })();
8762 (function(){
8763     var v1012 = l47.fvalue(pv, l264, (function (values,v1013){
8764         checkArgs(arguments, 2);
8765         return (function(){
8766             return (function(v1014){
8767                 return l191.fvalue(values, "(function(){", (function(){
8768                     var symbol = l156;
8769                     var value = symbol.value;
8770                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8771                     return value;
8772                 })(), l195.fvalue(pv, "var symbol = ", v1014, ";", (function(){
8773                     var symbol = l156;
8774                     var value = symbol.value;
8775                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8776                     return value;
8777                 })(), "var func = symbol.fvalue;", (function(){
8778                     var symbol = l156;
8779                     var value = symbol.value;
8780                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8781                     return value;
8782                 })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
8783                     var symbol = l156;
8784                     var value = symbol.value;
8785                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8786                     return value;
8787                 })(), "return func;", (function(){
8788                     var symbol = l156;
8789                     var value = symbol.value;
8790                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8791                     return value;
8792                 })()), "})()");
8793             })(l193.fvalue(pv, v1013));
8794         })();
8795     }));
8796     var v1015 = ({car: v1012, cdr: (function(){
8797         var symbol = l320;
8798         var value = symbol.value;
8799         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8800         return value;
8801     })()});
8802     return ((l320).value = v1015);
8803 })();
8804 var l341 = {name: "SYMBOL-PLIST"};
8805 (function(){
8806     var v1016 = l47.fvalue(pv, l341, (function (values,v1017){
8807         checkArgs(arguments, 2);
8808         return (function(){
8809             return (function(v1018){
8810                 return l191.fvalue(values, "((", v1018, ").plist || ", l193.fvalue(pv, l5.value), ")");
8811             })(l193.fvalue(pv, v1017));
8812         })();
8813     }));
8814     var v1019 = ({car: v1016, cdr: (function(){
8815         var symbol = l320;
8816         var value = symbol.value;
8817         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8818         return value;
8819     })()});
8820     return ((l320).value = v1019);
8821 })();
8822 var l342 = {name: "LAMBDA-CODE"};
8823 (function(){
8824     var v1020 = l47.fvalue(pv, l342, (function (values,v1021){
8825         checkArgs(arguments, 2);
8826         return (function(){
8827             return (function(v1022){
8828                 return l191.fvalue(values, "(", v1022, ").toString()");
8829             })(l193.fvalue(pv, v1021));
8830         })();
8831     }));
8832     var v1023 = ({car: v1020, cdr: (function(){
8833         var symbol = l320;
8834         var value = symbol.value;
8835         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8836         return value;
8837     })()});
8838     return ((l320).value = v1023);
8839 })();
8840 var l343 = {name: "EQ"};
8841 (function(){
8842     var v1024 = l47.fvalue(pv, l343, (function (values,v1025,v1026){
8843         checkArgs(arguments, 3);
8844         return (function(){
8845             return (function(v1027,v1028){
8846                 return l192.fvalue(values, l191.fvalue(pv, "(", v1027, " === ", v1028, ")"));
8847             })(l193.fvalue(pv, v1025),l193.fvalue(pv, v1026));
8848         })();
8849     }));
8850     var v1029 = ({car: v1024, cdr: (function(){
8851         var symbol = l320;
8852         var value = symbol.value;
8853         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8854         return value;
8855     })()});
8856     return ((l320).value = v1029);
8857 })();
8858 var l344 = {name: "EQUAL"};
8859 (function(){
8860     var v1030 = l47.fvalue(pv, l344, (function (values,v1031,v1032){
8861         checkArgs(arguments, 3);
8862         return (function(){
8863             return (function(v1033,v1034){
8864                 return l192.fvalue(values, l191.fvalue(pv, "(", v1033, " == ", v1034, ")"));
8865             })(l193.fvalue(pv, v1031),l193.fvalue(pv, v1032));
8866         })();
8867     }));
8868     var v1035 = ({car: v1030, cdr: (function(){
8869         var symbol = l320;
8870         var value = symbol.value;
8871         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8872         return value;
8873     })()});
8874     return ((l320).value = v1035);
8875 })();
8876 var l345 = {name: "CHAR-TO-STRING"};
8877 (function(){
8878     var v1036 = l47.fvalue(pv, l345, (function (values,v1037){
8879         checkArgs(arguments, 2);
8880         return (function(){
8881             return (function(v1038){
8882                 return l191.fvalue(values, "(function(){", (function(){
8883                     var symbol = l156;
8884                     var value = symbol.value;
8885                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8886                     return value;
8887                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1038, ";", (function(){
8888                     var symbol = l156;
8889                     var value = symbol.value;
8890                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8891                     return value;
8892                 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
8893                     var symbol = l156;
8894                     var value = symbol.value;
8895                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8896                     return value;
8897                 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
8898                     var symbol = l156;
8899                     var value = symbol.value;
8900                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8901                     return value;
8902                 })())), l191.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){
8903                     var symbol = l156;
8904                     var value = symbol.value;
8905                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8906                     return value;
8907                 })())), "})()");
8908             })(l193.fvalue(pv, v1037));
8909         })();
8910     }));
8911     var v1039 = ({car: v1036, cdr: (function(){
8912         var symbol = l320;
8913         var value = symbol.value;
8914         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8915         return value;
8916     })()});
8917     return ((l320).value = v1039);
8918 })();
8919 var l346 = {name: "STRINGP"};
8920 (function(){
8921     var v1040 = l47.fvalue(pv, l346, (function (values,v1041){
8922         checkArgs(arguments, 2);
8923         return (function(){
8924             return (function(v1042){
8925                 return l192.fvalue(values, l191.fvalue(pv, "(typeof(", v1042, ") == \"string\")"));
8926             })(l193.fvalue(pv, v1041));
8927         })();
8928     }));
8929     var v1043 = ({car: v1040, cdr: (function(){
8930         var symbol = l320;
8931         var value = symbol.value;
8932         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8933         return value;
8934     })()});
8935     return ((l320).value = v1043);
8936 })();
8937 var l347 = {name: "STRING-UPCASE"};
8938 (function(){
8939     var v1044 = l47.fvalue(pv, l347, (function (values,v1045){
8940         checkArgs(arguments, 2);
8941         return (function(){
8942             return (function(v1046){
8943                 return l191.fvalue(values, "(function(){", (function(){
8944                     var symbol = l156;
8945                     var value = symbol.value;
8946                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8947                     return value;
8948                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1046, ";", (function(){
8949                     var symbol = l156;
8950                     var value = symbol.value;
8951                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8952                     return value;
8953                 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
8954                     var symbol = l156;
8955                     var value = symbol.value;
8956                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8957                     return value;
8958                 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
8959                     var symbol = l156;
8960                     var value = symbol.value;
8961                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8962                     return value;
8963                 })())), l191.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){
8964                     var symbol = l156;
8965                     var value = symbol.value;
8966                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8967                     return value;
8968                 })())), "})()");
8969             })(l193.fvalue(pv, v1045));
8970         })();
8971     }));
8972     var v1047 = ({car: v1044, cdr: (function(){
8973         var symbol = l320;
8974         var value = symbol.value;
8975         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8976         return value;
8977     })()});
8978     return ((l320).value = v1047);
8979 })();
8980 var l348 = {name: "STRING-LENGTH"};
8981 (function(){
8982     var v1048 = l47.fvalue(pv, l348, (function (values,v1049){
8983         checkArgs(arguments, 2);
8984         return (function(){
8985             return (function(v1050){
8986                 return l191.fvalue(values, "(function(){", (function(){
8987                     var symbol = l156;
8988                     var value = symbol.value;
8989                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8990                     return value;
8991                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1050, ";", (function(){
8992                     var symbol = l156;
8993                     var value = symbol.value;
8994                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8995                     return value;
8996                 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
8997                     var symbol = l156;
8998                     var value = symbol.value;
8999                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9000                     return value;
9001                 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
9002                     var symbol = l156;
9003                     var value = symbol.value;
9004                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9005                     return value;
9006                 })())), l191.fvalue(pv, "return ", "x.length", ";", (function(){
9007                     var symbol = l156;
9008                     var value = symbol.value;
9009                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9010                     return value;
9011                 })())), "})()");
9012             })(l193.fvalue(pv, v1049));
9013         })();
9014     }));
9015     var v1051 = ({car: v1048, cdr: (function(){
9016         var symbol = l320;
9017         var value = symbol.value;
9018         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9019         return value;
9020     })()});
9021     return ((l320).value = v1051);
9022 })();
9023 var l349 = {name: "SLICE"};
9024 (function(){
9025     var v1052 = l47.fvalue(pv, l349, (function (values,v1053,v1054,v1055){
9026         checkArgsAtLeast(arguments, 3);
9027         checkArgsAtMost(arguments, 4);
9028         var v1055;
9029         switch(arguments.length-1){
9030         case 2:
9031             v1055=l5.value;
9032         default: break;
9033         }
9034         return (function(){
9035             return l191.fvalue(values, "(function(){", (function(){
9036                 var symbol = l156;
9037                 var value = symbol.value;
9038                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9039                 return value;
9040             })(), l195.fvalue(pv, "var str = ", l193.fvalue(pv, v1053), ";", (function(){
9041                 var symbol = l156;
9042                 var value = symbol.value;
9043                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9044                 return value;
9045             })(), "var a = ", l193.fvalue(pv, v1054), ";", (function(){
9046                 var symbol = l156;
9047                 var value = symbol.value;
9048                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9049                 return value;
9050             })(), "var b;", (function(){
9051                 var symbol = l156;
9052                 var value = symbol.value;
9053                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9054                 return value;
9055             })(), (v1055 !== l5.value ? l191.fvalue(pv, "b = ", l193.fvalue(pv, v1055), ";", (function(){
9056                 var symbol = l156;
9057                 var value = symbol.value;
9058                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9059                 return value;
9060             })()) : l5.value), "return str.slice(a,b);", (function(){
9061                 var symbol = l156;
9062                 var value = symbol.value;
9063                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9064                 return value;
9065             })()), "})()");
9066         })();
9067     }));
9068     var v1056 = ({car: v1052, cdr: (function(){
9069         var symbol = l320;
9070         var value = symbol.value;
9071         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9072         return value;
9073     })()});
9074     return ((l320).value = v1056);
9075 })();
9076 var l350 = {name: "CHAR"};
9077 (function(){
9078     var v1057 = l47.fvalue(pv, l350, (function (values,v1058,v1059){
9079         checkArgs(arguments, 3);
9080         return (function(){
9081             return (function(v1060,v1061){
9082                 return l191.fvalue(values, "(function(){", (function(){
9083                     var symbol = l156;
9084                     var value = symbol.value;
9085                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9086                     return value;
9087                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "string", " = ", v1060, ";", (function(){
9088                     var symbol = l156;
9089                     var value = symbol.value;
9090                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9091                     return value;
9092                 })()), l191.fvalue(pv, "var ", "index", " = ", v1061, ";", (function(){
9093                     var symbol = l156;
9094                     var value = symbol.value;
9095                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9096                     return value;
9097                 })()), l191.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
9098                     var symbol = l156;
9099                     var value = symbol.value;
9100                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9101                     return value;
9102                 })(), l195.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
9103                     var symbol = l156;
9104                     var value = symbol.value;
9105                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9106                     return value;
9107                 })())), l191.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){
9108                     var symbol = l156;
9109                     var value = symbol.value;
9110                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9111                     return value;
9112                 })(), l195.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
9113                     var symbol = l156;
9114                     var value = symbol.value;
9115                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9116                     return value;
9117                 })())), l191.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){
9118                     var symbol = l156;
9119                     var value = symbol.value;
9120                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9121                     return value;
9122                 })())), "})()");
9123             })(l193.fvalue(pv, v1058),l193.fvalue(pv, v1059));
9124         })();
9125     }));
9126     var v1062 = ({car: v1057, cdr: (function(){
9127         var symbol = l320;
9128         var value = symbol.value;
9129         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9130         return value;
9131     })()});
9132     return ((l320).value = v1062);
9133 })();
9134 (function(){
9135     var v1063 = l47.fvalue(pv, l76, (function (values,v1064,v1065){
9136         checkArgs(arguments, 3);
9137         return (function(){
9138             return (function(v1066,v1067){
9139                 return l191.fvalue(values, "(function(){", (function(){
9140                     var symbol = l156;
9141                     var value = symbol.value;
9142                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9143                     return value;
9144                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "string1", " = ", v1066, ";", (function(){
9145                     var symbol = l156;
9146                     var value = symbol.value;
9147                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9148                     return value;
9149                 })()), l191.fvalue(pv, "var ", "string2", " = ", v1067, ";", (function(){
9150                     var symbol = l156;
9151                     var value = symbol.value;
9152                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9153                     return value;
9154                 })()), l191.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){
9155                     var symbol = l156;
9156                     var value = symbol.value;
9157                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9158                     return value;
9159                 })(), l195.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
9160                     var symbol = l156;
9161                     var value = symbol.value;
9162                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9163                     return value;
9164                 })())), l191.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){
9165                     var symbol = l156;
9166                     var value = symbol.value;
9167                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9168                     return value;
9169                 })(), l195.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
9170                     var symbol = l156;
9171                     var value = symbol.value;
9172                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9173                     return value;
9174                 })())), l191.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){
9175                     var symbol = l156;
9176                     var value = symbol.value;
9177                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9178                     return value;
9179                 })())), "})()");
9180             })(l193.fvalue(pv, v1064),l193.fvalue(pv, v1065));
9181         })();
9182     }));
9183     var v1068 = ({car: v1063, cdr: (function(){
9184         var symbol = l320;
9185         var value = symbol.value;
9186         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9187         return value;
9188     })()});
9189     return ((l320).value = v1068);
9190 })();
9191 var l351 = {name: "FUNCALL"};
9192 (function(){
9193     var v1069 = l47.fvalue(pv, l351, (function (values,v1071){
9194         checkArgsAtLeast(arguments, 2);
9195         var v1070= l5.value;
9196         for (var i = arguments.length-1; i>=2; i--)
9197             v1070 = {car: arguments[i], cdr:
9198         v1070};
9199         return (function(){
9200             return l191.fvalue(values, "(function(){", (function(){
9201                 var symbol = l156;
9202                 var value = symbol.value;
9203                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9204                 return value;
9205             })(), l195.fvalue(pv, "var f = ", l193.fvalue(pv, v1071), ";", (function(){
9206                 var symbol = l156;
9207                 var value = symbol.value;
9208                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9209                 return value;
9210             })(), "return (typeof f === 'function'? f: f.fvalue)(", l159.fvalue(pv, ({car: ((function(){
9211                 var symbol = l196;
9212                 var value = symbol.value;
9213                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9214                 return value;
9215             })() !== l5.value ? "values" : "pv"), cdr: l81.fvalue(pv, (function(){
9216                 var symbol = l193;
9217                 var func = symbol.fvalue;
9218                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9219                 return func;
9220             })(), v1070)}), ", "), ")"), "})()");
9221         })();
9222     }));
9223     var v1072 = ({car: v1069, cdr: (function(){
9224         var symbol = l320;
9225         var value = symbol.value;
9226         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9227         return value;
9228     })()});
9229     return ((l320).value = v1072);
9230 })();
9231 var l352 = {name: "APPLY"};
9232 (function(){
9233     var v1073 = l47.fvalue(pv, l352, (function (values,v1075){
9234         checkArgsAtLeast(arguments, 2);
9235         var v1074= l5.value;
9236         for (var i = arguments.length-1; i>=2; i--)
9237             v1074 = {car: arguments[i], cdr:
9238         v1074};
9239         return (function(){
9240             return (l13.fvalue(pv, v1074) !== l5.value ? l191.fvalue(values, "(", l193.fvalue(pv, v1075), ")()") : (function(v1076,v1077){
9241                 return l191.fvalue(values, "(function(){", (function(){
9242                     var symbol = l156;
9243                     var value = symbol.value;
9244                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9245                     return value;
9246                 })(), l195.fvalue(pv, "var f = ", l193.fvalue(pv, v1075), ";", (function(){
9247                     var symbol = l156;
9248                     var value = symbol.value;
9249                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9250                     return value;
9251                 })(), "var args = [", l159.fvalue(pv, ({car: ((function(){
9252                     var symbol = l196;
9253                     var value = symbol.value;
9254                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9255                     return value;
9256                 })() !== l5.value ? "values" : "pv"), cdr: l81.fvalue(pv, (function(){
9257                     var symbol = l193;
9258                     var func = symbol.fvalue;
9259                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9260                     return func;
9261                 })(), v1076)}), ", "), "];", (function(){
9262                     var symbol = l156;
9263                     var value = symbol.value;
9264                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9265                     return value;
9266                 })(), "var tail = (", l193.fvalue(pv, v1077), ");", (function(){
9267                     var symbol = l156;
9268                     var value = symbol.value;
9269                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9270                     return value;
9271                 })(), "while (tail != ", l193.fvalue(pv, l5.value), "){", (function(){
9272                     var symbol = l156;
9273                     var value = symbol.value;
9274                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9275                     return value;
9276                 })(), "    args.push(tail.car);", (function(){
9277                     var symbol = l156;
9278                     var value = symbol.value;
9279                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9280                     return value;
9281                 })(), "    tail = tail.cdr;", (function(){
9282                     var symbol = l156;
9283                     var value = symbol.value;
9284                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9285                     return value;
9286                 })(), "}", (function(){
9287                     var symbol = l156;
9288                     var value = symbol.value;
9289                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9290                     return value;
9291                 })(), "return (typeof f === 'function'? f : f.fvalue).apply(this, args);", (function(){
9292                     var symbol = l156;
9293                     var value = symbol.value;
9294                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9295                     return value;
9296                 })()), "})()");
9297             })(l95.fvalue(pv, v1074),(function(){
9298                 var tmp = l94.fvalue(pv, v1074);
9299                 return tmp === l5.value? l5.value: tmp.car;
9300             })()));
9301         })();
9302     }));
9303     var v1078 = ({car: v1073, cdr: (function(){
9304         var symbol = l320;
9305         var value = symbol.value;
9306         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9307         return value;
9308     })()});
9309     return ((l320).value = v1078);
9310 })();
9311 var l353 = {name: "JS-EVAL"};
9312 (function(){
9313     var v1079 = l47.fvalue(pv, l353, (function (values,v1080){
9314         checkArgs(arguments, 2);
9315         return (function(){
9316             return (function(v1081){
9317                 return l191.fvalue(values, "(function(){", (function(){
9318                     var symbol = l156;
9319                     var value = symbol.value;
9320                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9321                     return value;
9322                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "string", " = ", v1081, ";", (function(){
9323                     var symbol = l156;
9324                     var value = symbol.value;
9325                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9326                     return value;
9327                 })()), l191.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
9328                     var symbol = l156;
9329                     var value = symbol.value;
9330                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9331                     return value;
9332                 })(), l195.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
9333                     var symbol = l156;
9334                     var value = symbol.value;
9335                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9336                     return value;
9337                 })())), l191.fvalue(pv, "return ", ((function(){
9338                     var symbol = l196;
9339                     var value = symbol.value;
9340                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9341                     return value;
9342                 })() !== l5.value ? l191.fvalue(pv, "(function(){", (function(){
9343                     var symbol = l156;
9344                     var value = symbol.value;
9345                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9346                     return value;
9347                 })(), l195.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){
9348                     var symbol = l156;
9349                     var value = symbol.value;
9350                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9351                     return value;
9352                 })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){
9353                     var symbol = l156;
9354                     var value = symbol.value;
9355                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9356                     return value;
9357                 })(), l195.fvalue(pv, "v = [v];", (function(){
9358                     var symbol = l156;
9359                     var value = symbol.value;
9360                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9361                     return value;
9362                 })(), "v['multiple-value'] = true;", (function(){
9363                     var symbol = l156;
9364                     var value = symbol.value;
9365                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9366                     return value;
9367                 })()), "}", (function(){
9368                     var symbol = l156;
9369                     var value = symbol.value;
9370                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9371                     return value;
9372                 })(), "return values.apply(this, v);", (function(){
9373                     var symbol = l156;
9374                     var value = symbol.value;
9375                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9376                     return value;
9377                 })()), "})()") : "eval.apply(window, [string])"), ";", (function(){
9378                     var symbol = l156;
9379                     var value = symbol.value;
9380                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9381                     return value;
9382                 })())), "})()");
9383             })(l193.fvalue(pv, v1080));
9384         })();
9385     }));
9386     var v1082 = ({car: v1079, cdr: (function(){
9387         var symbol = l320;
9388         var value = symbol.value;
9389         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9390         return value;
9391     })()});
9392     return ((l320).value = v1082);
9393 })();
9394 var l354 = {name: "ERROR"};
9395 (function(){
9396     var v1083 = l47.fvalue(pv, l354, (function (values,v1084){
9397         checkArgs(arguments, 2);
9398         return (function(){
9399             return (function(v1085){
9400                 return l191.fvalue(values, "(function(){", (function(){
9401                     var symbol = l156;
9402                     var value = symbol.value;
9403                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9404                     return value;
9405                 })(), l195.fvalue(pv, "throw ", v1085, ";", (function(){
9406                     var symbol = l156;
9407                     var value = symbol.value;
9408                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9409                     return value;
9410                 })()), "})()");
9411             })(l193.fvalue(pv, v1084));
9412         })();
9413     }));
9414     var v1086 = ({car: v1083, cdr: (function(){
9415         var symbol = l320;
9416         var value = symbol.value;
9417         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9418         return value;
9419     })()});
9420     return ((l320).value = v1086);
9421 })();
9422 var l355 = {name: "NEW"};
9423 (function(){
9424     var v1087 = l47.fvalue(pv, l355, (function (values){
9425         checkArgsAtMost(arguments, 1);
9426         return (function(){
9427             return (function(){
9428                 return "{}";
9429             })();
9430         })();
9431     }));
9432     var v1088 = ({car: v1087, cdr: (function(){
9433         var symbol = l320;
9434         var value = symbol.value;
9435         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9436         return value;
9437     })()});
9438     return ((l320).value = v1088);
9439 })();
9440 var l356 = {name: "OBJECTP"};
9441 (function(){
9442     var v1089 = l47.fvalue(pv, l356, (function (values,v1090){
9443         checkArgs(arguments, 2);
9444         return (function(){
9445             return (function(v1091){
9446                 return l192.fvalue(values, l191.fvalue(pv, "(typeof (", v1091, ") === 'object')"));
9447             })(l193.fvalue(pv, v1090));
9448         })();
9449     }));
9450     var v1092 = ({car: v1089, cdr: (function(){
9451         var symbol = l320;
9452         var value = symbol.value;
9453         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9454         return value;
9455     })()});
9456     return ((l320).value = v1092);
9457 })();
9458 var l357 = {name: "OGET"};
9459 (function(){
9460     var v1093 = l47.fvalue(pv, l357, (function (values,v1094,v1095){
9461         checkArgs(arguments, 3);
9462         return (function(){
9463             return (function(v1096,v1097){
9464                 return l191.fvalue(values, "(function(){", (function(){
9465                     var symbol = l156;
9466                     var value = symbol.value;
9467                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9468                     return value;
9469                 })(), l195.fvalue(pv, "var tmp = ", "(", v1096, ")[", v1097, "];", (function(){
9470                     var symbol = l156;
9471                     var value = symbol.value;
9472                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9473                     return value;
9474                 })(), "return tmp == undefined? ", l193.fvalue(pv, l5.value), ": tmp ;", (function(){
9475                     var symbol = l156;
9476                     var value = symbol.value;
9477                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9478                     return value;
9479                 })()), "})()");
9480             })(l193.fvalue(pv, v1094),l193.fvalue(pv, v1095));
9481         })();
9482     }));
9483     var v1098 = ({car: v1093, cdr: (function(){
9484         var symbol = l320;
9485         var value = symbol.value;
9486         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9487         return value;
9488     })()});
9489     return ((l320).value = v1098);
9490 })();
9491 var l358 = {name: "OSET"};
9492 (function(){
9493     var v1099 = l47.fvalue(pv, l358, (function (values,v1100,v1101,v1102){
9494         checkArgs(arguments, 4);
9495         return (function(){
9496             return (function(v1103,v1104,v1105){
9497                 return l191.fvalue(values, "((", v1103, ")[", v1104, "] = ", v1105, ")");
9498             })(l193.fvalue(pv, v1100),l193.fvalue(pv, v1101),l193.fvalue(pv, v1102));
9499         })();
9500     }));
9501     var v1106 = ({car: v1099, cdr: (function(){
9502         var symbol = l320;
9503         var value = symbol.value;
9504         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9505         return value;
9506     })()});
9507     return ((l320).value = v1106);
9508 })();
9509 var l359 = {name: "IN"};
9510 (function(){
9511     var v1107 = l47.fvalue(pv, l359, (function (values,v1108,v1109){
9512         checkArgs(arguments, 3);
9513         return (function(){
9514             return (function(v1110,v1111){
9515                 return l192.fvalue(values, l191.fvalue(pv, "((", v1110, ") in (", v1111, "))"));
9516             })(l193.fvalue(pv, v1108),l193.fvalue(pv, v1109));
9517         })();
9518     }));
9519     var v1112 = ({car: v1107, cdr: (function(){
9520         var symbol = l320;
9521         var value = symbol.value;
9522         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9523         return value;
9524     })()});
9525     return ((l320).value = v1112);
9526 })();
9527 var l360 = {name: "FUNCTIONP"};
9528 (function(){
9529     var v1113 = l47.fvalue(pv, l360, (function (values,v1114){
9530         checkArgs(arguments, 2);
9531         return (function(){
9532             return (function(v1115){
9533                 return l192.fvalue(values, l191.fvalue(pv, "(typeof ", v1115, " == 'function')"));
9534             })(l193.fvalue(pv, v1114));
9535         })();
9536     }));
9537     var v1116 = ({car: v1113, cdr: (function(){
9538         var symbol = l320;
9539         var value = symbol.value;
9540         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9541         return value;
9542     })()});
9543     return ((l320).value = v1116);
9544 })();
9545 var l361 = {name: "WRITE-STRING"};
9546 (function(){
9547     var v1117 = l47.fvalue(pv, l361, (function (values,v1118){
9548         checkArgs(arguments, 2);
9549         return (function(){
9550             return (function(v1119){
9551                 return l191.fvalue(values, "(function(){", (function(){
9552                     var symbol = l156;
9553                     var value = symbol.value;
9554                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9555                     return value;
9556                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1119, ";", (function(){
9557                     var symbol = l156;
9558                     var value = symbol.value;
9559                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9560                     return value;
9561                 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
9562                     var symbol = l156;
9563                     var value = symbol.value;
9564                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9565                     return value;
9566                 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
9567                     var symbol = l156;
9568                     var value = symbol.value;
9569                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9570                     return value;
9571                 })())), l191.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){
9572                     var symbol = l156;
9573                     var value = symbol.value;
9574                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9575                     return value;
9576                 })())), "})()");
9577             })(l193.fvalue(pv, v1118));
9578         })();
9579     }));
9580     var v1120 = ({car: v1117, cdr: (function(){
9581         var symbol = l320;
9582         var value = symbol.value;
9583         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9584         return value;
9585     })()});
9586     return ((l320).value = v1120);
9587 })();
9588 var l362 = {name: "MAKE-ARRAY"};
9589 (function(){
9590     var v1121 = l47.fvalue(pv, l362, (function (values,v1122){
9591         checkArgs(arguments, 2);
9592         return (function(){
9593             return (function(v1123){
9594                 return l191.fvalue(values, "(function(){", (function(){
9595                     var symbol = l156;
9596                     var value = symbol.value;
9597                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9598                     return value;
9599                 })(), l195.fvalue(pv, "var r = [];", (function(){
9600                     var symbol = l156;
9601                     var value = symbol.value;
9602                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9603                     return value;
9604                 })(), "for (var i = 0; i < ", v1123, "; i++)", (function(){
9605                     var symbol = l156;
9606                     var value = symbol.value;
9607                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9608                     return value;
9609                 })(), l195.fvalue(pv, "r.push(", l193.fvalue(pv, l5.value), ");", (function(){
9610                     var symbol = l156;
9611                     var value = symbol.value;
9612                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9613                     return value;
9614                 })()), "return r;", (function(){
9615                     var symbol = l156;
9616                     var value = symbol.value;
9617                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9618                     return value;
9619                 })()), "})()");
9620             })(l193.fvalue(pv, v1122));
9621         })();
9622     }));
9623     var v1124 = ({car: v1121, cdr: (function(){
9624         var symbol = l320;
9625         var value = symbol.value;
9626         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9627         return value;
9628     })()});
9629     return ((l320).value = v1124);
9630 })();
9631 var l363 = {name: "ARRAYP"};
9632 (function(){
9633     var v1125 = l47.fvalue(pv, l363, (function (values,v1126){
9634         checkArgs(arguments, 2);
9635         return (function(){
9636             return (function(v1127){
9637                 return l192.fvalue(values, l191.fvalue(pv, "(function(){", (function(){
9638                     var symbol = l156;
9639                     var value = symbol.value;
9640                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9641                     return value;
9642                 })(), l195.fvalue(pv, "var x = ", v1127, ";", (function(){
9643                     var symbol = l156;
9644                     var value = symbol.value;
9645                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9646                     return value;
9647                 })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
9648             })(l193.fvalue(pv, v1126));
9649         })();
9650     }));
9651     var v1128 = ({car: v1125, cdr: (function(){
9652         var symbol = l320;
9653         var value = symbol.value;
9654         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9655         return value;
9656     })()});
9657     return ((l320).value = v1128);
9658 })();
9659 var l364 = {name: "AREF"};
9660 (function(){
9661     var v1129 = l47.fvalue(pv, l364, (function (values,v1130,v1131){
9662         checkArgs(arguments, 3);
9663         return (function(){
9664             return (function(v1132,v1133){
9665                 return l191.fvalue(values, "(function(){", (function(){
9666                     var symbol = l156;
9667                     var value = symbol.value;
9668                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9669                     return value;
9670                 })(), l195.fvalue(pv, "var x = ", "(", v1132, ")[", v1133, "];", (function(){
9671                     var symbol = l156;
9672                     var value = symbol.value;
9673                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9674                     return value;
9675                 })(), "if (x === undefined) throw 'Out of range';", (function(){
9676                     var symbol = l156;
9677                     var value = symbol.value;
9678                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9679                     return value;
9680                 })(), "return x;", (function(){
9681                     var symbol = l156;
9682                     var value = symbol.value;
9683                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9684                     return value;
9685                 })()), "})()");
9686             })(l193.fvalue(pv, v1130),l193.fvalue(pv, v1131));
9687         })();
9688     }));
9689     var v1134 = ({car: v1129, cdr: (function(){
9690         var symbol = l320;
9691         var value = symbol.value;
9692         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9693         return value;
9694     })()});
9695     return ((l320).value = v1134);
9696 })();
9697 var l365 = {name: "ASET"};
9698 (function(){
9699     var v1135 = l47.fvalue(pv, l365, (function (values,v1136,v1137,v1138){
9700         checkArgs(arguments, 4);
9701         return (function(){
9702             return (function(v1139,v1140,v1141){
9703                 return l191.fvalue(values, "(function(){", (function(){
9704                     var symbol = l156;
9705                     var value = symbol.value;
9706                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9707                     return value;
9708                 })(), l195.fvalue(pv, "var x = ", v1139, ";", (function(){
9709                     var symbol = l156;
9710                     var value = symbol.value;
9711                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9712                     return value;
9713                 })(), "var i = ", v1140, ";", (function(){
9714                     var symbol = l156;
9715                     var value = symbol.value;
9716                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9717                     return value;
9718                 })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
9719                     var symbol = l156;
9720                     var value = symbol.value;
9721                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9722                     return value;
9723                 })(), "return x[i] = ", v1141, ";", (function(){
9724                     var symbol = l156;
9725                     var value = symbol.value;
9726                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9727                     return value;
9728                 })()), "})()");
9729             })(l193.fvalue(pv, v1136),l193.fvalue(pv, v1137),l193.fvalue(pv, v1138));
9730         })();
9731     }));
9732     var v1142 = ({car: v1135, cdr: (function(){
9733         var symbol = l320;
9734         var value = symbol.value;
9735         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9736         return value;
9737     })()});
9738     return ((l320).value = v1142);
9739 })();
9740 var l366 = {name: "GET-UNIX-TIME"};
9741 (function(){
9742     var v1143 = l47.fvalue(pv, l366, (function (values){
9743         checkArgsAtMost(arguments, 1);
9744         return (function(){
9745             return (function(){
9746                 return l191.fvalue(values, "(Math.round(new Date() / 1000))");
9747             })();
9748         })();
9749     }));
9750     var v1144 = ({car: v1143, cdr: (function(){
9751         var symbol = l320;
9752         var value = symbol.value;
9753         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9754         return value;
9755     })()});
9756     return ((l320).value = v1144);
9757 })();
9758 var l367 = {name: "VALUES-ARRAY"};
9759 (function(){
9760     var v1145 = l47.fvalue(pv, l367, (function (values,v1146){
9761         checkArgs(arguments, 2);
9762         return (function(){
9763             return (function(v1147){
9764                 return ((function(){
9765                     var symbol = l196;
9766                     var value = symbol.value;
9767                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9768                     return value;
9769                 })() !== l5.value ? l191.fvalue(values, "values.apply(this, ", v1147, ")") : l191.fvalue(values, "pv.apply(this, ", v1147, ")"));
9770             })(l193.fvalue(pv, v1146));
9771         })();
9772     }));
9773     var v1148 = ({car: v1145, cdr: (function(){
9774         var symbol = l320;
9775         var value = symbol.value;
9776         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9777         return value;
9778     })()});
9779     return ((l320).value = v1148);
9780 })();
9781 (function(){
9782     var v1149 = l47.fvalue(pv, l165, (function (values){
9783         var v1150= l5.value;
9784         for (var i = arguments.length-1; i>=1; i--)
9785             v1150 = {car: arguments[i], cdr:
9786         v1150};
9787         return (function(){
9788             return ((function(){
9789                 var symbol = l196;
9790                 var value = symbol.value;
9791                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9792                 return value;
9793             })() !== l5.value ? l191.fvalue(values, "values(", l159.fvalue(pv, l81.fvalue(pv, (function(){
9794                 var symbol = l193;
9795                 var func = symbol.fvalue;
9796                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9797                 return func;
9798             })(), v1150), ", "), ")") : l191.fvalue(values, "pv(", l159.fvalue(pv, l81.fvalue(pv, (function(){
9799                 var symbol = l193;
9800                 var func = symbol.fvalue;
9801                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9802                 return func;
9803             })(), v1150), ", "), ")"));
9804         })();
9805     }));
9806     var v1151 = ({car: v1149, cdr: (function(){
9807         var symbol = l320;
9808         var value = symbol.value;
9809         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9810         return value;
9811     })()});
9812     return ((l320).value = v1151);
9813 })();
9814 (function(){
9815     (l222).fvalue = (function(v1154){
9816         ((v1154)["fname"] = "MACRO");
9817         return v1154;
9818     })((function (values,v1152){
9819         checkArgs(arguments, 2);
9820         return (function(){
9821             return (((function(){
9822                 var tmp = v1152;
9823                 return (typeof tmp == 'object' && 'name' in tmp);
9824             })()?l4.value: l5.value) !== l5.value ? (function(v1153){
9825                 return (((l199.fvalue(pv, v1153) === l222)?l4.value: l5.value) !== l5.value ? v1153 : l5.value);
9826             })(l211.fvalue(pv, v1152, (function(){
9827                 var symbol = l212;
9828                 var value = symbol.value;
9829                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9830                 return value;
9831             })(), l113)) : l5.value);
9832         })();
9833     }));
9834     return l222;
9835 })();
9836 (function(){
9837     (l120).fvalue = (function(v1159){
9838         ((v1159)["fname"] = "LS-MACROEXPAND-1");
9839         return v1159;
9840     })((function (values,v1155){
9841         checkArgs(arguments, 2);
9842         return (function(){
9843             return (function(v1156){
9844                 return (v1156 !== l5.value ? (function(v1157){
9845                     (l62.fvalue(pv, v1157) !== l5.value ? (function(v1158){
9846                         l202.fvalue(pv, v1156, v1158);
9847                         return (v1157 = v1158);
9848                     })(l272.fvalue(pv, v1157)) : l5.value);
9849                     return (function(){
9850                         var f = v1157;
9851                         var args = [values];
9852                         var tail = ((function(){
9853                             var tmp = v1155;
9854                             return tmp === l5.value? l5.value: tmp.cdr;
9855                         })());
9856                         while (tail != l5.value){
9857                             args.push(tail.car);
9858                             tail = tail.cdr;
9859                         }
9860                         return (typeof f === 'function'? f : f.fvalue).apply(this, args);
9861                     })();
9862                 })(l200.fvalue(pv, v1156)) : v1155);
9863             })(l222.fvalue(pv, (function(){
9864                 var tmp = v1155;
9865                 return tmp === l5.value? l5.value: tmp.car;
9866             })()));
9867         })();
9868     }));
9869     return l120;
9870 })();
9871 var l368 = {name: "COMPILE-FUNCALL"};
9872 var l369 = {name: "G1056"};
9873 (function(){
9874     (l368).fvalue = (function(v1164){
9875         ((v1164)["fname"] = "COMPILE-FUNCALL");
9876         return v1164;
9877     })((function (values,v1160,v1161){
9878         checkArgs(arguments, 3);
9879         return (function(){
9880             return (function(){
9881                 var v1162 = ((function(){
9882                     var symbol = l196;
9883                     var value = symbol.value;
9884                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9885                     return value;
9886                 })() !== l5.value ? "values" : "pv");
9887                 var v1163 = l157.fvalue(pv, "(", l159.fvalue(pv, ({car: v1162, cdr: l81.fvalue(pv, (function(){
9888                     var symbol = l193;
9889                     var func = symbol.fvalue;
9890                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9891                     return func;
9892                 })(), v1161)}), ", "), ")");
9893                 return (l267.fvalue(pv, v1160) !== l5.value ? l157.fvalue(values, l267.fvalue(pv, v1160), v1163) : ((((function(){
9894                     var tmp = v1160;
9895                     return (typeof tmp == 'object' && 'name' in tmp);
9896                 })()?l4.value: l5.value) !== l5.value ? (((l145.fvalue(pv, v1160) === l136.fvalue(pv, "COMMON-LISP"))?l4.value: l5.value) !== l5.value ? (function(){
9897                     var symbol = l369;
9898                     var value = symbol.value;
9899                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9900                     return value;
9901                 })() : l5.value) : l5.value) !== l5.value ? l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l186, v1160)), ".fvalue", v1163) : l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l113, v1160)), v1163)));
9902             })();
9903         })();
9904     }));
9905     return l368;
9906 })();
9907 (function(){
9908     (l254).fvalue = (function(v1167){
9909         ((v1167)["fname"] = "LS-COMPILE-BLOCK");
9910         return v1167;
9911     })((function (values,v1165,v1166){
9912         checkArgsAtLeast(arguments, 2);
9913         checkArgsAtMost(arguments, 3);
9914         var v1166;
9915         switch(arguments.length-1){
9916         case 1:
9917             v1166=l5.value;
9918         default: break;
9919         }
9920         return (function(){
9921             return (v1166 !== l5.value ? l191.fvalue(values, l254.fvalue(pv, l95.fvalue(pv, v1165)), "return ", l193.fvalue(pv, (function(){
9922                 var tmp = l94.fvalue(pv, v1165);
9923                 return tmp === l5.value? l5.value: tmp.car;
9924             })(), (function(){
9925                 var symbol = l196;
9926                 var value = symbol.value;
9927                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9928                 return value;
9929             })()), ";") : l160.fvalue(values, l98.fvalue(pv, (function(){
9930                 var symbol = l219;
9931                 var func = symbol.fvalue;
9932                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9933                 return func;
9934             })(), l81.fvalue(pv, (function(){
9935                 var symbol = l193;
9936                 var func = symbol.fvalue;
9937                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9938                 return func;
9939             })(), v1165)), l157.fvalue(pv, ";", (function(){
9940                 var symbol = l156;
9941                 var value = symbol.value;
9942                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9943                 return value;
9944             })())));
9945         })();
9946     }));
9947     return l254;
9948 })();
9949 (function(){
9950     (l193).fvalue = (function(v1177){
9951         ((v1177)["fname"] = "LS-COMPILE");
9952         return v1177;
9953     })((function (values,v1168,v1169){
9954         checkArgsAtLeast(arguments, 2);
9955         checkArgsAtMost(arguments, 3);
9956         var v1169;
9957         switch(arguments.length-1){
9958         case 1:
9959             v1169=l5.value;
9960         default: break;
9961         }
9962         return (function(){
9963             return (function(v1170){
9964                 try {
9965                     var tmp;
9966                     tmp = l196.value;
9967                     l196.value = v1170;
9968                     v1170 = tmp;
9969                     return (((function(){
9970                         var tmp = v1168;
9971                         return (typeof tmp == 'object' && 'name' in tmp);
9972                     })()?l4.value: l5.value) !== l5.value ? (function(v1171){
9973                         return ((v1171 !== l5.value ? l29.fvalue(pv, l96.fvalue(pv, l226, l201.fvalue(pv, v1171))) : l5.value) !== l5.value ? l200.fvalue(values, v1171) : ((function(v1172){
9974                             return (v1172 !== l5.value ? v1172 : l96.fvalue(pv, l228, l201.fvalue(pv, v1171)));
9975                         })(l144.fvalue(pv, v1168)) !== l5.value ? l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l186, v1168)), ".value") : l193.fvalue(values, l47.fvalue(pv, l340, l47.fvalue(pv, l186, v1168)))));
9976                     })(l211.fvalue(pv, v1168, (function(){
9977                         var symbol = l212;
9978                         var value = symbol.value;
9979                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9980                         return value;
9981                     })(), l114)) : (l89.fvalue(pv, v1168) !== l5.value ? l19.fvalue(values, v1168) : (((typeof(v1168) == "string")?l4.value: l5.value) !== l5.value ? l191.fvalue(values, "\"", l167.fvalue(pv, v1168), "\"") : (((function(){
9982                         var x = v1168;
9983                         return typeof x === 'object' && 'length' in x;
9984                     })()?l4.value: l5.value) !== l5.value ? l262.fvalue(values, v1168) : (l62.fvalue(pv, v1168) !== l5.value ? (function(v1173,v1174){
9985                         return (l106.fvalue(pv, v1173, (function(){
9986                             var symbol = l230;
9987                             var value = symbol.value;
9988                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9989                             return value;
9990                         })()) !== l5.value ? (function(v1175){
9991                             return (function(){
9992                                 var f = v1175;
9993                                 var args = [values];
9994                                 var tail = (v1174);
9995                                 while (tail != l5.value){
9996                                     args.push(tail.car);
9997                                     tail = tail.cdr;
9998                                 }
9999                                 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
10000                             })();
10001                         })(l43.fvalue(pv, l106.fvalue(pv, v1173, (function(){
10002                             var symbol = l230;
10003                             var value = symbol.value;
10004                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10005                             return value;
10006                         })()))) : ((l106.fvalue(pv, v1173, (function(){
10007                             var symbol = l320;
10008                             var value = symbol.value;
10009                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10010                             return value;
10011                         })()) !== l5.value ? l29.fvalue(pv, l224.fvalue(pv, v1173, l113, l227)) : l5.value) !== l5.value ? (function(v1176){
10012                             return (function(){
10013                                 var f = v1176;
10014                                 var args = [values];
10015                                 var tail = (v1174);
10016                                 while (tail != l5.value){
10017                                     args.push(tail.car);
10018                                     tail = tail.cdr;
10019                                 }
10020                                 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
10021                             })();
10022                         })(l43.fvalue(pv, l106.fvalue(pv, v1173, (function(){
10023                             var symbol = l320;
10024                             var value = symbol.value;
10025                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10026                             return value;
10027                         })()))) : (l222.fvalue(pv, v1173) !== l5.value ? l193.fvalue(values, l120.fvalue(pv, v1168), v1169) : l368.fvalue(values, v1173, v1174))));
10028                     })((function(){
10029                         var tmp = v1168;
10030                         return tmp === l5.value? l5.value: tmp.car;
10031                     })(),(function(){
10032                         var tmp = v1168;
10033                         return tmp === l5.value? l5.value: tmp.cdr;
10034                     })()) : (function(){
10035                         throw l157.fvalue(pv, "How should I compile ", l166.fvalue(pv, v1168), "?");
10036                     })())))));
10037                 }
10038                 finally {
10039                     l196.value = v1170;
10040                 }
10041             })(v1169);
10042         })();
10043     }));
10044     return l193;
10045 })();
10046 var l370 = {name: "LS-COMPILE-TOPLEVEL"};
10047 (function(){
10048     (l370).fvalue = (function(v1184){
10049         ((v1184)["fname"] = "LS-COMPILE-TOPLEVEL");
10050         return v1184;
10051     })((function (values,v1178,v1179){
10052         checkArgsAtLeast(arguments, 2);
10053         checkArgsAtMost(arguments, 3);
10054         var v1179;
10055         switch(arguments.length-1){
10056         case 1:
10057             v1179=l5.value;
10058         default: break;
10059         }
10060         return (function(){
10061             return (function(v1180){
10062                 try {
10063                     var tmp;
10064                     tmp = l217.value;
10065                     l217.value = v1180;
10066                     v1180 = tmp;
10067                     return ((((function(){
10068                         var tmp = v1178;
10069                         return (typeof tmp == 'object' && 'car' in tmp);
10070                     })()?l4.value: l5.value) !== l5.value ? (((function(){
10071                         var tmp = v1178;
10072                         return tmp === l5.value? l5.value: tmp.car;
10073                     })() === l123)?l4.value: l5.value) : l5.value) !== l5.value ? (function(v1182){
10074                         return l159.fvalue(values, l98.fvalue(pv, (function(){
10075                             var symbol = l219;
10076                             var func = symbol.fvalue;
10077                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10078                             return func;
10079                         })(), v1182));
10080                     })(l81.fvalue(pv, (function (values,v1181){
10081                         checkArgs(arguments, 2);
10082                         return l370.fvalue(values, v1181, l4.value);
10083                     }), (function(){
10084                         var tmp = v1178;
10085                         return tmp === l5.value? l5.value: tmp.cdr;
10086                     })())) : (function(v1183){
10087                         return l191.fvalue(values, l160.fvalue(pv, l220.fvalue(pv), l191.fvalue(pv, ";", (function(){
10088                             var symbol = l156;
10089                             var value = symbol.value;
10090                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10091                             return value;
10092                         })())), (v1183 !== l5.value ? l191.fvalue(pv, v1183, ";", (function(){
10093                             var symbol = l156;
10094                             var value = symbol.value;
10095                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10096                             return value;
10097                         })()) : l5.value));
10098                     })(l193.fvalue(pv, v1178, v1179)));
10099                 }
10100                 finally {
10101                     l217.value = v1180;
10102                 }
10103             })(l5.value);
10104         })();
10105     }));
10106     return l370;
10107 })();
10108 (function(){
10109     (l272).fvalue = (function(v1186){
10110         ((v1186)["fname"] = "EVAL");
10111         return v1186;
10112     })((function (values,v1185){
10113         checkArgs(arguments, 2);
10114         return (function(){
10115             return (function(){
10116                 var string = l370.fvalue(pv, v1185, l4.value);
10117                 if (typeof string != 'string')
10118                     throw 'The value ' + string + ' is not a type string.';
10119                 return (function(){
10120                     var v = eval.apply(window, [string]);
10121                     if (typeof v !== 'object' || !('multiple-value' in v)){
10122                         v = [v];
10123                         v['multiple-value'] = true;
10124                     }
10125                     return values.apply(this, v);
10126                 })();
10127             })();
10128         })();
10129     }));
10130     return l272;
10131 })();
10132 var l371 = {name: "&BODY"};
10133 var l372 = QIList(l235,l236,l234,l371,l22,l17,l146,l65,l66,l23,l24,l25,l331,l333,l21,l21,l330,l332,l57,l68,l352,l364,l363,l106,l48,l208,l20,l20,l95,l34,l41,l39,l35,l32,l32,l55,l284,l36,l40,l37,l33,l33,l350,l87,l109,l136,l149,l42,l268,l45,l339,l351,l113,l360,l18,l118,l155,l292,l82,l232,l147,l49,l89,l89,l153,l144,l269,l6,l94,l75,l276,l279,l88,l86,l54,l30,l31,l83,l84,l50,l2,l121,l3,l10,l12,l1,l9,l101,l100,l110,l72,l73,l112,l52,l53,l56,l343,l28,l344,l354,l272,l105,l154,l131,l47,l85,l62,l80,l362,l132,l337,l81,l96,l91,l327,l115,l294,l116,l295,l127,l5,l29,l93,l92,l13,l334,l58,l137,l139,l135,l184,l90,l166,l169,l229,l59,l60,l123,l71,l51,l186,l128,l97,l98,l99,l15,l283,l69,l70,l124,l125,l43,l256,l122,l119,l104,l347,l107,l108,l346,l102,l264,l338,l145,l341,l340,l336,l4,l290,l44,l285,l27,l8,l293,l165,l164,l114,l168,l7,l111,l361,l26,l5);
10134 l154.fvalue(values, l372);
10135 ((l146).value = (function(){
10136     var symbol = l142;
10137     var value = symbol.value;
10138     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10139     return value;
10140 })());
10141 (function(){
10142     var string = "var lisp";
10143     if (typeof string != 'string')
10144         throw 'The value ' + string + ' is not a type string.';
10145     return (function(){
10146         var v = eval.apply(window, [string]);
10147         if (typeof v !== 'object' || !('multiple-value' in v)){
10148             v = [v];
10149             v['multiple-value'] = true;
10150         }
10151         return values.apply(this, v);
10152     })();
10153 })();
10154 (lisp = {});
10155 (lisp.read = (function(){
10156     var symbol = l190;
10157     var func = symbol.fvalue;
10158     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10159     return func;
10160 })());
10161 (lisp.print = (function(){
10162     var symbol = l166;
10163     var func = symbol.fvalue;
10164     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10165     return func;
10166 })());
10167 (lisp.eval = (function(){
10168     var symbol = l272;
10169     var func = symbol.fvalue;
10170     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10171     return func;
10172 })());
10173 (lisp.compile = (function (values,v1187){
10174     checkArgs(arguments, 2);
10175     return l370.fvalue(values, v1187, l4.value);
10176 }));
10177 (lisp.evalString = (function (values,v1188){
10178     checkArgs(arguments, 2);
10179     return l272.fvalue(values, l190.fvalue(pv, v1188));
10180 }));
10181 (lisp.compileString = (function (values,v1189){
10182     checkArgs(arguments, 2);
10183     return l370.fvalue(values, l190.fvalue(pv, v1189), l4.value);
10184 }));
10185 var l373 = {name: "OP"};
10186 var l374 = {name: "SYM"};
10187 var l375 = {name: "X"};
10188 var l376 = {name: "ARGS"};
10189 var l377 = {name: "BODY"};
10190 var l378 = {name: "DECLS"};
10191 var l379 = {name: "DECL"};
10192 var l380 = {name: "NAME"};
10193 var l381 = {name: "ARG"};
10194 var l382 = {name: "FORM"};
10195 var l383 = {name: "PACKAGE-DESIGNATOR"};
10196 var l384 = {name: "CLAUSULES"};
10197 var l385 = {name: "VALUE"};
10198 var l386 = {name: "C"};
10199 var l387 = {name: "INTEGER"};
10200 var l388 = {name: "PAIRS"};
10201 var l389 = {name: "PLACE"};
10202 var l390 = {name: "VARS"};
10203 var l391 = {name: "VALS"};
10204 var l392 = {name: "STORE-VARS"};
10205 var l393 = {name: "WRITER-FORM"};
10206 var l394 = {name: "READER-FORM"};
10207 var l395 = {name: "RESULT"};
10208 var l396 = {name: "ACCESS-FN"};
10209 var l397 = {name: "LAMBDA-LIST"};
10210 var l398 = {name: "VALUE-FROM"};
10211 var l399 = {name: "VARIABLES"};
10212 var l400 = {name: "ITERATION"};
10213 var l401 = {name: "SEQ"};
10214 var l402 = {name: "INDEX"};
10215 var l403 = {name: "HEAD"};
10216 var l404 = {name: "TAIL"};
10217 var l405 = {name: "COLLECT"};
10218 var l406 = {name: "VARLIST"};
10219 var l407 = {name: "ENDLIST"};
10220 var l408 = {name: "V"};
10221 var l409 = {name: "ASSIGNMENTS"};
10222 var l410 = {name: "FORM1"};
10223 var l411 = {name: "FORMS"};
10224 var l412 = {name: "G"};
10225 var l413 = {name: "!FORM"};
10226 var l414 = {name: "CLAUSULE"};
10227 var l415 = {name: "ITER"};
10228 var l416 = {name: "G!TO"};
10229 var l417 = {name: "VAR"};
10230 var l418 = {name: "TO"};
10231 var l419 = {name: "G!LIST"};
10232 var l420 = {name: "DUMMIES"};
10233 var l421 = {name: "NEWVAL"};
10234 var l422 = {name: "SETTER"};
10235 var l423 = {name: "GETTER"};
10236 var l424 = {name: "DELTA"};
10237 var l425 = {name: "CONDITION"};
10238 var l426 = {name: "DOCSTRING"};
10239 var l427 = QIList(QIList(QIList(l320,l114,l5,QIList(l226,l5),l5),QIList(l304,l114,l5,QIList(l226,l5),l5),QIList(l303,l114,l5,QIList(l226,l5),l5),QIList(l302,l114,l5,QIList(l226,l5),l5),QIList(l301,l114,l5,QIList(l226,l5),l5),QIList(l300,l114,l5,QIList(l226,l5),l5),QIList(l299,l114,l5,QIList(l226,l5),l5),QIList(l298,l114,l5,QIList(l226,l5),l5),QIList(l297,l114,l5,QIList(l226,l5),l5),QIList(l296,l114,l5,QIList(l226,l5),l5),QIList(l287,l114,l5,QIList(l226,l5),l5),QIList(l286,l114,l5,QIList(l226,l5),l5),QIList(l280,l114,l5,QIList(l226,l5),l5),QIList(l270,l114,l5,QIList(l226,l5),l5),QIList(l260,l114,l5,QIList(l226,l5),l5),QIList(l259,l114,l5,QIList(l226,l5),l5),QIList(l233,l114,l5,QIList(l226,l5),l5),QIList(l230,l114,l5,QIList(l226,l5),l5),QIList(l217,l114,l5,QIList(l226,l5),l5),QIList(l213,l114,l5,QIList(l226,l5),l5),QIList(l212,l114,l5,QIList(l226,l5),l5),QIList(l196,l114,l5,QIList(l226,l5),l5),QIList(l185,l114,l5,QIList(l226,l5),l5),QIList(l156,l114,l5,QIList(l226,l5),l5),QIList(l146,l114,l5,QIList(l226,l5),l5),QIList(l143,l114,l5,QIList(l226,l5),l5),QIList(l142,l114,l5,QIList(l226,l5),l5),QIList(l141,l114,l5,QIList(l226,l5),l5),QIList(l130,l114,l5,QIList(l226,l5),l5),QIList(l117,l114,l5,QIList(l226,l5),l5),QIList(l17,l114,l5,QIList(l226,l5),l5),QIList(l5,l114,l5,QIList(l228,l226,l5),l5),QIList(l4,l114,l5,QIList(l228,l226,l5),l5),l5),QIList(QIList(l329,l222,QIList(l113,QIList(l6,QIList(l373,l374,l5),QIList(l187,QIList(l321,QIList(l189,l373,l5),QIList(l375,l235,l376,l5),QIList(l276,QIList(QIList(l376,QIList(l30,l375,l376,l5),l5),l5),QIList(l325,l376,QIList(l192,QIList(l328,l376,QIList(l189,l374,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l325,l222,QIList(l113,QIList(l6,QIList(l376,l235,l377,l5),QIList(l8,QIList(l336,l376,l5),QIList(l354,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l5),l5),QIList(l187,QIList(l324,QIList(l189,l376,l5),QIList(l6,QIList(QIList(l189,l376,l5),l5),QIList(l191,"return ",QIList(l188,l377,l5),";",l156,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l323,l222,QIList(l113,QIList(l6,QIList(l378,l235,l377,l5),QIList(l187,QIList(l194,QIList(l188,QIList(l81,QIList(l6,QIList(l379,l5),QIList(l187,QIList(l191,"var ",QIList(l189,QIList(l42,l379,l5),l5)," = ",QIList(l189,QIList(l44,l379,l5),l5),";",l156,l5),l5),l5),l378,l5),l5),QIList(l188,QIList(l81,QIList(l6,QIList(l379,l5),QIList(l187,QIList(l191,"if (typeof ",QIList(l189,QIList(l42,l379,l5),l5)," != '",QIList(l189,QIList(l43,l379,l5),l5),"')",l156,QIList(l195,"throw 'The value ' + ",QIList(l189,QIList(l42,l379,l5),l5)," + ' is not a type ",QIList(l189,QIList(l43,l379,l5),l5),".';",l156,l5),l5),l5),l5),l378,l5),l5),QIList(l191,"return ",QIList(l123,QIList(l188,l377,l5),l5),";",l156,l5),l5),l5),l5),l5),l5,l5),QIList(l322,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l321,QIList(l189,l380,l5),QIList(l189,l376,l5),QIList(l276,QIList(l189,QIList(l81,QIList(l6,QIList(l381,l5),QIList(l187,QIList(QIList(l189,l381,l5),QIList(l193,QIList(l189,l381,l5),l5),l5),l5),l5),l376,l5),l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l321,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l51,QIList(l47,QIList(l186,QIList(l189,l380,l5),l5),QIList(l6,QIList(l189,l376,l5),QIList(l208,QIList(l189,l380,l5),QIList(l188,l377,l5),l5),l5),l5),l320,l5),l5),l5),l5),l5,l5),QIList(l187,l222,QIList(l113,QIList(l6,QIList(l375,l5),QIList(l306,l375,l5),l5),l5),l5,l5),QIList(l273,l222,QIList(l113,QIList(l6,QIList(l380,l376,l382,l5),QIList(l187,QIList(l231,QIList(l189,l380,l5),QIList(l189,l376,l5),QIList(l193,QIList(l189,l382,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l231,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l51,QIList(l47,QIList(l186,QIList(l189,l380,l5),l5),QIList(l6,QIList(l189,l376,l5),QIList(l208,QIList(l189,l380,l5),QIList(l188,l377,l5),l5),l5),l5),l230,l5),l5),l5),l5),l5,l5),QIList(l194,l222,QIList(l113,QIList(l6,QIList(l235,l377,l5),QIList(l187,QIList(l191,"(function(){",l156,QIList(l195,QIList(l188,l377,l5),l5),"})()",l5),l5),l5),l5),l5,l5),QIList(l158,l222,QIList(l113,QIList(l6,QIList(l114,l235,l382,l5),QIList(l187,QIList(l119,QIList(l189,l114,l5),QIList(l157,QIList(l189,l114,l5),QIList(l123,QIList(l188,l382,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l147,l222,QIList(l113,QIList(l6,QIList(l383,l5),QIList(l187,QIList(l271,QIList(l119,l146,QIList(l134,QIList(l189,l383,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l126,l222,QIList(l113,QIList(l6,QIList(l375,l235,l384,l5),QIList(l276,QIList(QIList(l385,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l385,l5),QIList(l189,l375,l5),l5),l5),QIList(l54,QIList(l188,QIList(l81,QIList(l6,QIList(l386,l5),QIList(l232,QIList(l343,QIList(l32,l386,l5),l4,l5),QIList(l187,QIList(QIList(l4,QIList(l188,QIList(l46,l386,l5),l5),l5),l5),l5),QIList(l187,QIList(QIList(QIList(l189,QIList(l56,QIList(l32,l386,l5),QIList(l387,QIList(l186,l89,l5),l5),QIList(l30,QIList(l186,l31,l5),l5),QIList(l107,QIList(l186,l346,l5),l5),QIList(l48,QIList(l186,l48,l5),l5),QIList(l13,QIList(l186,l13,l5),l5),l5),l5),QIList(l189,l385,l5),l5),QIList(l188,QIList(l58,QIList(l46,l386,l5),QIList(l47,l5,l5),l5),l5),l5),l5),l5),l5),l384,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l122,l222,QIList(l113,QIList(l6,QIList(l235,l388,l5),QIList(l54,QIList(QIList(l13,l388,l5),l5,l5),QIList(QIList(l13,QIList(l33,l388,l5),l5),QIList(l354,"Odd number of arguments to setf.",l5),l5),QIList(QIList(l13,QIList(l37,l388,l5),l5),QIList(l276,QIList(QIList(l389,QIList(l42,l388,l5),l5),QIList(l385,QIList(l43,l388,l5),l5),l5),QIList(l115,QIList(l390,l391,l392,l393,l394,l5),QIList(l118,l389,l5),QIList(l187,QIList(l279,QIList(l189,QIList(l81,QIList(l113,l47,l5),l390,l391,l5),l5),QIList(l115,QIList(l189,l392,l5),QIList(l189,l385,l5),QIList(l189,l393,l5),l5),l5),l5),l5),l5),l5),QIList(l4,QIList(l187,QIList(l123,QIList(l188,QIList(l72,QIList(QIList(l388,l388,QIList(l37,l388,l5),l5),QIList(l395,QIList(l186,l5,l5),QIList(l30,QIList(l187,QIList(l122,QIList(l189,QIList(l32,l388,l5),l5),QIList(l189,QIList(l35,l388,l5),l5),l5),l5),l395,l5),l5),l5),QIList(QIList(l13,l388,l5),QIList(l70,l395,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l121,l222,QIList(l113,QIList(l6,QIList(l396,l397,l235,l377,l5),QIList(l8,QIList(l336,l396,l5),QIList(l354,"ACCESS-FN must be a symbol.",l5),l5),QIList(l187,QIList(l123,QIList(l51,QIList(l30,QIList(l186,QIList(l189,l396,l5),l5),QIList(l6,QIList(l189,l397,l5),QIList(l188,l377,l5),l5),l5),l117,l5),QIList(l186,QIList(l189,l396,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l116,l222,QIList(l113,QIList(l6,QIList(l398,l5),QIList(l187,QIList(l294,QIList(l113,l47,l5),QIList(l189,l398,l5),l5),l5),l5),l5),l5,l5),QIList(l115,l222,QIList(l113,QIList(l6,QIList(l399,l398,l235,l377,l5),QIList(l187,QIList(l294,QIList(l6,QIList(l234,QIList(l188,l399,l5),l235,QIList(l189,QIList(l18,l5),l5),l5),QIList(l188,l377,l5),l5),QIList(l189,l398,l5),l5),l5),l5),l5),l5,l5),QIList(l103,l222,QIList(l113,QIList(l6,QIList(l400,l235,l377,l5),QIList(l276,QIList(QIList(l401,QIList(l18,l5),l5),QIList(l402,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l401,l5),QIList(l189,QIList(l43,l400,l5),l5),l5),l5),QIList(l54,QIList(QIList(l346,QIList(l189,l401,l5),l5),QIList(l276,QIList(QIList(QIList(l189,l402,l5),0,l5),l5),QIList(l53,QIList(QIList(l189,l402,l5),QIList(l75,QIList(l189,l401,l5),l5),l5),QIList(l276,QIList(QIList(QIList(l189,QIList(l42,l400,l5),l5),QIList(l350,QIList(l189,l401,l5),QIList(l189,l402,l5),l5),l5),l5),QIList(l188,l377,l5),l5),l5),l5),l5),QIList(QIList(l62,QIList(l189,l401,l5),l5),QIList(l52,QIList(QIList(l189,QIList(l42,l400,l5),l5),QIList(l189,l401,l5),l5),QIList(l188,l377,l5),l5),l5),QIList(l4,QIList(l354,"type-error!",l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l80,l222,QIList(l113,QIList(l6,QIList(l235,l377,l5),QIList(l187,QIList(l16,l4,QIList(l188,l377,l5),l5),l5),l5),l5),l5,l5),QIList(l77,l222,QIList(l113,QIList(l6,QIList(l235,l377,l5),QIList(l276,QIList(QIList(l403,QIList(l18,l5),l5),QIList(l404,QIList(l18,l5),l5),l5),QIList(l187,QIList(l279,QIList(QIList(QIList(l189,l403,l5),QIList(l30,QIList(l186,l79,l5),l5,l5),l5),QIList(QIList(l189,l404,l5),QIList(l189,l403,l5),l5),l5),QIList(l268,QIList(QIList(l405,QIList(l375,l5),QIList(l125,QIList(l189,l404,l5),QIList(l30,l375,l5,l5),l5),QIList(l119,QIList(l189,l404,l5),QIList(l33,QIList(l189,l404,l5),l5),l5),l375,l5),l5),QIList(l188,l377,l5),l5),QIList(l33,QIList(l189,l403,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l73,l222,QIList(l113,QIList(l6,QIList(l406,l407,l235,l377,l5),QIList(l187,QIList(l208,l5,QIList(l279,QIList(l189,QIList(l81,QIList(l6,QIList(l375,l5),QIList(l47,QIList(l42,l375,l5),QIList(l43,l375,l5),l5),l5),l406,l5),l5),QIList(l16,l4,QIList(l7,QIList(l189,QIList(l32,l407,l5),l5),QIList(l15,QIList(l123,QIList(l188,QIList(l33,l407,l5),l5),l5),l5),l5),QIList(l290,QIList(l188,l377,l5),l5),QIList(l119,QIList(l188,QIList(l352,QIList(l113,l68,l5),QIList(l81,QIList(l6,QIList(l408,l5),QIList(l57,QIList(l31,QIList(l37,l408,l5),l5),QIList(l47,QIList(l42,l408,l5),QIList(l44,l408,l5),l5),l5),l5),l406,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l72,l222,QIList(l113,QIList(l6,QIList(l406,l407,l235,l377,l5),QIList(l187,QIList(l208,l5,QIList(l276,QIList(l189,QIList(l81,QIList(l6,QIList(l375,l5),QIList(l47,QIList(l42,l375,l5),QIList(l43,l375,l5),l5),l5),l406,l5),l5),QIList(l16,l4,QIList(l7,QIList(l189,QIList(l32,l407,l5),l5),QIList(l15,QIList(l123,QIList(l188,QIList(l33,l407,l5),l5),l5),l5),l5),QIList(l290,QIList(l188,l377,l5),l5),QIList(l71,QIList(l188,QIList(l352,QIList(l113,l68,l5),QIList(l81,QIList(l6,QIList(l408,l5),QIList(l57,QIList(l31,QIList(l37,l408,l5),l5),QIList(l47,QIList(l42,l408,l5),QIList(l44,l408,l5),l5),l5),l5),l406,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l71,l222,QIList(l113,QIList(l6,QIList(l235,l388,l5),QIList(l276,QIList(QIList(l409,QIList(l186,l5,l5),l5),l5),QIList(l16,l4,QIList(l54,QIList(QIList(l13,l388,l5),QIList(l15,l5),l5),QIList(QIList(l13,QIList(l33,l388,l5),l5),QIList(l354,"Odd paris in PSETQ",l5),l5),QIList(l4,QIList(l276,QIList(QIList(l114,QIList(l32,l388,l5),l5),QIList(l385,QIList(l35,l388,l5),l5),l5),QIList(l51,QIList(l187,QIList(QIList(l189,l114,l5),QIList(l189,QIList(l18,l5),l5),QIList(l189,l385,l5),l5),l5),l409,l5),QIList(l119,l388,QIList(l37,l388,l5),l5),l5),l5),l5),l5),QIList(l119,l409,QIList(l70,l409,l5),l5),QIList(l187,QIList(l276,QIList(l189,QIList(l81,QIList(l113,l33,l5),l409,l5),l5),QIList(l119,QIList(l188,QIList(l63,QIList(l113,l68,l5),QIList(l81,QIList(l113,l95,l5),l409,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l60,l222,QIList(l113,QIList(l6,QIList(l410,l395,l235,l377,l5),QIList(l187,QIList(l59,QIList(l123,QIList(l189,l410,l5),QIList(l189,l395,l5),l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5,l5),QIList(l59,l222,QIList(l113,QIList(l6,QIList(l382,l235,l377,l5),QIList(l276,QIList(QIList(l385,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l385,l5),QIList(l189,l382,l5),l5),l5),QIList(l188,l377,l5),QIList(l189,l385,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l58,l222,QIList(l113,QIList(l6,QIList(l235,l411,l5),QIList(l54,QIList(QIList(l13,l411,l5),l5,l5),QIList(QIList(l13,QIList(l33,l411,l5),l5),QIList(l32,l411,l5),l5),QIList(l4,QIList(l276,QIList(QIList(l412,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l412,l5),QIList(l189,QIList(l32,l411,l5),l5),l5),l5),QIList(l232,QIList(l189,l412,l5),QIList(l189,l412,l5),QIList(l58,QIList(l188,QIList(l33,l411,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l57,l222,QIList(l113,QIList(l6,QIList(l235,l411,l5),QIList(l54,QIList(QIList(l13,l411,l5),l4,l5),QIList(QIList(l13,QIList(l33,l411,l5),l5),QIList(l32,l411,l5),l5),QIList(l4,QIList(l187,QIList(l232,QIList(l189,QIList(l32,l411,l5),l5),QIList(l57,QIList(l188,QIList(l33,l411,l5),l5),l5),l5,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l56,l222,QIList(l113,QIList(l6,QIList(l382,l235,l384,l5),QIList(l187,QIList(l55,QIList(l189,l382,l5),QIList(l188,QIList(l68,l384,QIList(l187,QIList(QIList(l4,QIList(l354,"ECASE expression failed.",l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l55,l222,QIList(l113,QIList(l6,QIList(l382,l235,l384,l5),QIList(l276,QIList(QIList(l413,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l413,l5),QIList(l189,l382,l5),l5),l5),QIList(l54,QIList(l188,QIList(l81,QIList(l6,QIList(l414,l5),QIList(l232,QIList(l343,QIList(l32,l414,l5),l4,l5),l414,QIList(l187,QIList(QIList(l28,QIList(l189,l413,l5),QIList(l186,QIList(l189,QIList(l32,l414,l5),l5),l5),l5),QIList(l188,QIList(l33,l414,l5),l5),l5),l5),l5),l5),l384,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l54,l222,QIList(l113,QIList(l6,QIList(l235,l384,l5),QIList(l232,QIList(l13,l384,l5),l5,QIList(l232,QIList(l343,QIList(l34,l384,l5),l4,l5),QIList(l187,QIList(l123,QIList(l188,QIList(l36,l384,l5),l5),l5),l5),QIList(l187,QIList(l232,QIList(l189,QIList(l34,l384,l5),l5),QIList(l123,QIList(l188,QIList(l36,l384,l5),l5),l5),QIList(l54,QIList(l188,QIList(l33,l384,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l53,l222,QIList(l113,QIList(l6,QIList(l415,l235,l377,l5),QIList(l276,QIList(QIList(l416,QIList(l18,l5),l5),QIList(l417,QIList(l42,l415,l5),l5),QIList(l418,QIList(l43,l415,l5),l5),QIList(l395,QIList(l44,l415,l5),l5),l5),QIList(l187,QIList(l208,l5,QIList(l276,QIList(QIList(QIList(l189,l417,l5),0,l5),QIList(QIList(l189,l416,l5),QIList(l189,l418,l5),l5),l5),QIList(l263,QIList(l331,QIList(l189,l417,l5),QIList(l189,l416,l5),l5),QIList(l290,QIList(l188,l377,l5),l5),QIList(l49,QIList(l189,l417,l5),l5),l5),QIList(l189,l395,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l52,l222,QIList(l113,QIList(l6,QIList(l415,l235,l377,l5),QIList(l276,QIList(QIList(l417,QIList(l42,l415,l5),l5),QIList(l419,QIList(l18,l5),l5),l5),QIList(l187,QIList(l208,l5,QIList(l276,QIList(QIList(QIList(l189,l419,l5),QIList(l189,QIList(l43,l415,l5),l5),l5),QIList(QIList(l189,l417,l5),l5,l5),l5),QIList(l263,QIList(l189,l419,l5),QIList(l119,QIList(l189,l417,l5),QIList(l32,QIList(l189,l419,l5),l5),l5),QIList(l290,QIList(l188,l377,l5),l5),QIList(l119,QIList(l189,l419,l5),QIList(l33,QIList(l189,l419,l5),l5),l5),l5),QIList(l189,QIList(l44,l415,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l222,QIList(l113,QIList(l6,QIList(l375,l389,l5),QIList(l115,QIList(l420,l391,l421,l422,l423,l5),QIList(l118,l389,l5),QIList(l276,QIList(QIList(l412,QIList(l18,l5),l5),l5),QIList(l187,QIList(l279,QIList(QIList(QIList(l189,l412,l5),QIList(l189,l375,l5),l5),QIList(l188,QIList(l81,QIList(l113,l47,l5),l420,l391,l5),l5),QIList(QIList(l189,QIList(l32,l421,l5),l5),QIList(l30,QIList(l189,l412,l5),QIList(l189,l423,l5),l5),l5),QIList(l188,QIList(l33,l421,l5),l5),l5),QIList(l189,l422,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l50,l222,QIList(l113,QIList(l6,QIList(l375,l234,QIList(l424,1,l5),l5),QIList(l187,QIList(l119,QIList(l189,l375,l5),QIList(l66,QIList(l189,l375,l5),QIList(l189,l424,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l49,l222,QIList(l113,QIList(l6,QIList(l375,l234,QIList(l424,1,l5),l5),QIList(l187,QIList(l119,QIList(l189,l375,l5),QIList(l65,QIList(l189,l375,l5),QIList(l189,l424,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l16,l222,QIList(l113,QIList(l6,QIList(l425,l235,l377,l5),QIList(l187,QIList(l208,l5,QIList(l263,QIList(l189,l425,l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l15,l222,QIList(l113,QIList(l6,QIList(l234,l385,l5),QIList(l187,QIList(l283,l5,QIList(l189,l385,l5),l5),l5),l5),l5),l5,l5),QIList(l12,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l123,QIList(l339,QIList(l186,QIList(l189,l380,l5),l5),QIList(l11,QIList(l189,QIList(l338,l380,l5),l5),QIList(l189,l376,l5),QIList(l188,QIList(l232,QIList(l57,QIList(l346,QIList(l32,l377,l5),l5),QIList(l29,QIList(l13,QIList(l33,l377,l5),l5),l5),l5),QIList(l187,QIList(QIList(l189,QIList(l32,l377,l5),l5),QIList(l208,QIList(l189,l380,l5),QIList(l188,QIList(l33,l377,l5),l5),l5),l5),l5),QIList(l187,QIList(QIList(l208,QIList(l189,l380,l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5),l5),QIList(l186,QIList(l189,l380,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l11,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l276,QIList(QIList(l375,QIList(l18,"FN",l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l375,l5),QIList(l6,QIList(l189,l376,l5),QIList(l188,l377,l5),l5),l5),l5),QIList(l358,QIList(l189,l375,l5),"fname",QIList(l189,l380,l5),l5),QIList(l189,l375,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l10,l222,QIList(l113,QIList(l6,QIList(l380,l385,l234,l426,l5),QIList(l187,QIList(l123,QIList(l119,QIList(l189,l380,l5),QIList(l189,l385,l5),l5),QIList(l188,QIList(l7,QIList(l346,l426,l5),QIList(l187,QIList(QIList(l358,QIList(l186,QIList(l189,l380,l5),l5),"vardoc",QIList(l189,l426,l5),l5),l5),l5),l5),l5),QIList(l186,QIList(l189,l380,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l9,l222,QIList(l113,QIList(l6,QIList(l380,l385,l234,l426,l5),QIList(l187,QIList(l123,QIList(l2,QIList(l226,QIList(l189,l380,l5),l5),l5),QIList(l8,QIList(l20,QIList(l186,QIList(l189,l380,l5),l5),l5),QIList(l119,QIList(l189,l380,l5),QIList(l189,l385,l5),l5),l5),QIList(l188,QIList(l7,QIList(l346,l426,l5),QIList(l187,QIList(QIList(l358,QIList(l186,QIList(l189,l380,l5),l5),"vardoc",QIList(l189,l426,l5),l5),l5),l5),l5),l5),QIList(l186,QIList(l189,l380,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l8,l222,QIList(l113,QIList(l6,QIList(l425,l235,l377,l5),QIList(l187,QIList(l232,QIList(l189,l425,l5),l5,QIList(l123,QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l7,l222,QIList(l113,QIList(l6,QIList(l425,l235,l377,l5),QIList(l187,QIList(l232,QIList(l189,l425,l5),QIList(l123,QIList(l188,l377,l5),l5),l5,l5),l5),l5),l5),l5,l5),QIList(l6,l222,QIList(l113,QIList(l6,QIList(l376,l235,l377,l5),QIList(l187,QIList(l113,QIList(l6,QIList(l189,l376,l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l3,l222,QIList(l113,QIList(l6,QIList(l380,l385,l234,l426,l5),QIList(l187,QIList(l123,QIList(l2,QIList(l226,QIList(l189,l380,l5),l5),l5),QIList(l2,QIList(l228,QIList(l189,l380,l5),l5),l5),QIList(l119,QIList(l189,l380,l5),QIList(l189,l385,l5),l5),QIList(l188,QIList(l7,QIList(l346,l426,l5),QIList(l187,QIList(QIList(l358,QIList(l186,QIList(l189,l380,l5),l5),"vardoc",QIList(l189,l426,l5),l5),l5),l5),l5),l5),QIList(l186,QIList(l189,l380,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l2,l222,QIList(l113,QIList(l6,QIList(l235,l378,l5),QIList(l187,QIList(l271,QIList(l188,QIList(l81,QIList(l6,QIList(l379,l5),QIList(l187,QIList(l225,QIList(l186,QIList(l189,l379,l5),l5),l5),l5),l5),l378,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l1,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l271,QIList(l221,QIList(l186,QIList(l189,l380,l5),l5),QIList(l186,QIList(l113,QIList(l6,QIList(l189,QIList(l81,QIList(l113,QIList(l6,QIList(l375,l5),QIList(l232,QIList(l343,l375,QIList(l186,l371,l5),l5),QIList(l186,l235,l5),l375,l5),l5),l5),l376,l5),l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),l5),l5,l5,l5);
10240 ((l212).value = l427);
10241 var l428 = QIList(QIList(l426,"l426"),QIList(l425,"l425"),QIList(l424,"l424"),QIList(l423,"l423"),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(l371,"l371"),QIList(l370,"l370"),QIList(l369,"l369"),QIList(l368,"l368"),QIList(l367,"l367"),QIList(l366,"l366"),QIList(l365,"l365"),QIList(l364,"l364"),QIList(l363,"l363"),QIList(l362,"l362"),QIList(l361,"l361"),QIList(l360,"l360"),QIList(l359,"l359"),QIList(l358,"l358"),QIList(l357,"l357"),QIList(l356,"l356"),QIList(l355,"l355"),QIList(l354,"l354"),QIList(l353,"l353"),QIList(l352,"l352"),QIList(l351,"l351"),QIList(l350,"l350"),QIList(l349,"l349"),QIList(l348,"l348"),QIList(l347,"l347"),QIList(l346,"l346"),QIList(l345,"l345"),QIList(l344,"l344"),QIList(l343,"l343"),QIList(l342,"l342"),QIList(l341,"l341"),QIList(l340,"l340"),QIList(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(l290,"l290"),QIList(l289,"l289"),QIList(l288,"l288"),QIList(l287,"l287"),QIList(l286,"l286"),QIList(l285,"l285"),QIList(l284,"l284"),QIList(l283,"l283"),QIList(l282,"l282"),QIList(l281,"l281"),QIList(l280,"l280"),QIList(l279,"l279"),QIList(l278,"l278"),QIList(l277,"l277"),QIList(l276,"l276"),QIList(l275,"l275"),QIList(l274,"l274"),QIList(l273,"l273"),QIList(l272,"l272"),QIList(l271,"l271"),QIList(l270,"l270"),QIList(l269,"l269"),QIList(l268,"l268"),QIList(l267,"l267"),QIList(l266,"l266"),QIList(l265,"l265"),QIList(l264,"l264"),QIList(l263,"l263"),QIList(l262,"l262"),QIList(l261,"l261"),QIList(l260,"l260"),QIList(l259,"l259"),QIList(l258,"l258"),QIList(l257,"l257"),QIList(l256,"l256"),QIList(l255,"l255"),QIList(l254,"l254"),QIList(l253,"l253"),QIList(l252,"l252"),QIList(l251,"l251"),QIList(l250,"l250"),QIList(l249,"l249"),QIList(l248,"l248"),QIList(l247,"l247"),QIList(l246,"l246"),QIList(l245,"l245"),QIList(l244,"l244"),QIList(l243,"l243"),QIList(l242,"l242"),QIList(l241,"l241"),QIList(l240,"l240"),QIList(l239,"l239"),QIList(l238,"l238"),QIList(l236,"l236"),QIList(l235,"l235"),QIList(l234,"l234"),QIList(l233,"l233"),QIList(l232,"l232"),QIList(l231,"l231"),QIList(l230,"l230"),QIList(l229,"l229"),QIList(l228,"l228"),QIList(l227,"l227"),QIList(l226,"l226"),QIList(l225,"l225"),QIList(l224,"l224"),QIList(l223,"l223"),QIList(l222,"l222"),QIList(l221,"l221"),QIList(l220,"l220"),QIList(l219,"l219"),QIList(l218,"l218"),QIList(l217,"l217"),QIList(l216,"l216"),QIList(l215,"l215"),QIList(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);
10242 (function(){
10243     l148.fvalue(pv, l426);
10244     l148.fvalue(pv, l425);
10245     l148.fvalue(pv, l424);
10246     l148.fvalue(pv, l423);
10247     l148.fvalue(pv, l422);
10248     l148.fvalue(pv, l421);
10249     l148.fvalue(pv, l420);
10250     l148.fvalue(pv, l419);
10251     l148.fvalue(pv, l418);
10252     l148.fvalue(pv, l417);
10253     l148.fvalue(pv, l416);
10254     l148.fvalue(pv, l415);
10255     l148.fvalue(pv, l414);
10256     l148.fvalue(pv, l413);
10257     l148.fvalue(pv, l412);
10258     l148.fvalue(pv, l411);
10259     l148.fvalue(pv, l410);
10260     l148.fvalue(pv, l409);
10261     l148.fvalue(pv, l408);
10262     l148.fvalue(pv, l407);
10263     l148.fvalue(pv, l406);
10264     l148.fvalue(pv, l405);
10265     l148.fvalue(pv, l404);
10266     l148.fvalue(pv, l403);
10267     l148.fvalue(pv, l402);
10268     l148.fvalue(pv, l401);
10269     l148.fvalue(pv, l400);
10270     l148.fvalue(pv, l399);
10271     l148.fvalue(pv, l398);
10272     l148.fvalue(pv, l397);
10273     l148.fvalue(pv, l396);
10274     l148.fvalue(pv, l395);
10275     l148.fvalue(pv, l394);
10276     l148.fvalue(pv, l393);
10277     l148.fvalue(pv, l392);
10278     l148.fvalue(pv, l391);
10279     l148.fvalue(pv, l390);
10280     l148.fvalue(pv, l389);
10281     l148.fvalue(pv, l388);
10282     l148.fvalue(pv, l387);
10283     l148.fvalue(pv, l386);
10284     l148.fvalue(pv, l385);
10285     l148.fvalue(pv, l384);
10286     l148.fvalue(pv, l383);
10287     l148.fvalue(pv, l382);
10288     l148.fvalue(pv, l381);
10289     l148.fvalue(pv, l380);
10290     l148.fvalue(pv, l379);
10291     l148.fvalue(pv, l378);
10292     l148.fvalue(pv, l377);
10293     l148.fvalue(pv, l376);
10294     l148.fvalue(pv, l375);
10295     l148.fvalue(pv, l374);
10296     l148.fvalue(pv, l373);
10297     l148.fvalue(pv, l371);
10298     l148.fvalue(pv, l370);
10299     l148.fvalue(pv, l369);
10300     l148.fvalue(pv, l368);
10301     l148.fvalue(pv, l367);
10302     l148.fvalue(pv, l366);
10303     l148.fvalue(pv, l365);
10304     l148.fvalue(pv, l364);
10305     l148.fvalue(pv, l363);
10306     l148.fvalue(pv, l362);
10307     l148.fvalue(pv, l361);
10308     l148.fvalue(pv, l360);
10309     l148.fvalue(pv, l359);
10310     l148.fvalue(pv, l358);
10311     l148.fvalue(pv, l357);
10312     l148.fvalue(pv, l356);
10313     l148.fvalue(pv, l355);
10314     l148.fvalue(pv, l354);
10315     l148.fvalue(pv, l353);
10316     l148.fvalue(pv, l352);
10317     l148.fvalue(pv, l351);
10318     l148.fvalue(pv, l350);
10319     l148.fvalue(pv, l349);
10320     l148.fvalue(pv, l348);
10321     l148.fvalue(pv, l347);
10322     l148.fvalue(pv, l346);
10323     l148.fvalue(pv, l345);
10324     l148.fvalue(pv, l344);
10325     l148.fvalue(pv, l343);
10326     l148.fvalue(pv, l342);
10327     l148.fvalue(pv, l341);
10328     l148.fvalue(pv, l340);
10329     l148.fvalue(pv, l339);
10330     l148.fvalue(pv, l338);
10331     l148.fvalue(pv, l337);
10332     l148.fvalue(pv, l336);
10333     l148.fvalue(pv, l335);
10334     l148.fvalue(pv, l334);
10335     l148.fvalue(pv, l333);
10336     l148.fvalue(pv, l332);
10337     l148.fvalue(pv, l331);
10338     l148.fvalue(pv, l330);
10339     l148.fvalue(pv, l329);
10340     l148.fvalue(pv, l328);
10341     l148.fvalue(pv, l327);
10342     l148.fvalue(pv, l326);
10343     l148.fvalue(pv, l325);
10344     l148.fvalue(pv, l324);
10345     l148.fvalue(pv, l323);
10346     l148.fvalue(pv, l322);
10347     l148.fvalue(pv, l321);
10348     l148.fvalue(pv, l320);
10349     l148.fvalue(pv, l319);
10350     l148.fvalue(pv, l318);
10351     l148.fvalue(pv, l317);
10352     l148.fvalue(pv, l316);
10353     l148.fvalue(pv, l315);
10354     l148.fvalue(pv, l314);
10355     l148.fvalue(pv, l313);
10356     l148.fvalue(pv, l312);
10357     l148.fvalue(pv, l311);
10358     l148.fvalue(pv, l310);
10359     l148.fvalue(pv, l309);
10360     l148.fvalue(pv, l308);
10361     l148.fvalue(pv, l307);
10362     l148.fvalue(pv, l306);
10363     l148.fvalue(pv, l305);
10364     l148.fvalue(pv, l304);
10365     l148.fvalue(pv, l303);
10366     l148.fvalue(pv, l302);
10367     l148.fvalue(pv, l301);
10368     l148.fvalue(pv, l300);
10369     l148.fvalue(pv, l299);
10370     l148.fvalue(pv, l298);
10371     l148.fvalue(pv, l297);
10372     l148.fvalue(pv, l296);
10373     l148.fvalue(pv, l295);
10374     l148.fvalue(pv, l294);
10375     l148.fvalue(pv, l293);
10376     l148.fvalue(pv, l292);
10377     l148.fvalue(pv, l290);
10378     l148.fvalue(pv, l289);
10379     l148.fvalue(pv, l288);
10380     l148.fvalue(pv, l287);
10381     l148.fvalue(pv, l286);
10382     l148.fvalue(pv, l285);
10383     l148.fvalue(pv, l284);
10384     l148.fvalue(pv, l283);
10385     l148.fvalue(pv, l282);
10386     l148.fvalue(pv, l281);
10387     l148.fvalue(pv, l280);
10388     l148.fvalue(pv, l279);
10389     l148.fvalue(pv, l278);
10390     l148.fvalue(pv, l277);
10391     l148.fvalue(pv, l276);
10392     l148.fvalue(pv, l275);
10393     l148.fvalue(pv, l274);
10394     l148.fvalue(pv, l273);
10395     l148.fvalue(pv, l272);
10396     l148.fvalue(pv, l271);
10397     l148.fvalue(pv, l270);
10398     l148.fvalue(pv, l269);
10399     l148.fvalue(pv, l268);
10400     l148.fvalue(pv, l267);
10401     l148.fvalue(pv, l266);
10402     l148.fvalue(pv, l265);
10403     l148.fvalue(pv, l264);
10404     l148.fvalue(pv, l263);
10405     l148.fvalue(pv, l262);
10406     l148.fvalue(pv, l261);
10407     l148.fvalue(pv, l260);
10408     l148.fvalue(pv, l259);
10409     l148.fvalue(pv, l258);
10410     l148.fvalue(pv, l257);
10411     l148.fvalue(pv, l256);
10412     l148.fvalue(pv, l255);
10413     l148.fvalue(pv, l254);
10414     l148.fvalue(pv, l253);
10415     l148.fvalue(pv, l252);
10416     l148.fvalue(pv, l251);
10417     l148.fvalue(pv, l250);
10418     l148.fvalue(pv, l249);
10419     l148.fvalue(pv, l248);
10420     l148.fvalue(pv, l247);
10421     l148.fvalue(pv, l246);
10422     l148.fvalue(pv, l245);
10423     l148.fvalue(pv, l244);
10424     l148.fvalue(pv, l243);
10425     l148.fvalue(pv, l242);
10426     l148.fvalue(pv, l241);
10427     l148.fvalue(pv, l240);
10428     l148.fvalue(pv, l239);
10429     l148.fvalue(pv, l238);
10430     l148.fvalue(pv, l236);
10431     l148.fvalue(pv, l235);
10432     l148.fvalue(pv, l234);
10433     l148.fvalue(pv, l233);
10434     l148.fvalue(pv, l232);
10435     l148.fvalue(pv, l231);
10436     l148.fvalue(pv, l230);
10437     l148.fvalue(pv, l229);
10438     l148.fvalue(pv, l228);
10439     l148.fvalue(pv, l227);
10440     l148.fvalue(pv, l226);
10441     l148.fvalue(pv, l225);
10442     l148.fvalue(pv, l224);
10443     l148.fvalue(pv, l223);
10444     l148.fvalue(pv, l222);
10445     l148.fvalue(pv, l221);
10446     l148.fvalue(pv, l220);
10447     l148.fvalue(pv, l219);
10448     l148.fvalue(pv, l218);
10449     l148.fvalue(pv, l217);
10450     l148.fvalue(pv, l216);
10451     l148.fvalue(pv, l215);
10452     l148.fvalue(pv, l214);
10453     l148.fvalue(pv, l213);
10454     l148.fvalue(pv, l212);
10455     l148.fvalue(pv, l211);
10456     l148.fvalue(pv, l210);
10457     l148.fvalue(pv, l209);
10458     l148.fvalue(pv, l208);
10459     l148.fvalue(pv, l207);
10460     l148.fvalue(pv, l206);
10461     l148.fvalue(pv, l205);
10462     l148.fvalue(pv, l204);
10463     l148.fvalue(pv, l203);
10464     l148.fvalue(pv, l202);
10465     l148.fvalue(pv, l201);
10466     l148.fvalue(pv, l200);
10467     l148.fvalue(pv, l199);
10468     l148.fvalue(pv, l198);
10469     l148.fvalue(pv, l197);
10470     l148.fvalue(pv, l196);
10471     l148.fvalue(pv, l195);
10472     l148.fvalue(pv, l194);
10473     l148.fvalue(pv, l193);
10474     l148.fvalue(pv, l192);
10475     l148.fvalue(pv, l191);
10476     l148.fvalue(pv, l190);
10477     l148.fvalue(pv, l189);
10478     l148.fvalue(pv, l188);
10479     l148.fvalue(pv, l187);
10480     l148.fvalue(pv, l186);
10481     l148.fvalue(pv, l185);
10482     l148.fvalue(pv, l184);
10483     l148.fvalue(pv, l183);
10484     l148.fvalue(pv, l182);
10485     l148.fvalue(pv, l181);
10486     l148.fvalue(pv, l180);
10487     l148.fvalue(pv, l179);
10488     l148.fvalue(pv, l178);
10489     l148.fvalue(pv, l177);
10490     l148.fvalue(pv, l176);
10491     l148.fvalue(pv, l175);
10492     l148.fvalue(pv, l174);
10493     l148.fvalue(pv, l173);
10494     l148.fvalue(pv, l172);
10495     l148.fvalue(pv, l171);
10496     l148.fvalue(pv, l170);
10497     l148.fvalue(pv, l169);
10498     l148.fvalue(pv, l168);
10499     l148.fvalue(pv, l167);
10500     l148.fvalue(pv, l166);
10501     l148.fvalue(pv, l165);
10502     l148.fvalue(pv, l164);
10503     l148.fvalue(pv, l163);
10504     l148.fvalue(pv, l162);
10505     l148.fvalue(pv, l161);
10506     l148.fvalue(pv, l160);
10507     l148.fvalue(pv, l159);
10508     l148.fvalue(pv, l158);
10509     l148.fvalue(pv, l157);
10510     l148.fvalue(pv, l156);
10511     l148.fvalue(pv, l155);
10512     l148.fvalue(pv, l154);
10513     l148.fvalue(pv, l153);
10514     l148.fvalue(pv, l152);
10515     l148.fvalue(pv, l151);
10516     l148.fvalue(pv, l150);
10517     l148.fvalue(pv, l149);
10518     l148.fvalue(pv, l148);
10519     l148.fvalue(pv, l147);
10520     l148.fvalue(pv, l146);
10521     l148.fvalue(pv, l145);
10522     l148.fvalue(pv, l144);
10523     l148.fvalue(pv, l143);
10524     l148.fvalue(pv, l142);
10525     l148.fvalue(pv, l141);
10526     l148.fvalue(pv, l140);
10527     l148.fvalue(pv, l139);
10528     l148.fvalue(pv, l138);
10529     l148.fvalue(pv, l137);
10530     l148.fvalue(pv, l136);
10531     l148.fvalue(pv, l135);
10532     l148.fvalue(pv, l134);
10533     l148.fvalue(pv, l133);
10534     l148.fvalue(pv, l132);
10535     l148.fvalue(pv, l131);
10536     l148.fvalue(pv, l130);
10537     l148.fvalue(pv, l129);
10538     l148.fvalue(pv, l128);
10539     l148.fvalue(pv, l127);
10540     l148.fvalue(pv, l126);
10541     l148.fvalue(pv, l125);
10542     l148.fvalue(pv, l124);
10543     l148.fvalue(pv, l123);
10544     l148.fvalue(pv, l122);
10545     l148.fvalue(pv, l121);
10546     l148.fvalue(pv, l120);
10547     l148.fvalue(pv, l119);
10548     l148.fvalue(pv, l118);
10549     l148.fvalue(pv, l117);
10550     l148.fvalue(pv, l116);
10551     l148.fvalue(pv, l115);
10552     l148.fvalue(pv, l114);
10553     l148.fvalue(pv, l113);
10554     l148.fvalue(pv, l112);
10555     l148.fvalue(pv, l111);
10556     l148.fvalue(pv, l110);
10557     l148.fvalue(pv, l109);
10558     l148.fvalue(pv, l108);
10559     l148.fvalue(pv, l107);
10560     l148.fvalue(pv, l106);
10561     l148.fvalue(pv, l105);
10562     l148.fvalue(pv, l104);
10563     l148.fvalue(pv, l103);
10564     l148.fvalue(pv, l102);
10565     l148.fvalue(pv, l101);
10566     l148.fvalue(pv, l100);
10567     l148.fvalue(pv, l99);
10568     l148.fvalue(pv, l98);
10569     l148.fvalue(pv, l97);
10570     l148.fvalue(pv, l96);
10571     l148.fvalue(pv, l95);
10572     l148.fvalue(pv, l94);
10573     l148.fvalue(pv, l93);
10574     l148.fvalue(pv, l92);
10575     l148.fvalue(pv, l91);
10576     l148.fvalue(pv, l90);
10577     l148.fvalue(pv, l89);
10578     l148.fvalue(pv, l88);
10579     l148.fvalue(pv, l87);
10580     l148.fvalue(pv, l86);
10581     l148.fvalue(pv, l85);
10582     l148.fvalue(pv, l84);
10583     l148.fvalue(pv, l83);
10584     l148.fvalue(pv, l82);
10585     l148.fvalue(pv, l81);
10586     l148.fvalue(pv, l80);
10587     l148.fvalue(pv, l79);
10588     l148.fvalue(pv, l78);
10589     l148.fvalue(pv, l77);
10590     l148.fvalue(pv, l76);
10591     l148.fvalue(pv, l75);
10592     l148.fvalue(pv, l74);
10593     l148.fvalue(pv, l73);
10594     l148.fvalue(pv, l72);
10595     l148.fvalue(pv, l71);
10596     l148.fvalue(pv, l70);
10597     l148.fvalue(pv, l69);
10598     l148.fvalue(pv, l68);
10599     l148.fvalue(pv, l67);
10600     l148.fvalue(pv, l66);
10601     l148.fvalue(pv, l65);
10602     l148.fvalue(pv, l64);
10603     l148.fvalue(pv, l63);
10604     l148.fvalue(pv, l62);
10605     l148.fvalue(pv, l61);
10606     l148.fvalue(pv, l60);
10607     l148.fvalue(pv, l59);
10608     l148.fvalue(pv, l58);
10609     l148.fvalue(pv, l57);
10610     l148.fvalue(pv, l56);
10611     l148.fvalue(pv, l55);
10612     l148.fvalue(pv, l54);
10613     l148.fvalue(pv, l53);
10614     l148.fvalue(pv, l52);
10615     l148.fvalue(pv, l51);
10616     l148.fvalue(pv, l50);
10617     l148.fvalue(pv, l49);
10618     l148.fvalue(pv, l48);
10619     l148.fvalue(pv, l47);
10620     l148.fvalue(pv, l46);
10621     l148.fvalue(pv, l45);
10622     l148.fvalue(pv, l44);
10623     l148.fvalue(pv, l43);
10624     l148.fvalue(pv, l42);
10625     l148.fvalue(pv, l41);
10626     l148.fvalue(pv, l40);
10627     l148.fvalue(pv, l39);
10628     l148.fvalue(pv, l38);
10629     l148.fvalue(pv, l37);
10630     l148.fvalue(pv, l36);
10631     l148.fvalue(pv, l35);
10632     l148.fvalue(pv, l34);
10633     l148.fvalue(pv, l33);
10634     l148.fvalue(pv, l32);
10635     l148.fvalue(pv, l31);
10636     l148.fvalue(pv, l30);
10637     l148.fvalue(pv, l29);
10638     l148.fvalue(pv, l28);
10639     l148.fvalue(pv, l27);
10640     l148.fvalue(pv, l26);
10641     l148.fvalue(pv, l25);
10642     l148.fvalue(pv, l24);
10643     l148.fvalue(pv, l23);
10644     l148.fvalue(pv, l22);
10645     l148.fvalue(pv, l21);
10646     l148.fvalue(pv, l20);
10647     l148.fvalue(pv, l19);
10648     l148.fvalue(pv, l18);
10649     l148.fvalue(pv, l17);
10650     l148.fvalue(pv, l16);
10651     l148.fvalue(pv, l15);
10652     l148.fvalue(pv, l14);
10653     l148.fvalue(pv, l13);
10654     l148.fvalue(pv, l12);
10655     l148.fvalue(pv, l11);
10656     l148.fvalue(pv, l10);
10657     l148.fvalue(pv, l9);
10658     l148.fvalue(pv, l8);
10659     l148.fvalue(pv, l7);
10660     l148.fvalue(pv, l6);
10661     l148.fvalue(pv, l5);
10662     l148.fvalue(pv, l4);
10663     l148.fvalue(pv, l3);
10664     l148.fvalue(pv, l2);
10665     l148.fvalue(pv, l1);
10666     ((l259).value = l428);
10667     ((l213).value = 1189);
10668     ((l17).value = 460);
10669     return ((l280).value = 332);
10670 })();
10671 ((l260).value = 428);