ecmalisp.js

   1 var nil;
   2
   3 function pv (x) { return x==undefined? nil: x; }
   4
   5 function mv(){
   6     var r = [];
   7     r['multiple-value'] = true;
   8     for (var i=0; i<arguments.length; i++)
   9         r.push(arguments[i]);
  10     return r;
  11 }
  12
  13 function forcemv (x) {
  14     return typeof x == 'object' && 'multiple-value' in x? x: mv(x);
  15 }
  16
  17 // NOTE: Define VALUES to be MV for toplevel forms. It is because
  18 // `eval' compiles the forms and execute the Javascript code at
  19 // toplevel with `js-eval', so it is necessary to return multiple
  20 // values from the eval function.
  21 var values = mv;
  22
  23 function checkArgsAtLeast(args, n){
  24     if (args.length < n) throw 'too few arguments';
  25 }
  26
  27 function checkArgsAtMost(args, n){
  28     if (args.length > n) throw 'too many arguments';
  29 }
  30
  31 function checkArgs(args, n){
  32     checkArgsAtLeast(args, n);
  33     checkArgsAtMost(args, n);
  34 }
  35
  36 // Improper list constructor (like LIST*)
  37 function QIList(){
  38     if (arguments.length == 1)
  39         return arguments[0];
  40     else {
  41         var i = arguments.length-1;
  42         var r = arguments[i--];
  43         for (; i>=0; i--){
  44             r = {car: arguments[i], cdr: r};
  45         }
  46         return r;
  47     }
  48 }
  49 var l1 = {name: "DEFMACRO"};
  50 l1;
  51 var l2 = {name: "DECLAIM"};
  52 l2;
  53 var l3 = {name: "DEFCONSTANT"};
  54 l3;
  55 var l4 = {name: "T"};
  56 (function(){
  57     ((l4).value = l4);
  58     return l4;
  59 })();
  60 var l5 = {name: "NIL"};
  61 (function(){
  62     ((l5).value = l5);
  63     return l5;
  64 })();
  65 (nil = l5.value);
  66 var l6 = {name: "LAMBDA"};
  67 l6;
  68 var l7 = {name: "WHEN"};
  69 l7;
  70 var l8 = {name: "UNLESS"};
  71 l8;
  72 var l9 = {name: "DEFVAR"};
  73 l9;
  74 var l10 = {name: "DEFPARAMETER"};
  75 l10;
  76 var l11 = {name: "NAMED-LAMBDA"};
  77 l11;
  78 var l12 = {name: "DEFUN"};
  79 l12;
  80 var l13 = {name: "NULL"};
  81 (function(){
  82     (l13).fvalue = (function(v2){
  83         ((v2)["fname"] = "NULL");
  84         return v2;
  85     })((function (values,v1){
  86         checkArgs(arguments, 2);
  87         return (function(){
  88             return ((v1 === l5.value)?l4.value: l5.value);
  89         })();
  90     }));
  91     return l13;
  92 })();
  93 var l14 = {name: "ENDP"};
  94 (function(){
  95     (l14).fvalue = (function(v4){
  96         ((v4)["fname"] = "ENDP");
  97         return v4;
  98     })((function (values,v3){
  99         checkArgs(arguments, 2);
 100         return (function(){
 101             return (l13.fvalue(pv, v3) !== l5.value ? l4.value : (((function(){
 102                 var tmp = v3;
 103                 return (typeof tmp == 'object' && 'car' in tmp);
 104             })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
 105                 throw "type-error";
 106             })()));
 107         })();
 108     }));
 109     return l14;
 110 })();
 111 var l15 = {name: "RETURN"};
 112 l15;
 113 var l16 = {name: "WHILE"};
 114 l16;
 115 var l17 = {name: "*GENSYM-COUNTER*"};
 116 (function(){
 117     (((l17.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l17).value = 0));
 118     return l17;
 119 })();
 120 var l18 = {name: "GENSYM"};
 121 var l19 = {name: "INTEGER-TO-STRING"};
 122 (function(){
 123     (l18).fvalue = (function(v6){
 124         ((v6)["fname"] = "GENSYM");
 125         return v6;
 126     })((function (values,v5){
 127         checkArgsAtMost(arguments, 2);
 128         var v5;
 129         switch(arguments.length-1){
 130         case 0:
 131             v5="G";
 132         default: break;
 133         }
 134         return (function(){
 135             ((l17).value = (function(){
 136                 var x1 = (function(){
 137                     var symbol = l17;
 138                     var value = symbol.value;
 139                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 140                     return value;
 141                 })();
 142                 if (typeof x1 !== 'number') throw 'Not a number!';
 143                 return x1+1;
 144             })());
 145             return (function(){
 146                 var name = (function(){
 147                     var string1 = v5;
 148                     var string2 = l19.fvalue(pv, (function(){
 149                         var symbol = l17;
 150                         var value = symbol.value;
 151                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 152                         return value;
 153                     })());
 154                     if (typeof string1 != 'string')
 155                         throw 'The value ' + string1 + ' is not a type string.';
 156                     if (typeof string2 != 'string')
 157                         throw 'The value ' + string2 + ' is not a type string.';
 158                     return string1.concat(string2);
 159                 })();
 160                 if (typeof name != 'string')
 161                     throw 'The value ' + name + ' is not a type string.';
 162                 return ({name: name});
 163             })();
 164         })();
 165     }));
 166     return l18;
 167 })();
 168 var l20 = {name: "BOUNDP"};
 169 (function(){
 170     (l20).fvalue = (function(v8){
 171         ((v8)["fname"] = "BOUNDP");
 172         return v8;
 173     })((function (values,v7){
 174         checkArgs(arguments, 2);
 175         return (function(){
 176             return ((v7.value !== undefined)?l4.value: l5.value);
 177         })();
 178     }));
 179     return l20;
 180 })();
 181 var l21 = {name: "="};
 182 (function(){
 183     (l21).fvalue = (function(v11){
 184         ((v11)["fname"] = "=");
 185         return v11;
 186     })((function (values,v9,v10){
 187         checkArgs(arguments, 3);
 188         return (function(){
 189             return (function(){
 190                 var x1 = v9;
 191                 if (typeof x1 !== 'number') throw 'Not a number!';
 192                 var x2 = v10;
 193                 if (typeof x2 !== 'number') throw 'Not a number!';
 194                 return (x1==x2?l4.value: l5.value);
 195             })();
 196         })();
 197     }));
 198     return l21;
 199 })();
 200 var l22 = {name: "*"};
 201 (function(){
 202     (l22).fvalue = (function(v14){
 203         ((v14)["fname"] = "*");
 204         return v14;
 205     })((function (values,v12,v13){
 206         checkArgs(arguments, 3);
 207         return (function(){
 208             return (function(){
 209                 var x1 = v12;
 210                 if (typeof x1 !== 'number') throw 'Not a number!';
 211                 var x2 = v13;
 212                 if (typeof x2 !== 'number') throw 'Not a number!';
 213                 return x1*x2;
 214             })();
 215         })();
 216     }));
 217     return l22;
 218 })();
 219 var l23 = {name: "/"};
 220 (function(){
 221     (l23).fvalue = (function(v17){
 222         ((v17)["fname"] = "/");
 223         return v17;
 224     })((function (values,v15,v16){
 225         checkArgs(arguments, 3);
 226         return (function(){
 227             return (function(){
 228                 var x1 = v15;
 229                 if (typeof x1 !== 'number') throw 'Not a number!';
 230                 var x2 = v16;
 231                 if (typeof x2 !== 'number') throw 'Not a number!';
 232                 return x1/x2;
 233             })();
 234         })();
 235     }));
 236     return l23;
 237 })();
 238 var l24 = {name: "1+"};
 239 (function(){
 240     (l24).fvalue = (function(v19){
 241         ((v19)["fname"] = "1+");
 242         return v19;
 243     })((function (values,v18){
 244         checkArgs(arguments, 2);
 245         return (function(){
 246             return (function(){
 247                 var x1 = v18;
 248                 if (typeof x1 !== 'number') throw 'Not a number!';
 249                 return x1+1;
 250             })();
 251         })();
 252     }));
 253     return l24;
 254 })();
 255 var l25 = {name: "1-"};
 256 (function(){
 257     (l25).fvalue = (function(v21){
 258         ((v21)["fname"] = "1-");
 259         return v21;
 260     })((function (values,v20){
 261         checkArgs(arguments, 2);
 262         return (function(){
 263             return (function(){
 264                 var x1 = v20;
 265                 if (typeof x1 !== 'number') throw 'Not a number!';
 266                 return x1-1;
 267             })();
 268         })();
 269     }));
 270     return l25;
 271 })();
 272 var l26 = {name: "ZEROP"};
 273 (function(){
 274     (l26).fvalue = (function(v23){
 275         ((v23)["fname"] = "ZEROP");
 276         return v23;
 277     })((function (values,v22){
 278         checkArgs(arguments, 2);
 279         return (function(){
 280             return (function(){
 281                 var x1 = v22;
 282                 if (typeof x1 !== 'number') throw 'Not a number!';
 283                 return (x1==0?l4.value: l5.value);
 284             })();
 285         })();
 286     }));
 287     return l26;
 288 })();
 289 var l27 = {name: "TRUNCATE"};
 290 (function(){
 291     (l27).fvalue = (function(v26){
 292         ((v26)["fname"] = "TRUNCATE");
 293         return v26;
 294     })((function (values,v24,v25){
 295         checkArgs(arguments, 3);
 296         return (function(){
 297             return (function(){
 298                 var x = (function(){
 299                     var x1 = v24;
 300                     if (typeof x1 !== 'number') throw 'Not a number!';
 301                     var x2 = v25;
 302                     if (typeof x2 !== 'number') throw 'Not a number!';
 303                     return x1/x2;
 304                 })();
 305                 if (typeof x != 'number')
 306                     throw 'The value ' + x + ' is not a type number.';
 307                 return Math.floor(x);
 308             })();
 309         })();
 310     }));
 311     return l27;
 312 })();
 313 var l28 = {name: "EQL"};
 314 (function(){
 315     (l28).fvalue = (function(v29){
 316         ((v29)["fname"] = "EQL");
 317         return v29;
 318     })((function (values,v27,v28){
 319         checkArgs(arguments, 3);
 320         return (function(){
 321             return ((v27 === v28)?l4.value: l5.value);
 322         })();
 323     }));
 324     return l28;
 325 })();
 326 var l29 = {name: "NOT"};
 327 (function(){
 328     (l29).fvalue = (function(v31){
 329         ((v31)["fname"] = "NOT");
 330         return v31;
 331     })((function (values,v30){
 332         checkArgs(arguments, 2);
 333         return (function(){
 334             return (v30 !== l5.value ? l5.value : l4.value);
 335         })();
 336     }));
 337     return l29;
 338 })();
 339 var l30 = {name: "CONS"};
 340 (function(){
 341     (l30).fvalue = (function(v34){
 342         ((v34)["fname"] = "CONS");
 343         return v34;
 344     })((function (values,v32,v33){
 345         checkArgs(arguments, 3);
 346         return (function(){
 347             return ({car: v32, cdr: v33});
 348         })();
 349     }));
 350     return l30;
 351 })();
 352 var l31 = {name: "CONSP"};
 353 (function(){
 354     (l31).fvalue = (function(v36){
 355         ((v36)["fname"] = "CONSP");
 356         return v36;
 357     })((function (values,v35){
 358         checkArgs(arguments, 2);
 359         return (function(){
 360             return ((function(){
 361                 var tmp = v35;
 362                 return (typeof tmp == 'object' && 'car' in tmp);
 363             })()?l4.value: l5.value);
 364         })();
 365     }));
 366     return l31;
 367 })();
 368 var l32 = {name: "CAR"};
 369 (function(){
 370     (l32).fvalue = (function(v38){
 371         ((v38)["fname"] = "CAR");
 372         return v38;
 373     })((function(){
 374         var func = (function (values,v37){
 375             checkArgs(arguments, 2);
 376             return (function(){
 377                 return (function(){
 378                     var tmp = v37;
 379                     return tmp === l5.value? l5.value: tmp.car;
 380                 })();
 381             })();
 382         });
 383         func.docstring = 'Return the CAR part of a cons, or NIL if X is null.';
 384         return func;
 385     })());
 386     return l32;
 387 })();
 388 var l33 = {name: "CDR"};
 389 (function(){
 390     (l33).fvalue = (function(v40){
 391         ((v40)["fname"] = "CDR");
 392         return v40;
 393     })((function (values,v39){
 394         checkArgs(arguments, 2);
 395         return (function(){
 396             return (function(){
 397                 var tmp = v39;
 398                 return tmp === l5.value? l5.value: tmp.cdr;
 399             })();
 400         })();
 401     }));
 402     return l33;
 403 })();
 404 var l34 = {name: "CAAR"};
 405 (function(){
 406     (l34).fvalue = (function(v42){
 407         ((v42)["fname"] = "CAAR");
 408         return v42;
 409     })((function (values,v41){
 410         checkArgs(arguments, 2);
 411         return (function(){
 412             return (function(){
 413                 var tmp = (function(){
 414                     var tmp = v41;
 415                     return tmp === l5.value? l5.value: tmp.car;
 416                 })();
 417                 return tmp === l5.value? l5.value: tmp.car;
 418             })();
 419         })();
 420     }));
 421     return l34;
 422 })();
 423 var l35 = {name: "CADR"};
 424 (function(){
 425     (l35).fvalue = (function(v44){
 426         ((v44)["fname"] = "CADR");
 427         return v44;
 428     })((function (values,v43){
 429         checkArgs(arguments, 2);
 430         return (function(){
 431             return (function(){
 432                 var tmp = (function(){
 433                     var tmp = v43;
 434                     return tmp === l5.value? l5.value: tmp.cdr;
 435                 })();
 436                 return tmp === l5.value? l5.value: tmp.car;
 437             })();
 438         })();
 439     }));
 440     return l35;
 441 })();
 442 var l36 = {name: "CDAR"};
 443 (function(){
 444     (l36).fvalue = (function(v46){
 445         ((v46)["fname"] = "CDAR");
 446         return v46;
 447     })((function (values,v45){
 448         checkArgs(arguments, 2);
 449         return (function(){
 450             return (function(){
 451                 var tmp = (function(){
 452                     var tmp = v45;
 453                     return tmp === l5.value? l5.value: tmp.car;
 454                 })();
 455                 return tmp === l5.value? l5.value: tmp.cdr;
 456             })();
 457         })();
 458     }));
 459     return l36;
 460 })();
 461 var l37 = {name: "CDDR"};
 462 (function(){
 463     (l37).fvalue = (function(v48){
 464         ((v48)["fname"] = "CDDR");
 465         return v48;
 466     })((function (values,v47){
 467         checkArgs(arguments, 2);
 468         return (function(){
 469             return (function(){
 470                 var tmp = (function(){
 471                     var tmp = v47;
 472                     return tmp === l5.value? l5.value: tmp.cdr;
 473                 })();
 474                 return tmp === l5.value? l5.value: tmp.cdr;
 475             })();
 476         })();
 477     }));
 478     return l37;
 479 })();
 480 var l38 = {name: "CADAR"};
 481 (function(){
 482     (l38).fvalue = (function(v50){
 483         ((v50)["fname"] = "CADAR");
 484         return v50;
 485     })((function (values,v49){
 486         checkArgs(arguments, 2);
 487         return (function(){
 488             return (function(){
 489                 var tmp = (function(){
 490                     var tmp = (function(){
 491                         var tmp = v49;
 492                         return tmp === l5.value? l5.value: tmp.car;
 493                     })();
 494                     return tmp === l5.value? l5.value: tmp.cdr;
 495                 })();
 496                 return tmp === l5.value? l5.value: tmp.car;
 497             })();
 498         })();
 499     }));
 500     return l38;
 501 })();
 502 var l39 = {name: "CADDR"};
 503 (function(){
 504     (l39).fvalue = (function(v52){
 505         ((v52)["fname"] = "CADDR");
 506         return v52;
 507     })((function (values,v51){
 508         checkArgs(arguments, 2);
 509         return (function(){
 510             return (function(){
 511                 var tmp = (function(){
 512                     var tmp = (function(){
 513                         var tmp = v51;
 514                         return tmp === l5.value? l5.value: tmp.cdr;
 515                     })();
 516                     return tmp === l5.value? l5.value: tmp.cdr;
 517                 })();
 518                 return tmp === l5.value? l5.value: tmp.car;
 519             })();
 520         })();
 521     }));
 522     return l39;
 523 })();
 524 var l40 = {name: "CDDDR"};
 525 (function(){
 526     (l40).fvalue = (function(v54){
 527         ((v54)["fname"] = "CDDDR");
 528         return v54;
 529     })((function (values,v53){
 530         checkArgs(arguments, 2);
 531         return (function(){
 532             return (function(){
 533                 var tmp = (function(){
 534                     var tmp = (function(){
 535                         var tmp = v53;
 536                         return tmp === l5.value? l5.value: tmp.cdr;
 537                     })();
 538                     return tmp === l5.value? l5.value: tmp.cdr;
 539                 })();
 540                 return tmp === l5.value? l5.value: tmp.cdr;
 541             })();
 542         })();
 543     }));
 544     return l40;
 545 })();
 546 var l41 = {name: "CADDDR"};
 547 (function(){
 548     (l41).fvalue = (function(v56){
 549         ((v56)["fname"] = "CADDDR");
 550         return v56;
 551     })((function (values,v55){
 552         checkArgs(arguments, 2);
 553         return (function(){
 554             return (function(){
 555                 var tmp = (function(){
 556                     var tmp = (function(){
 557                         var tmp = (function(){
 558                             var tmp = v55;
 559                             return tmp === l5.value? l5.value: tmp.cdr;
 560                         })();
 561                         return tmp === l5.value? l5.value: tmp.cdr;
 562                     })();
 563                     return tmp === l5.value? l5.value: tmp.cdr;
 564                 })();
 565                 return tmp === l5.value? l5.value: tmp.car;
 566             })();
 567         })();
 568     }));
 569     return l41;
 570 })();
 571 var l42 = {name: "FIRST"};
 572 (function(){
 573     (l42).fvalue = (function(v58){
 574         ((v58)["fname"] = "FIRST");
 575         return v58;
 576     })((function (values,v57){
 577         checkArgs(arguments, 2);
 578         return (function(){
 579             return (function(){
 580                 var tmp = v57;
 581                 return tmp === l5.value? l5.value: tmp.car;
 582             })();
 583         })();
 584     }));
 585     return l42;
 586 })();
 587 var l43 = {name: "SECOND"};
 588 (function(){
 589     (l43).fvalue = (function(v60){
 590         ((v60)["fname"] = "SECOND");
 591         return v60;
 592     })((function (values,v59){
 593         checkArgs(arguments, 2);
 594         return (function(){
 595             return l35.fvalue(values, v59);
 596         })();
 597     }));
 598     return l43;
 599 })();
 600 var l44 = {name: "THIRD"};
 601 (function(){
 602     (l44).fvalue = (function(v62){
 603         ((v62)["fname"] = "THIRD");
 604         return v62;
 605     })((function (values,v61){
 606         checkArgs(arguments, 2);
 607         return (function(){
 608             return l39.fvalue(values, v61);
 609         })();
 610     }));
 611     return l44;
 612 })();
 613 var l45 = {name: "FOURTH"};
 614 (function(){
 615     (l45).fvalue = (function(v64){
 616         ((v64)["fname"] = "FOURTH");
 617         return v64;
 618     })((function (values,v63){
 619         checkArgs(arguments, 2);
 620         return (function(){
 621             return l41.fvalue(values, v63);
 622         })();
 623     }));
 624     return l45;
 625 })();
 626 var l46 = {name: "REST"};
 627 (function(){
 628     (l46).fvalue = (function(v66){
 629         ((v66)["fname"] = "REST");
 630         return v66;
 631     })((function (values,v65){
 632         checkArgs(arguments, 2);
 633         return (function(){
 634             return (function(){
 635                 var tmp = v65;
 636                 return tmp === l5.value? l5.value: tmp.cdr;
 637             })();
 638         })();
 639     }));
 640     return l46;
 641 })();
 642 var l47 = {name: "LIST"};
 643 (function(){
 644     (l47).fvalue = (function(v68){
 645         ((v68)["fname"] = "LIST");
 646         return v68;
 647     })((function (values){
 648         var v67= l5.value;
 649         for (var i = arguments.length-1; i>=1; i--)
 650             v67 = {car: arguments[i], cdr:
 651         v67};
 652         return (function(){
 653             return v67;
 654         })();
 655     }));
 656     return l47;
 657 })();
 658 var l48 = {name: "ATOM"};
 659 (function(){
 660     (l48).fvalue = (function(v70){
 661         ((v70)["fname"] = "ATOM");
 662         return v70;
 663     })((function (values,v69){
 664         checkArgs(arguments, 2);
 665         return (function(){
 666             return l29.fvalue(values, ((function(){
 667                 var tmp = v69;
 668                 return (typeof tmp == 'object' && 'car' in tmp);
 669             })()?l4.value: l5.value));
 670         })();
 671     }));
 672     return l48;
 673 })();
 674 var l49 = {name: "INCF"};
 675 l49;
 676 var l50 = {name: "DECF"};
 677 l50;
 678 var l51 = {name: "PUSH"};
 679 l51;
 680 var l52 = {name: "DOLIST"};
 681 l52;
 682 var l53 = {name: "DOTIMES"};
 683 l53;
 684 var l54 = {name: "COND"};
 685 l54;
 686 var l55 = {name: "CASE"};
 687 l55;
 688 var l56 = {name: "ECASE"};
 689 l56;
 690 var l57 = {name: "AND"};
 691 l57;
 692 var l58 = {name: "OR"};
 693 l58;
 694 var l59 = {name: "PROG1"};
 695 l59;
 696 var l60 = {name: "PROG2"};
 697 l60;
 698 var l61 = {name: "ENSURE-LIST"};
 699 var l62 = {name: "LISTP"};
 700 (function(){
 701     (l61).fvalue = (function(v72){
 702         ((v72)["fname"] = "ENSURE-LIST");
 703         return v72;
 704     })((function (values,v71){
 705         checkArgs(arguments, 2);
 706         return (function(){
 707             return (l62.fvalue(pv, v71) !== l5.value ? v71 : l47.fvalue(values, v71));
 708         })();
 709     }));
 710     return l61;
 711 })();
 712 var l63 = {name: "!REDUCE"};
 713 var l64 = {name: "INITIAL-VALUE", 'package': 'KEYWORD'};
 714 (function(){
 715     (l63).fvalue = (function(v76){
 716         ((v76)["fname"] = "!REDUCE");
 717         return v76;
 718     })((function (values,v73,v74){
 719         checkArgsAtLeast(arguments, 3);
 720         var v75;
 721         var i;
 722         for (i=3; i<arguments.length; i+=2){
 723             if (arguments[i] === l64.value){
 724                 v75 = arguments[i+1];
 725                 break;
 726             }
 727         }
 728         if (i == arguments.length){
 729             v75 = l5.value;
 730         }
 731         for (i=3; i<arguments.length; i+=2){
 732             if (arguments[i] !== l64.value)
 733                 throw 'Unknown keyword argument ' + arguments[i].name;
 734         }
 735         return (function(){
 736             return (l13.fvalue(pv, v74) !== l5.value ? v75 : l63.fvalue(values, v73, (function(){
 737                 var tmp = v74;
 738                 return tmp === l5.value? l5.value: tmp.cdr;
 739             })(), l64.value, (function(){
 740                 var f = v73;
 741                 return (typeof f === 'function'? f: f.fvalue)(pv, v75, (function(){
 742                     var tmp = v74;
 743                     return tmp === l5.value? l5.value: tmp.car;
 744                 })())
 745             })()));
 746         })();
 747     }));
 748     return l63;
 749 })();
 750 var l65 = {name: "+"};
 751 (function(){
 752     (l65).fvalue = (function(v81){
 753         ((v81)["fname"] = "+");
 754         return v81;
 755     })((function (values){
 756         var v77= l5.value;
 757         for (var i = arguments.length-1; i>=1; i--)
 758             v77 = {car: arguments[i], cdr:
 759         v77};
 760         return (function(){
 761             return (function(v78){
 762                 return (function(){
 763                     return (function(v79,v80){
 764                         (function(){
 765                             while(v79 !== l5.value){
 766                                 (v80 = (function(){
 767                                     var tmp = v79;
 768                                     return tmp === l5.value? l5.value: tmp.car;
 769                                 })());
 770                                 (function(){
 771                                     (v78 = (function(){
 772                                         var x1 = v78;
 773                                         if (typeof x1 !== 'number') throw 'Not a number!';
 774                                         var x2 = v80;
 775                                         if (typeof x2 !== 'number') throw 'Not a number!';
 776                                         return x1+x2;
 777                                     })());
 778                                     return l5.value;
 779                                 })();
 780                                 (v79 = (function(){
 781                                     var tmp = v79;
 782                                     return tmp === l5.value? l5.value: tmp.cdr;
 783                                 })());
 784                             }return l5.value;
 785                         })();
 786                         return v78;
 787                     })(v77,l5.value);
 788                 })();
 789             })(0);
 790         })();
 791     }));
 792     return l65;
 793 })();
 794 var l66 = {name: "-"};
 795 (function(){
 796     (l66).fvalue = (function(v87){
 797         ((v87)["fname"] = "-");
 798         return v87;
 799     })((function (values,v83){
 800         checkArgsAtLeast(arguments, 2);
 801         var v82= l5.value;
 802         for (var i = arguments.length-1; i>=2; i--)
 803             v82 = {car: arguments[i], cdr:
 804         v82};
 805         return (function(){
 806             return (l13.fvalue(pv, v82) !== l5.value ? (function(){
 807                 var x1 = v83;
 808                 if (typeof x1 !== 'number') throw 'Not a number!';
 809                 return -x1;
 810             })() : (function(v84){
 811                 return (function(){
 812                     return (function(v85,v86){
 813                         (function(){
 814                             while(v85 !== l5.value){
 815                                 (v86 = (function(){
 816                                     var tmp = v85;
 817                                     return tmp === l5.value? l5.value: tmp.car;
 818                                 })());
 819                                 (function(){
 820                                     (v84 = (function(){
 821                                         var x1 = v84;
 822                                         if (typeof x1 !== 'number') throw 'Not a number!';
 823                                         var x2 = v86;
 824                                         if (typeof x2 !== 'number') throw 'Not a number!';
 825                                         return x1-x2;
 826                                     })());
 827                                     return l5.value;
 828                                 })();
 829                                 (v85 = (function(){
 830                                     var tmp = v85;
 831                                     return tmp === l5.value? l5.value: tmp.cdr;
 832                                 })());
 833                             }return l5.value;
 834                         })();
 835                         return v84;
 836                     })(v82,l5.value);
 837                 })();
 838             })(v83));
 839         })();
 840     }));
 841     return l66;
 842 })();
 843 var l67 = {name: "APPEND-TWO"};
 844 var l68 = {name: "APPEND"};
 845 (function(){
 846     (l67).fvalue = (function(v90){
 847         ((v90)["fname"] = "APPEND-TWO");
 848         return v90;
 849     })((function (values,v88,v89){
 850         checkArgs(arguments, 3);
 851         return (function(){
 852             return (l13.fvalue(pv, v88) !== l5.value ? v89 : ({car: (function(){
 853                 var tmp = v88;
 854                 return tmp === l5.value? l5.value: tmp.car;
 855             })(), cdr: l68.fvalue(pv, (function(){
 856                 var tmp = v88;
 857                 return tmp === l5.value? l5.value: tmp.cdr;
 858             })(), v89)}));
 859         })();
 860     }));
 861     return l67;
 862 })();
 863 (function(){
 864     (l68).fvalue = (function(v92){
 865         ((v92)["fname"] = "APPEND");
 866         return v92;
 867     })((function (values){
 868         var v91= l5.value;
 869         for (var i = arguments.length-1; i>=1; i--)
 870             v91 = {car: arguments[i], cdr:
 871         v91};
 872         return (function(){
 873             return l63.fvalue(values, (function(){
 874                 var symbol = l67;
 875                 var func = symbol.fvalue;
 876                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
 877                 return func;
 878             })(), v91);
 879         })();
 880     }));
 881     return l68;
 882 })();
 883 var l69 = {name: "REVAPPEND"};
 884 (function(){
 885     (l69).fvalue = (function(v95){
 886         ((v95)["fname"] = "REVAPPEND");
 887         return v95;
 888     })((function (values,v93,v94){
 889         checkArgs(arguments, 3);
 890         return (function(){
 891             (function(){
 892                 return (function(){
 893                     while(v93 !== l5.value){
 894                         (v94 = ({car: (function(){
 895                             var tmp = v93;
 896                             return tmp === l5.value? l5.value: tmp.car;
 897                         })(), cdr: v94}));
 898                         (v93 = (function(){
 899                             var tmp = v93;
 900                             return tmp === l5.value? l5.value: tmp.cdr;
 901                         })());
 902                     }return l5.value;
 903                 })();
 904             })();
 905             return v94;
 906         })();
 907     }));
 908     return l69;
 909 })();
 910 var l70 = {name: "REVERSE"};
 911 (function(){
 912     (l70).fvalue = (function(v97){
 913         ((v97)["fname"] = "REVERSE");
 914         return v97;
 915     })((function (values,v96){
 916         checkArgs(arguments, 2);
 917         return (function(){
 918             return l69.fvalue(values, v96, l5);
 919         })();
 920     }));
 921     return l70;
 922 })();
 923 var l71 = {name: "PSETQ"};
 924 l71;
 925 var l72 = {name: "DO"};
 926 l72;
 927 var l73 = {name: "DO*"};
 928 l73;
 929 var l74 = {name: "LIST-LENGTH"};
 930 (function(){
 931     (l74).fvalue = (function(v100){
 932         ((v100)["fname"] = "LIST-LENGTH");
 933         return v100;
 934     })((function (values,v98){
 935         checkArgs(arguments, 2);
 936         return (function(){
 937             return (function(v99){
 938                 (function(){
 939                     return (function(){
 940                         while(l29.fvalue(pv, l13.fvalue(pv, v98)) !== l5.value){
 941                             (v99 = (function(){
 942                                 var x1 = v99;
 943                                 if (typeof x1 !== 'number') throw 'Not a number!';
 944                                 return x1+1;
 945                             })());
 946                             (v98 = (function(){
 947                                 var tmp = v98;
 948                                 return tmp === l5.value? l5.value: tmp.cdr;
 949                             })());
 950                         }return l5.value;
 951                     })();
 952                 })();
 953                 return v99;
 954             })(0);
 955         })();
 956     }));
 957     return l74;
 958 })();
 959 var l75 = {name: "LENGTH"};
 960 (function(){
 961     (l75).fvalue = (function(v102){
 962         ((v102)["fname"] = "LENGTH");
 963         return v102;
 964     })((function (values,v101){
 965         checkArgs(arguments, 2);
 966         return (function(){
 967             return (((typeof(v101) == "string")?l4.value: l5.value) !== l5.value ? (function(){
 968                 var x = v101;
 969                 if (typeof x != 'string')
 970                     throw 'The value ' + x + ' is not a type string.';
 971                 return x.length;
 972             })() : (((function(){
 973                 var x = v101;
 974                 return typeof x === 'object' && 'length' in x;
 975             })()?l4.value: l5.value) !== l5.value ? (function(){
 976                 var tmp = (v101)["length"];
 977                 return tmp == undefined? l5.value: tmp ;
 978             })() : (l62.fvalue(pv, v101) !== l5.value ? l74.fvalue(values, v101) : l5.value)));
 979         })();
 980     }));
 981     return l75;
 982 })();
 983 var l76 = {name: "CONCAT-TWO"};
 984 (function(){
 985     (l76).fvalue = (function(v105){
 986         ((v105)["fname"] = "CONCAT-TWO");
 987         return v105;
 988     })((function (values,v103,v104){
 989         checkArgs(arguments, 3);
 990         return (function(){
 991             return (function(){
 992                 var string1 = v103;
 993                 var string2 = v104;
 994                 if (typeof string1 != 'string')
 995                     throw 'The value ' + string1 + ' is not a type string.';
 996                 if (typeof string2 != 'string')
 997                     throw 'The value ' + string2 + ' is not a type string.';
 998                 return string1.concat(string2);
 999             })();
1000         })();
1001     }));
1002     return l76;
1003 })();
1004 var l77 = {name: "WITH-COLLECT"};
1005 l77;
1006 var l78 = {name: "MAP1"};
1007 var l79 = {name: "SENTINEL"};
1008 (function(){
1009     (l78).fvalue = (function(v112){
1010         ((v112)["fname"] = "MAP1");
1011         return v112;
1012     })((function (values,v106,v107){
1013         checkArgs(arguments, 3);
1014         return (function(){
1015             return (function(){
1016                 var v108 = ({car: l79, cdr: l5.value});
1017                 var v109 = v108;
1018                 (function(v111){
1019                     return (function(){
1020                         return (function(){
1021                             while(v107 !== l5.value){
1022                                 v111(pv, (function(){
1023                                     var f = v106;
1024                                     return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
1025                                         var tmp = v107;
1026                                         return tmp === l5.value? l5.value: tmp.car;
1027                                     })())
1028                                 })());
1029                                 (v107 = (function(){
1030                                     var tmp = v107;
1031                                     return tmp === l5.value? l5.value: tmp.cdr;
1032                                 })());
1033                             }return l5.value;
1034                         })();
1035                     })();
1036                 })((function (values,v110){
1037                     checkArgs(arguments, 2);
1038                     (function(){
1039                         var x = v109;
1040                         if (typeof x != 'object')
1041                             throw 'The value ' + x + ' is not a type object.';
1042                         return (x.cdr = ({car: v110, cdr: l5.value}), x);
1043                     })();
1044                     (v109 = (function(){
1045                         var tmp = v109;
1046                         return tmp === l5.value? l5.value: tmp.cdr;
1047                     })());
1048                     return v110;
1049                 }));
1050                 return (function(){
1051                     var tmp = v108;
1052                     return tmp === l5.value? l5.value: tmp.cdr;
1053                 })();
1054             })();
1055         })();
1056     }));
1057     return l78;
1058 })();
1059 var l80 = {name: "LOOP"};
1060 l80;
1061 var l81 = {name: "MAPCAR"};
1062 (function(){
1063     (l81).fvalue = (function(v124){
1064         ((v124)["fname"] = "MAPCAR");
1065         return v124;
1066     })((function (values,v114,v115){
1067         checkArgsAtLeast(arguments, 3);
1068         var v113= l5.value;
1069         for (var i = arguments.length-1; i>=3; i--)
1070             v113 = {car: arguments[i], cdr:
1071         v113};
1072         return (function(){
1073             return (function(v116){
1074                 return (function(){
1075                     var v117 = ({car: l79, cdr: l5.value});
1076                     var v118 = v117;
1077                     (function(v120){
1078                         return (function(){
1079                             try {
1080                                 return (function(){
1081                                     return (function(){
1082                                         while(l4.value !== l5.value){
1083                                             (function(v121){
1084                                                 (function(){
1085                                                     return (function(v122){
1086                                                         return (function(){
1087                                                             try {
1088                                                                 return (function(){
1089                                                                     while(l4.value !== l5.value){
1090                                                                         (l13.fvalue(pv, v122) !== l5.value ? (function(){
1091                                                                             throw ({type: 'block', id: 54, values: l5.value, message: 'Return from unknown block NIL.'})
1092                                                                         })() : l5.value);
1093                                                                         (function(){
1094                                                                             (l13.fvalue(pv, (function(){
1095                                                                                 var tmp = v122;
1096                                                                                 return tmp === l5.value? l5.value: tmp.car;
1097                                                                             })()) !== l5.value ? (function(){
1098                                                                                 throw ({type: 'block', id: 51, values: l5.value, message: 'Return from unknown block LOOP.'})
1099                                                                             })() : l5.value);
1100                                                                             (function(){
1101                                                                                 var x = v122;
1102                                                                                 if (typeof x != 'object')
1103                                                                                     throw 'The value ' + x + ' is not a type object.';
1104                                                                                 return (x.car = l36.fvalue(pv, v122), x);
1105                                                                             })();
1106                                                                             return l5.value;
1107                                                                         })();
1108                                                                         (function(v123){
1109                                                                             return (v122 = v123);
1110                                                                         })((function(){
1111                                                                             var tmp = v122;
1112                                                                             return tmp === l5.value? l5.value: tmp.cdr;
1113                                                                         })());
1114                                                                     }return l5.value;
1115                                                                 })();
1116                                                             }
1117                                                             catch (cf){
1118                                                                 if (cf.type == 'block' && cf.id == 54)
1119                                                                     return cf.values;
1120                                                                 else
1121                                                                     throw cf;
1122                                                             }
1123                                                         })();
1124                                                     })(v116);
1125                                                 })();
1126                                                 return v120(pv, (function(){
1127                                                     var f = v114;
1128                                                     var args = [pv];
1129                                                     var tail = (v121);
1130                                                     while (tail != l5.value){
1131                                                         args.push(tail.car);
1132                                                         tail = tail.cdr;
1133                                                     }
1134                                                     return (typeof f === 'function'? f : f.fvalue).apply(this, args);
1135                                                 })());
1136                                             })(l78.fvalue(pv, (function(){
1137                                                 var symbol = l32;
1138                                                 var func = symbol.fvalue;
1139                                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1140                                                 return func;
1141                                             })(), v116));
1142                                         }return l5.value;
1143                                     })();
1144                                 })();
1145                             }
1146                             catch (cf){
1147                                 if (cf.type == 'block' && cf.id == 51)
1148                                     return cf.values;
1149                                 else
1150                                     throw cf;
1151                             }
1152                         })();
1153                     })((function (values,v119){
1154                         checkArgs(arguments, 2);
1155                         (function(){
1156                             var x = v118;
1157                             if (typeof x != 'object')
1158                                 throw 'The value ' + x + ' is not a type object.';
1159                             return (x.cdr = ({car: v119, cdr: l5.value}), x);
1160                         })();
1161                         (v118 = (function(){
1162                             var tmp = v118;
1163                             return tmp === l5.value? l5.value: tmp.cdr;
1164                         })());
1165                         return v119;
1166                     }));
1167                     return (function(){
1168                         var tmp = v117;
1169                         return tmp === l5.value? l5.value: tmp.cdr;
1170                     })();
1171                 })();
1172             })(({car: v115, cdr: v113}));
1173         })();
1174     }));
1175     return l81;
1176 })();
1177 var l82 = {name: "IDENTITY"};
1178 (function(){
1179     (l82).fvalue = (function(v126){
1180         ((v126)["fname"] = "IDENTITY");
1181         return v126;
1182     })((function (values,v125){
1183         checkArgs(arguments, 2);
1184         return (function(){
1185             return v125;
1186         })();
1187     }));
1188     return l82;
1189 })();
1190 var l83 = {name: "CONSTANTLY"};
1191 (function(){
1192     (l83).fvalue = (function(v129){
1193         ((v129)["fname"] = "CONSTANTLY");
1194         return v129;
1195     })((function (values,v127){
1196         checkArgs(arguments, 2);
1197         return (function(){
1198             return (function (values){
1199                 var v128= l5.value;
1200                 for (var i = arguments.length-1; i>=1; i--)
1201                     v128 = {car: arguments[i], cdr:
1202                 v128};
1203                 return v127;
1204             });
1205         })();
1206     }));
1207     return l83;
1208 })();
1209 var l84 = {name: "COPY-LIST"};
1210 (function(){
1211     (l84).fvalue = (function(v131){
1212         ((v131)["fname"] = "COPY-LIST");
1213         return v131;
1214     })((function (values,v130){
1215         checkArgs(arguments, 2);
1216         return (function(){
1217             return l81.fvalue(values, (function(){
1218                 var symbol = l82;
1219                 var func = symbol.fvalue;
1220                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1221                 return func;
1222             })(), v130);
1223         })();
1224     }));
1225     return l84;
1226 })();
1227 var l85 = {name: "LIST*"};
1228 (function(){
1229     (l85).fvalue = (function(v136){
1230         ((v136)["fname"] = "LIST*");
1231         return v136;
1232     })((function (values,v133){
1233         checkArgsAtLeast(arguments, 2);
1234         var v132= l5.value;
1235         for (var i = arguments.length-1; i>=2; i--)
1236             v132 = {car: arguments[i], cdr:
1237         v132};
1238         return (function(){
1239             return (l13.fvalue(pv, v132) !== l5.value ? v133 : (l13.fvalue(pv, (function(){
1240                 var tmp = v132;
1241                 return tmp === l5.value? l5.value: tmp.cdr;
1242             })()) !== l5.value ? ({car: v133, cdr: (function(){
1243                 var tmp = v132;
1244                 return tmp === l5.value? l5.value: tmp.car;
1245             })()}) : (function(){
1246                 (function(){
1247                     return (function(v134){
1248                         return (function(){
1249                             try {
1250                                 return (function(){
1251                                     while(l4.value !== l5.value){
1252                                         (l13.fvalue(pv, l37.fvalue(pv, v134)) !== l5.value ? (function(){
1253                                             throw ({type: 'block', id: 60, values: (function(){
1254                                                 var x = v134;
1255                                                 if (typeof x != 'object')
1256                                                     throw 'The value ' + x + ' is not a type object.';
1257                                                 return (x.cdr = l35.fvalue(pv, v134), x);
1258                                             })(), message: 'Return from unknown block NIL.'})
1259                                         })() : l5.value);
1260                                         l5.value;
1261                                         (function(v135){
1262                                             return (v134 = v135);
1263                                         })((function(){
1264                                             var tmp = v134;
1265                                             return tmp === l5.value? l5.value: tmp.cdr;
1266                                         })());
1267                                     }return l5.value;
1268                                 })();
1269                             }
1270                             catch (cf){
1271                                 if (cf.type == 'block' && cf.id == 60)
1272                                     return cf.values;
1273                                 else
1274                                     throw cf;
1275                             }
1276                         })();
1277                     })(v132);
1278                 })();
1279                 return ({car: v133, cdr: v132});
1280             })()));
1281         })();
1282     }));
1283     return l85;
1284 })();
1285 var l86 = {name: "CODE-CHAR"};
1286 (function(){
1287     (l86).fvalue = (function(v138){
1288         ((v138)["fname"] = "CODE-CHAR");
1289         return v138;
1290     })((function (values,v137){
1291         checkArgs(arguments, 2);
1292         return (function(){
1293             return v137;
1294         })();
1295     }));
1296     return l86;
1297 })();
1298 var l87 = {name: "CHAR-CODE"};
1299 (function(){
1300     (l87).fvalue = (function(v140){
1301         ((v140)["fname"] = "CHAR-CODE");
1302         return v140;
1303     })((function (values,v139){
1304         checkArgs(arguments, 2);
1305         return (function(){
1306             return v139;
1307         })();
1308     }));
1309     return l87;
1310 })();
1311 var l88 = {name: "CHAR="};
1312 (function(){
1313     (l88).fvalue = (function(v143){
1314         ((v143)["fname"] = "CHAR=");
1315         return v143;
1316     })((function (values,v141,v142){
1317         checkArgs(arguments, 3);
1318         return (function(){
1319             return (function(){
1320                 var x1 = v141;
1321                 if (typeof x1 !== 'number') throw 'Not a number!';
1322                 var x2 = v142;
1323                 if (typeof x2 !== 'number') throw 'Not a number!';
1324                 return (x1==x2?l4.value: l5.value);
1325             })();
1326         })();
1327     }));
1328     return l88;
1329 })();
1330 var l89 = {name: "INTEGERP"};
1331 (function(){
1332     (l89).fvalue = (function(v145){
1333         ((v145)["fname"] = "INTEGERP");
1334         return v145;
1335     })((function (values,v144){
1336         checkArgs(arguments, 2);
1337         return (function(){
1338             return (((typeof (v144) == "number")?l4.value: l5.value) !== l5.value ? (function(){
1339                 var x1 = (function(){
1340                     var x = v144;
1341                     if (typeof x != 'number')
1342                         throw 'The value ' + x + ' is not a type number.';
1343                     return Math.floor(x);
1344                 })();
1345                 if (typeof x1 !== 'number') throw 'Not a number!';
1346                 var x2 = v144;
1347                 if (typeof x2 !== 'number') throw 'Not a number!';
1348                 return (x1==x2?l4.value: l5.value);
1349             })() : l5.value);
1350         })();
1351     }));
1352     return l89;
1353 })();
1354 var l90 = {name: "PLUSP"};
1355 (function(){
1356     (l90).fvalue = (function(v147){
1357         ((v147)["fname"] = "PLUSP");
1358         return v147;
1359     })((function (values,v146){
1360         checkArgs(arguments, 2);
1361         return (function(){
1362             return (function(){
1363                 var x1 = v146;
1364                 if (typeof x1 !== 'number') throw 'Not a number!';
1365                 return (0<x1?l4.value: l5.value);
1366             })();
1367         })();
1368     }));
1369     return l90;
1370 })();
1371 var l91 = {name: "MINUSP"};
1372 (function(){
1373     (l91).fvalue = (function(v149){
1374         ((v149)["fname"] = "MINUSP");
1375         return v149;
1376     })((function (values,v148){
1377         checkArgs(arguments, 2);
1378         return (function(){
1379             return (function(){
1380                 var x1 = v148;
1381                 if (typeof x1 !== 'number') throw 'Not a number!';
1382                 return (x1<0?l4.value: l5.value);
1383             })();
1384         })();
1385     }));
1386     return l91;
1387 })();
1388 (function(){
1389     (l62).fvalue = (function(v152){
1390         ((v152)["fname"] = "LISTP");
1391         return v152;
1392     })((function (values,v150){
1393         checkArgs(arguments, 2);
1394         return (function(){
1395             return (function(v151){
1396                 return (v151 !== l5.value ? v151 : l13.fvalue(values, v150));
1397             })(((function(){
1398                 var tmp = v150;
1399                 return (typeof tmp == 'object' && 'car' in tmp);
1400             })()?l4.value: l5.value));
1401         })();
1402     }));
1403     return l62;
1404 })();
1405 var l92 = {name: "NTHCDR"};
1406 (function(){
1407     (l92).fvalue = (function(v155){
1408         ((v155)["fname"] = "NTHCDR");
1409         return v155;
1410     })((function (values,v153,v154){
1411         checkArgs(arguments, 3);
1412         return (function(){
1413             (function(){
1414                 return (function(){
1415                     while((l90.fvalue(pv, v153) !== l5.value ? v154 : l5.value) !== l5.value){
1416                         (v153 = l25.fvalue(pv, v153));
1417                         (v154 = (function(){
1418                             var tmp = v154;
1419                             return tmp === l5.value? l5.value: tmp.cdr;
1420                         })());
1421                     }return l5.value;
1422                 })();
1423             })();
1424             return v154;
1425         })();
1426     }));
1427     return l92;
1428 })();
1429 var l93 = {name: "NTH"};
1430 (function(){
1431     (l93).fvalue = (function(v158){
1432         ((v158)["fname"] = "NTH");
1433         return v158;
1434     })((function (values,v156,v157){
1435         checkArgs(arguments, 3);
1436         return (function(){
1437             return (function(){
1438                 var tmp = l92.fvalue(pv, v156, v157);
1439                 return tmp === l5.value? l5.value: tmp.car;
1440             })();
1441         })();
1442     }));
1443     return l93;
1444 })();
1445 var l94 = {name: "LAST"};
1446 (function(){
1447     (l94).fvalue = (function(v160){
1448         ((v160)["fname"] = "LAST");
1449         return v160;
1450     })((function (values,v159){
1451         checkArgs(arguments, 2);
1452         return (function(){
1453             (function(){
1454                 return (function(){
1455                     while(((function(){
1456                         var tmp = (function(){
1457                             var tmp = v159;
1458                             return tmp === l5.value? l5.value: tmp.cdr;
1459                         })();
1460                         return (typeof tmp == 'object' && 'car' in tmp);
1461                     })()?l4.value: l5.value) !== l5.value){
1462                         (v159 = (function(){
1463                             var tmp = v159;
1464                             return tmp === l5.value? l5.value: tmp.cdr;
1465                         })());
1466                     }return l5.value;
1467                 })();
1468             })();
1469             return v159;
1470         })();
1471     }));
1472     return l94;
1473 })();
1474 var l95 = {name: "BUTLAST"};
1475 (function(){
1476     (l95).fvalue = (function(v162){
1477         ((v162)["fname"] = "BUTLAST");
1478         return v162;
1479     })((function (values,v161){
1480         checkArgs(arguments, 2);
1481         return (function(){
1482             return (((function(){
1483                 var tmp = (function(){
1484                     var tmp = v161;
1485                     return tmp === l5.value? l5.value: tmp.cdr;
1486                 })();
1487                 return (typeof tmp == 'object' && 'car' in tmp);
1488             })()?l4.value: l5.value) !== l5.value ? ({car: (function(){
1489                 var tmp = v161;
1490                 return tmp === l5.value? l5.value: tmp.car;
1491             })(), cdr: l95.fvalue(pv, (function(){
1492                 var tmp = v161;
1493                 return tmp === l5.value? l5.value: tmp.cdr;
1494             })())}) : l5.value);
1495         })();
1496     }));
1497     return l95;
1498 })();
1499 var l96 = {name: "MEMBER"};
1500 (function(){
1501     (l96).fvalue = (function(v165){
1502         ((v165)["fname"] = "MEMBER");
1503         return v165;
1504     })((function (values,v163,v164){
1505         checkArgs(arguments, 3);
1506         return (function(){
1507             return (function(){
1508                 try {
1509                     return (function(){
1510                         while(v164 !== l5.value){
1511                             (l28.fvalue(pv, v163, (function(){
1512                                 var tmp = v164;
1513                                 return tmp === l5.value? l5.value: tmp.car;
1514                             })()) !== l5.value ? (function(){
1515                                 var values = mv;
1516                                 throw ({type: 'block', id: 75, values: v164, message: 'Return from unknown block NIL.'})
1517                             })() : l5.value);
1518                             (v164 = (function(){
1519                                 var tmp = v164;
1520                                 return tmp === l5.value? l5.value: tmp.cdr;
1521                             })());
1522                         }return l5.value;
1523                     })();
1524                 }
1525                 catch (cf){
1526                     if (cf.type == 'block' && cf.id == 75)
1527                         return values.apply(this, forcemv(cf.values));
1528                     else
1529                         throw cf;
1530                 }
1531             })();
1532         })();
1533     }));
1534     return l96;
1535 })();
1536 var l97 = {name: "REMOVE"};
1537 (function(){
1538     (l97).fvalue = (function(v168){
1539         ((v168)["fname"] = "REMOVE");
1540         return v168;
1541     })((function (values,v166,v167){
1542         checkArgs(arguments, 3);
1543         return (function(){
1544             return (l13.fvalue(pv, v167) !== l5.value ? l5.value : (l28.fvalue(pv, v166, (function(){
1545                 var tmp = v167;
1546                 return tmp === l5.value? l5.value: tmp.car;
1547             })()) !== l5.value ? l97.fvalue(values, v166, (function(){
1548                 var tmp = v167;
1549                 return tmp === l5.value? l5.value: tmp.cdr;
1550             })()) : ({car: (function(){
1551                 var tmp = v167;
1552                 return tmp === l5.value? l5.value: tmp.car;
1553             })(), cdr: l97.fvalue(pv, v166, (function(){
1554                 var tmp = v167;
1555                 return tmp === l5.value? l5.value: tmp.cdr;
1556             })())})));
1557         })();
1558     }));
1559     return l97;
1560 })();
1561 var l98 = {name: "REMOVE-IF"};
1562 (function(){
1563     (l98).fvalue = (function(v171){
1564         ((v171)["fname"] = "REMOVE-IF");
1565         return v171;
1566     })((function (values,v169,v170){
1567         checkArgs(arguments, 3);
1568         return (function(){
1569             return (l13.fvalue(pv, v170) !== l5.value ? l5.value : ((function(){
1570                 var f = v169;
1571                 return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
1572                     var tmp = v170;
1573                     return tmp === l5.value? l5.value: tmp.car;
1574                 })())
1575             })() !== l5.value ? l98.fvalue(values, v169, (function(){
1576                 var tmp = v170;
1577                 return tmp === l5.value? l5.value: tmp.cdr;
1578             })()) : ({car: (function(){
1579                 var tmp = v170;
1580                 return tmp === l5.value? l5.value: tmp.car;
1581             })(), cdr: l98.fvalue(pv, v169, (function(){
1582                 var tmp = v170;
1583                 return tmp === l5.value? l5.value: tmp.cdr;
1584             })())})));
1585         })();
1586     }));
1587     return l98;
1588 })();
1589 var l99 = {name: "REMOVE-IF-NOT"};
1590 (function(){
1591     (l99).fvalue = (function(v174){
1592         ((v174)["fname"] = "REMOVE-IF-NOT");
1593         return v174;
1594     })((function (values,v172,v173){
1595         checkArgs(arguments, 3);
1596         return (function(){
1597             return (l13.fvalue(pv, v173) !== l5.value ? l5.value : ((function(){
1598                 var f = v172;
1599                 return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
1600                     var tmp = v173;
1601                     return tmp === l5.value? l5.value: tmp.car;
1602                 })())
1603             })() !== l5.value ? ({car: (function(){
1604                 var tmp = v173;
1605                 return tmp === l5.value? l5.value: tmp.car;
1606             })(), cdr: l99.fvalue(pv, v172, (function(){
1607                 var tmp = v173;
1608                 return tmp === l5.value? l5.value: tmp.cdr;
1609             })())}) : l99.fvalue(values, v172, (function(){
1610                 var tmp = v173;
1611                 return tmp === l5.value? l5.value: tmp.cdr;
1612             })())));
1613         })();
1614     }));
1615     return l99;
1616 })();
1617 var l100 = {name: "DIGIT-CHAR-P"};
1618 (function(){
1619     (l100).fvalue = (function(v176){
1620         ((v176)["fname"] = "DIGIT-CHAR-P");
1621         return v176;
1622     })((function (values,v175){
1623         checkArgs(arguments, 2);
1624         return (function(){
1625             return (((function(){
1626                 var x1 = v175;
1627                 if (typeof x1 !== 'number') throw 'Not a number!';
1628                 return (48<=x1?l4.value: l5.value);
1629             })() !== l5.value ? (function(){
1630                 var x1 = v175;
1631                 if (typeof x1 !== 'number') throw 'Not a number!';
1632                 return (x1<=57?l4.value: l5.value);
1633             })() : l5.value) !== l5.value ? (function(){
1634                 var x1 = v175;
1635                 if (typeof x1 !== 'number') throw 'Not a number!';
1636                 return x1-48;
1637             })() : l5.value);
1638         })();
1639     }));
1640     return l100;
1641 })();
1642 var l101 = {name: "DIGIT-CHAR"};
1643 (function(){
1644     (l101).fvalue = (function(v178){
1645         ((v178)["fname"] = "DIGIT-CHAR");
1646         return v178;
1647     })((function (values,v177){
1648         checkArgs(arguments, 2);
1649         return (function(){
1650             return ((function(){
1651                 var x1 = v177;
1652                 if (typeof x1 !== 'number') throw 'Not a number!';
1653                 return (0<=x1 && x1<=9?l4.value: l5.value);
1654             })() !== l5.value ? (function(){
1655                 var string = "0123456789";
1656                 var index = v177;
1657                 if (typeof string != 'string')
1658                     throw 'The value ' + string + ' is not a type string.';
1659                 if (typeof index != 'number')
1660                     throw 'The value ' + index + ' is not a type number.';
1661                 return string.charCodeAt(index);
1662             })() : l5.value);
1663         })();
1664     }));
1665     return l101;
1666 })();
1667 var l102 = {name: "SUBSEQ"};
1668 (function(){
1669     (l102).fvalue = (function(v182){
1670         ((v182)["fname"] = "SUBSEQ");
1671         return v182;
1672     })((function (values,v179,v180,v181){
1673         checkArgsAtLeast(arguments, 3);
1674         checkArgsAtMost(arguments, 4);
1675         var v181;
1676         switch(arguments.length-1){
1677         case 2:
1678             v181=l5.value;
1679         default: break;
1680         }
1681         return (function(){
1682             return (((typeof(v179) == "string")?l4.value: l5.value) !== l5.value ? (v181 !== l5.value ? (function(){
1683                 var str = v179;
1684                 var a = v180;
1685                 var b;
1686                 b = v181;
1687                 return str.slice(a,b);
1688             })() : (function(){
1689                 var str = v179;
1690                 var a = v180;
1691                 var b;
1692                 return str.slice(a,b);
1693             })()) : (function(){
1694                 throw "Unsupported argument.";
1695             })());
1696         })();
1697     }));
1698     return l102;
1699 })();
1700 var l103 = {name: "DO-SEQUENCE"};
1701 l103;
1702 var l104 = {name: "SOME"};
1703 (function(){
1704     (l104).fvalue = (function(v192){
1705         ((v192)["fname"] = "SOME");
1706         return v192;
1707     })((function (values,v183,v184){
1708         checkArgs(arguments, 3);
1709         return (function(){
1710             try {
1711                 return (function(v185){
1712                     return (((typeof(v185) == "string")?l4.value: l5.value) !== l5.value ? (function(v186){
1713                         return (function(){
1714                             return (function(v187,v188){
1715                                 (function(){
1716                                     while((function(){
1717                                         var x1 = v187;
1718                                         if (typeof x1 !== 'number') throw 'Not a number!';
1719                                         var x2 = v188;
1720                                         if (typeof x2 !== 'number') throw 'Not a number!';
1721                                         return (x1<x2?l4.value: l5.value);
1722                                     })() !== l5.value){
1723                                         (function(){
1724                                             (function(v189){
1725                                                 return ((function(){
1726                                                     var f = v183;
1727                                                     return (typeof f === 'function'? f: f.fvalue)(pv, v189)
1728                                                 })() !== l5.value ? (function(){
1729                                                     var values = mv;
1730                                                     throw ({type: 'block', id: 82, values: l4.value, message: 'Return from unknown block SOME.'})
1731                                                 })() : l5.value);
1732                                             })((function(){
1733                                                 var string = v185;
1734                                                 var index = v187;
1735                                                 if (typeof string != 'string')
1736                                                     throw 'The value ' + string + ' is not a type string.';
1737                                                 if (typeof index != 'number')
1738                                                     throw 'The value ' + index + ' is not a type number.';
1739                                                 return string.charCodeAt(index);
1740                                             })());
1741                                             return l5.value;
1742                                         })();
1743                                         (v187 = (function(){
1744                                             var x1 = v187;
1745                                             if (typeof x1 !== 'number') throw 'Not a number!';
1746                                             return x1+1;
1747                                         })());
1748                                     }return l5.value;
1749                                 })();
1750                                 return l5.value;
1751                             })(0,l75.fvalue(pv, v185));
1752                         })();
1753                     })(0) : (l62.fvalue(pv, v185) !== l5.value ? (function(){
1754                         return (function(v190,v191){
1755                             (function(){
1756                                 while(v190 !== l5.value){
1757                                     (v191 = (function(){
1758                                         var tmp = v190;
1759                                         return tmp === l5.value? l5.value: tmp.car;
1760                                     })());
1761                                     (function(){
1762                                         ((function(){
1763                                             var f = v183;
1764                                             return (typeof f === 'function'? f: f.fvalue)(pv, v191)
1765                                         })() !== l5.value ? (function(){
1766                                             var values = mv;
1767                                             throw ({type: 'block', id: 82, values: l4.value, message: 'Return from unknown block SOME.'})
1768                                         })() : l5.value);
1769                                         return l5.value;
1770                                     })();
1771                                     (v190 = (function(){
1772                                         var tmp = v190;
1773                                         return tmp === l5.value? l5.value: tmp.cdr;
1774                                     })());
1775                                 }return l5.value;
1776                             })();
1777                             return l5.value;
1778                         })(v185,l5.value);
1779                     })() : (function(){
1780                         throw "type-error!";
1781                     })()));
1782                 })(v184);
1783             }
1784             catch (cf){
1785                 if (cf.type == 'block' && cf.id == 82)
1786                     return values.apply(this, forcemv(cf.values));
1787                 else
1788                     throw cf;
1789             }
1790         })();
1791     }));
1792     return l104;
1793 })();
1794 var l105 = {name: "EVERY"};
1795 (function(){
1796     (l105).fvalue = (function(v202){
1797         ((v202)["fname"] = "EVERY");
1798         return v202;
1799     })((function (values,v193,v194){
1800         checkArgs(arguments, 3);
1801         return (function(){
1802             try {
1803                 (function(v195){
1804                     return (((typeof(v195) == "string")?l4.value: l5.value) !== l5.value ? (function(v196){
1805                         return (function(){
1806                             return (function(v197,v198){
1807                                 (function(){
1808                                     while((function(){
1809                                         var x1 = v197;
1810                                         if (typeof x1 !== 'number') throw 'Not a number!';
1811                                         var x2 = v198;
1812                                         if (typeof x2 !== 'number') throw 'Not a number!';
1813                                         return (x1<x2?l4.value: l5.value);
1814                                     })() !== l5.value){
1815                                         (function(){
1816                                             (function(v199){
1817                                                 return ((function(){
1818                                                     var f = v193;
1819                                                     return (typeof f === 'function'? f: f.fvalue)(pv, v199)
1820                                                 })() !== l5.value ? l5.value : (function(){
1821                                                     var values = mv;
1822                                                     throw ({type: 'block', id: 85, values: l5.value, message: 'Return from unknown block EVERY.'})
1823                                                 })());
1824                                             })((function(){
1825                                                 var string = v195;
1826                                                 var index = v197;
1827                                                 if (typeof string != 'string')
1828                                                     throw 'The value ' + string + ' is not a type string.';
1829                                                 if (typeof index != 'number')
1830                                                     throw 'The value ' + index + ' is not a type number.';
1831                                                 return string.charCodeAt(index);
1832                                             })());
1833                                             return l5.value;
1834                                         })();
1835                                         (v197 = (function(){
1836                                             var x1 = v197;
1837                                             if (typeof x1 !== 'number') throw 'Not a number!';
1838                                             return x1+1;
1839                                         })());
1840                                     }return l5.value;
1841                                 })();
1842                                 return l5.value;
1843                             })(0,l75.fvalue(pv, v195));
1844                         })();
1845                     })(0) : (l62.fvalue(pv, v195) !== l5.value ? (function(){
1846                         return (function(v200,v201){
1847                             (function(){
1848                                 while(v200 !== l5.value){
1849                                     (v201 = (function(){
1850                                         var tmp = v200;
1851                                         return tmp === l5.value? l5.value: tmp.car;
1852                                     })());
1853                                     (function(){
1854                                         ((function(){
1855                                             var f = v193;
1856                                             return (typeof f === 'function'? f: f.fvalue)(pv, v201)
1857                                         })() !== l5.value ? l5.value : (function(){
1858                                             var values = mv;
1859                                             throw ({type: 'block', id: 85, values: l5.value, message: 'Return from unknown block EVERY.'})
1860                                         })());
1861                                         return l5.value;
1862                                     })();
1863                                     (v200 = (function(){
1864                                         var tmp = v200;
1865                                         return tmp === l5.value? l5.value: tmp.cdr;
1866                                     })());
1867                                 }return l5.value;
1868                             })();
1869                             return l5.value;
1870                         })(v195,l5.value);
1871                     })() : (function(){
1872                         throw "type-error!";
1873                     })()));
1874                 })(v194);
1875                 return l4.value;
1876             }
1877             catch (cf){
1878                 if (cf.type == 'block' && cf.id == 85)
1879                     return values.apply(this, forcemv(cf.values));
1880                 else
1881                     throw cf;
1882             }
1883         })();
1884     }));
1885     return l105;
1886 })();
1887 var l106 = {name: "ASSOC"};
1888 (function(){
1889     (l106).fvalue = (function(v205){
1890         ((v205)["fname"] = "ASSOC");
1891         return v205;
1892     })((function (values,v203,v204){
1893         checkArgs(arguments, 3);
1894         return (function(){
1895             (function(){
1896                 try {
1897                     return (function(){
1898                         while(v204 !== l5.value){
1899                             (l28.fvalue(pv, v203, l34.fvalue(pv, v204)) !== l5.value ? (function(){
1900                                 throw ({type: 'block', id: 89, values: l5.value, message: 'Return from unknown block NIL.'})
1901                             })() : (v204 = (function(){
1902                                 var tmp = v204;
1903                                 return tmp === l5.value? l5.value: tmp.cdr;
1904                             })()));
1905                         }return l5.value;
1906                     })();
1907                 }
1908                 catch (cf){
1909                     if (cf.type == 'block' && cf.id == 89)
1910                         return cf.values;
1911                     else
1912                         throw cf;
1913                 }
1914             })();
1915             return (function(){
1916                 var tmp = v204;
1917                 return tmp === l5.value? l5.value: tmp.car;
1918             })();
1919         })();
1920     }));
1921     return l106;
1922 })();
1923 var l107 = {name: "STRING"};
1924 (function(){
1925     (l107).fvalue = (function(v207){
1926         ((v207)["fname"] = "STRING");
1927         return v207;
1928     })((function (values,v206){
1929         checkArgs(arguments, 2);
1930         return (function(){
1931             return (((typeof(v206) == "string")?l4.value: l5.value) !== l5.value ? v206 : (((function(){
1932                 var tmp = v206;
1933                 return (typeof tmp == 'object' && 'name' in tmp);
1934             })()?l4.value: l5.value) !== l5.value ? (v206).name : (function(){
1935                 var x = v206;
1936                 if (typeof x != 'number')
1937                     throw 'The value ' + x + ' is not a type number.';
1938                 return String.fromCharCode(x);
1939             })()));
1940         })();
1941     }));
1942     return l107;
1943 })();
1944 var l108 = {name: "STRING="};
1945 (function(){
1946     (l108).fvalue = (function(v210){
1947         ((v210)["fname"] = "STRING=");
1948         return v210;
1949     })((function (values,v208,v209){
1950         checkArgs(arguments, 3);
1951         return (function(){
1952             return ((v208 == v209)?l4.value: l5.value);
1953         })();
1954     }));
1955     return l108;
1956 })();
1957 var l109 = {name: "FDEFINITION"};
1958 (function(){
1959     (l109).fvalue = (function(v212){
1960         ((v212)["fname"] = "FDEFINITION");
1961         return v212;
1962     })((function (values,v211){
1963         checkArgs(arguments, 2);
1964         return (function(){
1965             return (((typeof v211 == 'function')?l4.value: l5.value) !== l5.value ? v211 : (((function(){
1966                 var tmp = v211;
1967                 return (typeof tmp == 'object' && 'name' in tmp);
1968             })()?l4.value: l5.value) !== l5.value ? (function(){
1969                 var symbol = v211;
1970                 var func = symbol.fvalue;
1971                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1972                 return func;
1973             })() : (function(){
1974                 throw "Invalid function";
1975             })()));
1976         })();
1977     }));
1978     return l109;
1979 })();
1980 var l110 = {name: "DISASSEMBLE"};
1981 var l111 = {name: "WRITE-LINE"};
1982 (function(){
1983     (l110).fvalue = (function(v214){
1984         ((v214)["fname"] = "DISASSEMBLE");
1985         return v214;
1986     })((function (values,v213){
1987         checkArgs(arguments, 2);
1988         return (function(){
1989             l111.fvalue(pv, (l109.fvalue(pv, v213)).toString());
1990             return l5.value;
1991         })();
1992     }));
1993     return l110;
1994 })();
1995 var l112 = {name: "DOCUMENTATION"};
1996 var l113 = {name: "FUNCTION"};
1997 var l114 = {name: "VARIABLE"};
1998 (function(){
1999     (l112).fvalue = (function(v219){
2000         ((v219)["fname"] = "DOCUMENTATION");
2001         return v219;
2002     })((function(){
2003         var func = (function (values,v215,v216){
2004             checkArgs(arguments, 3);
2005             return (function(){
2006                 return (function(v217){
2007                     return (l28.fvalue(pv, v217, l113) !== l5.value ? (function(v218){
2008                         return (function(){
2009                             var tmp = (v218)["docstring"];
2010                             return tmp == undefined? l5.value: tmp ;
2011                         })();
2012                     })(l109.fvalue(pv, v215)) : (l28.fvalue(pv, v217, l114) !== l5.value ? (function(){
2013                         (((function(){
2014                             var tmp = v215;
2015                             return (typeof tmp == 'object' && 'name' in tmp);
2016                         })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
2017                             throw "Wrong argument type! it should be a symbol";
2018                         })());
2019                         return (function(){
2020                             var tmp = (v215)["vardoc"];
2021                             return tmp == undefined? l5.value: tmp ;
2022                         })();
2023                     })() : (function(){
2024                         throw "ECASE expression failed.";
2025                     })()));
2026                 })(v216);
2027             })();
2028         });
2029         func.docstring = 'Return the documentation of X. TYPE must be the symbol VARIABLE or FUNCTION.';
2030         return func;
2031     })());
2032     return l112;
2033 })();
2034 var l115 = {name: "MULTIPLE-VALUE-BIND"};
2035 l115;
2036 var l116 = {name: "MULTIPLE-VALUE-LIST"};
2037 l116;
2038 var l117 = {name: "*SETF-EXPANDERS*"};
2039 (function(){
2040     (((l117.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l117).value = l5.value));
2041     return l117;
2042 })();
2043 var l118 = {name: "GET-SETF-EXPANSION"};
2044 var l119 = {name: "SETQ"};
2045 var l120 = {name: "LS-MACROEXPAND-1"};
2046 (function(){
2047     (l118).fvalue = (function(v225){
2048         ((v225)["fname"] = "GET-SETF-EXPANSION");
2049         return v225;
2050     })((function (values,v220){
2051         checkArgs(arguments, 2);
2052         return (function(){
2053             return (((function(){
2054                 var tmp = v220;
2055                 return (typeof tmp == 'object' && 'name' in tmp);
2056             })()?l4.value: l5.value) !== l5.value ? (function(v221){
2057                 return values(l5.value, l5.value, l47.fvalue(pv, v221), l47.fvalue(pv, l119, v220, v221), v220);
2058             })(l18.fvalue(pv)) : (function(v222){
2059                 return (function(){
2060                     var v223 = (function(){
2061                         var tmp = v222;
2062                         return tmp === l5.value? l5.value: tmp.car;
2063                     })();
2064                     var v224 = (function(){
2065                         var tmp = l106.fvalue(pv, v223, (function(){
2066                             var symbol = l117;
2067                             var value = symbol.value;
2068                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2069                             return value;
2070                         })());
2071                         return tmp === l5.value? l5.value: tmp.cdr;
2072                     })();
2073                     (l13.fvalue(pv, v224) !== l5.value ? (function(){
2074                         throw "Unknown generalized reference.";
2075                     })() : l5.value);
2076                     return (function(){
2077                         var f = v224;
2078                         var args = [values];
2079                         var tail = ((function(){
2080                             var tmp = v222;
2081                             return tmp === l5.value? l5.value: tmp.cdr;
2082                         })());
2083                         while (tail != l5.value){
2084                             args.push(tail.car);
2085                             tail = tail.cdr;
2086                         }
2087                         return (typeof f === 'function'? f : f.fvalue).apply(this, args);
2088                     })();
2089                 })();
2090             })(l120.fvalue(pv, v220)));
2091         })();
2092     }));
2093     return l118;
2094 })();
2095 var l121 = {name: "DEFINE-SETF-EXPANDER"};
2096 l121;
2097 var l122 = {name: "SETF"};
2098 l122;
2099 var l123 = {name: "PROGN"};
2100 var l124 = {name: "RPLACA"};
2101 (function(){
2102     ((l117).value = ({car: ({car: l32, cdr: (function (values,v226){
2103         checkArgs(arguments, 2);
2104         return (function(v227,v228){
2105             return values(l47.fvalue(pv, v227), l47.fvalue(pv, v226), l47.fvalue(pv, v228), l47.fvalue(pv, l123, l47.fvalue(pv, l124, v227, v228), v228), l47.fvalue(pv, l32, v227));
2106         })(l18.fvalue(pv),l18.fvalue(pv));
2107     })}), cdr: (function(){
2108         var symbol = l117;
2109         var value = symbol.value;
2110         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2111         return value;
2112     })()}));
2113     return l32;
2114 })();
2115 var l125 = {name: "RPLACD"};
2116 (function(){
2117     ((l117).value = ({car: ({car: l33, cdr: (function (values,v229){
2118         checkArgs(arguments, 2);
2119         return (function(v230,v231){
2120             return values(l47.fvalue(pv, v230), l47.fvalue(pv, v229), l47.fvalue(pv, v231), l47.fvalue(pv, l123, l47.fvalue(pv, l125, v230, v231), v231), l47.fvalue(pv, l32, v230));
2121         })(l18.fvalue(pv),l18.fvalue(pv));
2122     })}), cdr: (function(){
2123         var symbol = l117;
2124         var value = symbol.value;
2125         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2126         return value;
2127     })()}));
2128     return l33;
2129 })();
2130 l51;
2131 var l126 = {name: "TYPECASE"};
2132 l126;
2133 var l127 = {name: "NCONC"};
2134 (function(){
2135     (l127).fvalue = (function(v247){
2136         ((v247)["fname"] = "NCONC");
2137         return v247;
2138     })((function (values){
2139         var v232= l5.value;
2140         for (var i = arguments.length-1; i>=1; i--)
2141             v232 = {car: arguments[i], cdr:
2142         v232};
2143         return (function(){
2144             return (function(v234){
2145                 return (function(){
2146                     return (function(v235){
2147                         return (function(){
2148                             try {
2149                                 return (function(){
2150                                     while(l4.value !== l5.value){
2151                                         (l13.fvalue(pv, v235) !== l5.value ? (function(){
2152                                             var values = mv;
2153                                             throw ({type: 'block', id: 98, values: l5.value, message: 'Return from unknown block NIL.'})
2154                                         })() : l5.value);
2155                                         (function(){
2156                                             (function(v236){
2157                                                 return (function(v237){
2158                                                     return (((function(){
2159                                                         var tmp = v237;
2160                                                         return (typeof tmp == 'object' && 'car' in tmp);
2161                                                     })()?l4.value: l5.value) !== l5.value ? (function(){
2162                                                         var v238 = v236;
2163                                                         var v239 = v238;
2164                                                         (function(){
2165                                                             return (function(v240){
2166                                                                 return (function(){
2167                                                                     try {
2168                                                                         return (function(){
2169                                                                             while(l4.value !== l5.value){
2170                                                                                 (l14.fvalue(pv, v240) !== l5.value ? (function(){
2171                                                                                     throw ({type: 'block', id: 100, values: l5.value, message: 'Return from unknown block NIL.'})
2172                                                                                 })() : l5.value);
2173                                                                                 (function(){
2174                                                                                     (function(v241){
2175                                                                                         return (function(v242){
2176                                                                                             return (((function(){
2177                                                                                                 var tmp = v242;
2178                                                                                                 return (typeof tmp == 'object' && 'car' in tmp);
2179                                                                                             })()?l4.value: l5.value) !== l5.value ? (function(){
2180                                                                                                 (function(){
2181                                                                                                     var x = l94.fvalue(pv, v239);
2182                                                                                                     if (typeof x != 'object')
2183                                                                                                         throw 'The value ' + x + ' is not a type object.';
2184                                                                                                     return (x.cdr = v241, x);
2185                                                                                                 })();
2186                                                                                                 return (function(){
2187                                                                                                     return (function(){
2188                                                                                                         var func = (function (values,v244){
2189                                                                                                             var v244;
2190                                                                                                             switch(arguments.length-1){
2191                                                                                                             case 0:
2192                                                                                                                 v244=l5.value;
2193                                                                                                             default: break;
2194                                                                                                             }
2195                                                                                                             var v243= l5.value;
2196                                                                                                             for (var i = arguments.length-1; i>=2; i--)
2197                                                                                                                 v243 = {car: arguments[i], cdr:
2198                                                                                                             v243};
2199                                                                                                             return (v239 = v244);
2200                                                                                                         });
2201                                                                                                         var args = [pv];
2202                                                                                                         return (function(){
2203                                                                                                             var values = mv;
2204                                                                                                             var vs;
2205                                                                                                             vs = v241;
2206                                                                                                             if (typeof vs === 'object' && 'multiple-value' in vs)
2207                                                                                                                 args = args.concat(vs);
2208                                                                                                             else
2209                                                                                                                 args.push(vs);
2210                                                                                                             return func.apply(window, args);
2211                                                                                                         })();
2212                                                                                                     })();
2213                                                                                                 })();
2214                                                                                             })() : (l13.fvalue(pv, v242) !== l5.value ? (function(){
2215                                                                                                 var x = l94.fvalue(pv, v239);
2216                                                                                                 if (typeof x != 'object')
2217                                                                                                     throw 'The value ' + x + ' is not a type object.';
2218                                                                                                 return (x.cdr = l5.value, x);
2219                                                                                             })() : (l48.fvalue(pv, v242) !== l5.value ? ((function(){
2220                                                                                                 var tmp = v240;
2221                                                                                                 return tmp === l5.value? l5.value: tmp.cdr;
2222                                                                                             })() !== l5.value ? v234(pv, v241) : (function(){
2223                                                                                                 var x = l94.fvalue(pv, v239);
2224                                                                                                 if (typeof x != 'object')
2225                                                                                                     throw 'The value ' + x + ' is not a type object.';
2226                                                                                                 return (x.cdr = v241, x);
2227                                                                                             })()) : l5.value)));
2228                                                                                         })(v241);
2229                                                                                     })((function(){
2230                                                                                         var tmp = v240;
2231                                                                                         return tmp === l5.value? l5.value: tmp.car;
2232                                                                                     })());
2233                                                                                     return l5.value;
2234                                                                                 })();
2235                                                                                 (function(v245){
2236                                                                                     return (v240 = v245);
2237                                                                                 })((function(){
2238                                                                                     var tmp = v240;
2239                                                                                     return tmp === l5.value? l5.value: tmp.cdr;
2240                                                                                 })());
2241                                                                             }return l5.value;
2242                                                                         })();
2243                                                                     }
2244                                                                     catch (cf){
2245                                                                         if (cf.type == 'block' && cf.id == 100)
2246                                                                             return cf.values;
2247                                                                         else
2248                                                                             throw cf;
2249                                                                     }
2250                                                                 })();
2251                                                             })((function(){
2252                                                                 var tmp = v235;
2253                                                                 return tmp === l5.value? l5.value: tmp.cdr;
2254                                                             })());
2255                                                         })();
2256                                                         return (function(){
2257                                                             var values = mv;
2258                                                             throw ({type: 'block', id: 98, values: v238, message: 'Return from unknown block NIL.'})
2259                                                         })();
2260                                                     })() : (l13.fvalue(pv, v237) !== l5.value ? l5.value : (l48.fvalue(pv, v237) !== l5.value ? ((function(){
2261                                                         var tmp = v235;
2262                                                         return tmp === l5.value? l5.value: tmp.cdr;
2263                                                     })() !== l5.value ? v234(pv, v236) : (function(){
2264                                                         var values = mv;
2265                                                         throw ({type: 'block', id: 98, values: v236, message: 'Return from unknown block NIL.'})
2266                                                     })()) : l5.value)));
2267                                                 })(v236);
2268                                             })((function(){
2269                                                 var tmp = v235;
2270                                                 return tmp === l5.value? l5.value: tmp.car;
2271                                             })());
2272                                             return l5.value;
2273                                         })();
2274                                         (function(v246){
2275                                             return (v235 = v246);
2276                                         })((function(){
2277                                             var tmp = v235;
2278                                             return tmp === l5.value? l5.value: tmp.cdr;
2279                                         })());
2280                                     }return l5.value;
2281                                 })();
2282                             }
2283                             catch (cf){
2284                                 if (cf.type == 'block' && cf.id == 98)
2285                                     return values.apply(this, forcemv(cf.values));
2286                                 else
2287                                     throw cf;
2288                             }
2289                         })();
2290                     })(v232);
2291                 })();
2292             })((function (values,v233){
2293                 checkArgs(arguments, 2);
2294                 return (function(){
2295                     throw "type-error in nconc";
2296                 })();
2297             }));
2298         })();
2299     }));
2300     return l127;
2301 })();
2302 var l128 = {name: "NRECONC"};
2303 (function(){
2304     (l128).fvalue = (function(v256){
2305         ((v256)["fname"] = "NRECONC");
2306         return v256;
2307     })((function (values,v248,v249){
2308         checkArgs(arguments, 3);
2309         return (function(){
2310             return (function(){
2311                 return (function(v250,v251,v252){
2312                     return (function(){
2313                         try {
2314                             return (function(){
2315                                 while(l4.value !== l5.value){
2316                                     (l48.fvalue(pv, v251) !== l5.value ? (function(){
2317                                         var values = mv;
2318                                         throw ({type: 'block', id: 103, values: v252, message: 'Return from unknown block NIL.'})
2319                                     })() : l5.value);
2320                                     (function(){
2321                                         (function(){
2322                                             var x = v251;
2323                                             if (typeof x != 'object')
2324                                                 throw 'The value ' + x + ' is not a type object.';
2325                                             return (x.cdr = v252, x);
2326                                         })();
2327                                         return l5.value;
2328                                     })();
2329                                     (function(v253,v254,v255){
2330                                         return (v250 = v253, v251 = v254, v252 = v255);
2331                                     })((l14.fvalue(pv, v250) !== l5.value ? v250 : (function(){
2332                                         var tmp = v250;
2333                                         return tmp === l5.value? l5.value: tmp.cdr;
2334                                     })()),v250,v251);
2335                                 }return l5.value;
2336                             })();
2337                         }
2338                         catch (cf){
2339                             if (cf.type == 'block' && cf.id == 103)
2340                                 return values.apply(this, forcemv(cf.values));
2341                             else
2342                                 throw cf;
2343                         }
2344                     })();
2345                 })((function(){
2346                     var tmp = v248;
2347                     return tmp === l5.value? l5.value: tmp.cdr;
2348                 })(),v248,v249);
2349             })();
2350         })();
2351     }));
2352     return l128;
2353 })();
2354 var l129 = {name: "NOTANY"};
2355 (function(){
2356     (l129).fvalue = (function(v259){
2357         ((v259)["fname"] = "NOTANY");
2358         return v259;
2359     })((function (values,v257,v258){
2360         checkArgs(arguments, 3);
2361         return (function(){
2362             return l29.fvalue(values, l104.fvalue(pv, v257, v258));
2363         })();
2364     }));
2365     return l129;
2366 })();
2367 var l130 = {name: "*PACKAGE-LIST*"};
2368 (function(){
2369     (((l130.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l130).value = l5.value));
2370     return l130;
2371 })();
2372 var l131 = {name: "LIST-ALL-PACKAGES"};
2373 (function(){
2374     (l131).fvalue = (function(v260){
2375         ((v260)["fname"] = "LIST-ALL-PACKAGES");
2376         return v260;
2377     })((function (values){
2378         checkArgsAtMost(arguments, 1);
2379         return (function(){
2380             return (function(){
2381                 var symbol = l130;
2382                 var value = symbol.value;
2383                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2384                 return value;
2385             })();
2386         })();
2387     }));
2388     return l131;
2389 })();
2390 var l132 = {name: "MAKE-PACKAGE"};
2391 var l133 = {name: "USE", 'package': 'KEYWORD'};
2392 var l134 = {name: "FIND-PACKAGE-OR-FAIL"};
2393 (function(){
2394     (l132).fvalue = (function(v267){
2395         ((v267)["fname"] = "MAKE-PACKAGE");
2396         return v267;
2397     })((function (values,v261){
2398         checkArgsAtLeast(arguments, 2);
2399         var v262;
2400         var i;
2401         for (i=2; i<arguments.length; i+=2){
2402             if (arguments[i] === l133.value){
2403                 v262 = arguments[i+1];
2404                 break;
2405             }
2406         }
2407         if (i == arguments.length){
2408             v262 = l5.value;
2409         }
2410         for (i=2; i<arguments.length; i+=2){
2411             if (arguments[i] !== l133.value)
2412                 throw 'Unknown keyword argument ' + arguments[i].name;
2413         }
2414         return (function(){
2415             return (function(v263,v264){
2416                 ((v263)["packageName"] = v261);
2417                 ((v263)["symbols"] = {});
2418                 ((v263)["exports"] = {});
2419                 ((v263)["use"] = v264);
2420                 (function(){
2421                     var v265 = v263;
2422                     var v266 = ({car: v265, cdr: (function(){
2423                         var symbol = l130;
2424                         var value = symbol.value;
2425                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2426                         return value;
2427                     })()});
2428                     return ((l130).value = v266);
2429                 })();
2430                 return v263;
2431             })({},l81.fvalue(pv, (function(){
2432                 var symbol = l134;
2433                 var func = symbol.fvalue;
2434                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2435                 return func;
2436             })(), v262));
2437         })();
2438     }));
2439     return l132;
2440 })();
2441 var l135 = {name: "PACKAGEP"};
2442 (function(){
2443     (l135).fvalue = (function(v269){
2444         ((v269)["fname"] = "PACKAGEP");
2445         return v269;
2446     })((function (values,v268){
2447         checkArgs(arguments, 2);
2448         return (function(){
2449             return (((typeof (v268) === 'object')?l4.value: l5.value) !== l5.value ? ((("symbols") in (v268))?l4.value: l5.value) : l5.value);
2450         })();
2451     }));
2452     return l135;
2453 })();
2454 var l136 = {name: "FIND-PACKAGE"};
2455 var l137 = {name: "PACKAGE-NAME"};
2456 (function(){
2457     (l136).fvalue = (function(v274){
2458         ((v274)["fname"] = "FIND-PACKAGE");
2459         return v274;
2460     })((function (values,v270){
2461         checkArgs(arguments, 2);
2462         return (function(){
2463             try {
2464                 (l135.fvalue(pv, v270) !== l5.value ? (function(){
2465                     var values = mv;
2466                     throw ({type: 'block', id: 108, values: v270, message: 'Return from unknown block FIND-PACKAGE.'})
2467                 })() : l5.value);
2468                 return (function(v271){
2469                     return (function(){
2470                         try {
2471                             return (function(v272,v273){
2472                                 (function(){
2473                                     while(v272 !== l5.value){
2474                                         (v273 = (function(){
2475                                             var tmp = v272;
2476                                             return tmp === l5.value? l5.value: tmp.car;
2477                                         })());
2478                                         (function(){
2479                                             (l108.fvalue(pv, l137.fvalue(pv, v273), v271) !== l5.value ? (function(){
2480                                                 var values = mv;
2481                                                 throw ({type: 'block', id: 109, values: v273, message: 'Return from unknown block NIL.'})
2482                                             })() : l5.value);
2483                                             return l5.value;
2484                                         })();
2485                                         (v272 = (function(){
2486                                             var tmp = v272;
2487                                             return tmp === l5.value? l5.value: tmp.cdr;
2488                                         })());
2489                                     }return l5.value;
2490                                 })();
2491                                 return l5.value;
2492                             })((function(){
2493                                 var symbol = l130;
2494                                 var value = symbol.value;
2495                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2496                                 return value;
2497                             })(),l5.value);
2498                         }
2499                         catch (cf){
2500                             if (cf.type == 'block' && cf.id == 109)
2501                                 return values.apply(this, forcemv(cf.values));
2502                             else
2503                                 throw cf;
2504                         }
2505                     })();
2506                 })(l107.fvalue(pv, v270));
2507             }
2508             catch (cf){
2509                 if (cf.type == 'block' && cf.id == 108)
2510                     return values.apply(this, forcemv(cf.values));
2511                 else
2512                     throw cf;
2513             }
2514         })();
2515     }));
2516     return l136;
2517 })();
2518 (function(){
2519     (l134).fvalue = (function(v277){
2520         ((v277)["fname"] = "FIND-PACKAGE-OR-FAIL");
2521         return v277;
2522     })((function (values,v275){
2523         checkArgs(arguments, 2);
2524         return (function(){
2525             return (function(v276){
2526                 return (v276 !== l5.value ? v276 : (function(){
2527                     throw "Package unknown.";
2528                 })());
2529             })(l136.fvalue(pv, v275));
2530         })();
2531     }));
2532     return l134;
2533 })();
2534 (function(){
2535     (l137).fvalue = (function(v280){
2536         ((v280)["fname"] = "PACKAGE-NAME");
2537         return v280;
2538     })((function (values,v278){
2539         checkArgs(arguments, 2);
2540         return (function(){
2541             return (function(v279){
2542                 return (function(){
2543                     var tmp = (v279)["packageName"];
2544                     return tmp == undefined? l5.value: tmp ;
2545                 })();
2546             })(l134.fvalue(pv, v278));
2547         })();
2548     }));
2549     return l137;
2550 })();
2551 var l138 = {name: "%PACKAGE-SYMBOLS"};
2552 (function(){
2553     (l138).fvalue = (function(v283){
2554         ((v283)["fname"] = "%PACKAGE-SYMBOLS");
2555         return v283;
2556     })((function (values,v281){
2557         checkArgs(arguments, 2);
2558         return (function(){
2559             return (function(v282){
2560                 return (function(){
2561                     var tmp = (v282)["symbols"];
2562                     return tmp == undefined? l5.value: tmp ;
2563                 })();
2564             })(l134.fvalue(pv, v281));
2565         })();
2566     }));
2567     return l138;
2568 })();
2569 var l139 = {name: "PACKAGE-USE-LIST"};
2570 (function(){
2571     (l139).fvalue = (function(v286){
2572         ((v286)["fname"] = "PACKAGE-USE-LIST");
2573         return v286;
2574     })((function (values,v284){
2575         checkArgs(arguments, 2);
2576         return (function(){
2577             return (function(v285){
2578                 return (function(){
2579                     var tmp = (v285)["use"];
2580                     return tmp == undefined? l5.value: tmp ;
2581                 })();
2582             })(l134.fvalue(pv, v284));
2583         })();
2584     }));
2585     return l139;
2586 })();
2587 var l140 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
2588 (function(){
2589     (l140).fvalue = (function(v289){
2590         ((v289)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
2591         return v289;
2592     })((function (values,v287){
2593         checkArgs(arguments, 2);
2594         return (function(){
2595             return (function(v288){
2596                 return (function(){
2597                     var tmp = (v288)["exports"];
2598                     return tmp == undefined? l5.value: tmp ;
2599                 })();
2600             })(l134.fvalue(pv, v287));
2601         })();
2602     }));
2603     return l140;
2604 })();
2605 var l141 = {name: "*COMMON-LISP-PACKAGE*"};
2606 (function(){
2607     (((l141.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l141).value = l132.fvalue(pv, "CL")));
2608     return l141;
2609 })();
2610 var l142 = {name: "*USER-PACKAGE*"};
2611 (function(){
2612     (((l142.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l142).value = l132.fvalue(pv, "CL-USER", l133.value, l47.fvalue(pv, (function(){
2613         var symbol = l141;
2614         var value = symbol.value;
2615         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2616         return value;
2617     })()))));
2618     return l142;
2619 })();
2620 var l143 = {name: "*KEYWORD-PACKAGE*"};
2621 (function(){
2622     (((l143.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l143).value = l132.fvalue(pv, "KEYWORD")));
2623     return l143;
2624 })();
2625 var l144 = {name: "KEYWORDP"};
2626 var l145 = {name: "SYMBOL-PACKAGE"};
2627 (function(){
2628     (l144).fvalue = (function(v291){
2629         ((v291)["fname"] = "KEYWORDP");
2630         return v291;
2631     })((function (values,v290){
2632         checkArgs(arguments, 2);
2633         return (function(){
2634             return (((function(){
2635                 var tmp = v290;
2636                 return (typeof tmp == 'object' && 'name' in tmp);
2637             })()?l4.value: l5.value) !== l5.value ? ((l145.fvalue(pv, v290) === (function(){
2638                 var symbol = l143;
2639                 var value = symbol.value;
2640                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2641                 return value;
2642             })())?l4.value: l5.value) : l5.value);
2643         })();
2644     }));
2645     return l144;
2646 })();
2647 var l146 = {name: "*PACKAGE*"};
2648 (function(){
2649     (((l146.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l146).value = (function(){
2650         var symbol = l141;
2651         var value = symbol.value;
2652         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2653         return value;
2654     })()));
2655     return l146;
2656 })();
2657 var l147 = {name: "IN-PACKAGE"};
2658 l147;
2659 var l148 = {name: "%INTERN-SYMBOL"};
2660 (function(){
2661     (l148).fvalue = (function(v295){
2662         ((v295)["fname"] = "%INTERN-SYMBOL");
2663         return v295;
2664     })((function (values,v292){
2665         checkArgs(arguments, 2);
2666         return (function(){
2667             return (function(){
2668                 var v293 = (((("package") in (v292))?l4.value: l5.value) !== l5.value ? l134.fvalue(pv, (function(){
2669                     var tmp = (v292)["package"];
2670                     return tmp == undefined? l5.value: tmp ;
2671                 })()) : (function(){
2672                     var symbol = l141;
2673                     var value = symbol.value;
2674                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2675                     return value;
2676                 })());
2677                 var v294 = l138.fvalue(pv, v293);
2678                 ((v292)["package"] = v293);
2679                 (((v293 === (function(){
2680                     var symbol = l143;
2681                     var value = symbol.value;
2682                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2683                     return value;
2684                 })())?l4.value: l5.value) !== l5.value ? ((v292)["value"] = v292) : l5.value);
2685                 return ((v294)[(v292).name] = v292);
2686             })();
2687         })();
2688     }));
2689     return l148;
2690 })();
2691 var l149 = {name: "FIND-SYMBOL"};
2692 var l150 = {name: "EXTERNAL", 'package': 'KEYWORD'};
2693 var l151 = {name: "INTERNAL", 'package': 'KEYWORD'};
2694 var l152 = {name: "INHERIT", 'package': 'KEYWORD'};
2695 (function(){
2696     (l149).fvalue = (function(v304){
2697         ((v304)["fname"] = "FIND-SYMBOL");
2698         return v304;
2699     })((function (values,v296,v297){
2700         checkArgsAtLeast(arguments, 2);
2701         checkArgsAtMost(arguments, 3);
2702         var v297;
2703         switch(arguments.length-1){
2704         case 1:
2705             v297=(function(){
2706                 var symbol = l146;
2707                 var value = symbol.value;
2708                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2709                 return value;
2710             })();
2711         default: break;
2712         }
2713         return (function(){
2714             return (function(){
2715                 var v298 = l134.fvalue(pv, v297);
2716                 var v299 = l140.fvalue(pv, v298);
2717                 var v300 = l138.fvalue(pv, v298);
2718                 return ((((v296) in (v299))?l4.value: l5.value) !== l5.value ? values((function(){
2719                     var tmp = (v299)[v296];
2720                     return tmp == undefined? l5.value: tmp ;
2721                 })(), l150.value) : ((((v296) in (v300))?l4.value: l5.value) !== l5.value ? values((function(){
2722                     var tmp = (v300)[v296];
2723                     return tmp == undefined? l5.value: tmp ;
2724                 })(), l151.value) : (function(){
2725                     try {
2726                         return (function(v301,v302){
2727                             (function(){
2728                                 while(v301 !== l5.value){
2729                                     (v302 = (function(){
2730                                         var tmp = v301;
2731                                         return tmp === l5.value? l5.value: tmp.car;
2732                                     })());
2733                                     (function(){
2734                                         (function(v303){
2735                                             return ((((v296) in (v303))?l4.value: l5.value) !== l5.value ? (function(){
2736                                                 var values = mv;
2737                                                 throw ({type: 'block', id: 118, values: values((function(){
2738                                                     var tmp = (v303)[v296];
2739                                                     return tmp == undefined? l5.value: tmp ;
2740                                                 })(), l152.value), message: 'Return from unknown block NIL.'})
2741                                             })() : l5.value);
2742                                         })(l140.fvalue(pv, v302));
2743                                         return l5.value;
2744                                     })();
2745                                     (v301 = (function(){
2746                                         var tmp = v301;
2747                                         return tmp === l5.value? l5.value: tmp.cdr;
2748                                     })());
2749                                 }return l5.value;
2750                             })();
2751                             return values(l5.value, l5.value);
2752                         })(l139.fvalue(pv, v298),l5.value);
2753                     }
2754                     catch (cf){
2755                         if (cf.type == 'block' && cf.id == 118)
2756                             return values.apply(this, forcemv(cf.values));
2757                         else
2758                             throw cf;
2759                     }
2760                 })()));
2761             })();
2762         })();
2763     }));
2764     return l149;
2765 })();
2766 var l153 = {name: "INTERN"};
2767 var l154 = {name: "EXPORT"};
2768 (function(){
2769     (l153).fvalue = (function(v313){
2770         ((v313)["fname"] = "INTERN");
2771         return v313;
2772     })((function (values,v305,v306){
2773         checkArgsAtLeast(arguments, 2);
2774         checkArgsAtMost(arguments, 3);
2775         var v306;
2776         switch(arguments.length-1){
2777         case 1:
2778             v306=(function(){
2779                 var symbol = l146;
2780                 var value = symbol.value;
2781                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2782                 return value;
2783             })();
2784         default: break;
2785         }
2786         return (function(){
2787             return (function(v307){
2788                 return (function(){
2789                     var func = (function (values,v309,v310){
2790                         var v309;
2791                         var v310;
2792                         switch(arguments.length-1){
2793                         case 0:
2794                             v309=l5.value;
2795                         case 1:
2796                             v310=l5.value;
2797                         default: break;
2798                         }
2799                         var v308= l5.value;
2800                         for (var i = arguments.length-1; i>=3; i--)
2801                             v308 = {car: arguments[i], cdr:
2802                         v308};
2803                         return (v310 !== l5.value ? values(v309, v310) : (function(v311){
2804                             (function(){
2805                                 var tmp = (v311)[v305];
2806                                 return tmp == undefined? l5.value: tmp ;
2807                             })();
2808                             return (function(v312){
2809                                 ((v312)["package"] = v307);
2810                                 (((v307 === (function(){
2811                                     var symbol = l143;
2812                                     var value = symbol.value;
2813                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2814                                     return value;
2815                                 })())?l4.value: l5.value) !== l5.value ? (function(){
2816                                     ((v312)["value"] = v312);
2817                                     return l154.fvalue(pv, l47.fvalue(pv, v312), v307);
2818                                 })() : l5.value);
2819                                 ((v311)[v305] = v312);
2820                                 return values(v312, l5.value);
2821                             })((function(){
2822                                 var name = v305;
2823                                 if (typeof name != 'string')
2824                                     throw 'The value ' + name + ' is not a type string.';
2825                                 return ({name: name});
2826                             })());
2827                         })(l138.fvalue(pv, v307)));
2828                     });
2829                     var args = [values];
2830                     return (function(){
2831                         var values = mv;
2832                         var vs;
2833                         vs = l149.fvalue(values, v305, v307);
2834                         if (typeof vs === 'object' && 'multiple-value' in vs)
2835                             args = args.concat(vs);
2836                         else
2837                             args.push(vs);
2838                         return func.apply(window, args);
2839                     })();
2840                 })();
2841             })(l134.fvalue(pv, v306));
2842         })();
2843     }));
2844     return l153;
2845 })();
2846 (function(){
2847     (l145).fvalue = (function(v315){
2848         ((v315)["fname"] = "SYMBOL-PACKAGE");
2849         return v315;
2850     })((function (values,v314){
2851         checkArgs(arguments, 2);
2852         return (function(){
2853             (((function(){
2854                 var tmp = v314;
2855                 return (typeof tmp == 'object' && 'name' in tmp);
2856             })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
2857                 throw "it is not a symbol";
2858             })());
2859             return (function(){
2860                 var tmp = (v314)["package"];
2861                 return tmp == undefined? l5.value: tmp ;
2862             })();
2863         })();
2864     }));
2865     return l145;
2866 })();
2867 (function(){
2868     (l154).fvalue = (function(v321){
2869         ((v321)["fname"] = "EXPORT");
2870         return v321;
2871     })((function (values,v316,v317){
2872         checkArgsAtLeast(arguments, 2);
2873         checkArgsAtMost(arguments, 3);
2874         var v317;
2875         switch(arguments.length-1){
2876         case 1:
2877             v317=(function(){
2878                 var symbol = l146;
2879                 var value = symbol.value;
2880                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2881                 return value;
2882             })();
2883         default: break;
2884         }
2885         return (function(){
2886             return (function(v318){
2887                 return (function(){
2888                     return (function(v319,v320){
2889                         (function(){
2890                             while(v319 !== l5.value){
2891                                 (v320 = (function(){
2892                                     var tmp = v319;
2893                                     return tmp === l5.value? l5.value: tmp.car;
2894                                 })());
2895                                 (function(){
2896                                     ((v318)[(v320).name] = v320);
2897                                     return l5.value;
2898                                 })();
2899                                 (v319 = (function(){
2900                                     var tmp = v319;
2901                                     return tmp === l5.value? l5.value: tmp.cdr;
2902                                 })());
2903                             }return l5.value;
2904                         })();
2905                         return l4.value;
2906                     })(v316,l5.value);
2907                 })();
2908             })(l140.fvalue(pv, v317));
2909         })();
2910     }));
2911     return l154;
2912 })();
2913 var l155 = {name: "GET-UNIVERSAL-TIME"};
2914 (function(){
2915     (l155).fvalue = (function(v322){
2916         ((v322)["fname"] = "GET-UNIVERSAL-TIME");
2917         return v322;
2918     })((function (values){
2919         checkArgsAtMost(arguments, 1);
2920         return (function(){
2921             return (function(){
2922                 var x1 = (Math.round(new Date() / 1000));
2923                 if (typeof x1 !== 'number') throw 'Not a number!';
2924                 return x1+2208988800;
2925             })();
2926         })();
2927     }));
2928     return l155;
2929 })();
2930 var l156 = {name: "*NEWLINE*"};
2931 (function(){
2932     (((l156.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l156).value = l107.fvalue(pv, l86.fvalue(pv, 10))));
2933     return l156;
2934 })();
2935 var l157 = {name: "CONCAT"};
2936 (function(){
2937     (l157).fvalue = (function(v324){
2938         ((v324)["fname"] = "CONCAT");
2939         return v324;
2940     })((function (values){
2941         var v323= l5.value;
2942         for (var i = arguments.length-1; i>=1; i--)
2943             v323 = {car: arguments[i], cdr:
2944         v323};
2945         return (function(){
2946             return l63.fvalue(values, (function(){
2947                 var symbol = l76;
2948                 var func = symbol.fvalue;
2949                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2950                 return func;
2951             })(), v323, l64.value, "");
2952         })();
2953     }));
2954     return l157;
2955 })();
2956 var l158 = {name: "CONCATF"};
2957 l158;
2958 var l159 = {name: "JOIN"};
2959 (function(){
2960     (l159).fvalue = (function(v327){
2961         ((v327)["fname"] = "JOIN");
2962         return v327;
2963     })((function (values,v325,v326){
2964         checkArgsAtLeast(arguments, 2);
2965         checkArgsAtMost(arguments, 3);
2966         var v326;
2967         switch(arguments.length-1){
2968         case 1:
2969             v326="";
2970         default: break;
2971         }
2972         return (function(){
2973             return (l13.fvalue(pv, v325) !== l5.value ? "" : (l13.fvalue(pv, (function(){
2974                 var tmp = v325;
2975                 return tmp === l5.value? l5.value: tmp.cdr;
2976             })()) !== l5.value ? (function(){
2977                 var tmp = v325;
2978                 return tmp === l5.value? l5.value: tmp.car;
2979             })() : l157.fvalue(values, (function(){
2980                 var tmp = v325;
2981                 return tmp === l5.value? l5.value: tmp.car;
2982             })(), v326, l159.fvalue(pv, (function(){
2983                 var tmp = v325;
2984                 return tmp === l5.value? l5.value: tmp.cdr;
2985             })(), v326))));
2986         })();
2987     }));
2988     return l159;
2989 })();
2990 var l160 = {name: "JOIN-TRAILING"};
2991 (function(){
2992     (l160).fvalue = (function(v330){
2993         ((v330)["fname"] = "JOIN-TRAILING");
2994         return v330;
2995     })((function (values,v328,v329){
2996         checkArgsAtLeast(arguments, 2);
2997         checkArgsAtMost(arguments, 3);
2998         var v329;
2999         switch(arguments.length-1){
3000         case 1:
3001             v329="";
3002         default: break;
3003         }
3004         return (function(){
3005             return (l13.fvalue(pv, v328) !== l5.value ? "" : l157.fvalue(values, (function(){
3006                 var tmp = v328;
3007                 return tmp === l5.value? l5.value: tmp.car;
3008             })(), v329, l160.fvalue(pv, (function(){
3009                 var tmp = v328;
3010                 return tmp === l5.value? l5.value: tmp.cdr;
3011             })(), v329)));
3012         })();
3013     }));
3014     return l160;
3015 })();
3016 var l161 = {name: "MAPCONCAT"};
3017 (function(){
3018     (l161).fvalue = (function(v333){
3019         ((v333)["fname"] = "MAPCONCAT");
3020         return v333;
3021     })((function (values,v331,v332){
3022         checkArgs(arguments, 3);
3023         return (function(){
3024             return l159.fvalue(values, l81.fvalue(pv, v331, v332));
3025         })();
3026     }));
3027     return l161;
3028 })();
3029 var l162 = {name: "VECTOR-TO-LIST"};
3030 (function(){
3031     (l162).fvalue = (function(v341){
3032         ((v341)["fname"] = "VECTOR-TO-LIST");
3033         return v341;
3034     })((function (values,v334){
3035         checkArgs(arguments, 2);
3036         return (function(){
3037             return (function(v335,v336){
3038                 return (function(){
3039                     return (function(v337,v338){
3040                         (function(){
3041                             while((function(){
3042                                 var x1 = v337;
3043                                 if (typeof x1 !== 'number') throw 'Not a number!';
3044                                 var x2 = v338;
3045                                 if (typeof x2 !== 'number') throw 'Not a number!';
3046                                 return (x1<x2?l4.value: l5.value);
3047                             })() !== l5.value){
3048                                 (function(){
3049                                     (function(){
3050                                         var v339 = (function(){
3051                                             var x = (v334)[v337];
3052                                             if (x === undefined) throw 'Out of range';
3053                                             return x;
3054                                         })();
3055                                         var v340 = ({car: v339, cdr: v335});
3056                                         return (v335 = v340);
3057                                     })();
3058                                     return l5.value;
3059                                 })();
3060                                 (v337 = (function(){
3061                                     var x1 = v337;
3062                                     if (typeof x1 !== 'number') throw 'Not a number!';
3063                                     return x1+1;
3064                                 })());
3065                             }return l5.value;
3066                         })();
3067                         return l70.fvalue(values, v335);
3068                     })(0,v336);
3069                 })();
3070             })(l5.value,l75.fvalue(pv, v334));
3071         })();
3072     }));
3073     return l162;
3074 })();
3075 var l163 = {name: "LIST-TO-VECTOR"};
3076 (function(){
3077     (l163).fvalue = (function(v347){
3078         ((v347)["fname"] = "LIST-TO-VECTOR");
3079         return v347;
3080     })((function (values,v342){
3081         checkArgs(arguments, 2);
3082         return (function(){
3083             return (function(v343,v344){
3084                 return (function(){
3085                     return (function(v345,v346){
3086                         (function(){
3087                             while(v345 !== l5.value){
3088                                 (v346 = (function(){
3089                                     var tmp = v345;
3090                                     return tmp === l5.value? l5.value: tmp.car;
3091                                 })());
3092                                 (function(){
3093                                     (function(){
3094                                         var x = v343;
3095                                         var i = v344;
3096                                         if (i < 0 || i >= x.length) throw 'Out of range';
3097                                         return x[i] = v346;
3098                                     })();
3099                                     (v344 = (function(){
3100                                         var x1 = v344;
3101                                         if (typeof x1 !== 'number') throw 'Not a number!';
3102                                         return x1+1;
3103                                     })());
3104                                     return l5.value;
3105                                 })();
3106                                 (v345 = (function(){
3107                                     var tmp = v345;
3108                                     return tmp === l5.value? l5.value: tmp.cdr;
3109                                 })());
3110                             }return l5.value;
3111                         })();
3112                         return v343;
3113                     })(v342,l5.value);
3114                 })();
3115             })((function(){
3116                 var r = [];
3117                 for (var i = 0; i < l75.fvalue(pv, v342); i++)
3118                     r.push(l5.value);
3119                 return r;
3120             })(),0);
3121         })();
3122     }));
3123     return l163;
3124 })();
3125 var l164 = {name: "VALUES-LIST"};
3126 (function(){
3127     (l164).fvalue = (function(v349){
3128         ((v349)["fname"] = "VALUES-LIST");
3129         return v349;
3130     })((function (values,v348){
3131         checkArgs(arguments, 2);
3132         return (function(){
3133             return values.apply(this, l163.fvalue(pv, v348));
3134         })();
3135     }));
3136     return l164;
3137 })();
3138 var l165 = {name: "VALUES"};
3139 (function(){
3140     (l165).fvalue = (function(v351){
3141         ((v351)["fname"] = "VALUES");
3142         return v351;
3143     })((function (values){
3144         var v350= l5.value;
3145         for (var i = arguments.length-1; i>=1; i--)
3146             v350 = {car: arguments[i], cdr:
3147         v350};
3148         return (function(){
3149             return l164.fvalue(values, v350);
3150         })();
3151     }));
3152     return l165;
3153 })();
3154 (function(){
3155     (l19).fvalue = (function(v357){
3156         ((v357)["fname"] = "INTEGER-TO-STRING");
3157         return v357;
3158     })((function (values,v352){
3159         checkArgs(arguments, 2);
3160         return (function(){
3161             return (l26.fvalue(pv, v352) !== l5.value ? "0" : (l91.fvalue(pv, v352) !== l5.value ? l157.fvalue(values, "-", l19.fvalue(pv, (function(){
3162                 var x1 = v352;
3163                 if (typeof x1 !== 'number') throw 'Not a number!';
3164                 return 0-x1;
3165             })())) : (function(v353){
3166                 (function(){
3167                     return (function(){
3168                         while(l29.fvalue(pv, l26.fvalue(pv, v352)) !== l5.value){
3169                             (function(){
3170                                 var v354 = (function(){
3171                                     var x = v352;
3172                                     var y = 10;
3173                                     if (typeof x != 'number')
3174                                         throw 'The value ' + x + ' is not a type number.';
3175                                     if (typeof y != 'number')
3176                                         throw 'The value ' + y + ' is not a type number.';
3177                                     return x%y;
3178                                 })();
3179                                 var v355 = ({car: v354, cdr: v353});
3180                                 return (v353 = v355);
3181                             })();
3182                             (v352 = l27.fvalue(pv, v352, 10));
3183                         }return l5.value;
3184                     })();
3185                 })();
3186                 return l161.fvalue(values, (function (values,v356){
3187                     checkArgs(arguments, 2);
3188                     return l107.fvalue(values, l101.fvalue(pv, v356));
3189                 }), v353);
3190             })(l5.value)));
3191         })();
3192     }));
3193     return l19;
3194 })();
3195 var l166 = {name: "PRIN1-TO-STRING"};
3196 var l167 = {name: "ESCAPE-STRING"};
3197 (function(){
3198     (l166).fvalue = (function(v366){
3199         ((v366)["fname"] = "PRIN1-TO-STRING");
3200         return v366;
3201     })((function (values,v358){
3202         checkArgs(arguments, 2);
3203         return (function(){
3204             return (((function(){
3205                 var tmp = v358;
3206                 return (typeof tmp == 'object' && 'name' in tmp);
3207             })()?l4.value: l5.value) !== l5.value ? (function(){
3208                 var func = (function (values,v360,v361){
3209                     var v360;
3210                     var v361;
3211                     switch(arguments.length-1){
3212                     case 0:
3213                         v360=l5.value;
3214                     case 1:
3215                         v361=l5.value;
3216                     default: break;
3217                     }
3218                     var v359= l5.value;
3219                     for (var i = arguments.length-1; i>=3; i--)
3220                         v359 = {car: arguments[i], cdr:
3221                     v359};
3222                     return ((v361 !== l5.value ? ((v360 === v358)?l4.value: l5.value) : l5.value) !== l5.value ? (v358).name : (function(v362,v363){
3223                         return l157.fvalue(values, (l13.fvalue(pv, v362) !== l5.value ? "#" : (((v362 === l136.fvalue(pv, "KEYWORD"))?l4.value: l5.value) !== l5.value ? "" : l137.fvalue(pv, v362))), ":", v363);
3224                     })(l145.fvalue(pv, v358),(v358).name));
3225                 });
3226                 var args = [values];
3227                 return (function(){
3228                     var values = mv;
3229                     var vs;
3230                     vs = l149.fvalue(values, (v358).name, (function(){
3231                         var symbol = l146;
3232                         var value = symbol.value;
3233                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3234                         return value;
3235                     })());
3236                     if (typeof vs === 'object' && 'multiple-value' in vs)
3237                         args = args.concat(vs);
3238                     else
3239                         args.push(vs);
3240                     return func.apply(window, args);
3241                 })();
3242             })() : (l89.fvalue(pv, v358) !== l5.value ? l19.fvalue(values, v358) : (((typeof(v358) == "string")?l4.value: l5.value) !== l5.value ? l157.fvalue(values, "\"", l167.fvalue(pv, v358), "\"") : (((typeof v358 == 'function')?l4.value: l5.value) !== l5.value ? (function(v364){
3243                 return (v364 !== l5.value ? l157.fvalue(values, "#<FUNCTION ", v364, ">") : l157.fvalue(values, "#<FUNCTION>"));
3244             })((function(){
3245                 var tmp = (v358)["fname"];
3246                 return tmp == undefined? l5.value: tmp ;
3247             })()) : (l62.fvalue(pv, v358) !== l5.value ? l157.fvalue(values, "(", l160.fvalue(pv, l81.fvalue(pv, (function(){
3248                 var symbol = l166;
3249                 var func = symbol.fvalue;
3250                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3251                 return func;
3252             })(), l95.fvalue(pv, v358)), " "), (function(v365){
3253                 return (l13.fvalue(pv, (function(){
3254                     var tmp = v365;
3255                     return tmp === l5.value? l5.value: tmp.cdr;
3256                 })()) !== l5.value ? l166.fvalue(pv, (function(){
3257                     var tmp = v365;
3258                     return tmp === l5.value? l5.value: tmp.car;
3259                 })()) : l157.fvalue(pv, l166.fvalue(pv, (function(){
3260                     var tmp = v365;
3261                     return tmp === l5.value? l5.value: tmp.car;
3262                 })()), " . ", l166.fvalue(pv, (function(){
3263                     var tmp = v365;
3264                     return tmp === l5.value? l5.value: tmp.cdr;
3265                 })())));
3266             })(l94.fvalue(pv, v358)), ")") : (((function(){
3267                 var x = v358;
3268                 return typeof x === 'object' && 'length' in x;
3269             })()?l4.value: l5.value) !== l5.value ? l157.fvalue(values, "#", l166.fvalue(pv, l162.fvalue(pv, v358))) : (l135.fvalue(pv, v358) !== l5.value ? l157.fvalue(values, "#<PACKAGE ", l137.fvalue(pv, v358), ">") : l5.value)))))));
3270         })();
3271     }));
3272     return l166;
3273 })();
3274 (function(){
3275     (l111).fvalue = (function(v368){
3276         ((v368)["fname"] = "WRITE-LINE");
3277         return v368;
3278     })((function (values,v367){
3279         checkArgs(arguments, 2);
3280         return (function(){
3281             (function(){
3282                 var x = v367;
3283                 if (typeof x != 'string')
3284                     throw 'The value ' + x + ' is not a type string.';
3285                 return lisp.write(x);
3286             })();
3287             (function(){
3288                 var x = (function(){
3289                     var symbol = l156;
3290                     var value = symbol.value;
3291                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3292                     return value;
3293                 })();
3294                 if (typeof x != 'string')
3295                     throw 'The value ' + x + ' is not a type string.';
3296                 return lisp.write(x);
3297             })();
3298             return v367;
3299         })();
3300     }));
3301     return l111;
3302 })();
3303 var l168 = {name: "WARN"};
3304 (function(){
3305     (l168).fvalue = (function(v370){
3306         ((v370)["fname"] = "WARN");
3307         return v370;
3308     })((function (values,v369){
3309         checkArgs(arguments, 2);
3310         return (function(){
3311             (function(){
3312                 var x = "WARNING: ";
3313                 if (typeof x != 'string')
3314                     throw 'The value ' + x + ' is not a type string.';
3315                 return lisp.write(x);
3316             })();
3317             return l111.fvalue(values, v369);
3318         })();
3319     }));
3320     return l168;
3321 })();
3322 var l169 = {name: "PRINT"};
3323 (function(){
3324     (l169).fvalue = (function(v372){
3325         ((v372)["fname"] = "PRINT");
3326         return v372;
3327     })((function (values,v371){
3328         checkArgs(arguments, 2);
3329         return (function(){
3330             l111.fvalue(pv, l166.fvalue(pv, v371));
3331             return v371;
3332         })();
3333     }));
3334     return l169;
3335 })();
3336 var l170 = {name: "MAKE-STRING-STREAM"};
3337 (function(){
3338     (l170).fvalue = (function(v374){
3339         ((v374)["fname"] = "MAKE-STRING-STREAM");
3340         return v374;
3341     })((function (values,v373){
3342         checkArgs(arguments, 2);
3343         return (function(){
3344             return ({car: v373, cdr: 0});
3345         })();
3346     }));
3347     return l170;
3348 })();
3349 var l171 = {name: "%PEEK-CHAR"};
3350 (function(){
3351     (l171).fvalue = (function(v376){
3352         ((v376)["fname"] = "%PEEK-CHAR");
3353         return v376;
3354     })((function (values,v375){
3355         checkArgs(arguments, 2);
3356         return (function(){
3357             return ((function(){
3358                 var x1 = (function(){
3359                     var tmp = v375;
3360                     return tmp === l5.value? l5.value: tmp.cdr;
3361                 })();
3362                 if (typeof x1 !== 'number') throw 'Not a number!';
3363                 var x2 = l75.fvalue(pv, (function(){
3364                     var tmp = v375;
3365                     return tmp === l5.value? l5.value: tmp.car;
3366                 })());
3367                 if (typeof x2 !== 'number') throw 'Not a number!';
3368                 return (x1<x2?l4.value: l5.value);
3369             })() !== l5.value ? (function(){
3370                 var string = (function(){
3371                     var tmp = v375;
3372                     return tmp === l5.value? l5.value: tmp.car;
3373                 })();
3374                 var index = (function(){
3375                     var tmp = v375;
3376                     return tmp === l5.value? l5.value: tmp.cdr;
3377                 })();
3378                 if (typeof string != 'string')
3379                     throw 'The value ' + string + ' is not a type string.';
3380                 if (typeof index != 'number')
3381                     throw 'The value ' + index + ' is not a type number.';
3382                 return string.charCodeAt(index);
3383             })() : l5.value);
3384         })();
3385     }));
3386     return l171;
3387 })();
3388 var l172 = {name: "%READ-CHAR"};
3389 (function(){
3390     (l172).fvalue = (function(v379){
3391         ((v379)["fname"] = "%READ-CHAR");
3392         return v379;
3393     })((function (values,v377){
3394         checkArgs(arguments, 2);
3395         return (function(){
3396             return ((function(){
3397                 var x1 = (function(){
3398                     var tmp = v377;
3399                     return tmp === l5.value? l5.value: tmp.cdr;
3400                 })();
3401                 if (typeof x1 !== 'number') throw 'Not a number!';
3402                 var x2 = l75.fvalue(pv, (function(){
3403                     var tmp = v377;
3404                     return tmp === l5.value? l5.value: tmp.car;
3405                 })());
3406                 if (typeof x2 !== 'number') throw 'Not a number!';
3407                 return (x1<x2?l4.value: l5.value);
3408             })() !== l5.value ? (function(v378){
3409                 (function(){
3410                     var x = v377;
3411                     if (typeof x != 'object')
3412                         throw 'The value ' + x + ' is not a type object.';
3413                     return (x.cdr = l24.fvalue(pv, (function(){
3414                         var tmp = v377;
3415                         return tmp === l5.value? l5.value: tmp.cdr;
3416                     })()), x);
3417                 })();
3418                 return v378;
3419             })((function(){
3420                 var string = (function(){
3421                     var tmp = v377;
3422                     return tmp === l5.value? l5.value: tmp.car;
3423                 })();
3424                 var index = (function(){
3425                     var tmp = v377;
3426                     return tmp === l5.value? l5.value: tmp.cdr;
3427                 })();
3428                 if (typeof string != 'string')
3429                     throw 'The value ' + string + ' is not a type string.';
3430                 if (typeof index != 'number')
3431                     throw 'The value ' + index + ' is not a type number.';
3432                 return string.charCodeAt(index);
3433             })()) : l5.value);
3434         })();
3435     }));
3436     return l172;
3437 })();
3438 var l173 = {name: "WHITESPACEP"};
3439 (function(){
3440     (l173).fvalue = (function(v383){
3441         ((v383)["fname"] = "WHITESPACEP");
3442         return v383;
3443     })((function (values,v380){
3444         checkArgs(arguments, 2);
3445         return (function(){
3446             return (function(v381){
3447                 return (v381 !== l5.value ? v381 : (function(v382){
3448                     return (v382 !== l5.value ? v382 : l88.fvalue(values, v380, 9));
3449                 })(l88.fvalue(pv, v380, 10)));
3450             })(l88.fvalue(pv, v380, 32));
3451         })();
3452     }));
3453     return l173;
3454 })();
3455 var l174 = {name: "SKIP-WHITESPACES"};
3456 (function(){
3457     (l174).fvalue = (function(v386){
3458         ((v386)["fname"] = "SKIP-WHITESPACES");
3459         return v386;
3460     })((function (values,v384){
3461         checkArgs(arguments, 2);
3462         return (function(){
3463             return (function(v385){
3464                 (v385 = l171.fvalue(pv, v384));
3465                 return (function(){
3466                     return (function(){
3467                         while((v385 !== l5.value ? l173.fvalue(pv, v385) : l5.value) !== l5.value){
3468                             l172.fvalue(pv, v384);
3469                             (v385 = l171.fvalue(pv, v384));
3470                         }return l5.value;
3471                     })();
3472                 })();
3473             })(l5.value);
3474         })();
3475     }));
3476     return l174;
3477 })();
3478 var l175 = {name: "TERMINALP"};
3479 (function(){
3480     (l175).fvalue = (function(v391){
3481         ((v391)["fname"] = "TERMINALP");
3482         return v391;
3483     })((function (values,v387){
3484         checkArgs(arguments, 2);
3485         return (function(){
3486             return (function(v388){
3487                 return (v388 !== l5.value ? v388 : (function(v389){
3488                     return (v389 !== l5.value ? v389 : (function(v390){
3489                         return (v390 !== l5.value ? v390 : l88.fvalue(values, 40, v387));
3490                     })(l88.fvalue(pv, 41, v387)));
3491                 })(l173.fvalue(pv, v387)));
3492             })(l13.fvalue(pv, v387));
3493         })();
3494     }));
3495     return l175;
3496 })();
3497 var l176 = {name: "READ-UNTIL"};
3498 (function(){
3499     (l176).fvalue = (function(v396){
3500         ((v396)["fname"] = "READ-UNTIL");
3501         return v396;
3502     })((function (values,v392,v393){
3503         checkArgs(arguments, 3);
3504         return (function(){
3505             return (function(v394,v395){
3506                 (v395 = l171.fvalue(pv, v392));
3507                 (function(){
3508                     return (function(){
3509                         while((v395 !== l5.value ? l29.fvalue(pv, (function(){
3510                             var f = v393;
3511                             return (typeof f === 'function'? f: f.fvalue)(pv, v395)
3512                         })()) : l5.value) !== l5.value){
3513                             (v394 = l157.fvalue(pv, v394, l107.fvalue(pv, v395)));
3514                             l172.fvalue(pv, v392);
3515                             (v395 = l171.fvalue(pv, v392));
3516                         }return l5.value;
3517                     })();
3518                 })();
3519                 return v394;
3520             })("",l5.value);
3521         })();
3522     }));
3523     return l176;
3524 })();
3525 var l177 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
3526 (function(){
3527     (l177).fvalue = (function(v400){
3528         ((v400)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
3529         return v400;
3530     })((function (values,v397){
3531         checkArgs(arguments, 2);
3532         return (function(){
3533             return (function(v398){
3534                 l174.fvalue(pv, v397);
3535                 (v398 = l171.fvalue(pv, v397));
3536                 return (function(){
3537                     return (function(){
3538                         while((v398 !== l5.value ? l88.fvalue(pv, v398, 59) : l5.value) !== l5.value){
3539                             l176.fvalue(pv, v397, (function (values,v399){
3540                                 checkArgs(arguments, 2);
3541                                 return l88.fvalue(values, v399, 10);
3542                             }));
3543                             l174.fvalue(pv, v397);
3544                             (v398 = l171.fvalue(pv, v397));
3545                         }return l5.value;
3546                     })();
3547                 })();
3548             })(l5.value);
3549         })();
3550     }));
3551     return l177;
3552 })();
3553 var l178 = {name: "%READ-LIST"};
3554 var l179 = {name: "LS-READ"};
3555 (function(){
3556     (l178).fvalue = (function(v404){
3557         ((v404)["fname"] = "%READ-LIST");
3558         return v404;
3559     })((function (values,v401){
3560         checkArgs(arguments, 2);
3561         return (function(){
3562             l177.fvalue(pv, v401);
3563             return (function(v402){
3564                 return (l13.fvalue(pv, v402) !== l5.value ? (function(){
3565                     throw "Unspected EOF";
3566                 })() : (l88.fvalue(pv, v402, 41) !== l5.value ? (function(){
3567                     l172.fvalue(pv, v401);
3568                     return l5.value;
3569                 })() : (l88.fvalue(pv, v402, 46) !== l5.value ? (function(){
3570                     l172.fvalue(pv, v401);
3571                     return (function(v403){
3572                         l177.fvalue(pv, v401);
3573                         (l88.fvalue(pv, l172.fvalue(pv, v401), 41) !== l5.value ? l5.value : (function(){
3574                             throw "')' was expected.";
3575                         })());
3576                         return v403;
3577                     })(l179.fvalue(pv, v401));
3578                 })() : ({car: l179.fvalue(pv, v401), cdr: l178.fvalue(pv, v401)}))));
3579             })(l171.fvalue(pv, v401));
3580         })();
3581     }));
3582     return l178;
3583 })();
3584 var l180 = {name: "READ-STRING"};
3585 (function(){
3586     (l180).fvalue = (function(v408){
3587         ((v408)["fname"] = "READ-STRING");
3588         return v408;
3589     })((function (values,v405){
3590         checkArgs(arguments, 2);
3591         return (function(){
3592             return (function(v406,v407){
3593                 (v407 = l172.fvalue(pv, v405));
3594                 (function(){
3595                     return (function(){
3596                         while(l29.fvalue(pv, l28.fvalue(pv, v407, 34)) !== l5.value){
3597                             (l13.fvalue(pv, v407) !== l5.value ? (function(){
3598                                 throw "Unexpected EOF";
3599                             })() : l5.value);
3600                             (l28.fvalue(pv, v407, 92) !== l5.value ? (v407 = l172.fvalue(pv, v405)) : l5.value);
3601                             (v406 = l157.fvalue(pv, v406, l107.fvalue(pv, v407)));
3602                             (v407 = l172.fvalue(pv, v405));
3603                         }return l5.value;
3604                     })();
3605                 })();
3606                 return v406;
3607             })("",l5.value);
3608         })();
3609     }));
3610     return l180;
3611 })();
3612 var l181 = {name: "READ-SHARP"};
3613 (function(){
3614     (l181).fvalue = (function(v413){
3615         ((v413)["fname"] = "READ-SHARP");
3616         return v413;
3617     })((function (values,v409){
3618         checkArgs(arguments, 2);
3619         return (function(){
3620             l172.fvalue(pv, v409);
3621             return (function(v410){
3622                 return (l28.fvalue(pv, v410, 39) !== l5.value ? l47.fvalue(values, l113, l179.fvalue(pv, v409)) : (l28.fvalue(pv, v410, 40) !== l5.value ? l163.fvalue(values, l178.fvalue(pv, v409)) : (l28.fvalue(pv, v410, 58) !== l5.value ? (function(){
3623                     var name = (function(){
3624                         var x = l176.fvalue(pv, v409, (function(){
3625                             var symbol = l175;
3626                             var func = symbol.fvalue;
3627                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3628                             return func;
3629                         })());
3630                         if (typeof x != 'string')
3631                             throw 'The value ' + x + ' is not a type string.';
3632                         return x.toUpperCase();
3633                     })();
3634                     if (typeof name != 'string')
3635                         throw 'The value ' + name + ' is not a type string.';
3636                     return ({name: name});
3637                 })() : (l28.fvalue(pv, v410, 92) !== l5.value ? (function(v411){
3638                     return (l108.fvalue(pv, v411, "space") !== l5.value ? l87.fvalue(values, 32) : (l108.fvalue(pv, v411, "tab") !== l5.value ? l87.fvalue(values, 9) : (l108.fvalue(pv, v411, "newline") !== l5.value ? l87.fvalue(values, 10) : l87.fvalue(values, (function(){
3639                         var string = v411;
3640                         var index = 0;
3641                         if (typeof string != 'string')
3642                             throw 'The value ' + string + ' is not a type string.';
3643                         if (typeof index != 'number')
3644                             throw 'The value ' + index + ' is not a type number.';
3645                         return string.charCodeAt(index);
3646                     })()))));
3647                 })(l157.fvalue(pv, l107.fvalue(pv, l172.fvalue(pv, v409)), l176.fvalue(pv, v409, (function(){
3648                     var symbol = l175;
3649                     var func = symbol.fvalue;
3650                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3651                     return func;
3652                 })()))) : (l28.fvalue(pv, v410, 43) !== l5.value ? (function(v412){
3653                     return (l108.fvalue(pv, v412, "common-lisp") !== l5.value ? (function(){
3654                         l179.fvalue(pv, v409);
3655                         return l179.fvalue(values, v409);
3656                     })() : (l108.fvalue(pv, v412, "ecmalisp") !== l5.value ? l179.fvalue(values, v409) : (function(){
3657                         throw "Unknown reader form.";
3658                     })()));
3659                 })(l176.fvalue(pv, v409, (function(){
3660                     var symbol = l175;
3661                     var func = symbol.fvalue;
3662                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3663                     return func;
3664                 })())) : (function(){
3665                     throw "ECASE expression failed.";
3666                 })())))));
3667             })(l172.fvalue(pv, v409));
3668         })();
3669     }));
3670     return l181;
3671 })();
3672 var l182 = {name: "READ-SYMBOL"};
3673 (function(){
3674     (l182).fvalue = (function(v421){
3675         ((v421)["fname"] = "READ-SYMBOL");
3676         return v421;
3677     })((function (values,v414){
3678         checkArgs(arguments, 2);
3679         return (function(){
3680             return (function(v415,v416,v417,v418,v419){
3681                 (v419 = 0);
3682                 (function(){
3683                     return (function(){
3684                         while(((function(){
3685                             var x1 = v419;
3686                             if (typeof x1 !== 'number') throw 'Not a number!';
3687                             var x2 = v415;
3688                             if (typeof x2 !== 'number') throw 'Not a number!';
3689                             return (x1<x2?l4.value: l5.value);
3690                         })() !== l5.value ? l29.fvalue(pv, l88.fvalue(pv, (function(){
3691                             var string = v414;
3692                             var index = v419;
3693                             if (typeof string != 'string')
3694                                 throw 'The value ' + string + ' is not a type string.';
3695                             if (typeof index != 'number')
3696                                 throw 'The value ' + index + ' is not a type number.';
3697                             return string.charCodeAt(index);
3698                         })(), 58)) : l5.value) !== l5.value){
3699                             (v419 = (function(){
3700                                 var x1 = v419;
3701                                 if (typeof x1 !== 'number') throw 'Not a number!';
3702                                 return x1+1;
3703                             })());
3704                         }return l5.value;
3705                     })();
3706                 })();
3707                 ((function(){
3708                     var x1 = v419;
3709                     if (typeof x1 !== 'number') throw 'Not a number!';
3710                     var x2 = v415;
3711                     if (typeof x2 !== 'number') throw 'Not a number!';
3712                     return (x1==x2?l4.value: l5.value);
3713                 })() !== l5.value ? (function(){
3714                     (v417 = v414);
3715                     (v416 = (function(){
3716                         var symbol = l146;
3717                         var value = symbol.value;
3718                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3719                         return value;
3720                     })());
3721                     return (v418 = l4.value);
3722                 })() : (function(){
3723                     (l26.fvalue(pv, v419) !== l5.value ? (v416 = "KEYWORD") : (v416 = (function(){
3724                         var x = l102.fvalue(pv, v414, 0, v419);
3725                         if (typeof x != 'string')
3726                             throw 'The value ' + x + ' is not a type string.';
3727                         return x.toUpperCase();
3728                     })()));
3729                     (v419 = (function(){
3730                         var x1 = v419;
3731                         if (typeof x1 !== 'number') throw 'Not a number!';
3732                         return x1+1;
3733                     })());
3734                     (l88.fvalue(pv, (function(){
3735                         var string = v414;
3736                         var index = v419;
3737                         if (typeof string != 'string')
3738                             throw 'The value ' + string + ' is not a type string.';
3739                         if (typeof index != 'number')
3740                             throw 'The value ' + index + ' is not a type number.';
3741                         return string.charCodeAt(index);
3742                     })(), 58) !== l5.value ? (function(){
3743                         (v418 = l4.value);
3744                         return (v419 = (function(){
3745                             var x1 = v419;
3746                             if (typeof x1 !== 'number') throw 'Not a number!';
3747                             return x1+1;
3748                         })());
3749                     })() : l5.value);
3750                     return (v417 = l102.fvalue(pv, v414, v419));
3751                 })());
3752                 (v417 = (function(){
3753                     var x = v417;
3754                     if (typeof x != 'string')
3755                         throw 'The value ' + x + ' is not a type string.';
3756                     return x.toUpperCase();
3757                 })());
3758                 (v416 = l136.fvalue(pv, v416));
3759                 return ((function(v420){
3760                     return (v420 !== l5.value ? v420 : ((v416 === l136.fvalue(pv, "KEYWORD"))?l4.value: l5.value));
3761                 })(v418) !== l5.value ? l153.fvalue(values, v417, v416) : l149.fvalue(values, v417, v416));
3762             })(l75.fvalue(pv, v414),l5.value,l5.value,l5.value,l5.value);
3763         })();
3764     }));
3765     return l182;
3766 })();
3767 var l183 = {name: "!PARSE-INTEGER"};
3768 (function(){
3769     (l183).fvalue = (function(v432){
3770         ((v432)["fname"] = "!PARSE-INTEGER");
3771         return v432;
3772     })((function (values,v422,v423){
3773         checkArgs(arguments, 3);
3774         return (function(){
3775             return (function(){
3776                 try {
3777                     return (function(v424,v425,v426,v427){
3778                         (l26.fvalue(pv, v426) !== l5.value ? (function(){
3779                             var values = mv;
3780                             throw ({type: 'block', id: 158, values: values(l5.value, 0), message: 'Return from unknown block NIL.'})
3781                         })() : l5.value);
3782                         (function(v428){
3783                             return (l28.fvalue(pv, v428, 43) !== l5.value ? (v425 = (function(){
3784                                 var x1 = v425;
3785                                 if (typeof x1 !== 'number') throw 'Not a number!';
3786                                 return x1+1;
3787                             })()) : (l28.fvalue(pv, v428, 45) !== l5.value ? (function(){
3788                                 (v427 = -1);
3789                                 return (v425 = (function(){
3790                                     var x1 = v425;
3791                                     if (typeof x1 !== 'number') throw 'Not a number!';
3792                                     return x1+1;
3793                                 })());
3794                             })() : l5.value));
3795                         })((function(){
3796                             var string = v422;
3797                             var index = 0;
3798                             if (typeof string != 'string')
3799                                 throw 'The value ' + string + ' is not a type string.';
3800                             if (typeof index != 'number')
3801                                 throw 'The value ' + index + ' is not a type number.';
3802                             return string.charCodeAt(index);
3803                         })());
3804                         (((function(){
3805                             var x1 = v425;
3806                             if (typeof x1 !== 'number') throw 'Not a number!';
3807                             var x2 = v426;
3808                             if (typeof x2 !== 'number') throw 'Not a number!';
3809                             return (x1<x2?l4.value: l5.value);
3810                         })() !== l5.value ? (v424 = l100.fvalue(pv, (function(){
3811                             var string = v422;
3812                             var index = v425;
3813                             if (typeof string != 'string')
3814                                 throw 'The value ' + string + ' is not a type string.';
3815                             if (typeof index != 'number')
3816                                 throw 'The value ' + index + ' is not a type number.';
3817                             return string.charCodeAt(index);
3818                         })())) : l5.value) !== l5.value ? l5.value : (function(){
3819                             var values = mv;
3820                             throw ({type: 'block', id: 158, values: values(l5.value, v425), message: 'Return from unknown block NIL.'})
3821                         })());
3822                         (v425 = (function(){
3823                             var x1 = v425;
3824                             if (typeof x1 !== 'number') throw 'Not a number!';
3825                             return x1+1;
3826                         })());
3827                         (function(){
3828                             try {
3829                                 return (function(){
3830                                     while((function(){
3831                                         var x1 = v425;
3832                                         if (typeof x1 !== 'number') throw 'Not a number!';
3833                                         var x2 = v426;
3834                                         if (typeof x2 !== 'number') throw 'Not a number!';
3835                                         return (x1<x2?l4.value: l5.value);
3836                                     })() !== l5.value){
3837                                         (function(v429){
3838                                             (v429 !== l5.value ? l5.value : (function(){
3839                                                 throw ({type: 'block', id: 159, values: l5.value, message: 'Return from unknown block NIL.'})
3840                                             })());
3841                                             (v424 = (function(){
3842                                                 var x1 = (function(){
3843                                                     var x1 = v424;
3844                                                     if (typeof x1 !== 'number') throw 'Not a number!';
3845                                                     return x1*10;
3846                                                 })();
3847                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3848                                                 var x2 = v429;
3849                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3850                                                 return x1+x2;
3851                                             })());
3852                                             return (v425 = (function(){
3853                                                 var x1 = v425;
3854                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3855                                                 return x1+1;
3856                                             })());
3857                                         })(l100.fvalue(pv, (function(){
3858                                             var string = v422;
3859                                             var index = v425;
3860                                             if (typeof string != 'string')
3861                                                 throw 'The value ' + string + ' is not a type string.';
3862                                             if (typeof index != 'number')
3863                                                 throw 'The value ' + index + ' is not a type number.';
3864                                             return string.charCodeAt(index);
3865                                         })()));
3866                                     }return l5.value;
3867                                 })();
3868                             }
3869                             catch (cf){
3870                                 if (cf.type == 'block' && cf.id == 159)
3871                                     return cf.values;
3872                                 else
3873                                     throw cf;
3874                             }
3875                         })();
3876                         return ((function(v430){
3877                             return (v430 !== l5.value ? v430 : (function(v431){
3878                                 return (v431 !== l5.value ? v431 : l88.fvalue(pv, (function(){
3879                                     var string = v422;
3880                                     var index = v425;
3881                                     if (typeof string != 'string')
3882                                         throw 'The value ' + string + ' is not a type string.';
3883                                     if (typeof index != 'number')
3884                                         throw 'The value ' + index + ' is not a type number.';
3885                                     return string.charCodeAt(index);
3886                                 })(), 32));
3887                             })((function(){
3888                                 var x1 = v425;
3889                                 if (typeof x1 !== 'number') throw 'Not a number!';
3890                                 var x2 = v426;
3891                                 if (typeof x2 !== 'number') throw 'Not a number!';
3892                                 return (x1==x2?l4.value: l5.value);
3893                             })()));
3894                         })(v423) !== l5.value ? values((function(){
3895                             var x1 = v427;
3896                             if (typeof x1 !== 'number') throw 'Not a number!';
3897                             var x2 = v424;
3898                             if (typeof x2 !== 'number') throw 'Not a number!';
3899                             return x1*x2;
3900                         })(), v425) : values(l5.value, v425));
3901                     })(0,0,l75.fvalue(pv, v422),1);
3902                 }
3903                 catch (cf){
3904                     if (cf.type == 'block' && cf.id == 158)
3905                         return values.apply(this, forcemv(cf.values));
3906                     else
3907                         throw cf;
3908                 }
3909             })();
3910         })();
3911     }));
3912     return l183;
3913 })();
3914 var l184 = {name: "PARSE-INTEGER"};
3915 (function(){
3916     (l184).fvalue = (function(v434){
3917         ((v434)["fname"] = "PARSE-INTEGER");
3918         return v434;
3919     })((function (values,v433){
3920         checkArgs(arguments, 2);
3921         return (function(){
3922             return l183.fvalue(values, v433, l5.value);
3923         })();
3924     }));
3925     return l184;
3926 })();
3927 var l185 = {name: "*EOF*"};
3928 (function(){
3929     (((l185.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l185).value = l18.fvalue(pv)));
3930     return l185;
3931 })();
3932 var l186 = {name: "QUOTE"};
3933 var l187 = {name: "BACKQUOTE"};
3934 var l188 = {name: "UNQUOTE-SPLICING"};
3935 var l189 = {name: "UNQUOTE"};
3936 (function(){
3937     (l179).fvalue = (function(v440){
3938         ((v440)["fname"] = "LS-READ");
3939         return v440;
3940     })((function (values,v435){
3941         checkArgs(arguments, 2);
3942         return (function(){
3943             l177.fvalue(pv, v435);
3944             return (function(v436){
3945                 return ((function(v437){
3946                     return (v437 !== l5.value ? v437 : l88.fvalue(pv, v436, 41));
3947                 })(l13.fvalue(pv, v436)) !== l5.value ? (function(){
3948                     var symbol = l185;
3949                     var value = symbol.value;
3950                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3951                     return value;
3952                 })() : (l88.fvalue(pv, v436, 40) !== l5.value ? (function(){
3953                     l172.fvalue(pv, v435);
3954                     return l178.fvalue(values, v435);
3955                 })() : (l88.fvalue(pv, v436, 39) !== l5.value ? (function(){
3956                     l172.fvalue(pv, v435);
3957                     return l47.fvalue(values, l186, l179.fvalue(pv, v435));
3958                 })() : (l88.fvalue(pv, v436, 96) !== l5.value ? (function(){
3959                     l172.fvalue(pv, v435);
3960                     return l47.fvalue(values, l187, l179.fvalue(pv, v435));
3961                 })() : (l88.fvalue(pv, v436, 34) !== l5.value ? (function(){
3962                     l172.fvalue(pv, v435);
3963                     return l180.fvalue(values, v435);
3964                 })() : (l88.fvalue(pv, v436, 44) !== l5.value ? (function(){
3965                     l172.fvalue(pv, v435);
3966                     return (l28.fvalue(pv, l171.fvalue(pv, v435), 64) !== l5.value ? (function(){
3967                         l172.fvalue(pv, v435);
3968                         return l47.fvalue(values, l188, l179.fvalue(pv, v435));
3969                     })() : l47.fvalue(values, l189, l179.fvalue(pv, v435)));
3970                 })() : (l88.fvalue(pv, v436, 35) !== l5.value ? l181.fvalue(values, v435) : (function(v438){
3971                     return (function(v439){
3972                         return (v439 !== l5.value ? v439 : l182.fvalue(values, v438));
3973                     })(pv(l183.fvalue(pv, v438, l5.value)));
3974                 })(l176.fvalue(pv, v435, (function(){
3975                     var symbol = l175;
3976                     var func = symbol.fvalue;
3977                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3978                     return func;
3979                 })())))))))));
3980             })(l171.fvalue(pv, v435));
3981         })();
3982     }));
3983     return l179;
3984 })();
3985 var l190 = {name: "LS-READ-FROM-STRING"};
3986 (function(){
3987     (l190).fvalue = (function(v442){
3988         ((v442)["fname"] = "LS-READ-FROM-STRING");
3989         return v442;
3990     })((function (values,v441){
3991         checkArgs(arguments, 2);
3992         return (function(){
3993             return l179.fvalue(values, l170.fvalue(pv, v441));
3994         })();
3995     }));
3996     return l190;
3997 })();
3998 var l191 = {name: "CODE"};
3999 (function(){
4000     (l191).fvalue = (function(v445){
4001         ((v445)["fname"] = "CODE");
4002         return v445;
4003     })((function (values){
4004         var v443= l5.value;
4005         for (var i = arguments.length-1; i>=1; i--)
4006             v443 = {car: arguments[i], cdr:
4007         v443};
4008         return (function(){
4009             return l161.fvalue(values, (function (values,v444){
4010                 checkArgs(arguments, 2);
4011                 return (l13.fvalue(pv, v444) !== l5.value ? "" : (l89.fvalue(pv, v444) !== l5.value ? l19.fvalue(values, v444) : (((typeof(v444) == "string")?l4.value: l5.value) !== l5.value ? v444 : (function(){
4012                     throw "Unknown argument.";
4013                 })())));
4014             }), v443);
4015         })();
4016     }));
4017     return l191;
4018 })();
4019 var l192 = {name: "JS!BOOL"};
4020 var l193 = {name: "LS-COMPILE"};
4021 (function(){
4022     (l192).fvalue = (function(v447){
4023         ((v447)["fname"] = "JS!BOOL");
4024         return v447;
4025     })((function (values,v446){
4026         checkArgs(arguments, 2);
4027         return (function(){
4028             return l191.fvalue(values, "(", v446, "?", l193.fvalue(pv, l4.value), ": ", l193.fvalue(pv, l5.value), ")");
4029         })();
4030     }));
4031     return l192;
4032 })();
4033 var l194 = {name: "JS!SELFCALL"};
4034 l194;
4035 var l195 = {name: "INDENT"};
4036 (function(){
4037     (l195).fvalue = (function(v454){
4038         ((v454)["fname"] = "INDENT");
4039         return v454;
4040     })((function (values){
4041         var v448= l5.value;
4042         for (var i = arguments.length-1; i>=1; i--)
4043             v448 = {car: arguments[i], cdr:
4044         v448};
4045         return (function(){
4046             return (function(v449){
4047                 return (function(v450,v451,v452){
4048                     (l90.fvalue(pv, l75.fvalue(pv, v449)) !== l5.value ? (v450 = l157.fvalue(pv, v450, "    ")) : l5.value);
4049                     (function(){
4050                         return (function(){
4051                             while((function(){
4052                                 var x1 = v451;
4053                                 if (typeof x1 !== 'number') throw 'Not a number!';
4054                                 var x2 = v452;
4055                                 if (typeof x2 !== 'number') throw 'Not a number!';
4056                                 return (x1<x2?l4.value: l5.value);
4057                             })() !== l5.value){
4058                                 (function(v453){
4059                                     return (v450 = l157.fvalue(pv, v450, v453));
4060                                 })(((l88.fvalue(pv, (function(){
4061                                     var string = v449;
4062                                     var index = v451;
4063                                     if (typeof string != 'string')
4064                                         throw 'The value ' + string + ' is not a type string.';
4065                                     if (typeof index != 'number')
4066                                         throw 'The value ' + index + ' is not a type number.';
4067                                     return string.charCodeAt(index);
4068                                 })(), 10) !== l5.value ? ((function(){
4069                                     var x1 = v451;
4070                                     if (typeof x1 !== 'number') throw 'Not a number!';
4071                                     var x2 = l25.fvalue(pv, v452);
4072                                     if (typeof x2 !== 'number') throw 'Not a number!';
4073                                     return (x1<x2?l4.value: l5.value);
4074                                 })() !== l5.value ? l29.fvalue(pv, l88.fvalue(pv, (function(){
4075                                     var string = v449;
4076                                     var index = l24.fvalue(pv, v451);
4077                                     if (typeof string != 'string')
4078                                         throw 'The value ' + string + ' is not a type string.';
4079                                     if (typeof index != 'number')
4080                                         throw 'The value ' + index + ' is not a type number.';
4081                                     return string.charCodeAt(index);
4082                                 })(), 10)) : l5.value) : l5.value) !== l5.value ? l157.fvalue(pv, l107.fvalue(pv, 10), "    ") : l107.fvalue(pv, (function(){
4083                                     var string = v449;
4084                                     var index = v451;
4085                                     if (typeof string != 'string')
4086                                         throw 'The value ' + string + ' is not a type string.';
4087                                     if (typeof index != 'number')
4088                                         throw 'The value ' + index + ' is not a type number.';
4089                                     return string.charCodeAt(index);
4090                                 })())));
4091                                 (v451 = (function(){
4092                                     var x1 = v451;
4093                                     if (typeof x1 !== 'number') throw 'Not a number!';
4094                                     return x1+1;
4095                                 })());
4096                             }return l5.value;
4097                         })();
4098                     })();
4099                     return v450;
4100                 })("",0,l75.fvalue(pv, v449));
4101             })((function(){
4102                 var f = (function(){
4103                     var symbol = l191;
4104                     var func = symbol.fvalue;
4105                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4106                     return func;
4107                 })();
4108                 var args = [pv];
4109                 var tail = (v448);
4110                 while (tail != l5.value){
4111                     args.push(tail.car);
4112                     tail = tail.cdr;
4113                 }
4114                 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
4115             })());
4116         })();
4117     }));
4118     return l195;
4119 })();
4120 var l196 = {name: "*MULTIPLE-VALUE-P*"};
4121 (function(){
4122     (((l196.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l196).value = l5.value));
4123     return l196;
4124 })();
4125 var l197 = {name: "MAKE-BINDING"};
4126 (function(){
4127     (l197).fvalue = (function(v459){
4128         ((v459)["fname"] = "MAKE-BINDING");
4129         return v459;
4130     })((function (values,v455,v456,v457,v458){
4131         checkArgsAtLeast(arguments, 4);
4132         checkArgsAtMost(arguments, 5);
4133         var v458;
4134         switch(arguments.length-1){
4135         case 3:
4136             v458=l5.value;
4137         default: break;
4138         }
4139         return (function(){
4140             return l47.fvalue(values, v455, v456, v457, v458);
4141         })();
4142     }));
4143     return l197;
4144 })();
4145 var l198 = {name: "BINDING-NAME"};
4146 (function(){
4147     (l198).fvalue = (function(v461){
4148         ((v461)["fname"] = "BINDING-NAME");
4149         return v461;
4150     })((function (values,v460){
4151         checkArgs(arguments, 2);
4152         return (function(){
4153             return l42.fvalue(values, v460);
4154         })();
4155     }));
4156     return l198;
4157 })();
4158 var l199 = {name: "BINDING-TYPE"};
4159 (function(){
4160     (l199).fvalue = (function(v463){
4161         ((v463)["fname"] = "BINDING-TYPE");
4162         return v463;
4163     })((function (values,v462){
4164         checkArgs(arguments, 2);
4165         return (function(){
4166             return l43.fvalue(values, v462);
4167         })();
4168     }));
4169     return l199;
4170 })();
4171 var l200 = {name: "BINDING-VALUE"};
4172 (function(){
4173     (l200).fvalue = (function(v465){
4174         ((v465)["fname"] = "BINDING-VALUE");
4175         return v465;
4176     })((function (values,v464){
4177         checkArgs(arguments, 2);
4178         return (function(){
4179             return l44.fvalue(values, v464);
4180         })();
4181     }));
4182     return l200;
4183 })();
4184 var l201 = {name: "BINDING-DECLARATIONS"};
4185 (function(){
4186     (l201).fvalue = (function(v467){
4187         ((v467)["fname"] = "BINDING-DECLARATIONS");
4188         return v467;
4189     })((function (values,v466){
4190         checkArgs(arguments, 2);
4191         return (function(){
4192             return l45.fvalue(values, v466);
4193         })();
4194     }));
4195     return l201;
4196 })();
4197 var l202 = {name: "SET-BINDING-VALUE"};
4198 (function(){
4199     (l202).fvalue = (function(v470){
4200         ((v470)["fname"] = "SET-BINDING-VALUE");
4201         return v470;
4202     })((function (values,v468,v469){
4203         checkArgs(arguments, 3);
4204         return (function(){
4205             return (function(){
4206                 var x = l37.fvalue(pv, v468);
4207                 if (typeof x != 'object')
4208                     throw 'The value ' + x + ' is not a type object.';
4209                 return (x.car = v469, x);
4210             })();
4211         })();
4212     }));
4213     return l202;
4214 })();
4215 var l203 = {name: "SET-BINDING-DECLARATIONS"};
4216 (function(){
4217     (l203).fvalue = (function(v473){
4218         ((v473)["fname"] = "SET-BINDING-DECLARATIONS");
4219         return v473;
4220     })((function (values,v471,v472){
4221         checkArgs(arguments, 3);
4222         return (function(){
4223             return (function(){
4224                 var x = l40.fvalue(pv, v471);
4225                 if (typeof x != 'object')
4226                     throw 'The value ' + x + ' is not a type object.';
4227                 return (x.car = v472, x);
4228             })();
4229         })();
4230     }));
4231     return l203;
4232 })();
4233 var l204 = {name: "PUSH-BINDING-DECLARATION"};
4234 (function(){
4235     (l204).fvalue = (function(v476){
4236         ((v476)["fname"] = "PUSH-BINDING-DECLARATION");
4237         return v476;
4238     })((function (values,v474,v475){
4239         checkArgs(arguments, 3);
4240         return (function(){
4241             return l203.fvalue(values, v475, ({car: v474, cdr: l201.fvalue(pv, v475)}));
4242         })();
4243     }));
4244     return l204;
4245 })();
4246 var l205 = {name: "MAKE-LEXENV"};
4247 (function(){
4248     (l205).fvalue = (function(v477){
4249         ((v477)["fname"] = "MAKE-LEXENV");
4250         return v477;
4251     })((function (values){
4252         checkArgsAtMost(arguments, 1);
4253         return (function(){
4254             return l47.fvalue(values, l5.value, l5.value, l5.value, l5.value);
4255         })();
4256     }));
4257     return l205;
4258 })();
4259 var l206 = {name: "COPY-LEXENV"};
4260 (function(){
4261     (l206).fvalue = (function(v479){
4262         ((v479)["fname"] = "COPY-LEXENV");
4263         return v479;
4264     })((function (values,v478){
4265         checkArgs(arguments, 2);
4266         return (function(){
4267             return l84.fvalue(values, v478);
4268         })();
4269     }));
4270     return l206;
4271 })();
4272 var l207 = {name: "PUSH-TO-LEXENV"};
4273 var l208 = {name: "BLOCK"};
4274 var l209 = {name: "GOTAG"};
4275 (function(){
4276     (l207).fvalue = (function(v484){
4277         ((v484)["fname"] = "PUSH-TO-LEXENV");
4278         return v484;
4279     })((function (values,v480,v481,v482){
4280         checkArgs(arguments, 4);
4281         return (function(){
4282             return (function(v483){
4283                 return (l28.fvalue(pv, v483, l114) !== l5.value ? (function(){
4284                     var x = v481;
4285                     if (typeof x != 'object')
4286                         throw 'The value ' + x + ' is not a type object.';
4287                     return (x.car = ({car: v480, cdr: (function(){
4288                         var tmp = v481;
4289                         return tmp === l5.value? l5.value: tmp.car;
4290                     })()}), x);
4291                 })() : (l28.fvalue(pv, v483, l113) !== l5.value ? (function(){
4292                     var x = (function(){
4293                         var tmp = v481;
4294                         return tmp === l5.value? l5.value: tmp.cdr;
4295                     })();
4296                     if (typeof x != 'object')
4297                         throw 'The value ' + x + ' is not a type object.';
4298                     return (x.car = ({car: v480, cdr: l35.fvalue(pv, v481)}), x);
4299                 })() : (l28.fvalue(pv, v483, l208) !== l5.value ? (function(){
4300                     var x = l37.fvalue(pv, v481);
4301                     if (typeof x != 'object')
4302                         throw 'The value ' + x + ' is not a type object.';
4303                     return (x.car = ({car: v480, cdr: l39.fvalue(pv, v481)}), x);
4304                 })() : (l28.fvalue(pv, v483, l209) !== l5.value ? (function(){
4305                     var x = l40.fvalue(pv, v481);
4306                     if (typeof x != 'object')
4307                         throw 'The value ' + x + ' is not a type object.';
4308                     return (x.car = ({car: v480, cdr: l41.fvalue(pv, v481)}), x);
4309                 })() : (function(){
4310                     throw "ECASE expression failed.";
4311                 })()))));
4312             })(v482);
4313         })();
4314     }));
4315     return l207;
4316 })();
4317 var l210 = {name: "EXTEND-LEXENV"};
4318 (function(){
4319     (l210).fvalue = (function(v491){
4320         ((v491)["fname"] = "EXTEND-LEXENV");
4321         return v491;
4322     })((function (values,v485,v486,v487){
4323         checkArgs(arguments, 4);
4324         return (function(){
4325             return (function(v488){
4326                 return (function(){
4327                     return (function(v489,v490){
4328                         (function(){
4329                             while(v489 !== l5.value){
4330                                 (v490 = (function(){
4331                                     var tmp = v489;
4332                                     return tmp === l5.value? l5.value: tmp.car;
4333                                 })());
4334                                 (function(){
4335                                     l207.fvalue(pv, v490, v488, v487);
4336                                     return l5.value;
4337                                 })();
4338                                 (v489 = (function(){
4339                                     var tmp = v489;
4340                                     return tmp === l5.value? l5.value: tmp.cdr;
4341                                 })());
4342                             }return l5.value;
4343                         })();
4344                         return v488;
4345                     })(l70.fvalue(pv, v485),l5.value);
4346                 })();
4347             })(l206.fvalue(pv, v486));
4348         })();
4349     }));
4350     return l210;
4351 })();
4352 var l211 = {name: "LOOKUP-IN-LEXENV"};
4353 (function(){
4354     (l211).fvalue = (function(v496){
4355         ((v496)["fname"] = "LOOKUP-IN-LEXENV");
4356         return v496;
4357     })((function (values,v492,v493,v494){
4358         checkArgs(arguments, 4);
4359         return (function(){
4360             return l106.fvalue(values, v492, (function(v495){
4361                 return (l28.fvalue(pv, v495, l114) !== l5.value ? l42.fvalue(pv, v493) : (l28.fvalue(pv, v495, l113) !== l5.value ? l43.fvalue(pv, v493) : (l28.fvalue(pv, v495, l208) !== l5.value ? l44.fvalue(pv, v493) : (l28.fvalue(pv, v495, l209) !== l5.value ? l45.fvalue(pv, v493) : (function(){
4362                     throw "ECASE expression failed.";
4363                 })()))));
4364             })(v494));
4365         })();
4366     }));
4367     return l211;
4368 })();
4369 var l212 = {name: "*ENVIRONMENT*"};
4370 (function(){
4371     (((l212.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l212).value = l205.fvalue(pv)));
4372     return l212;
4373 })();
4374 var l213 = {name: "*VARIABLE-COUNTER*"};
4375 (function(){
4376     (((l213.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l213).value = 0));
4377     return l213;
4378 })();
4379 var l214 = {name: "GVARNAME"};
4380 (function(){
4381     (l214).fvalue = (function(v498){
4382         ((v498)["fname"] = "GVARNAME");
4383         return v498;
4384     })((function (values,v497){
4385         checkArgs(arguments, 2);
4386         return (function(){
4387             return l191.fvalue(values, "v", ((l213).value = (function(){
4388                 var x1 = (function(){
4389                     var symbol = l213;
4390                     var value = symbol.value;
4391                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4392                     return value;
4393                 })();
4394                 if (typeof x1 !== 'number') throw 'Not a number!';
4395                 return x1+1;
4396             })()));
4397         })();
4398     }));
4399     return l214;
4400 })();
4401 var l215 = {name: "TRANSLATE-VARIABLE"};
4402 (function(){
4403     (l215).fvalue = (function(v500){
4404         ((v500)["fname"] = "TRANSLATE-VARIABLE");
4405         return v500;
4406     })((function (values,v499){
4407         checkArgs(arguments, 2);
4408         return (function(){
4409             return l200.fvalue(values, l211.fvalue(pv, v499, (function(){
4410                 var symbol = l212;
4411                 var value = symbol.value;
4412                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4413                 return value;
4414             })(), l114));
4415         })();
4416     }));
4417     return l215;
4418 })();
4419 var l216 = {name: "EXTEND-LOCAL-ENV"};
4420 (function(){
4421     (l216).fvalue = (function(v506){
4422         ((v506)["fname"] = "EXTEND-LOCAL-ENV");
4423         return v506;
4424     })((function (values,v501){
4425         checkArgs(arguments, 2);
4426         return (function(){
4427             return (function(v502){
4428                 return (function(){
4429                     return (function(v503,v504){
4430                         (function(){
4431                             while(v503 !== l5.value){
4432                                 (v504 = (function(){
4433                                     var tmp = v503;
4434                                     return tmp === l5.value? l5.value: tmp.car;
4435                                 })());
4436                                 (function(){
4437                                     (function(v505){
4438                                         return l207.fvalue(pv, v505, v502, l114);
4439                                     })(l197.fvalue(pv, v504, l114, l214.fvalue(pv, v504)));
4440                                     return l5.value;
4441                                 })();
4442                                 (v503 = (function(){
4443                                     var tmp = v503;
4444                                     return tmp === l5.value? l5.value: tmp.cdr;
4445                                 })());
4446                             }return l5.value;
4447                         })();
4448                         return v502;
4449                     })(v501,l5.value);
4450                 })();
4451             })(l206.fvalue(pv, (function(){
4452                 var symbol = l212;
4453                 var value = symbol.value;
4454                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4455                 return value;
4456             })()));
4457         })();
4458     }));
4459     return l216;
4460 })();
4461 var l217 = {name: "*TOPLEVEL-COMPILATIONS*"};
4462 (function(){
4463     (((l217.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l217).value = l5.value));
4464     return l217;
4465 })();
4466 var l218 = {name: "TOPLEVEL-COMPILATION"};
4467 (function(){
4468     (l218).fvalue = (function(v510){
4469         ((v510)["fname"] = "TOPLEVEL-COMPILATION");
4470         return v510;
4471     })((function (values,v507){
4472         checkArgs(arguments, 2);
4473         return (function(){
4474             return (function(){
4475                 var v508 = v507;
4476                 var v509 = ({car: v508, cdr: (function(){
4477                     var symbol = l217;
4478                     var value = symbol.value;
4479                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4480                     return value;
4481                 })()});
4482                 return ((l217).value = v509);
4483             })();
4484         })();
4485     }));
4486     return l218;
4487 })();
4488 var l219 = {name: "NULL-OR-EMPTY-P"};
4489 (function(){
4490     (l219).fvalue = (function(v512){
4491         ((v512)["fname"] = "NULL-OR-EMPTY-P");
4492         return v512;
4493     })((function (values,v511){
4494         checkArgs(arguments, 2);
4495         return (function(){
4496             return l26.fvalue(values, l75.fvalue(pv, v511));
4497         })();
4498     }));
4499     return l219;
4500 })();
4501 var l220 = {name: "GET-TOPLEVEL-COMPILATIONS"};
4502 (function(){
4503     (l220).fvalue = (function(v513){
4504         ((v513)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
4505         return v513;
4506     })((function (values){
4507         checkArgsAtMost(arguments, 1);
4508         return (function(){
4509             return l70.fvalue(values, l98.fvalue(pv, (function(){
4510                 var symbol = l219;
4511                 var func = symbol.fvalue;
4512                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4513                 return func;
4514             })(), (function(){
4515                 var symbol = l217;
4516                 var value = symbol.value;
4517                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4518                 return value;
4519             })()));
4520         })();
4521     }));
4522     return l220;
4523 })();
4524 var l221 = {name: "%COMPILE-DEFMACRO"};
4525 var l222 = {name: "MACRO"};
4526 (function(){
4527     (l221).fvalue = (function(v516){
4528         ((v516)["fname"] = "%COMPILE-DEFMACRO");
4529         return v516;
4530     })((function (values,v514,v515){
4531         checkArgs(arguments, 3);
4532         return (function(){
4533             l218.fvalue(pv, l193.fvalue(pv, l47.fvalue(pv, l186, v514)));
4534             l207.fvalue(pv, l197.fvalue(pv, v514, l222, v515), (function(){
4535                 var symbol = l212;
4536                 var value = symbol.value;
4537                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4538                 return value;
4539             })(), l113);
4540             return v514;
4541         })();
4542     }));
4543     return l221;
4544 })();
4545 var l223 = {name: "GLOBAL-BINDING"};
4546 (function(){
4547     (l223).fvalue = (function(v522){
4548         ((v522)["fname"] = "GLOBAL-BINDING");
4549         return v522;
4550     })((function (values,v517,v518,v519){
4551         checkArgs(arguments, 4);
4552         return (function(){
4553             return (function(v520){
4554                 return (v520 !== l5.value ? v520 : (function(v521){
4555                     l207.fvalue(pv, v521, (function(){
4556                         var symbol = l212;
4557                         var value = symbol.value;
4558                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4559                         return value;
4560                     })(), v519);
4561                     return v521;
4562                 })(l197.fvalue(pv, v517, v518, l5.value)));
4563             })(l211.fvalue(pv, v517, (function(){
4564                 var symbol = l212;
4565                 var value = symbol.value;
4566                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4567                 return value;
4568             })(), v519));
4569         })();
4570     }));
4571     return l223;
4572 })();
4573 var l224 = {name: "CLAIMP"};
4574 (function(){
4575     (l224).fvalue = (function(v527){
4576         ((v527)["fname"] = "CLAIMP");
4577         return v527;
4578     })((function (values,v523,v524,v525){
4579         checkArgs(arguments, 4);
4580         return (function(){
4581             return (function(v526){
4582                 return (v526 !== l5.value ? l96.fvalue(values, v525, l201.fvalue(pv, v526)) : l5.value);
4583             })(l211.fvalue(pv, v523, (function(){
4584                 var symbol = l212;
4585                 var value = symbol.value;
4586                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4587                 return value;
4588             })(), v524));
4589         })();
4590     }));
4591     return l224;
4592 })();
4593 var l225 = {name: "!PROCLAIM"};
4594 var l226 = {name: "SPECIAL"};
4595 var l227 = {name: "NOTINLINE"};
4596 var l228 = {name: "CONSTANT"};
4597 (function(){
4598     (l225).fvalue = (function(v539){
4599         ((v539)["fname"] = "!PROCLAIM");
4600         return v539;
4601     })((function (values,v528){
4602         checkArgs(arguments, 2);
4603         return (function(){
4604             return (function(v529){
4605                 return (l28.fvalue(pv, v529, l226) !== l5.value ? (function(){
4606                     return (function(v530,v531){
4607                         (function(){
4608                             while(v530 !== l5.value){
4609                                 (v531 = (function(){
4610                                     var tmp = v530;
4611                                     return tmp === l5.value? l5.value: tmp.car;
4612                                 })());
4613                                 (function(){
4614                                     (function(v532){
4615                                         return l204.fvalue(pv, l226, v532);
4616                                     })(l223.fvalue(pv, v531, l114, l114));
4617                                     return l5.value;
4618                                 })();
4619                                 (v530 = (function(){
4620                                     var tmp = v530;
4621                                     return tmp === l5.value? l5.value: tmp.cdr;
4622                                 })());
4623                             }return l5.value;
4624                         })();
4625                         return l5.value;
4626                     })((function(){
4627                         var tmp = v528;
4628                         return tmp === l5.value? l5.value: tmp.cdr;
4629                     })(),l5.value);
4630                 })() : (l28.fvalue(pv, v529, l227) !== l5.value ? (function(){
4631                     return (function(v533,v534){
4632                         (function(){
4633                             while(v533 !== l5.value){
4634                                 (v534 = (function(){
4635                                     var tmp = v533;
4636                                     return tmp === l5.value? l5.value: tmp.car;
4637                                 })());
4638                                 (function(){
4639                                     (function(v535){
4640                                         return l204.fvalue(pv, l227, v535);
4641                                     })(l223.fvalue(pv, v534, l113, l113));
4642                                     return l5.value;
4643                                 })();
4644                                 (v533 = (function(){
4645                                     var tmp = v533;
4646                                     return tmp === l5.value? l5.value: tmp.cdr;
4647                                 })());
4648                             }return l5.value;
4649                         })();
4650                         return l5.value;
4651                     })((function(){
4652                         var tmp = v528;
4653                         return tmp === l5.value? l5.value: tmp.cdr;
4654                     })(),l5.value);
4655                 })() : (l28.fvalue(pv, v529, l228) !== l5.value ? (function(){
4656                     return (function(v536,v537){
4657                         (function(){
4658                             while(v536 !== l5.value){
4659                                 (v537 = (function(){
4660                                     var tmp = v536;
4661                                     return tmp === l5.value? l5.value: tmp.car;
4662                                 })());
4663                                 (function(){
4664                                     (function(v538){
4665                                         return l204.fvalue(pv, l228, v538);
4666                                     })(l223.fvalue(pv, v537, l114, l114));
4667                                     return l5.value;
4668                                 })();
4669                                 (v536 = (function(){
4670                                     var tmp = v536;
4671                                     return tmp === l5.value? l5.value: tmp.cdr;
4672                                 })());
4673                             }return l5.value;
4674                         })();
4675                         return l5.value;
4676                     })((function(){
4677                         var tmp = v528;
4678                         return tmp === l5.value? l5.value: tmp.cdr;
4679                     })(),l5.value);
4680                 })() : l5.value)));
4681             })((function(){
4682                 var tmp = v528;
4683                 return tmp === l5.value? l5.value: tmp.car;
4684             })());
4685         })();
4686     }));
4687     return l225;
4688 })();
4689 var l229 = {name: "PROCLAIM"};
4690 (l229).fvalue = (function(){
4691     var symbol = l225;
4692     var func = symbol.fvalue;
4693     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4694     return func;
4695 })();
4696 var l230 = {name: "*COMPILATIONS*"};
4697 (function(){
4698     (((l230.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l230).value = l5.value));
4699     return l230;
4700 })();
4701 var l231 = {name: "DEFINE-COMPILATION"};
4702 l231;
4703 var l232 = {name: "IF"};
4704 (function(){
4705     var v540 = l47.fvalue(pv, l232, (function (values,v541,v542,v543){
4706         checkArgs(arguments, 4);
4707         return (function(){
4708             return l191.fvalue(values, "(", l193.fvalue(pv, v541), " !== ", l193.fvalue(pv, l5.value), " ? ", l193.fvalue(pv, v542, (function(){
4709                 var symbol = l196;
4710                 var value = symbol.value;
4711                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4712                 return value;
4713             })()), " : ", l193.fvalue(pv, v543, (function(){
4714                 var symbol = l196;
4715                 var value = symbol.value;
4716                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4717                 return value;
4718             })()), ")");
4719         })();
4720     }));
4721     var v544 = ({car: v540, cdr: (function(){
4722         var symbol = l230;
4723         var value = symbol.value;
4724         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4725         return value;
4726     })()});
4727     return ((l230).value = v544);
4728 })();
4729 var l233 = {name: "*LL-KEYWORDS*"};
4730 var l234 = {name: "&OPTIONAL"};
4731 var l235 = {name: "&REST"};
4732 var l236 = {name: "&KEY"};
4733 var l237 = QIList(l234,l235,l236,l5);
4734 (function(){
4735     (((l233.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l233).value = l237));
4736     return l233;
4737 })();
4738 var l238 = {name: "LIST-UNTIL-KEYWORD"};
4739 (function(){
4740     (l238).fvalue = (function(v547){
4741         ((v547)["fname"] = "LIST-UNTIL-KEYWORD");
4742         return v547;
4743     })((function (values,v545){
4744         checkArgs(arguments, 2);
4745         return (function(){
4746             return ((function(v546){
4747                 return (v546 !== l5.value ? v546 : l96.fvalue(pv, (function(){
4748                     var tmp = v545;
4749                     return tmp === l5.value? l5.value: tmp.car;
4750                 })(), (function(){
4751                     var symbol = l233;
4752                     var value = symbol.value;
4753                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4754                     return value;
4755                 })()));
4756             })(l13.fvalue(pv, v545)) !== l5.value ? l5.value : ({car: (function(){
4757                 var tmp = v545;
4758                 return tmp === l5.value? l5.value: tmp.car;
4759             })(), cdr: l238.fvalue(pv, (function(){
4760                 var tmp = v545;
4761                 return tmp === l5.value? l5.value: tmp.cdr;
4762             })())}));
4763         })();
4764     }));
4765     return l238;
4766 })();
4767 var l239 = {name: "LL-SECTION"};
4768 (function(){
4769     (l239).fvalue = (function(v550){
4770         ((v550)["fname"] = "LL-SECTION");
4771         return v550;
4772     })((function (values,v548,v549){
4773         checkArgs(arguments, 3);
4774         return (function(){
4775             return l238.fvalue(values, (function(){
4776                 var tmp = l96.fvalue(pv, v548, v549);
4777                 return tmp === l5.value? l5.value: tmp.cdr;
4778             })());
4779         })();
4780     }));
4781     return l239;
4782 })();
4783 var l240 = {name: "LL-REQUIRED-ARGUMENTS"};
4784 (function(){
4785     (l240).fvalue = (function(v552){
4786         ((v552)["fname"] = "LL-REQUIRED-ARGUMENTS");
4787         return v552;
4788     })((function (values,v551){
4789         checkArgs(arguments, 2);
4790         return (function(){
4791             return l238.fvalue(values, v551);
4792         })();
4793     }));
4794     return l240;
4795 })();
4796 var l241 = {name: "LL-OPTIONAL-ARGUMENTS-CANONICAL"};
4797 (function(){
4798     (l241).fvalue = (function(v554){
4799         ((v554)["fname"] = "LL-OPTIONAL-ARGUMENTS-CANONICAL");
4800         return v554;
4801     })((function (values,v553){
4802         checkArgs(arguments, 2);
4803         return (function(){
4804             return l81.fvalue(values, (function(){
4805                 var symbol = l61;
4806                 var func = symbol.fvalue;
4807                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4808                 return func;
4809             })(), l239.fvalue(pv, l234, v553));
4810         })();
4811     }));
4812     return l241;
4813 })();
4814 var l242 = {name: "LL-OPTIONAL-ARGUMENTS"};
4815 (function(){
4816     (l242).fvalue = (function(v556){
4817         ((v556)["fname"] = "LL-OPTIONAL-ARGUMENTS");
4818         return v556;
4819     })((function (values,v555){
4820         checkArgs(arguments, 2);
4821         return (function(){
4822             return l81.fvalue(values, (function(){
4823                 var symbol = l32;
4824                 var func = symbol.fvalue;
4825                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4826                 return func;
4827             })(), l241.fvalue(pv, v555));
4828         })();
4829     }));
4830     return l242;
4831 })();
4832 var l243 = {name: "LL-REST-ARGUMENT"};
4833 (function(){
4834     (l243).fvalue = (function(v559){
4835         ((v559)["fname"] = "LL-REST-ARGUMENT");
4836         return v559;
4837     })((function (values,v557){
4838         checkArgs(arguments, 2);
4839         return (function(){
4840             return (function(v558){
4841                 ((function(){
4842                     var tmp = v558;
4843                     return tmp === l5.value? l5.value: tmp.cdr;
4844                 })() !== l5.value ? (function(){
4845                     throw "Bad lambda-list";
4846                 })() : l5.value);
4847                 return (function(){
4848                     var tmp = v558;
4849                     return tmp === l5.value? l5.value: tmp.car;
4850                 })();
4851             })(l239.fvalue(pv, l235, v557));
4852         })();
4853     }));
4854     return l243;
4855 })();
4856 var l244 = {name: "LL-KEYWORD-ARGUMENTS-CANONICAL"};
4857 (function(){
4858     (l244).fvalue = (function(v564){
4859         ((v564)["fname"] = "LL-KEYWORD-ARGUMENTS-CANONICAL");
4860         return v564;
4861     })((function (values,v560){
4862         checkArgs(arguments, 2);
4863         return (function(){
4864             return (function(v563){
4865                 return l81.fvalue(values, v563, l239.fvalue(pv, l236, v560));
4866             })((function (values,v561){
4867                 checkArgs(arguments, 2);
4868                 return (function(v562){
4869                     return ({car: (l62.fvalue(pv, (function(){
4870                         var tmp = v562;
4871                         return tmp === l5.value? l5.value: tmp.car;
4872                     })()) !== l5.value ? (function(){
4873                         var tmp = v562;
4874                         return tmp === l5.value? l5.value: tmp.car;
4875                     })() : l47.fvalue(pv, l153.fvalue(pv, ((function(){
4876                         var tmp = v562;
4877                         return tmp === l5.value? l5.value: tmp.car;
4878                     })()).name, "KEYWORD"), (function(){
4879                         var tmp = v562;
4880                         return tmp === l5.value? l5.value: tmp.car;
4881                     })())), cdr: (function(){
4882                         var tmp = v562;
4883                         return tmp === l5.value? l5.value: tmp.cdr;
4884                     })()});
4885                 })(l61.fvalue(pv, v561));
4886             }));
4887         })();
4888     }));
4889     return l244;
4890 })();
4891 var l245 = {name: "LL-KEYWORD-ARGUMENTS"};
4892 (function(){
4893     (l245).fvalue = (function(v567){
4894         ((v567)["fname"] = "LL-KEYWORD-ARGUMENTS");
4895         return v567;
4896     })((function (values,v565){
4897         checkArgs(arguments, 2);
4898         return (function(){
4899             return l81.fvalue(values, (function (values,v566){
4900                 checkArgs(arguments, 2);
4901                 return l43.fvalue(values, l42.fvalue(pv, v566));
4902             }), l244.fvalue(pv, v565));
4903         })();
4904     }));
4905     return l245;
4906 })();
4907 var l246 = {name: "LL-SVARS"};
4908 (function(){
4909     (l246).fvalue = (function(v570){
4910         ((v570)["fname"] = "LL-SVARS");
4911         return v570;
4912     })((function (values,v568){
4913         checkArgs(arguments, 2);
4914         return (function(){
4915             return (function(v569){
4916                 return l97.fvalue(values, l5.value, l81.fvalue(pv, (function(){
4917                     var symbol = l44;
4918                     var func = symbol.fvalue;
4919                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4920                     return func;
4921                 })(), v569));
4922             })(l68.fvalue(pv, l244.fvalue(pv, v568), l241.fvalue(pv, v568)));
4923         })();
4924     }));
4925     return l246;
4926 })();
4927 var l247 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
4928 (function(){
4929     (l247).fvalue = (function(v573){
4930         ((v573)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
4931         return v573;
4932     })((function (values,v572){
4933         checkArgsAtLeast(arguments, 2);
4934         var v571= l5.value;
4935         for (var i = arguments.length-1; i>=2; i--)
4936             v571 = {car: arguments[i], cdr:
4937         v571};
4938         return (function(){
4939             return (v572 !== l5.value ? l191.fvalue(values, "(function(){", (function(){
4940                 var symbol = l156;
4941                 var value = symbol.value;
4942                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4943                 return value;
4944             })(), l195.fvalue(pv, "var func = ", l159.fvalue(pv, v571), ";", (function(){
4945                 var symbol = l156;
4946                 var value = symbol.value;
4947                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4948                 return value;
4949             })(), "func.docstring = '", v572, "';", (function(){
4950                 var symbol = l156;
4951                 var value = symbol.value;
4952                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4953                 return value;
4954             })(), "return func;", (function(){
4955                 var symbol = l156;
4956                 var value = symbol.value;
4957                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4958                 return value;
4959             })()), "})()") : (function(){
4960                 var f = (function(){
4961                     var symbol = l191;
4962                     var func = symbol.fvalue;
4963                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4964                     return func;
4965                 })();
4966                 var args = [values];
4967                 var tail = (v571);
4968                 while (tail != l5.value){
4969                     args.push(tail.car);
4970                     tail = tail.cdr;
4971                 }
4972                 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
4973             })());
4974         })();
4975     }));
4976     return l247;
4977 })();
4978 var l248 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"};
4979 var l249 = {name: "N/A"};
4980 (function(){
4981     (l248).fvalue = (function(v579){
4982         ((v579)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT");
4983         return v579;
4984     })((function (values,v574,v575,v576){
4985         checkArgs(arguments, 4);
4986         return (function(){
4987             return (function(v577,v578){
4988                 return (function(){
4989                     try {
4990                         (((function(){
4991                             var x1 = v577;
4992                             if (typeof x1 !== 'number') throw 'Not a number!';
4993                             return (1<x1?l4.value: l5.value);
4994                         })() !== l5.value ? l28.fvalue(pv, v577, v578) : l5.value) !== l5.value ? (function(){
4995                             var values = mv;
4996                             throw ({type: 'block', id: 207, values: l191.fvalue(values, "checkArgs(arguments, ", v577, ");", (function(){
4997                                 var symbol = l156;
4998                                 var value = symbol.value;
4999                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5000                                 return value;
5001                             })()), message: 'Return from unknown block NIL.'})
5002                         })() : l5.value);
5003                         return l191.fvalue(values, ((function(){
5004                             var x1 = v577;
5005                             if (typeof x1 !== 'number') throw 'Not a number!';
5006                             return (1<x1?l4.value: l5.value);
5007                         })() !== l5.value ? l191.fvalue(pv, "checkArgsAtLeast(arguments, ", v577, ");", (function(){
5008                             var symbol = l156;
5009                             var value = symbol.value;
5010                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5011                             return value;
5012                         })()) : l5.value), (((typeof (v578) == "number")?l4.value: l5.value) !== l5.value ? l191.fvalue(pv, "checkArgsAtMost(arguments, ", v578, ");", (function(){
5013                             var symbol = l156;
5014                             var value = symbol.value;
5015                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5016                             return value;
5017                         })()) : l5.value));
5018                     }
5019                     catch (cf){
5020                         if (cf.type == 'block' && cf.id == 207)
5021                             return values.apply(this, forcemv(cf.values));
5022                         else
5023                             throw cf;
5024                     }
5025                 })();
5026             })(l24.fvalue(pv, v574),(v576 !== l5.value ? l249 : (function(){
5027                 var x1 = v574;
5028                 if (typeof x1 !== 'number') throw 'Not a number!';
5029                 var x2 = v575;
5030                 if (typeof x2 !== 'number') throw 'Not a number!';
5031                 return 1+x1+x2;
5032             })()));
5033         })();
5034     }));
5035     return l248;
5036 })();
5037 var l250 = {name: "COMPILE-LAMBDA-OPTIONAL"};
5038 (function(){
5039     (l250).fvalue = (function(v592){
5040         ((v592)["fname"] = "COMPILE-LAMBDA-OPTIONAL");
5041         return v592;
5042     })((function (values,v580){
5043         checkArgs(arguments, 2);
5044         return (function(){
5045             return (function(){
5046                 var v581 = l241.fvalue(pv, v580);
5047                 var v582 = l75.fvalue(pv, l240.fvalue(pv, v580));
5048                 var v583 = l75.fvalue(pv, v581);
5049                 return (v581 !== l5.value ? l191.fvalue(values, l161.fvalue(pv, (function (values,v584){
5050                     checkArgs(arguments, 2);
5051                     return l191.fvalue(values, "var ", l215.fvalue(pv, l42.fvalue(pv, v584)), "; ", (function(){
5052                         var symbol = l156;
5053                         var value = symbol.value;
5054                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5055                         return value;
5056                     })(), (l44.fvalue(pv, v584) !== l5.value ? l191.fvalue(pv, "var ", l215.fvalue(pv, l44.fvalue(pv, v584)), " = ", l193.fvalue(pv, l4.value), "; ", (function(){
5057                         var symbol = l156;
5058                         var value = symbol.value;
5059                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5060                         return value;
5061                     })()) : l5.value));
5062                 }), v581), "switch(arguments.length-1){", (function(){
5063                     var symbol = l156;
5064                     var value = symbol.value;
5065                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5066                     return value;
5067                 })(), (function(v585,v586){
5068                     return (function(){
5069                         (function(){
5070                             return (function(){
5071                                 while((function(){
5072                                     var x1 = v586;
5073                                     if (typeof x1 !== 'number') throw 'Not a number!';
5074                                     var x2 = v583;
5075                                     if (typeof x2 !== 'number') throw 'Not a number!';
5076                                     return (x1<x2?l4.value: l5.value);
5077                                 })() !== l5.value){
5078                                     (function(v587){
5079                                         (function(){
5080                                             var v588 = l191.fvalue(pv, "case ", (function(){
5081                                                 var x1 = v586;
5082                                                 if (typeof x1 !== 'number') throw 'Not a number!';
5083                                                 var x2 = v582;
5084                                                 if (typeof x2 !== 'number') throw 'Not a number!';
5085                                                 return x1+x2;
5086                                             })(), ":", (function(){
5087                                                 var symbol = l156;
5088                                                 var value = symbol.value;
5089                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5090                                                 return value;
5091                                             })(), l195.fvalue(pv, l215.fvalue(pv, (function(){
5092                                                 var tmp = v587;
5093                                                 return tmp === l5.value? l5.value: tmp.car;
5094                                             })()), "=", l193.fvalue(pv, l35.fvalue(pv, v587)), ";", (function(){
5095                                                 var symbol = l156;
5096                                                 var value = symbol.value;
5097                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5098                                                 return value;
5099                                             })()), (l44.fvalue(pv, v587) !== l5.value ? l195.fvalue(pv, l215.fvalue(pv, l44.fvalue(pv, v587)), "=", l193.fvalue(pv, l5.value), ";", (function(){
5100                                                 var symbol = l156;
5101                                                 var value = symbol.value;
5102                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5103                                                 return value;
5104                                             })()) : l5.value));
5105                                             var v589 = ({car: v588, cdr: v585});
5106                                             return (v585 = v589);
5107                                         })();
5108                                         return (v586 = (function(){
5109                                             var x1 = v586;
5110                                             if (typeof x1 !== 'number') throw 'Not a number!';
5111                                             return x1+1;
5112                                         })());
5113                                     })(l93.fvalue(pv, v586, v581));
5114                                 }return l5.value;
5115                             })();
5116                         })();
5117                         (function(){
5118                             var v590 = l191.fvalue(pv, "default: break;", (function(){
5119                                 var symbol = l156;
5120                                 var value = symbol.value;
5121                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5122                                 return value;
5123                             })());
5124                             var v591 = ({car: v590, cdr: v585});
5125                             return (v585 = v591);
5126                         })();
5127                         return l159.fvalue(pv, l70.fvalue(pv, v585));
5128                     })();
5129                 })(l5.value,0), "}", (function(){
5130                     var symbol = l156;
5131                     var value = symbol.value;
5132                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5133                     return value;
5134                 })()) : l5.value);
5135             })();
5136         })();
5137     }));
5138     return l250;
5139 })();
5140 var l251 = {name: "COMPILE-LAMBDA-REST"};
5141 (function(){
5142     (l251).fvalue = (function(v598){
5143         ((v598)["fname"] = "COMPILE-LAMBDA-REST");
5144         return v598;
5145     })((function (values,v593){
5146         checkArgs(arguments, 2);
5147         return (function(){
5148             return (function(v594,v595,v596){
5149                 return (v596 !== l5.value ? (function(v597){
5150                     return l191.fvalue(values, "var ", v597, "= ", l193.fvalue(pv, l5.value), ";", (function(){
5151                         var symbol = l156;
5152                         var value = symbol.value;
5153                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5154                         return value;
5155                     })(), "for (var i = arguments.length-1; i>=", (function(){
5156                         var x1 = v594;
5157                         if (typeof x1 !== 'number') throw 'Not a number!';
5158                         var x2 = v595;
5159                         if (typeof x2 !== 'number') throw 'Not a number!';
5160                         return 1+x1+x2;
5161                     })(), "; i--)", (function(){
5162                         var symbol = l156;
5163                         var value = symbol.value;
5164                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5165                         return value;
5166                     })(), l195.fvalue(pv, v597, " = {car: arguments[i], cdr: "), v597, "};", (function(){
5167                         var symbol = l156;
5168                         var value = symbol.value;
5169                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5170                         return value;
5171                     })());
5172                 })(l215.fvalue(pv, v596)) : l5.value);
5173             })(l75.fvalue(pv, l240.fvalue(pv, v593)),l75.fvalue(pv, l242.fvalue(pv, v593)),l243.fvalue(pv, v593));
5174         })();
5175     }));
5176     return l251;
5177 })();
5178 var l252 = {name: "COMPILE-LAMBDA-PARSE-KEYWORDS"};
5179 (function(){
5180     (l252).fvalue = (function(v609){
5181         ((v609)["fname"] = "COMPILE-LAMBDA-PARSE-KEYWORDS");
5182         return v609;
5183     })((function (values,v599){
5184         checkArgs(arguments, 2);
5185         return (function(){
5186             return (function(v600,v601,v602){
5187                 return l191.fvalue(values, l161.fvalue(pv, (function (values,v603){
5188                     checkArgs(arguments, 2);
5189                     return (function(v604){
5190                         return l191.fvalue(values, "var ", l215.fvalue(pv, v604), "; ", (function(){
5191                             var symbol = l156;
5192                             var value = symbol.value;
5193                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5194                             return value;
5195                         })(), (l44.fvalue(pv, v603) !== l5.value ? l191.fvalue(pv, "var ", l215.fvalue(pv, l44.fvalue(pv, v603)), " = ", l193.fvalue(pv, l5.value), ";", (function(){
5196                             var symbol = l156;
5197                             var value = symbol.value;
5198                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5199                             return value;
5200                         })()) : l5.value));
5201                     })(l43.fvalue(pv, (function(){
5202                         var tmp = v603;
5203                         return tmp === l5.value? l5.value: tmp.car;
5204                     })()));
5205                 }), v602), (function(v607){
5206                     return (v602 !== l5.value ? l191.fvalue(pv, "var i;", (function(){
5207                         var symbol = l156;
5208                         var value = symbol.value;
5209                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5210                         return value;
5211                     })(), l161.fvalue(pv, v607, v602)) : l5.value);
5212                 })((function (values,v605){
5213                     checkArgs(arguments, 2);
5214                     return l191.fvalue(values, "for (i=", (function(){
5215                         var x1 = v600;
5216                         if (typeof x1 !== 'number') throw 'Not a number!';
5217                         var x2 = v601;
5218                         if (typeof x2 !== 'number') throw 'Not a number!';
5219                         return 1+x1+x2;
5220                     })(), "; i<arguments.length; i+=2){", (function(){
5221                         var symbol = l156;
5222                         var value = symbol.value;
5223                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5224                         return value;
5225                     })(), l195.fvalue(pv, "if (arguments[i] === ", l193.fvalue(pv, l34.fvalue(pv, v605)), "){", (function(){
5226                         var symbol = l156;
5227                         var value = symbol.value;
5228                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5229                         return value;
5230                     })(), l195.fvalue(pv, l215.fvalue(pv, l35.fvalue(pv, (function(){
5231                         var tmp = v605;
5232                         return tmp === l5.value? l5.value: tmp.car;
5233                     })())), " = arguments[i+1];", (function(){
5234                         var symbol = l156;
5235                         var value = symbol.value;
5236                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5237                         return value;
5238                     })(), (function(v606){
5239                         return (v606 !== l5.value ? l191.fvalue(pv, l215.fvalue(pv, v606), " = ", l193.fvalue(pv, l4.value), ";", (function(){
5240                             var symbol = l156;
5241                             var value = symbol.value;
5242                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5243                             return value;
5244                         })()) : l5.value);
5245                     })(l44.fvalue(pv, v605)), "break;", (function(){
5246                         var symbol = l156;
5247                         var value = symbol.value;
5248                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5249                         return value;
5250                     })()), "}", (function(){
5251                         var symbol = l156;
5252                         var value = symbol.value;
5253                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5254                         return value;
5255                     })()), "}", (function(){
5256                         var symbol = l156;
5257                         var value = symbol.value;
5258                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5259                         return value;
5260                     })(), "if (i == arguments.length){", (function(){
5261                         var symbol = l156;
5262                         var value = symbol.value;
5263                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5264                         return value;
5265                     })(), l195.fvalue(pv, l215.fvalue(pv, l35.fvalue(pv, (function(){
5266                         var tmp = v605;
5267                         return tmp === l5.value? l5.value: tmp.car;
5268                     })())), " = ", l193.fvalue(pv, l35.fvalue(pv, v605)), ";", (function(){
5269                         var symbol = l156;
5270                         var value = symbol.value;
5271                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5272                         return value;
5273                     })()), "}", (function(){
5274                         var symbol = l156;
5275                         var value = symbol.value;
5276                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5277                         return value;
5278                     })());
5279                 })), (v602 !== l5.value ? l191.fvalue(pv, "for (i=", (function(){
5280                     var x1 = v600;
5281                     if (typeof x1 !== 'number') throw 'Not a number!';
5282                     var x2 = v601;
5283                     if (typeof x2 !== 'number') throw 'Not a number!';
5284                     return 1+x1+x2;
5285                 })(), "; i<arguments.length; i+=2){", (function(){
5286                     var symbol = l156;
5287                     var value = symbol.value;
5288                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5289                     return value;
5290                 })(), l195.fvalue(pv, "if (", l159.fvalue(pv, l81.fvalue(pv, (function (values,v608){
5291                     checkArgs(arguments, 2);
5292                     return l157.fvalue(values, "arguments[i] !== ", l193.fvalue(pv, l34.fvalue(pv, v608)));
5293                 }), v602), " && "), ")", (function(){
5294                     var symbol = l156;
5295                     var value = symbol.value;
5296                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5297                     return value;
5298                 })(), l195.fvalue(pv, "throw 'Unknown keyword argument ' + arguments[i].name;", (function(){
5299                     var symbol = l156;
5300                     var value = symbol.value;
5301                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5302                     return value;
5303                 })())), "}", (function(){
5304                     var symbol = l156;
5305                     var value = symbol.value;
5306                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5307                     return value;
5308                 })()) : l5.value));
5309             })(l75.fvalue(pv, l240.fvalue(pv, v599)),l75.fvalue(pv, l242.fvalue(pv, v599)),l244.fvalue(pv, v599));
5310         })();
5311     }));
5312     return l252;
5313 })();
5314 var l253 = {name: "COMPILE-LAMBDA"};
5315 var l254 = {name: "LS-COMPILE-BLOCK"};
5316 (function(){
5317     (l253).fvalue = (function(v622){
5318         ((v622)["fname"] = "COMPILE-LAMBDA");
5319         return v622;
5320     })((function (values,v610,v611){
5321         checkArgs(arguments, 3);
5322         return (function(){
5323             return (function(v612,v613,v614,v615,v616){
5324                 ((((typeof((function(){
5325                     var tmp = v611;
5326                     return tmp === l5.value? l5.value: tmp.car;
5327                 })()) == "string")?l4.value: l5.value) !== l5.value ? l29.fvalue(pv, l13.fvalue(pv, (function(){
5328                     var tmp = v611;
5329                     return tmp === l5.value? l5.value: tmp.cdr;
5330                 })())) : l5.value) !== l5.value ? (function(){
5331                     (v616 = (function(){
5332                         var tmp = v611;
5333                         return tmp === l5.value? l5.value: tmp.car;
5334                     })());
5335                     return (v611 = (function(){
5336                         var tmp = v611;
5337                         return tmp === l5.value? l5.value: tmp.cdr;
5338                     })());
5339                 })() : l5.value);
5340                 return (function(v617,v618,v619){
5341                     try {
5342                         var tmp;
5343                         tmp = l212.value;
5344                         l212.value = v619;
5345                         v619 = tmp;
5346                         return l247.fvalue(values, v616, "(function (", l159.fvalue(pv, ({car: "values", cdr: l81.fvalue(pv, (function(){
5347                             var symbol = l215;
5348                             var func = symbol.fvalue;
5349                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5350                             return func;
5351                         })(), l68.fvalue(pv, v612, v613))}), ","), "){", (function(){
5352                             var symbol = l156;
5353                             var value = symbol.value;
5354                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5355                             return value;
5356                         })(), l195.fvalue(pv, l248.fvalue(pv, v617, v618, (function(v620){
5357                             return (v620 !== l5.value ? v620 : v614);
5358                         })(v615)), l250.fvalue(pv, v610), l251.fvalue(pv, v610), l252.fvalue(pv, v610), (function(v621){
5359                             try {
5360                                 var tmp;
5361                                 tmp = l196.value;
5362                                 l196.value = v621;
5363                                 v621 = tmp;
5364                                 return l254.fvalue(pv, v611, l4.value);
5365                             }
5366                             finally {
5367                                 l196.value = v621;
5368                             }
5369                         })(l4.value)), "})");
5370                     }
5371                     finally {
5372                         l212.value = v619;
5373                     }
5374                 })(l75.fvalue(pv, v612),l75.fvalue(pv, v613),l216.fvalue(pv, l68.fvalue(pv, l61.fvalue(pv, v615), v612, v613, v614, l246.fvalue(pv, v610))));
5375             })(l240.fvalue(pv, v610),l242.fvalue(pv, v610),l245.fvalue(pv, v610),l243.fvalue(pv, v610),l5.value);
5376         })();
5377     }));
5378     return l253;
5379 })();
5380 var l255 = {name: "SETQ-PAIR"};
5381 var l256 = {name: "SET"};
5382 (function(){
5383     (l255).fvalue = (function(v626){
5384         ((v626)["fname"] = "SETQ-PAIR");
5385         return v626;
5386     })((function (values,v623,v624){
5387         checkArgs(arguments, 3);
5388         return (function(){
5389             return (function(v625){
5390                 return ((((l199.fvalue(pv, v625) === l114)?l4.value: l5.value) !== l5.value ? (l29.fvalue(pv, l96.fvalue(pv, l226, l201.fvalue(pv, v625))) !== l5.value ? l29.fvalue(pv, l96.fvalue(pv, l228, l201.fvalue(pv, v625))) : l5.value) : l5.value) !== l5.value ? l191.fvalue(values, l200.fvalue(pv, v625), " = ", l193.fvalue(pv, v624)) : l193.fvalue(values, l47.fvalue(pv, l256, l47.fvalue(pv, l186, v623), v624)));
5391             })(l211.fvalue(pv, v623, (function(){
5392                 var symbol = l212;
5393                 var value = symbol.value;
5394                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5395                 return value;
5396             })(), l114));
5397         })();
5398     }));
5399     return l255;
5400 })();
5401 (function(){
5402     var v627 = l47.fvalue(pv, l119, (function (values){
5403         var v628= l5.value;
5404         for (var i = arguments.length-1; i>=1; i--)
5405             v628 = {car: arguments[i], cdr:
5406         v628};
5407         return (function(){
5408             return (function(v629){
5409                 (function(){
5410                     try {
5411                         return (function(){
5412                             while(l4.value !== l5.value){
5413                                 (l13.fvalue(pv, v628) !== l5.value ? (function(){
5414                                     throw ({type: 'block', id: 215, values: l5.value, message: 'Return from unknown block NIL.'})
5415                                 })() : (l13.fvalue(pv, (function(){
5416                                     var tmp = v628;
5417                                     return tmp === l5.value? l5.value: tmp.cdr;
5418                                 })()) !== l5.value ? (function(){
5419                                     throw "Odd paris in SETQ";
5420                                 })() : (function(){
5421                                     (v629 = l157.fvalue(pv, v629, l157.fvalue(pv, l255.fvalue(pv, (function(){
5422                                         var tmp = v628;
5423                                         return tmp === l5.value? l5.value: tmp.car;
5424                                     })(), l35.fvalue(pv, v628)), (l13.fvalue(pv, l37.fvalue(pv, v628)) !== l5.value ? "" : ", "))));
5425                                     return (v628 = l37.fvalue(pv, v628));
5426                                 })()));
5427                             }return l5.value;
5428                         })();
5429                     }
5430                     catch (cf){
5431                         if (cf.type == 'block' && cf.id == 215)
5432                             return cf.values;
5433                         else
5434                             throw cf;
5435                     }
5436                 })();
5437                 return l191.fvalue(values, "(", v629, ")");
5438             })("");
5439         })();
5440     }));
5441     var v630 = ({car: v627, cdr: (function(){
5442         var symbol = l230;
5443         var value = symbol.value;
5444         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5445         return value;
5446     })()});
5447     return ((l230).value = v630);
5448 })();
5449 var l257 = {name: "JS-VREF"};
5450 (function(){
5451     var v631 = l47.fvalue(pv, l257, (function (values,v632){
5452         checkArgs(arguments, 2);
5453         return (function(){
5454             return v632;
5455         })();
5456     }));
5457     var v633 = ({car: v631, cdr: (function(){
5458         var symbol = l230;
5459         var value = symbol.value;
5460         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5461         return value;
5462     })()});
5463     return ((l230).value = v633);
5464 })();
5465 var l258 = {name: "JS-VSET"};
5466 (function(){
5467     var v634 = l47.fvalue(pv, l258, (function (values,v635,v636){
5468         checkArgs(arguments, 3);
5469         return (function(){
5470             return l191.fvalue(values, "(", v635, " = ", l193.fvalue(pv, v636), ")");
5471         })();
5472     }));
5473     var v637 = ({car: v634, cdr: (function(){
5474         var symbol = l230;
5475         var value = symbol.value;
5476         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5477         return value;
5478     })()});
5479     return ((l230).value = v637);
5480 })();
5481 (function(){
5482     (l167).fvalue = (function(v644){
5483         ((v644)["fname"] = "ESCAPE-STRING");
5484         return v644;
5485     })((function (values,v638){
5486         checkArgs(arguments, 2);
5487         return (function(){
5488             return (function(v639,v640,v641){
5489                 (function(){
5490                     return (function(){
5491                         while((function(){
5492                             var x1 = v640;
5493                             if (typeof x1 !== 'number') throw 'Not a number!';
5494                             var x2 = v641;
5495                             if (typeof x2 !== 'number') throw 'Not a number!';
5496                             return (x1<x2?l4.value: l5.value);
5497                         })() !== l5.value){
5498                             (function(v642){
5499                                 ((function(v643){
5500                                     return (v643 !== l5.value ? v643 : l88.fvalue(pv, v642, 92));
5501                                 })(l88.fvalue(pv, v642, 34)) !== l5.value ? (v639 = l157.fvalue(pv, v639, "\\")) : l5.value);
5502                                 (l88.fvalue(pv, v642, 10) !== l5.value ? (function(){
5503                                     (v639 = l157.fvalue(pv, v639, "\\"));
5504                                     return (v642 = 110);
5505                                 })() : l5.value);
5506                                 return (v639 = l157.fvalue(pv, v639, l107.fvalue(pv, v642)));
5507                             })((function(){
5508                                 var string = v638;
5509                                 var index = v640;
5510                                 if (typeof string != 'string')
5511                                     throw 'The value ' + string + ' is not a type string.';
5512                                 if (typeof index != 'number')
5513                                     throw 'The value ' + index + ' is not a type number.';
5514                                 return string.charCodeAt(index);
5515                             })());
5516                             (v640 = (function(){
5517                                 var x1 = v640;
5518                                 if (typeof x1 !== 'number') throw 'Not a number!';
5519                                 return x1+1;
5520                             })());
5521                         }return l5.value;
5522                     })();
5523                 })();
5524                 return v639;
5525             })("",0,l75.fvalue(pv, v638));
5526         })();
5527     }));
5528     return l167;
5529 })();
5530 var l259 = {name: "*LITERAL-SYMBOLS*"};
5531 (function(){
5532     (((l259.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l259).value = l5.value));
5533     return l259;
5534 })();
5535 var l260 = {name: "*LITERAL-COUNTER*"};
5536 (function(){
5537     (((l260.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l260).value = 0));
5538     return l260;
5539 })();
5540 var l261 = {name: "GENLIT"};
5541 (function(){
5542     (l261).fvalue = (function(v645){
5543         ((v645)["fname"] = "GENLIT");
5544         return v645;
5545     })((function (values){
5546         checkArgsAtMost(arguments, 1);
5547         return (function(){
5548             return l191.fvalue(values, "l", ((l260).value = (function(){
5549                 var x1 = (function(){
5550                     var symbol = l260;
5551                     var value = symbol.value;
5552                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5553                     return value;
5554                 })();
5555                 if (typeof x1 !== 'number') throw 'Not a number!';
5556                 return x1+1;
5557             })()));
5558         })();
5559     }));
5560     return l261;
5561 })();
5562 var l262 = {name: "LITERAL"};
5563 (function(){
5564     (l262).fvalue = (function(v662){
5565         ((v662)["fname"] = "LITERAL");
5566         return v662;
5567     })((function (values,v646,v647){
5568         checkArgsAtLeast(arguments, 2);
5569         checkArgsAtMost(arguments, 3);
5570         var v647;
5571         switch(arguments.length-1){
5572         case 1:
5573             v647=l5.value;
5574         default: break;
5575         }
5576         return (function(){
5577             return (l89.fvalue(pv, v646) !== l5.value ? l19.fvalue(values, v646) : (((typeof(v646) == "string")?l4.value: l5.value) !== l5.value ? l191.fvalue(values, "\"", l167.fvalue(pv, v646), "\"") : (((function(){
5578                 var tmp = v646;
5579                 return (typeof tmp == 'object' && 'name' in tmp);
5580             })()?l4.value: l5.value) !== l5.value ? (function(v648){
5581                 return (v648 !== l5.value ? v648 : (function(v650,v651){
5582                     (function(){
5583                         var v652 = ({car: v646, cdr: v650});
5584                         var v653 = ({car: v652, cdr: (function(){
5585                             var symbol = l259;
5586                             var value = symbol.value;
5587                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5588                             return value;
5589                         })()});
5590                         return ((l259).value = v653);
5591                     })();
5592                     l218.fvalue(pv, l191.fvalue(pv, "var ", v650, " = ", v651));
5593                     return v650;
5594                 })(l261.fvalue(pv),(function(v649){
5595                     return (l13.fvalue(pv, v649) !== l5.value ? l191.fvalue(pv, "{name: \"", l167.fvalue(pv, (v646).name), "\"}") : l193.fvalue(pv, l47.fvalue(pv, l153, (v646).name, l137.fvalue(pv, v649))));
5596                 })(l145.fvalue(pv, v646))));
5597             })((function(){
5598                 var tmp = l106.fvalue(pv, v646, (function(){
5599                     var symbol = l259;
5600                     var value = symbol.value;
5601                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5602                     return value;
5603                 })());
5604                 return tmp === l5.value? l5.value: tmp.cdr;
5605             })()) : (((function(){
5606                 var tmp = v646;
5607                 return (typeof tmp == 'object' && 'car' in tmp);
5608             })()?l4.value: l5.value) !== l5.value ? (function(){
5609                 var v654 = l95.fvalue(pv, v646);
5610                 var v655 = l94.fvalue(pv, v646);
5611                 var v656 = l191.fvalue(pv, "QIList(", l160.fvalue(pv, l81.fvalue(pv, (function (values,v657){
5612                     checkArgs(arguments, 2);
5613                     return l262.fvalue(values, v657, l4.value);
5614                 }), v654), ","), l262.fvalue(pv, (function(){
5615                     var tmp = v655;
5616                     return tmp === l5.value? l5.value: tmp.car;
5617                 })(), l4.value), ",", l262.fvalue(pv, (function(){
5618                     var tmp = v655;
5619                     return tmp === l5.value? l5.value: tmp.cdr;
5620                 })(), l4.value), ")");
5621                 return (v647 !== l5.value ? v656 : (function(v658){
5622                     l218.fvalue(pv, l191.fvalue(pv, "var ", v658, " = ", v656));
5623                     return v658;
5624                 })(l261.fvalue(pv)));
5625             })() : (((function(){
5626                 var x = v646;
5627                 return typeof x === 'object' && 'length' in x;
5628             })()?l4.value: l5.value) !== l5.value ? (function(v659){
5629                 return (function(v660){
5630                     return (v647 !== l5.value ? v660 : (function(v661){
5631                         l218.fvalue(pv, l191.fvalue(pv, "var ", v661, " = ", v660));
5632                         return v661;
5633                     })(l261.fvalue(pv)));
5634                 })(l157.fvalue(pv, "[", l159.fvalue(pv, l81.fvalue(pv, (function(){
5635                     var symbol = l262;
5636                     var func = symbol.fvalue;
5637                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5638                     return func;
5639                 })(), v659), ", "), "]"));
5640             })(l162.fvalue(pv, v646)) : l5.value)))));
5641         })();
5642     }));
5643     return l262;
5644 })();
5645 (function(){
5646     var v663 = l47.fvalue(pv, l186, (function (values,v664){
5647         checkArgs(arguments, 2);
5648         return (function(){
5649             return l262.fvalue(values, v664);
5650         })();
5651     }));
5652     var v665 = ({car: v663, cdr: (function(){
5653         var symbol = l230;
5654         var value = symbol.value;
5655         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5656         return value;
5657     })()});
5658     return ((l230).value = v665);
5659 })();
5660 var l263 = {name: "%WHILE"};
5661 (function(){
5662     var v666 = l47.fvalue(pv, l263, (function (values,v668){
5663         checkArgsAtLeast(arguments, 2);
5664         var v667= l5.value;
5665         for (var i = arguments.length-1; i>=2; i--)
5666             v667 = {car: arguments[i], cdr:
5667         v667};
5668         return (function(){
5669             return l191.fvalue(values, "(function(){", (function(){
5670                 var symbol = l156;
5671                 var value = symbol.value;
5672                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5673                 return value;
5674             })(), l195.fvalue(pv, "while(", l193.fvalue(pv, v668), " !== ", l193.fvalue(pv, l5.value), "){", (function(){
5675                 var symbol = l156;
5676                 var value = symbol.value;
5677                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5678                 return value;
5679             })(), l195.fvalue(pv, l254.fvalue(pv, v667)), "}", "return ", l193.fvalue(pv, l5.value), ";", (function(){
5680                 var symbol = l156;
5681                 var value = symbol.value;
5682                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5683                 return value;
5684             })()), "})()");
5685         })();
5686     }));
5687     var v669 = ({car: v666, cdr: (function(){
5688         var symbol = l230;
5689         var value = symbol.value;
5690         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5691         return value;
5692     })()});
5693     return ((l230).value = v669);
5694 })();
5695 var l264 = {name: "SYMBOL-FUNCTION"};
5696 (function(){
5697     var v670 = l47.fvalue(pv, l113, (function (values,v671){
5698         checkArgs(arguments, 2);
5699         return (function(){
5700             return ((l62.fvalue(pv, v671) !== l5.value ? (((function(){
5701                 var tmp = v671;
5702                 return tmp === l5.value? l5.value: tmp.car;
5703             })() === l6)?l4.value: l5.value) : l5.value) !== l5.value ? l253.fvalue(values, l35.fvalue(pv, v671), l37.fvalue(pv, v671)) : (((function(){
5704                 var tmp = v671;
5705                 return (typeof tmp == 'object' && 'name' in tmp);
5706             })()?l4.value: l5.value) !== l5.value ? (function(v672){
5707                 return (v672 !== l5.value ? l200.fvalue(values, v672) : l193.fvalue(values, l47.fvalue(pv, l264, l47.fvalue(pv, l186, v671))));
5708             })(l211.fvalue(pv, v671, (function(){
5709                 var symbol = l212;
5710                 var value = symbol.value;
5711                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5712                 return value;
5713             })(), l113)) : l5.value));
5714         })();
5715     }));
5716     var v673 = ({car: v670, cdr: (function(){
5717         var symbol = l230;
5718         var value = symbol.value;
5719         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5720         return value;
5721     })()});
5722     return ((l230).value = v673);
5723 })();
5724 var l265 = {name: "MAKE-FUNCTION-BINDING"};
5725 (function(){
5726     (l265).fvalue = (function(v675){
5727         ((v675)["fname"] = "MAKE-FUNCTION-BINDING");
5728         return v675;
5729     })((function (values,v674){
5730         checkArgs(arguments, 2);
5731         return (function(){
5732             return l197.fvalue(values, v674, l113, l214.fvalue(pv, v674));
5733         })();
5734     }));
5735     return l265;
5736 })();
5737 var l266 = {name: "COMPILE-FUNCTION-DEFINITION"};
5738 (function(){
5739     (l266).fvalue = (function(v677){
5740         ((v677)["fname"] = "COMPILE-FUNCTION-DEFINITION");
5741         return v677;
5742     })((function (values,v676){
5743         checkArgs(arguments, 2);
5744         return (function(){
5745             return l253.fvalue(values, (function(){
5746                 var tmp = v676;
5747                 return tmp === l5.value? l5.value: tmp.car;
5748             })(), (function(){
5749                 var tmp = v676;
5750                 return tmp === l5.value? l5.value: tmp.cdr;
5751             })());
5752         })();
5753     }));
5754     return l266;
5755 })();
5756 var l267 = {name: "TRANSLATE-FUNCTION"};
5757 (function(){
5758     (l267).fvalue = (function(v680){
5759         ((v680)["fname"] = "TRANSLATE-FUNCTION");
5760         return v680;
5761     })((function (values,v678){
5762         checkArgs(arguments, 2);
5763         return (function(){
5764             return (function(v679){
5765                 return l200.fvalue(values, v679);
5766             })(l211.fvalue(pv, v678, (function(){
5767                 var symbol = l212;
5768                 var value = symbol.value;
5769                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5770                 return value;
5771             })(), l113));
5772         })();
5773     }));
5774     return l267;
5775 })();
5776 var l268 = {name: "FLET"};
5777 (function(){
5778     var v681 = l47.fvalue(pv, l268, (function (values,v683){
5779         checkArgsAtLeast(arguments, 2);
5780         var v682= l5.value;
5781         for (var i = arguments.length-1; i>=2; i--)
5782             v682 = {car: arguments[i], cdr:
5783         v682};
5784         return (function(){
5785             return (function(){
5786                 try {
5787                     var v688 = l212.value;
5788                     var v684 = l81.fvalue(pv, (function(){
5789                         var symbol = l32;
5790                         var func = symbol.fvalue;
5791                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5792                         return func;
5793                     })(), v683);
5794                     var v685 = l81.fvalue(pv, (function(){
5795                         var symbol = l33;
5796                         var func = symbol.fvalue;
5797                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5798                         return func;
5799                     })(), v683);
5800                     var v686 = l81.fvalue(pv, (function(){
5801                         var symbol = l266;
5802                         var func = symbol.fvalue;
5803                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5804                         return func;
5805                     })(), v685);
5806                     ((l212).value = l210.fvalue(pv, l81.fvalue(pv, (function(){
5807                         var symbol = l265;
5808                         var func = symbol.fvalue;
5809                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5810                         return func;
5811                     })(), v684), (function(){
5812                         var symbol = l212;
5813                         var value = symbol.value;
5814                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5815                         return value;
5816                     })(), l113));
5817                     return l191.fvalue(values, "(function(", l159.fvalue(pv, l81.fvalue(pv, (function(){
5818                         var symbol = l267;
5819                         var func = symbol.fvalue;
5820                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5821                         return func;
5822                     })(), v684), ","), "){", (function(){
5823                         var symbol = l156;
5824                         var value = symbol.value;
5825                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5826                         return value;
5827                     })(), (function(v687){
5828                         return l195.fvalue(pv, v687);
5829                     })(l254.fvalue(pv, v682, l4.value)), "})(", l159.fvalue(pv, v686, ","), ")");
5830                 }
5831                 finally {
5832                     l212.value = v688;
5833                 }
5834             })();
5835         })();
5836     }));
5837     var v689 = ({car: v681, cdr: (function(){
5838         var symbol = l230;
5839         var value = symbol.value;
5840         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5841         return value;
5842     })()});
5843     return ((l230).value = v689);
5844 })();
5845 var l269 = {name: "LABELS"};
5846 (function(){
5847     var v690 = l47.fvalue(pv, l269, (function (values,v692){
5848         checkArgsAtLeast(arguments, 2);
5849         var v691= l5.value;
5850         for (var i = arguments.length-1; i>=2; i--)
5851             v691 = {car: arguments[i], cdr:
5852         v691};
5853         return (function(){
5854             return (function(){
5855                 try {
5856                     var v695 = l212.value;
5857                     var v693 = l81.fvalue(pv, (function(){
5858                         var symbol = l32;
5859                         var func = symbol.fvalue;
5860                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5861                         return func;
5862                     })(), v692);
5863                     ((l212).value = l210.fvalue(pv, l81.fvalue(pv, (function(){
5864                         var symbol = l265;
5865                         var func = symbol.fvalue;
5866                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5867                         return func;
5868                     })(), v693), (function(){
5869                         var symbol = l212;
5870                         var value = symbol.value;
5871                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5872                         return value;
5873                     })(), l113));
5874                     return l191.fvalue(values, "(function(){", (function(){
5875                         var symbol = l156;
5876                         var value = symbol.value;
5877                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5878                         return value;
5879                     })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v694){
5880                         checkArgs(arguments, 2);
5881                         return l191.fvalue(values, "var ", l267.fvalue(pv, (function(){
5882                             var tmp = v694;
5883                             return tmp === l5.value? l5.value: tmp.car;
5884                         })()), " = ", l253.fvalue(pv, l35.fvalue(pv, v694), l37.fvalue(pv, v694)), ";", (function(){
5885                             var symbol = l156;
5886                             var value = symbol.value;
5887                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5888                             return value;
5889                         })());
5890                     }), v692), l254.fvalue(pv, v691, l4.value)), "})()");
5891                 }
5892                 finally {
5893                     l212.value = v695;
5894                 }
5895             })();
5896         })();
5897     }));
5898     var v696 = ({car: v690, cdr: (function(){
5899         var symbol = l230;
5900         var value = symbol.value;
5901         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5902         return value;
5903     })()});
5904     return ((l230).value = v696);
5905 })();
5906 var l270 = {name: "*COMPILING-FILE*"};
5907 (function(){
5908     (((l270.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l270).value = l5.value));
5909     return l270;
5910 })();
5911 var l271 = {name: "EVAL-WHEN-COMPILE"};
5912 var l272 = {name: "EVAL"};
5913 (function(){
5914     var v697 = l47.fvalue(pv, l271, (function (values){
5915         var v698= l5.value;
5916         for (var i = arguments.length-1; i>=1; i--)
5917             v698 = {car: arguments[i], cdr:
5918         v698};
5919         return (function(){
5920             return ((function(){
5921                 var symbol = l270;
5922                 var value = symbol.value;
5923                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5924                 return value;
5925             })() !== l5.value ? (function(){
5926                 l272.fvalue(pv, ({car: l123, cdr: v698}));
5927                 return l5.value;
5928             })() : l193.fvalue(values, ({car: l123, cdr: v698})));
5929         })();
5930     }));
5931     var v699 = ({car: v697, cdr: (function(){
5932         var symbol = l230;
5933         var value = symbol.value;
5934         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5935         return value;
5936     })()});
5937     return ((l230).value = v699);
5938 })();
5939 var l273 = {name: "DEFINE-TRANSFORMATION"};
5940 l273;
5941 (function(){
5942     var v700 = l47.fvalue(pv, l123, (function (values){
5943         var v701= l5.value;
5944         for (var i = arguments.length-1; i>=1; i--)
5945             v701 = {car: arguments[i], cdr:
5946         v701};
5947         return (function(){
5948             return (l13.fvalue(pv, (function(){
5949                 var tmp = v701;
5950                 return tmp === l5.value? l5.value: tmp.cdr;
5951             })()) !== l5.value ? l193.fvalue(values, (function(){
5952                 var tmp = v701;
5953                 return tmp === l5.value? l5.value: tmp.car;
5954             })(), (function(){
5955                 var symbol = l196;
5956                 var value = symbol.value;
5957                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5958                 return value;
5959             })()) : l191.fvalue(values, "(function(){", (function(){
5960                 var symbol = l156;
5961                 var value = symbol.value;
5962                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5963                 return value;
5964             })(), l195.fvalue(pv, l254.fvalue(pv, v701, l4.value)), "})()"));
5965         })();
5966     }));
5967     var v702 = ({car: v700, cdr: (function(){
5968         var symbol = l230;
5969         var value = symbol.value;
5970         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5971         return value;
5972     })()});
5973     return ((l230).value = v702);
5974 })();
5975 var l274 = {name: "SPECIAL-VARIABLE-P"};
5976 (function(){
5977     (l274).fvalue = (function(v704){
5978         ((v704)["fname"] = "SPECIAL-VARIABLE-P");
5979         return v704;
5980     })((function (values,v703){
5981         checkArgs(arguments, 2);
5982         return (function(){
5983             return (l224.fvalue(pv, v703, l114, l226) !== l5.value ? l4.value : l5.value);
5984         })();
5985     }));
5986     return l274;
5987 })();
5988 var l275 = {name: "LET-BINDING-WRAPPER"};
5989 (function(){
5990     (l275).fvalue = (function(v711){
5991         ((v711)["fname"] = "LET-BINDING-WRAPPER");
5992         return v711;
5993     })((function (values,v705,v706){
5994         checkArgs(arguments, 3);
5995         return (function(){
5996             try {
5997                 (l13.fvalue(pv, v705) !== l5.value ? (function(){
5998                     var values = mv;
5999                     throw ({type: 'block', id: 233, values: v706, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
6000                 })() : l5.value);
6001                 return l191.fvalue(values, "try {", (function(){
6002                     var symbol = l156;
6003                     var value = symbol.value;
6004                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6005                     return value;
6006                 })(), l195.fvalue(pv, "var tmp;", (function(){
6007                     var symbol = l156;
6008                     var value = symbol.value;
6009                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6010                     return value;
6011                 })(), l161.fvalue(pv, (function (values,v707){
6012                     checkArgs(arguments, 2);
6013                     return (function(v708){
6014                         return l191.fvalue(values, "tmp = ", v708, ".value;", (function(){
6015                             var symbol = l156;
6016                             var value = symbol.value;
6017                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6018                             return value;
6019                         })(), v708, ".value = ", (function(){
6020                             var tmp = v707;
6021                             return tmp === l5.value? l5.value: tmp.cdr;
6022                         })(), ";", (function(){
6023                             var symbol = l156;
6024                             var value = symbol.value;
6025                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6026                             return value;
6027                         })(), (function(){
6028                             var tmp = v707;
6029                             return tmp === l5.value? l5.value: tmp.cdr;
6030                         })(), " = tmp;", (function(){
6031                             var symbol = l156;
6032                             var value = symbol.value;
6033                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6034                             return value;
6035                         })());
6036                     })(l193.fvalue(pv, l47.fvalue(pv, l186, (function(){
6037                         var tmp = v707;
6038                         return tmp === l5.value? l5.value: tmp.car;
6039                     })())));
6040                 }), v705), v706, (function(){
6041                     var symbol = l156;
6042                     var value = symbol.value;
6043                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6044                     return value;
6045                 })()), "}", (function(){
6046                     var symbol = l156;
6047                     var value = symbol.value;
6048                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6049                     return value;
6050                 })(), "finally {", (function(){
6051                     var symbol = l156;
6052                     var value = symbol.value;
6053                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6054                     return value;
6055                 })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v709){
6056                     checkArgs(arguments, 2);
6057                     return (function(v710){
6058                         return l191.fvalue(values, v710, ".value", " = ", (function(){
6059                             var tmp = v709;
6060                             return tmp === l5.value? l5.value: tmp.cdr;
6061                         })(), ";", (function(){
6062                             var symbol = l156;
6063                             var value = symbol.value;
6064                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6065                             return value;
6066                         })());
6067                     })(l193.fvalue(pv, l47.fvalue(pv, l186, (function(){
6068                         var tmp = v709;
6069                         return tmp === l5.value? l5.value: tmp.car;
6070                     })())));
6071                 }), v705)), "}", (function(){
6072                     var symbol = l156;
6073                     var value = symbol.value;
6074                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6075                     return value;
6076                 })());
6077             }
6078             catch (cf){
6079                 if (cf.type == 'block' && cf.id == 233)
6080                     return values.apply(this, forcemv(cf.values));
6081                 else
6082                     throw cf;
6083             }
6084         })();
6085     }));
6086     return l275;
6087 })();
6088 var l276 = {name: "LET"};
6089 (function(){
6090     var v712 = l47.fvalue(pv, l276, (function (values,v714){
6091         checkArgsAtLeast(arguments, 2);
6092         var v713= l5.value;
6093         for (var i = arguments.length-1; i>=2; i--)
6094             v713 = {car: arguments[i], cdr:
6095         v713};
6096         return (function(){
6097             return (function(){
6098                 try {
6099                     var v724 = l212.value;
6100                     var v715 = l81.fvalue(pv, (function(){
6101                         var symbol = l61;
6102                         var func = symbol.fvalue;
6103                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6104                         return func;
6105                     })(), v714);
6106                     var v716 = l81.fvalue(pv, (function(){
6107                         var symbol = l42;
6108                         var func = symbol.fvalue;
6109                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6110                         return func;
6111                     })(), v715);
6112                     var v717 = l81.fvalue(pv, (function(){
6113                         var symbol = l193;
6114                         var func = symbol.fvalue;
6115                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6116                         return func;
6117                     })(), l81.fvalue(pv, (function(){
6118                         var symbol = l43;
6119                         var func = symbol.fvalue;
6120                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6121                         return func;
6122                     })(), v715));
6123                     ((l212).value = l216.fvalue(pv, l98.fvalue(pv, (function(){
6124                         var symbol = l274;
6125                         var func = symbol.fvalue;
6126                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6127                         return func;
6128                     })(), v716)));
6129                     var v718 = l5.value;
6130                     return l191.fvalue(values, "(function(", l159.fvalue(pv, l81.fvalue(pv, (function (values,v719){
6131                         checkArgs(arguments, 2);
6132                         return (l274.fvalue(pv, v719) !== l5.value ? (function(v720){
6133                             (function(){
6134                                 var v721 = ({car: v719, cdr: v720});
6135                                 var v722 = ({car: v721, cdr: v718});
6136                                 return (v718 = v722);
6137                             })();
6138                             return v720;
6139                         })(l214.fvalue(pv, v719)) : l215.fvalue(values, v719));
6140                     }), v716), ","), "){", (function(){
6141                         var symbol = l156;
6142                         var value = symbol.value;
6143                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6144                         return value;
6145                     })(), (function(v723){
6146                         return l195.fvalue(pv, l275.fvalue(pv, v718, v723));
6147                     })(l254.fvalue(pv, v713, l4.value)), "})(", l159.fvalue(pv, v717, ","), ")");
6148                 }
6149                 finally {
6150                     l212.value = v724;
6151                 }
6152             })();
6153         })();
6154     }));
6155     var v725 = ({car: v712, cdr: (function(){
6156         var symbol = l230;
6157         var value = symbol.value;
6158         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6159         return value;
6160     })()});
6161     return ((l230).value = v725);
6162 })();
6163 var l277 = {name: "LET*-INITIALIZE-VALUE"};
6164 (function(){
6165     (l277).fvalue = (function(v732){
6166         ((v732)["fname"] = "LET*-INITIALIZE-VALUE");
6167         return v732;
6168     })((function (values,v726){
6169         checkArgs(arguments, 2);
6170         return (function(){
6171             return (function(v727,v728){
6172                 return (l274.fvalue(pv, v727) !== l5.value ? l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l119, v727, v728)), ";", (function(){
6173                     var symbol = l156;
6174                     var value = symbol.value;
6175                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6176                     return value;
6177                 })()) : (function(){
6178                     var v729 = l214.fvalue(pv, v727);
6179                     var v730 = l197.fvalue(pv, v727, l114, v729);
6180                     return (function(v731){
6181                         l207.fvalue(pv, v730, (function(){
6182                             var symbol = l212;
6183                             var value = symbol.value;
6184                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6185                             return value;
6186                         })(), l114);
6187                         return v731;
6188                     })(l191.fvalue(pv, "var ", v729, " = ", l193.fvalue(pv, v728), ";", (function(){
6189                         var symbol = l156;
6190                         var value = symbol.value;
6191                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6192                         return value;
6193                     })()));
6194                 })());
6195             })(l42.fvalue(pv, v726),l43.fvalue(pv, v726));
6196         })();
6197     }));
6198     return l277;
6199 })();
6200 var l278 = {name: "LET*-BINDING-WRAPPER"};
6201 (function(){
6202     (l278).fvalue = (function(v741){
6203         ((v741)["fname"] = "LET*-BINDING-WRAPPER");
6204         return v741;
6205     })((function (values,v733,v734){
6206         checkArgs(arguments, 3);
6207         return (function(){
6208             try {
6209                 (l13.fvalue(pv, v733) !== l5.value ? (function(){
6210                     var values = mv;
6211                     throw ({type: 'block', id: 236, values: v734, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
6212                 })() : l5.value);
6213                 return (function(v736){
6214                     return l191.fvalue(values, "try {", (function(){
6215                         var symbol = l156;
6216                         var value = symbol.value;
6217                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6218                         return value;
6219                     })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v737){
6220                         checkArgs(arguments, 2);
6221                         return (function(v738){
6222                             return l191.fvalue(values, "var ", (function(){
6223                                 var tmp = v737;
6224                                 return tmp === l5.value? l5.value: tmp.cdr;
6225                             })(), " = ", v738, ".value;", (function(){
6226                                 var symbol = l156;
6227                                 var value = symbol.value;
6228                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6229                                 return value;
6230                             })());
6231                         })(l193.fvalue(pv, l47.fvalue(pv, l186, (function(){
6232                             var tmp = v737;
6233                             return tmp === l5.value? l5.value: tmp.car;
6234                         })())));
6235                     }), v736), v734), "}", (function(){
6236                         var symbol = l156;
6237                         var value = symbol.value;
6238                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6239                         return value;
6240                     })(), "finally {", (function(){
6241                         var symbol = l156;
6242                         var value = symbol.value;
6243                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6244                         return value;
6245                     })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v739){
6246                         checkArgs(arguments, 2);
6247                         return (function(v740){
6248                             return l191.fvalue(values, v740, ".value", " = ", (function(){
6249                                 var tmp = v739;
6250                                 return tmp === l5.value? l5.value: tmp.cdr;
6251                             })(), ";", (function(){
6252                                 var symbol = l156;
6253                                 var value = symbol.value;
6254                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6255                                 return value;
6256                             })());
6257                         })(l193.fvalue(pv, l47.fvalue(pv, l186, (function(){
6258                             var tmp = v739;
6259                             return tmp === l5.value? l5.value: tmp.car;
6260                         })())));
6261                     }), v736)), "}", (function(){
6262                         var symbol = l156;
6263                         var value = symbol.value;
6264                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6265                         return value;
6266                     })());
6267                 })(l81.fvalue(pv, (function (values,v735){
6268                     checkArgs(arguments, 2);
6269                     return ({car: v735, cdr: l214.fvalue(pv, v735)});
6270                 }), l99.fvalue(pv, (function(){
6271                     var symbol = l274;
6272                     var func = symbol.fvalue;
6273                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6274                     return func;
6275                 })(), v733)));
6276             }
6277             catch (cf){
6278                 if (cf.type == 'block' && cf.id == 236)
6279                     return values.apply(this, forcemv(cf.values));
6280                 else
6281                     throw cf;
6282             }
6283         })();
6284     }));
6285     return l278;
6286 })();
6287 var l279 = {name: "LET*"};
6288 (function(){
6289     var v742 = l47.fvalue(pv, l279, (function (values,v744){
6290         checkArgsAtLeast(arguments, 2);
6291         var v743= l5.value;
6292         for (var i = arguments.length-1; i>=2; i--)
6293             v743 = {car: arguments[i], cdr:
6294         v743};
6295         return (function(){
6296             return (function(v745,v746){
6297                 try {
6298                     var tmp;
6299                     tmp = l212.value;
6300                     l212.value = v746;
6301                     v746 = tmp;
6302                     return l191.fvalue(values, "(function(){", (function(){
6303                         var symbol = l156;
6304                         var value = symbol.value;
6305                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6306                         return value;
6307                     })(), l195.fvalue(pv, (function(v747,v748){
6308                         return l278.fvalue(pv, v747, v748);
6309                     })(l99.fvalue(pv, (function(){
6310                         var symbol = l274;
6311                         var func = symbol.fvalue;
6312                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6313                         return func;
6314                     })(), l81.fvalue(pv, (function(){
6315                         var symbol = l42;
6316                         var func = symbol.fvalue;
6317                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6318                         return func;
6319                     })(), v745)),l157.fvalue(pv, l161.fvalue(pv, (function(){
6320                         var symbol = l277;
6321                         var func = symbol.fvalue;
6322                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6323                         return func;
6324                     })(), v745), l254.fvalue(pv, v743, l4.value)))), "})()");
6325                 }
6326                 finally {
6327                     l212.value = v746;
6328                 }
6329             })(l81.fvalue(pv, (function(){
6330                 var symbol = l61;
6331                 var func = symbol.fvalue;
6332                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6333                 return func;
6334             })(), v744),l206.fvalue(pv, (function(){
6335                 var symbol = l212;
6336                 var value = symbol.value;
6337                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6338                 return value;
6339             })()));
6340         })();
6341     }));
6342     var v749 = ({car: v742, cdr: (function(){
6343         var symbol = l230;
6344         var value = symbol.value;
6345         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6346         return value;
6347     })()});
6348     return ((l230).value = v749);
6349 })();
6350 var l280 = {name: "*BLOCK-COUNTER*"};
6351 (function(){
6352     (((l280.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l280).value = 0));
6353     return l280;
6354 })();
6355 var l281 = {name: "MULTIPLE-VALUE"};
6356 var l282 = {name: "USED"};
6357 (function(){
6358     var v750 = l47.fvalue(pv, l208, (function (values,v752){
6359         checkArgsAtLeast(arguments, 2);
6360         var v751= l5.value;
6361         for (var i = arguments.length-1; i>=2; i--)
6362             v751 = {car: arguments[i], cdr:
6363         v751};
6364         return (function(){
6365             return (function(){
6366                 var v753 = ((l280).value = (function(){
6367                     var x1 = (function(){
6368                         var symbol = l280;
6369                         var value = symbol.value;
6370                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6371                         return value;
6372                     })();
6373                     if (typeof x1 !== 'number') throw 'Not a number!';
6374                     return x1+1;
6375                 })());
6376                 var v754 = l197.fvalue(pv, v752, l208, v753);
6377                 ((function(){
6378                     var symbol = l196;
6379                     var value = symbol.value;
6380                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6381                     return value;
6382                 })() !== l5.value ? l204.fvalue(pv, l281, v754) : l5.value);
6383                 return (function(){
6384                     try {
6385                         var v756 = l212.value;
6386                         ((l212).value = l210.fvalue(pv, l47.fvalue(pv, v754), (function(){
6387                             var symbol = l212;
6388                             var value = symbol.value;
6389                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6390                             return value;
6391                         })(), l208));
6392                         var v755 = l254.fvalue(pv, v751, l4.value);
6393                         return (l96.fvalue(pv, l282, l201.fvalue(pv, v754)) !== l5.value ? l191.fvalue(values, "(function(){", (function(){
6394                             var symbol = l156;
6395                             var value = symbol.value;
6396                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6397                             return value;
6398                         })(), l195.fvalue(pv, "try {", (function(){
6399                             var symbol = l156;
6400                             var value = symbol.value;
6401                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6402                             return value;
6403                         })(), l195.fvalue(pv, v755), "}", (function(){
6404                             var symbol = l156;
6405                             var value = symbol.value;
6406                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6407                             return value;
6408                         })(), "catch (cf){", (function(){
6409                             var symbol = l156;
6410                             var value = symbol.value;
6411                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6412                             return value;
6413                         })(), "    if (cf.type == 'block' && cf.id == ", v753, ")", (function(){
6414                             var symbol = l156;
6415                             var value = symbol.value;
6416                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6417                             return value;
6418                         })(), ((function(){
6419                             var symbol = l196;
6420                             var value = symbol.value;
6421                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6422                             return value;
6423                         })() !== l5.value ? "        return values.apply(this, forcemv(cf.values));" : "        return cf.values;"), (function(){
6424                             var symbol = l156;
6425                             var value = symbol.value;
6426                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6427                             return value;
6428                         })(), "    else", (function(){
6429                             var symbol = l156;
6430                             var value = symbol.value;
6431                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6432                             return value;
6433                         })(), "        throw cf;", (function(){
6434                             var symbol = l156;
6435                             var value = symbol.value;
6436                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6437                             return value;
6438                         })(), "}", (function(){
6439                             var symbol = l156;
6440                             var value = symbol.value;
6441                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6442                             return value;
6443                         })()), "})()") : l191.fvalue(values, "(function(){", (function(){
6444                             var symbol = l156;
6445                             var value = symbol.value;
6446                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6447                             return value;
6448                         })(), l195.fvalue(pv, v755), "})()"));
6449                     }
6450                     finally {
6451                         l212.value = v756;
6452                     }
6453                 })();
6454             })();
6455         })();
6456     }));
6457     var v757 = ({car: v750, cdr: (function(){
6458         var symbol = l230;
6459         var value = symbol.value;
6460         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6461         return value;
6462     })()});
6463     return ((l230).value = v757);
6464 })();
6465 var l283 = {name: "RETURN-FROM"};
6466 (function(){
6467     var v758 = l47.fvalue(pv, l283, (function (values,v759,v760){
6468         checkArgsAtLeast(arguments, 2);
6469         checkArgsAtMost(arguments, 3);
6470         var v760;
6471         switch(arguments.length-1){
6472         case 1:
6473             v760=l5.value;
6474         default: break;
6475         }
6476         return (function(){
6477             return (function(){
6478                 var v761 = l211.fvalue(pv, v759, (function(){
6479                     var symbol = l212;
6480                     var value = symbol.value;
6481                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6482                     return value;
6483                 })(), l208);
6484                 var v762 = l96.fvalue(pv, l281, l201.fvalue(pv, v761));
6485                 (l13.fvalue(pv, v761) !== l5.value ? (function(){
6486                     throw l157.fvalue(pv, "Unknown block `", (v759).name, "'.");
6487                 })() : l5.value);
6488                 l204.fvalue(pv, l282, v761);
6489                 return l191.fvalue(values, "(function(){", (function(){
6490                     var symbol = l156;
6491                     var value = symbol.value;
6492                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6493                     return value;
6494                 })(), l195.fvalue(pv, (v762 !== l5.value ? l191.fvalue(pv, "var values = mv;", (function(){
6495                     var symbol = l156;
6496                     var value = symbol.value;
6497                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6498                     return value;
6499                 })()) : l5.value), "throw ({", "type: 'block', ", "id: ", l200.fvalue(pv, v761), ", ", "values: ", l193.fvalue(pv, v760, v762), ", ", "message: 'Return from unknown block ", (v759).name, ".'", "})"), "})()");
6500             })();
6501         })();
6502     }));
6503     var v763 = ({car: v758, cdr: (function(){
6504         var symbol = l230;
6505         var value = symbol.value;
6506         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6507         return value;
6508     })()});
6509     return ((l230).value = v763);
6510 })();
6511 var l284 = {name: "CATCH"};
6512 (function(){
6513     var v764 = l47.fvalue(pv, l284, (function (values,v766){
6514         checkArgsAtLeast(arguments, 2);
6515         var v765= l5.value;
6516         for (var i = arguments.length-1; i>=2; i--)
6517             v765 = {car: arguments[i], cdr:
6518         v765};
6519         return (function(){
6520             return l191.fvalue(values, "(function(){", (function(){
6521                 var symbol = l156;
6522                 var value = symbol.value;
6523                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6524                 return value;
6525             })(), l195.fvalue(pv, "var id = ", l193.fvalue(pv, v766), ";", (function(){
6526                 var symbol = l156;
6527                 var value = symbol.value;
6528                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6529                 return value;
6530             })(), "try {", (function(){
6531                 var symbol = l156;
6532                 var value = symbol.value;
6533                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6534                 return value;
6535             })(), l195.fvalue(pv, l254.fvalue(pv, v765, l4.value)), (function(){
6536                 var symbol = l156;
6537                 var value = symbol.value;
6538                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6539                 return value;
6540             })(), "}", (function(){
6541                 var symbol = l156;
6542                 var value = symbol.value;
6543                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6544                 return value;
6545             })(), "catch (cf){", (function(){
6546                 var symbol = l156;
6547                 var value = symbol.value;
6548                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6549                 return value;
6550             })(), "    if (cf.type == 'catch' && cf.id == id)", (function(){
6551                 var symbol = l156;
6552                 var value = symbol.value;
6553                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6554                 return value;
6555             })(), ((function(){
6556                 var symbol = l196;
6557                 var value = symbol.value;
6558                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6559                 return value;
6560             })() !== l5.value ? "        return values.apply(this, forcemv(cf.values));" : "        return pv.apply(this, forcemv(cf.values));"), (function(){
6561                 var symbol = l156;
6562                 var value = symbol.value;
6563                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6564                 return value;
6565             })(), "    else", (function(){
6566                 var symbol = l156;
6567                 var value = symbol.value;
6568                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6569                 return value;
6570             })(), "        throw cf;", (function(){
6571                 var symbol = l156;
6572                 var value = symbol.value;
6573                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6574                 return value;
6575             })(), "}", (function(){
6576                 var symbol = l156;
6577                 var value = symbol.value;
6578                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6579                 return value;
6580             })()), "})()");
6581         })();
6582     }));
6583     var v767 = ({car: v764, cdr: (function(){
6584         var symbol = l230;
6585         var value = symbol.value;
6586         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6587         return value;
6588     })()});
6589     return ((l230).value = v767);
6590 })();
6591 var l285 = {name: "THROW"};
6592 (function(){
6593     var v768 = l47.fvalue(pv, l285, (function (values,v769,v770){
6594         checkArgs(arguments, 3);
6595         return (function(){
6596             return l191.fvalue(values, "(function(){", (function(){
6597                 var symbol = l156;
6598                 var value = symbol.value;
6599                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6600                 return value;
6601             })(), l195.fvalue(pv, "var values = mv;", (function(){
6602                 var symbol = l156;
6603                 var value = symbol.value;
6604                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6605                 return value;
6606             })(), "throw ({", "type: 'catch', ", "id: ", l193.fvalue(pv, v769), ", ", "values: ", l193.fvalue(pv, v770, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
6607         })();
6608     }));
6609     var v771 = ({car: v768, cdr: (function(){
6610         var symbol = l230;
6611         var value = symbol.value;
6612         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6613         return value;
6614     })()});
6615     return ((l230).value = v771);
6616 })();
6617 var l286 = {name: "*TAGBODY-COUNTER*"};
6618 (function(){
6619     (((l286.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l286).value = 0));
6620     return l286;
6621 })();
6622 var l287 = {name: "*GO-TAG-COUNTER*"};
6623 (function(){
6624     (((l287.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l287).value = 0));
6625     return l287;
6626 })();
6627 var l288 = {name: "GO-TAG-P"};
6628 (function(){
6629     (l288).fvalue = (function(v774){
6630         ((v774)["fname"] = "GO-TAG-P");
6631         return v774;
6632     })((function (values,v772){
6633         checkArgs(arguments, 2);
6634         return (function(){
6635             return (function(v773){
6636                 return (v773 !== l5.value ? v773 : ((function(){
6637                     var tmp = v772;
6638                     return (typeof tmp == 'object' && 'name' in tmp);
6639                 })()?l4.value: l5.value));
6640             })(l89.fvalue(pv, v772));
6641         })();
6642     }));
6643     return l288;
6644 })();
6645 var l289 = {name: "DECLARE-TAGBODY-TAGS"};
6646 (function(){
6647     (l289).fvalue = (function(v780){
6648         ((v780)["fname"] = "DECLARE-TAGBODY-TAGS");
6649         return v780;
6650     })((function (values,v775,v776){
6651         checkArgs(arguments, 3);
6652         return (function(){
6653             return (function(v779){
6654                 return l210.fvalue(values, v779, (function(){
6655                     var symbol = l212;
6656                     var value = symbol.value;
6657                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6658                     return value;
6659                 })(), l209);
6660             })(l81.fvalue(pv, (function (values,v777){
6661                 checkArgs(arguments, 2);
6662                 return (function(v778){
6663                     return l197.fvalue(values, v777, l209, l47.fvalue(pv, v775, v778));
6664                 })(l19.fvalue(pv, ((l287).value = (function(){
6665                     var x1 = (function(){
6666                         var symbol = l287;
6667                         var value = symbol.value;
6668                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6669                         return value;
6670                     })();
6671                     if (typeof x1 !== 'number') throw 'Not a number!';
6672                     return x1+1;
6673                 })())));
6674             }), l99.fvalue(pv, (function(){
6675                 var symbol = l288;
6676                 var func = symbol.fvalue;
6677                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6678                 return func;
6679             })(), v776)));
6680         })();
6681     }));
6682     return l289;
6683 })();
6684 var l290 = {name: "TAGBODY"};
6685 var l291 = QIList(l5,l5);
6686 (function(){
6687     var v781 = l47.fvalue(pv, l290, (function (values){
6688         var v782= l5.value;
6689         for (var i = arguments.length-1; i>=1; i--)
6690             v782 = {car: arguments[i], cdr:
6691         v782};
6692         return (function(){
6693             try {
6694                 (l104.fvalue(pv, (function(){
6695                     var symbol = l288;
6696                     var func = symbol.fvalue;
6697                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6698                     return func;
6699                 })(), v782) !== l5.value ? l5.value : (function(){
6700                     var values = mv;
6701                     throw ({type: 'block', id: 244, values: l193.fvalue(values, ({car: l123, cdr: l68.fvalue(pv, v782, l291)})), message: 'Return from unknown block TAGBODY.'})
6702                 })());
6703                 (l288.fvalue(pv, (function(){
6704                     var tmp = v782;
6705                     return tmp === l5.value? l5.value: tmp.car;
6706                 })()) !== l5.value ? l5.value : (function(){
6707                     var v783 = l18.fvalue(pv, "START");
6708                     var v784 = ({car: v783, cdr: v782});
6709                     return (v782 = v784);
6710                 })());
6711                 return (function(v785){
6712                     return (function(v787,v786){
6713                         try {
6714                             var tmp;
6715                             tmp = l212.value;
6716                             l212.value = v787;
6717                             v787 = tmp;
6718                             (function(v788){
6719                                 return (v786 = l43.fvalue(pv, l200.fvalue(pv, v788)));
6720                             })(l211.fvalue(pv, l42.fvalue(pv, v782), (function(){
6721                                 var symbol = l212;
6722                                 var value = symbol.value;
6723                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6724                                 return value;
6725                             })(), l209));
6726                             return l191.fvalue(values, "(function(){", (function(){
6727                                 var symbol = l156;
6728                                 var value = symbol.value;
6729                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6730                                 return value;
6731                             })(), l195.fvalue(pv, "var tagbody_", v785, " = ", v786, ";", (function(){
6732                                 var symbol = l156;
6733                                 var value = symbol.value;
6734                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6735                                 return value;
6736                             })(), "tbloop:", (function(){
6737                                 var symbol = l156;
6738                                 var value = symbol.value;
6739                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6740                                 return value;
6741                             })(), "while (true) {", (function(){
6742                                 var symbol = l156;
6743                                 var value = symbol.value;
6744                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6745                                 return value;
6746                             })(), l195.fvalue(pv, "try {", (function(){
6747                                 var symbol = l156;
6748                                 var value = symbol.value;
6749                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6750                                 return value;
6751                             })(), l195.fvalue(pv, (function(v789){
6752                                 return l191.fvalue(pv, "switch(tagbody_", v785, "){", (function(){
6753                                     var symbol = l156;
6754                                     var value = symbol.value;
6755                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6756                                     return value;
6757                                 })(), "case ", v786, ":", (function(){
6758                                     var symbol = l156;
6759                                     var value = symbol.value;
6760                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6761                                     return value;
6762                                 })(), (function(){
6763                                     return (function(v790,v791){
6764                                         (function(){
6765                                             while(v790 !== l5.value){
6766                                                 (v791 = (function(){
6767                                                     var tmp = v790;
6768                                                     return tmp === l5.value? l5.value: tmp.car;
6769                                                 })());
6770                                                 (function(){
6771                                                     (v789 = l157.fvalue(pv, v789, (l29.fvalue(pv, l288.fvalue(pv, v791)) !== l5.value ? l195.fvalue(pv, l193.fvalue(pv, v791), ";", (function(){
6772                                                         var symbol = l156;
6773                                                         var value = symbol.value;
6774                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6775                                                         return value;
6776                                                     })()) : (function(v792){
6777                                                         return l191.fvalue(pv, "case ", l43.fvalue(pv, l200.fvalue(pv, v792)), ":", (function(){
6778                                                             var symbol = l156;
6779                                                             var value = symbol.value;
6780                                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6781                                                             return value;
6782                                                         })());
6783                                                     })(l211.fvalue(pv, v791, (function(){
6784                                                         var symbol = l212;
6785                                                         var value = symbol.value;
6786                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6787                                                         return value;
6788                                                     })(), l209)))));
6789                                                     return l5.value;
6790                                                 })();
6791                                                 (v790 = (function(){
6792                                                     var tmp = v790;
6793                                                     return tmp === l5.value? l5.value: tmp.cdr;
6794                                                 })());
6795                                             }return l5.value;
6796                                         })();
6797                                         return v789;
6798                                     })((function(){
6799                                         var tmp = v782;
6800                                         return tmp === l5.value? l5.value: tmp.cdr;
6801                                     })(),l5.value);
6802                                 })(), "default:", (function(){
6803                                     var symbol = l156;
6804                                     var value = symbol.value;
6805                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6806                                     return value;
6807                                 })(), "    break tbloop;", (function(){
6808                                     var symbol = l156;
6809                                     var value = symbol.value;
6810                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6811                                     return value;
6812                                 })(), "}", (function(){
6813                                     var symbol = l156;
6814                                     var value = symbol.value;
6815                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6816                                     return value;
6817                                 })());
6818                             })("")), "}", (function(){
6819                                 var symbol = l156;
6820                                 var value = symbol.value;
6821                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6822                                 return value;
6823                             })(), "catch (jump) {", (function(){
6824                                 var symbol = l156;
6825                                 var value = symbol.value;
6826                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6827                                 return value;
6828                             })(), "    if (jump.type == 'tagbody' && jump.id == ", v785, ")", (function(){
6829                                 var symbol = l156;
6830                                 var value = symbol.value;
6831                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6832                                 return value;
6833                             })(), "        tagbody_", v785, " = jump.label;", (function(){
6834                                 var symbol = l156;
6835                                 var value = symbol.value;
6836                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6837                                 return value;
6838                             })(), "    else", (function(){
6839                                 var symbol = l156;
6840                                 var value = symbol.value;
6841                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6842                                 return value;
6843                             })(), "        throw(jump);", (function(){
6844                                 var symbol = l156;
6845                                 var value = symbol.value;
6846                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6847                                 return value;
6848                             })(), "}", (function(){
6849                                 var symbol = l156;
6850                                 var value = symbol.value;
6851                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6852                                 return value;
6853                             })()), "}", (function(){
6854                                 var symbol = l156;
6855                                 var value = symbol.value;
6856                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6857                                 return value;
6858                             })(), "return ", l193.fvalue(pv, l5.value), ";", (function(){
6859                                 var symbol = l156;
6860                                 var value = symbol.value;
6861                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6862                                 return value;
6863                             })()), "})()");
6864                         }
6865                         finally {
6866                             l212.value = v787;
6867                         }
6868                     })(l289.fvalue(pv, v785, v782),l5.value);
6869                 })((function(){
6870                     var symbol = l286;
6871                     var value = symbol.value;
6872                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6873                     return value;
6874                 })());
6875             }
6876             catch (cf){
6877                 if (cf.type == 'block' && cf.id == 244)
6878                     return values.apply(this, forcemv(cf.values));
6879                 else
6880                     throw cf;
6881             }
6882         })();
6883     }));
6884     var v793 = ({car: v781, cdr: (function(){
6885         var symbol = l230;
6886         var value = symbol.value;
6887         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6888         return value;
6889     })()});
6890     return ((l230).value = v793);
6891 })();
6892 var l292 = {name: "GO"};
6893 (function(){
6894     var v794 = l47.fvalue(pv, l292, (function (values,v795){
6895         checkArgs(arguments, 2);
6896         return (function(){
6897             return (function(v796,v797){
6898                 (l13.fvalue(pv, v796) !== l5.value ? (function(){
6899                     throw l157.fvalue(pv, "Unknown tag `", v797, "'.");
6900                 })() : l5.value);
6901                 return l191.fvalue(values, "(function(){", (function(){
6902                     var symbol = l156;
6903                     var value = symbol.value;
6904                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6905                     return value;
6906                 })(), l195.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l42.fvalue(pv, l200.fvalue(pv, v796)), ", ", "label: ", l43.fvalue(pv, l200.fvalue(pv, v796)), ", ", "message: 'Attempt to GO to non-existing tag ", v797, "'", "})", (function(){
6907                     var symbol = l156;
6908                     var value = symbol.value;
6909                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6910                     return value;
6911                 })()), "})()");
6912             })(l211.fvalue(pv, v795, (function(){
6913                 var symbol = l212;
6914                 var value = symbol.value;
6915                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6916                 return value;
6917             })(), l209),(((function(){
6918                 var tmp = v795;
6919                 return (typeof tmp == 'object' && 'name' in tmp);
6920             })()?l4.value: l5.value) !== l5.value ? (v795).name : (l89.fvalue(pv, v795) !== l5.value ? l19.fvalue(pv, v795) : l5.value)));
6921         })();
6922     }));
6923     var v798 = ({car: v794, cdr: (function(){
6924         var symbol = l230;
6925         var value = symbol.value;
6926         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6927         return value;
6928     })()});
6929     return ((l230).value = v798);
6930 })();
6931 var l293 = {name: "UNWIND-PROTECT"};
6932 (function(){
6933     var v799 = l47.fvalue(pv, l293, (function (values,v801){
6934         checkArgsAtLeast(arguments, 2);
6935         var v800= l5.value;
6936         for (var i = arguments.length-1; i>=2; i--)
6937             v800 = {car: arguments[i], cdr:
6938         v800};
6939         return (function(){
6940             return l191.fvalue(values, "(function(){", (function(){
6941                 var symbol = l156;
6942                 var value = symbol.value;
6943                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6944                 return value;
6945             })(), l195.fvalue(pv, "var ret = ", l193.fvalue(pv, l5.value), ";", (function(){
6946                 var symbol = l156;
6947                 var value = symbol.value;
6948                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6949                 return value;
6950             })(), "try {", (function(){
6951                 var symbol = l156;
6952                 var value = symbol.value;
6953                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6954                 return value;
6955             })(), l195.fvalue(pv, "ret = ", l193.fvalue(pv, v801), ";", (function(){
6956                 var symbol = l156;
6957                 var value = symbol.value;
6958                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6959                 return value;
6960             })()), "} finally {", (function(){
6961                 var symbol = l156;
6962                 var value = symbol.value;
6963                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6964                 return value;
6965             })(), l195.fvalue(pv, l254.fvalue(pv, v800)), "}", (function(){
6966                 var symbol = l156;
6967                 var value = symbol.value;
6968                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6969                 return value;
6970             })(), "return ret;", (function(){
6971                 var symbol = l156;
6972                 var value = symbol.value;
6973                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6974                 return value;
6975             })()), "})()");
6976         })();
6977     }));
6978     var v802 = ({car: v799, cdr: (function(){
6979         var symbol = l230;
6980         var value = symbol.value;
6981         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6982         return value;
6983     })()});
6984     return ((l230).value = v802);
6985 })();
6986 var l294 = {name: "MULTIPLE-VALUE-CALL"};
6987 (function(){
6988     var v803 = l47.fvalue(pv, l294, (function (values,v805){
6989         checkArgsAtLeast(arguments, 2);
6990         var v804= l5.value;
6991         for (var i = arguments.length-1; i>=2; i--)
6992             v804 = {car: arguments[i], cdr:
6993         v804};
6994         return (function(){
6995             return l191.fvalue(values, "(function(){", (function(){
6996                 var symbol = l156;
6997                 var value = symbol.value;
6998                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6999                 return value;
7000             })(), l195.fvalue(pv, "var func = ", l193.fvalue(pv, v805), ";", (function(){
7001                 var symbol = l156;
7002                 var value = symbol.value;
7003                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7004                 return value;
7005             })(), "var args = [", ((function(){
7006                 var symbol = l196;
7007                 var value = symbol.value;
7008                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7009                 return value;
7010             })() !== l5.value ? "values" : "pv"), "];", (function(){
7011                 var symbol = l156;
7012                 var value = symbol.value;
7013                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7014                 return value;
7015             })(), "return ", l191.fvalue(pv, "(function(){", (function(){
7016                 var symbol = l156;
7017                 var value = symbol.value;
7018                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7019                 return value;
7020             })(), l195.fvalue(pv, "var values = mv;", (function(){
7021                 var symbol = l156;
7022                 var value = symbol.value;
7023                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7024                 return value;
7025             })(), "var vs;", (function(){
7026                 var symbol = l156;
7027                 var value = symbol.value;
7028                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7029                 return value;
7030             })(), l161.fvalue(pv, (function (values,v806){
7031                 checkArgs(arguments, 2);
7032                 return l191.fvalue(values, "vs = ", l193.fvalue(pv, v806, l4.value), ";", (function(){
7033                     var symbol = l156;
7034                     var value = symbol.value;
7035                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7036                     return value;
7037                 })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){
7038                     var symbol = l156;
7039                     var value = symbol.value;
7040                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7041                     return value;
7042                 })(), l195.fvalue(pv, "args = args.concat(vs);", (function(){
7043                     var symbol = l156;
7044                     var value = symbol.value;
7045                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7046                     return value;
7047                 })()), "else", (function(){
7048                     var symbol = l156;
7049                     var value = symbol.value;
7050                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7051                     return value;
7052                 })(), l195.fvalue(pv, "args.push(vs);", (function(){
7053                     var symbol = l156;
7054                     var value = symbol.value;
7055                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7056                     return value;
7057                 })()));
7058             }), v804), "return func.apply(window, args);", (function(){
7059                 var symbol = l156;
7060                 var value = symbol.value;
7061                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7062                 return value;
7063             })()), "})()"), ";", (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         })();
7070     }));
7071     var v807 = ({car: v803, cdr: (function(){
7072         var symbol = l230;
7073         var value = symbol.value;
7074         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7075         return value;
7076     })()});
7077     return ((l230).value = v807);
7078 })();
7079 var l295 = {name: "MULTIPLE-VALUE-PROG1"};
7080 (function(){
7081     var v808 = l47.fvalue(pv, l295, (function (values,v810){
7082         checkArgsAtLeast(arguments, 2);
7083         var v809= l5.value;
7084         for (var i = arguments.length-1; i>=2; i--)
7085             v809 = {car: arguments[i], cdr:
7086         v809};
7087         return (function(){
7088             return l191.fvalue(values, "(function(){", (function(){
7089                 var symbol = l156;
7090                 var value = symbol.value;
7091                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7092                 return value;
7093             })(), l195.fvalue(pv, "var args = ", l193.fvalue(pv, v810, (function(){
7094                 var symbol = l196;
7095                 var value = symbol.value;
7096                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7097                 return value;
7098             })()), ";", (function(){
7099                 var symbol = l156;
7100                 var value = symbol.value;
7101                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7102                 return value;
7103             })(), l254.fvalue(pv, v809), "return args;", (function(){
7104                 var symbol = l156;
7105                 var value = symbol.value;
7106                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7107                 return value;
7108             })()), "})()");
7109         })();
7110     }));
7111     var v811 = ({car: v808, cdr: (function(){
7112         var symbol = l230;
7113         var value = symbol.value;
7114         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7115         return value;
7116     })()});
7117     return ((l230).value = v811);
7118 })();
7119 var l296 = {name: "*COMMA*"};
7120 (function(){
7121     (((l296.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l296).value = l189));
7122     return l296;
7123 })();
7124 var l297 = {name: "*COMMA-ATSIGN*"};
7125 (function(){
7126     (((l297.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l297).value = l188));
7127     return l297;
7128 })();
7129 var l298 = {name: "*BQ-LIST*"};
7130 (function(){
7131     (((l298.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l298).value = (function(){
7132         var name = "BQ-LIST";
7133         if (typeof name != 'string')
7134             throw 'The value ' + name + ' is not a type string.';
7135         return ({name: name});
7136     })()));
7137     return l298;
7138 })();
7139 var l299 = {name: "*BQ-APPEND*"};
7140 (function(){
7141     (((l299.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l299).value = (function(){
7142         var name = "BQ-APPEND";
7143         if (typeof name != 'string')
7144             throw 'The value ' + name + ' is not a type string.';
7145         return ({name: name});
7146     })()));
7147     return l299;
7148 })();
7149 var l300 = {name: "*BQ-LIST**"};
7150 (function(){
7151     (((l300.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l300).value = (function(){
7152         var name = "BQ-LIST*";
7153         if (typeof name != 'string')
7154             throw 'The value ' + name + ' is not a type string.';
7155         return ({name: name});
7156     })()));
7157     return l300;
7158 })();
7159 var l301 = {name: "*BQ-NCONC*"};
7160 (function(){
7161     (((l301.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l301).value = (function(){
7162         var name = "BQ-NCONC";
7163         if (typeof name != 'string')
7164             throw 'The value ' + name + ' is not a type string.';
7165         return ({name: name});
7166     })()));
7167     return l301;
7168 })();
7169 var l302 = {name: "*BQ-CLOBBERABLE*"};
7170 (function(){
7171     (((l302.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l302).value = (function(){
7172         var name = "BQ-CLOBBERABLE";
7173         if (typeof name != 'string')
7174             throw 'The value ' + name + ' is not a type string.';
7175         return ({name: name});
7176     })()));
7177     return l302;
7178 })();
7179 var l303 = {name: "*BQ-QUOTE*"};
7180 (function(){
7181     (((l303.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l303).value = (function(){
7182         var name = "BQ-QUOTE";
7183         if (typeof name != 'string')
7184             throw 'The value ' + name + ' is not a type string.';
7185         return ({name: name});
7186     })()));
7187     return l303;
7188 })();
7189 var l304 = {name: "*BQ-QUOTE-NIL*"};
7190 (function(){
7191     (((l304.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l304).value = l47.fvalue(pv, (function(){
7192         var symbol = l303;
7193         var value = symbol.value;
7194         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7195         return value;
7196     })(), l5.value)));
7197     return l304;
7198 })();
7199 var l305 = {name: "*BQ-SIMPLIFY*"};
7200 (function(){
7201     ((l305).value = l4.value);
7202     return l305;
7203 })();
7204 l187;
7205 var l306 = {name: "BQ-COMPLETELY-PROCESS"};
7206 var l307 = {name: "BQ-PROCESS"};
7207 var l308 = {name: "BQ-SIMPLIFY"};
7208 var l309 = {name: "BQ-REMOVE-TOKENS"};
7209 (function(){
7210     (l306).fvalue = (function(v814){
7211         ((v814)["fname"] = "BQ-COMPLETELY-PROCESS");
7212         return v814;
7213     })((function (values,v812){
7214         checkArgs(arguments, 2);
7215         return (function(){
7216             return (function(v813){
7217                 return l309.fvalue(values, ((function(){
7218                     var symbol = l305;
7219                     var value = symbol.value;
7220                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7221                     return value;
7222                 })() !== l5.value ? l308.fvalue(pv, v813) : v813));
7223             })(l307.fvalue(pv, v812));
7224         })();
7225     }));
7226     return l306;
7227 })();
7228 var l310 = {name: "BRACKET"};
7229 (function(){
7230     (l307).fvalue = (function(v820){
7231         ((v820)["fname"] = "BQ-PROCESS");
7232         return v820;
7233     })((function (values,v815){
7234         checkArgs(arguments, 2);
7235         return (function(){
7236             return (l48.fvalue(pv, v815) !== l5.value ? l47.fvalue(values, (function(){
7237                 var symbol = l303;
7238                 var value = symbol.value;
7239                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7240                 return value;
7241             })(), v815) : ((((function(){
7242                 var tmp = v815;
7243                 return tmp === l5.value? l5.value: tmp.car;
7244             })() === l187)?l4.value: l5.value) !== l5.value ? l307.fvalue(values, l306.fvalue(pv, l35.fvalue(pv, v815))) : ((((function(){
7245                 var tmp = v815;
7246                 return tmp === l5.value? l5.value: tmp.car;
7247             })() === (function(){
7248                 var symbol = l296;
7249                 var value = symbol.value;
7250                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7251                 return value;
7252             })())?l4.value: l5.value) !== l5.value ? l35.fvalue(values, v815) : ((((function(){
7253                 var tmp = v815;
7254                 return tmp === l5.value? l5.value: tmp.car;
7255             })() === (function(){
7256                 var symbol = l297;
7257                 var value = symbol.value;
7258                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7259                 return value;
7260             })())?l4.value: l5.value) !== l5.value ? (function(){
7261                 throw "ill-formed";
7262             })() : (function(){
7263                 return (function(v816,v817){
7264                     return (function(){
7265                         try {
7266                             return (function(){
7267                                 while(l4.value !== l5.value){
7268                                     (l48.fvalue(pv, v816) !== l5.value ? (function(){
7269                                         var values = mv;
7270                                         throw ({type: 'block', id: 253, values: ({car: (function(){
7271                                             var symbol = l299;
7272                                             var value = symbol.value;
7273                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7274                                             return value;
7275                                         })(), cdr: l128.fvalue(pv, v817, l47.fvalue(pv, l47.fvalue(pv, (function(){
7276                                             var symbol = l303;
7277                                             var value = symbol.value;
7278                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7279                                             return value;
7280                                         })(), v816)))}), message: 'Return from unknown block NIL.'})
7281                                     })() : l5.value);
7282                                     (function(){
7283                                         ((((function(){
7284                                             var tmp = v816;
7285                                             return tmp === l5.value? l5.value: tmp.car;
7286                                         })() === (function(){
7287                                             var symbol = l296;
7288                                             var value = symbol.value;
7289                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7290                                             return value;
7291                                         })())?l4.value: l5.value) !== l5.value ? (function(){
7292                                             (l13.fvalue(pv, l37.fvalue(pv, v816)) !== l5.value ? l5.value : (function(){
7293                                                 throw "Malformed";
7294                                             })());
7295                                             return (function(){
7296                                                 var values = mv;
7297                                                 throw ({type: 'block', id: 253, values: ({car: (function(){
7298                                                     var symbol = l299;
7299                                                     var value = symbol.value;
7300                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7301                                                     return value;
7302                                                 })(), cdr: l128.fvalue(pv, v817, l47.fvalue(pv, l35.fvalue(pv, v816)))}), message: 'Return from unknown block NIL.'})
7303                                             })();
7304                                         })() : l5.value);
7305                                         ((((function(){
7306                                             var tmp = v816;
7307                                             return tmp === l5.value? l5.value: tmp.car;
7308                                         })() === (function(){
7309                                             var symbol = l297;
7310                                             var value = symbol.value;
7311                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7312                                             return value;
7313                                         })())?l4.value: l5.value) !== l5.value ? (function(){
7314                                             throw "Dotted";
7315                                         })() : l5.value);
7316                                         return l5.value;
7317                                     })();
7318                                     (function(v818,v819){
7319                                         return (v816 = v818, v817 = v819);
7320                                     })((function(){
7321                                         var tmp = v816;
7322                                         return tmp === l5.value? l5.value: tmp.cdr;
7323                                     })(),({car: l310.fvalue(pv, (function(){
7324                                         var tmp = v816;
7325                                         return tmp === l5.value? l5.value: tmp.car;
7326                                     })()), cdr: v817}));
7327                                 }return l5.value;
7328                             })();
7329                         }
7330                         catch (cf){
7331                             if (cf.type == 'block' && cf.id == 253)
7332                                 return values.apply(this, forcemv(cf.values));
7333                             else
7334                                 throw cf;
7335                         }
7336                     })();
7337                 })(v815,l5);
7338             })()))));
7339         })();
7340     }));
7341     return l307;
7342 })();
7343 (function(){
7344     (l310).fvalue = (function(v822){
7345         ((v822)["fname"] = "BRACKET");
7346         return v822;
7347     })((function (values,v821){
7348         checkArgs(arguments, 2);
7349         return (function(){
7350             return (l48.fvalue(pv, v821) !== l5.value ? l47.fvalue(values, (function(){
7351                 var symbol = l298;
7352                 var value = symbol.value;
7353                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7354                 return value;
7355             })(), l307.fvalue(pv, v821)) : ((((function(){
7356                 var tmp = v821;
7357                 return tmp === l5.value? l5.value: tmp.car;
7358             })() === (function(){
7359                 var symbol = l296;
7360                 var value = symbol.value;
7361                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7362                 return value;
7363             })())?l4.value: l5.value) !== l5.value ? l47.fvalue(values, (function(){
7364                 var symbol = l298;
7365                 var value = symbol.value;
7366                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7367                 return value;
7368             })(), l35.fvalue(pv, v821)) : ((((function(){
7369                 var tmp = v821;
7370                 return tmp === l5.value? l5.value: tmp.car;
7371             })() === (function(){
7372                 var symbol = l297;
7373                 var value = symbol.value;
7374                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7375                 return value;
7376             })())?l4.value: l5.value) !== l5.value ? l35.fvalue(values, v821) : l47.fvalue(values, (function(){
7377                 var symbol = l298;
7378                 var value = symbol.value;
7379                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7380                 return value;
7381             })(), l307.fvalue(pv, v821)))));
7382         })();
7383     }));
7384     return l310;
7385 })();
7386 var l311 = {name: "MAPTREE"};
7387 (function(){
7388     (l311).fvalue = (function(v827){
7389         ((v827)["fname"] = "MAPTREE");
7390         return v827;
7391     })((function (values,v823,v824){
7392         checkArgs(arguments, 3);
7393         return (function(){
7394             return (l48.fvalue(pv, v824) !== l5.value ? (function(){
7395                 var f = v823;
7396                 return (typeof f === 'function'? f: f.fvalue)(values, v824)
7397             })() : (function(v825,v826){
7398                 return ((l28.fvalue(pv, v825, (function(){
7399                     var tmp = v824;
7400                     return tmp === l5.value? l5.value: tmp.car;
7401                 })()) !== l5.value ? l28.fvalue(pv, v826, (function(){
7402                     var tmp = v824;
7403                     return tmp === l5.value? l5.value: tmp.cdr;
7404                 })()) : l5.value) !== l5.value ? v824 : ({car: v825, cdr: v826}));
7405             })((function(){
7406                 var f = v823;
7407                 return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
7408                     var tmp = v824;
7409                     return tmp === l5.value? l5.value: tmp.car;
7410                 })())
7411             })(),l311.fvalue(pv, v823, (function(){
7412                 var tmp = v824;
7413                 return tmp === l5.value? l5.value: tmp.cdr;
7414             })())));
7415         })();
7416     }));
7417     return l311;
7418 })();
7419 var l312 = {name: "BQ-SPLICING-FROB"};
7420 (function(){
7421     (l312).fvalue = (function(v829){
7422         ((v829)["fname"] = "BQ-SPLICING-FROB");
7423         return v829;
7424     })((function (values,v828){
7425         checkArgs(arguments, 2);
7426         return (function(){
7427             return (((function(){
7428                 var tmp = v828;
7429                 return (typeof tmp == 'object' && 'car' in tmp);
7430             })()?l4.value: l5.value) !== l5.value ? (((function(){
7431                 var tmp = v828;
7432                 return tmp === l5.value? l5.value: tmp.car;
7433             })() === (function(){
7434                 var symbol = l297;
7435                 var value = symbol.value;
7436                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7437                 return value;
7438             })())?l4.value: l5.value) : l5.value);
7439         })();
7440     }));
7441     return l312;
7442 })();
7443 var l313 = {name: "BQ-FROB"};
7444 (function(){
7445     (l313).fvalue = (function(v832){
7446         ((v832)["fname"] = "BQ-FROB");
7447         return v832;
7448     })((function (values,v830){
7449         checkArgs(arguments, 2);
7450         return (function(){
7451             return (((function(){
7452                 var tmp = v830;
7453                 return (typeof tmp == 'object' && 'car' in tmp);
7454             })()?l4.value: l5.value) !== l5.value ? (function(v831){
7455                 return (v831 !== l5.value ? v831 : (((function(){
7456                     var tmp = v830;
7457                     return tmp === l5.value? l5.value: tmp.car;
7458                 })() === (function(){
7459                     var symbol = l297;
7460                     var value = symbol.value;
7461                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7462                     return value;
7463                 })())?l4.value: l5.value));
7464             })((((function(){
7465                 var tmp = v830;
7466                 return tmp === l5.value? l5.value: tmp.car;
7467             })() === (function(){
7468                 var symbol = l296;
7469                 var value = symbol.value;
7470                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7471                 return value;
7472             })())?l4.value: l5.value)) : l5.value);
7473         })();
7474     }));
7475     return l313;
7476 })();
7477 var l314 = {name: "BQ-SIMPLIFY-ARGS"};
7478 (function(){
7479     (l308).fvalue = (function(v835){
7480         ((v835)["fname"] = "BQ-SIMPLIFY");
7481         return v835;
7482     })((function (values,v833){
7483         checkArgs(arguments, 2);
7484         return (function(){
7485             return (l48.fvalue(pv, v833) !== l5.value ? v833 : (function(v834){
7486                 return (l29.fvalue(pv, (((function(){
7487                     var tmp = v834;
7488                     return tmp === l5.value? l5.value: tmp.car;
7489                 })() === (function(){
7490                     var symbol = l299;
7491                     var value = symbol.value;
7492                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7493                     return value;
7494                 })())?l4.value: l5.value)) !== l5.value ? v834 : l314.fvalue(values, v834));
7495             })(((((function(){
7496                 var tmp = v833;
7497                 return tmp === l5.value? l5.value: tmp.car;
7498             })() === (function(){
7499                 var symbol = l303;
7500                 var value = symbol.value;
7501                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7502                 return value;
7503             })())?l4.value: l5.value) !== l5.value ? v833 : l311.fvalue(pv, (function(){
7504                 var symbol = l308;
7505                 var func = symbol.fvalue;
7506                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7507                 return func;
7508             })(), v833))));
7509         })();
7510     }));
7511     return l308;
7512 })();
7513 var l315 = {name: "BQ-ATTACH-APPEND"};
7514 var l316 = {name: "BQ-ATTACH-CONSES"};
7515 var l317 = {name: "CDDAR"};
7516 var l318 = {name: "CAADAR"};
7517 (function(){
7518     (l314).fvalue = (function(v841){
7519         ((v841)["fname"] = "BQ-SIMPLIFY-ARGS");
7520         return v841;
7521     })((function (values,v836){
7522         checkArgs(arguments, 2);
7523         return (function(){
7524             return (function(){
7525                 return (function(v837,v838){
7526                     return (function(){
7527                         try {
7528                             return (function(){
7529                                 while(l4.value !== l5.value){
7530                                     (l13.fvalue(pv, v837) !== l5.value ? (function(){
7531                                         var values = mv;
7532                                         throw ({type: 'block', id: 261, values: v838, message: 'Return from unknown block NIL.'})
7533                                     })() : l5.value);
7534                                     l5.value;
7535                                     (function(v839,v840){
7536                                         return (v837 = v839, v838 = v840);
7537                                     })((function(){
7538                                         var tmp = v837;
7539                                         return tmp === l5.value? l5.value: tmp.cdr;
7540                                     })(),(l48.fvalue(pv, (function(){
7541                                         var tmp = v837;
7542                                         return tmp === l5.value? l5.value: tmp.car;
7543                                     })()) !== l5.value ? l315.fvalue(pv, (function(){
7544                                         var symbol = l299;
7545                                         var value = symbol.value;
7546                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7547                                         return value;
7548                                     })(), (function(){
7549                                         var tmp = v837;
7550                                         return tmp === l5.value? l5.value: tmp.car;
7551                                     })(), v838) : ((((l34.fvalue(pv, v837) === (function(){
7552                                         var symbol = l298;
7553                                         var value = symbol.value;
7554                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7555                                         return value;
7556                                     })())?l4.value: l5.value) !== l5.value ? l129.fvalue(pv, (function(){
7557                                         var symbol = l312;
7558                                         var func = symbol.fvalue;
7559                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7560                                         return func;
7561                                     })(), l36.fvalue(pv, v837)) : l5.value) !== l5.value ? l316.fvalue(pv, l36.fvalue(pv, v837), v838) : ((((l34.fvalue(pv, v837) === (function(){
7562                                         var symbol = l300;
7563                                         var value = symbol.value;
7564                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7565                                         return value;
7566                                     })())?l4.value: l5.value) !== l5.value ? l129.fvalue(pv, (function(){
7567                                         var symbol = l312;
7568                                         var func = symbol.fvalue;
7569                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7570                                         return func;
7571                                     })(), l36.fvalue(pv, v837)) : l5.value) !== l5.value ? l316.fvalue(pv, l70.fvalue(pv, (function(){
7572                                         var tmp = l70.fvalue(pv, l36.fvalue(pv, v837));
7573                                         return tmp === l5.value? l5.value: tmp.cdr;
7574                                     })()), l315.fvalue(pv, (function(){
7575                                         var symbol = l299;
7576                                         var value = symbol.value;
7577                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7578                                         return value;
7579                                     })(), (function(){
7580                                         var tmp = l94.fvalue(pv, (function(){
7581                                             var tmp = v837;
7582                                             return tmp === l5.value? l5.value: tmp.car;
7583                                         })());
7584                                         return tmp === l5.value? l5.value: tmp.car;
7585                                     })(), v838)) : ((((l34.fvalue(pv, v837) === (function(){
7586                                         var symbol = l303;
7587                                         var value = symbol.value;
7588                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7589                                         return value;
7590                                     })())?l4.value: l5.value) !== l5.value ? (((function(){
7591                                         var tmp = l38.fvalue(pv, v837);
7592                                         return (typeof tmp == 'object' && 'car' in tmp);
7593                                     })()?l4.value: l5.value) !== l5.value ? (l29.fvalue(pv, l313.fvalue(pv, l38.fvalue(pv, v837))) !== l5.value ? l13.fvalue(pv, l317.fvalue(pv, v837)) : l5.value) : l5.value) : l5.value) !== l5.value ? l316.fvalue(pv, l47.fvalue(pv, l47.fvalue(pv, (function(){
7594                                         var symbol = l303;
7595                                         var value = symbol.value;
7596                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7597                                         return value;
7598                                     })(), l318.fvalue(pv, v837))), v838) : (((l34.fvalue(pv, v837) === (function(){
7599                                         var symbol = l302;
7600                                         var value = symbol.value;
7601                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7602                                         return value;
7603                                     })())?l4.value: l5.value) !== l5.value ? l315.fvalue(pv, (function(){
7604                                         var symbol = l301;
7605                                         var value = symbol.value;
7606                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7607                                         return value;
7608                                     })(), l38.fvalue(pv, v837), v838) : l315.fvalue(pv, (function(){
7609                                         var symbol = l299;
7610                                         var value = symbol.value;
7611                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7612                                         return value;
7613                                     })(), (function(){
7614                                         var tmp = v837;
7615                                         return tmp === l5.value? l5.value: tmp.car;
7616                                     })(), v838)))))));
7617                                 }return l5.value;
7618                             })();
7619                         }
7620                         catch (cf){
7621                             if (cf.type == 'block' && cf.id == 261)
7622                                 return values.apply(this, forcemv(cf.values));
7623                             else
7624                                 throw cf;
7625                         }
7626                     })();
7627                 })(l70.fvalue(pv, (function(){
7628                     var tmp = v836;
7629                     return tmp === l5.value? l5.value: tmp.cdr;
7630                 })()),l5.value);
7631             })();
7632         })();
7633     }));
7634     return l314;
7635 })();
7636 var l319 = {name: "NULL-OR-QUOTED"};
7637 (function(){
7638     (l319).fvalue = (function(v844){
7639         ((v844)["fname"] = "NULL-OR-QUOTED");
7640         return v844;
7641     })((function (values,v842){
7642         checkArgs(arguments, 2);
7643         return (function(){
7644             return (function(v843){
7645                 return (v843 !== l5.value ? v843 : (((function(){
7646                     var tmp = v842;
7647                     return (typeof tmp == 'object' && 'car' in tmp);
7648                 })()?l4.value: l5.value) !== l5.value ? (((function(){
7649                     var tmp = v842;
7650                     return tmp === l5.value? l5.value: tmp.car;
7651                 })() === (function(){
7652                     var symbol = l303;
7653                     var value = symbol.value;
7654                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7655                     return value;
7656                 })())?l4.value: l5.value) : l5.value));
7657             })(l13.fvalue(pv, v842));
7658         })();
7659     }));
7660     return l319;
7661 })();
7662 (function(){
7663     (l315).fvalue = (function(v849){
7664         ((v849)["fname"] = "BQ-ATTACH-APPEND");
7665         return v849;
7666     })((function (values,v845,v846,v847){
7667         checkArgs(arguments, 4);
7668         return (function(){
7669             return ((l319.fvalue(pv, v846) !== l5.value ? l319.fvalue(pv, v847) : l5.value) !== l5.value ? l47.fvalue(values, (function(){
7670                 var symbol = l303;
7671                 var value = symbol.value;
7672                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7673                 return value;
7674             })(), l68.fvalue(pv, l35.fvalue(pv, v846), l35.fvalue(pv, v847))) : ((function(v848){
7675                 return (v848 !== l5.value ? v848 : ((v847 == (function(){
7676                     var symbol = l304;
7677                     var value = symbol.value;
7678                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7679                     return value;
7680                 })())?l4.value: l5.value));
7681             })(l13.fvalue(pv, v847)) !== l5.value ? (l312.fvalue(pv, v846) !== l5.value ? l47.fvalue(values, v845, v846) : v846) : ((((function(){
7682                 var tmp = v847;
7683                 return (typeof tmp == 'object' && 'car' in tmp);
7684             })()?l4.value: l5.value) !== l5.value ? (((function(){
7685                 var tmp = v847;
7686                 return tmp === l5.value? l5.value: tmp.car;
7687             })() === v845)?l4.value: l5.value) : l5.value) !== l5.value ? l85.fvalue(values, (function(){
7688                 var tmp = v847;
7689                 return tmp === l5.value? l5.value: tmp.car;
7690             })(), v846, (function(){
7691                 var tmp = v847;
7692                 return tmp === l5.value? l5.value: tmp.cdr;
7693             })()) : l47.fvalue(values, v845, v846, v847))));
7694         })();
7695     }));
7696     return l315;
7697 })();
7698 (function(){
7699     (l316).fvalue = (function(v854){
7700         ((v854)["fname"] = "BQ-ATTACH-CONSES");
7701         return v854;
7702     })((function (values,v850,v851){
7703         checkArgs(arguments, 3);
7704         return (function(){
7705             return ((l105.fvalue(pv, (function(){
7706                 var symbol = l319;
7707                 var func = symbol.fvalue;
7708                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7709                 return func;
7710             })(), v850) !== l5.value ? l319.fvalue(pv, v851) : l5.value) !== l5.value ? l47.fvalue(values, (function(){
7711                 var symbol = l303;
7712                 var value = symbol.value;
7713                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7714                 return value;
7715             })(), l68.fvalue(pv, l81.fvalue(pv, (function(){
7716                 var symbol = l35;
7717                 var func = symbol.fvalue;
7718                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7719                 return func;
7720             })(), v850), l35.fvalue(pv, v851))) : ((function(v852){
7721                 return (v852 !== l5.value ? v852 : ((v851 == (function(){
7722                     var symbol = l304;
7723                     var value = symbol.value;
7724                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7725                     return value;
7726                 })())?l4.value: l5.value));
7727             })(l13.fvalue(pv, v851)) !== l5.value ? ({car: (function(){
7728                 var symbol = l298;
7729                 var value = symbol.value;
7730                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7731                 return value;
7732             })(), cdr: v850}) : ((((function(){
7733                 var tmp = v851;
7734                 return (typeof tmp == 'object' && 'car' in tmp);
7735             })()?l4.value: l5.value) !== l5.value ? (function(v853){
7736                 return (v853 !== l5.value ? v853 : (((function(){
7737                     var tmp = v851;
7738                     return tmp === l5.value? l5.value: tmp.car;
7739                 })() === (function(){
7740                     var symbol = l300;
7741                     var value = symbol.value;
7742                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7743                     return value;
7744                 })())?l4.value: l5.value));
7745             })((((function(){
7746                 var tmp = v851;
7747                 return tmp === l5.value? l5.value: tmp.car;
7748             })() === (function(){
7749                 var symbol = l298;
7750                 var value = symbol.value;
7751                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7752                 return value;
7753             })())?l4.value: l5.value)) : l5.value) !== l5.value ? ({car: (function(){
7754                 var tmp = v851;
7755                 return tmp === l5.value? l5.value: tmp.car;
7756             })(), cdr: l68.fvalue(pv, v850, (function(){
7757                 var tmp = v851;
7758                 return tmp === l5.value? l5.value: tmp.cdr;
7759             })())}) : ({car: (function(){
7760                 var symbol = l300;
7761                 var value = symbol.value;
7762                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7763                 return value;
7764             })(), cdr: l68.fvalue(pv, v850, l47.fvalue(pv, v851))}))));
7765         })();
7766     }));
7767     return l316;
7768 })();
7769 (function(){
7770     (l309).fvalue = (function(v856){
7771         ((v856)["fname"] = "BQ-REMOVE-TOKENS");
7772         return v856;
7773     })((function (values,v855){
7774         checkArgs(arguments, 2);
7775         return (function(){
7776             return (((v855 === (function(){
7777                 var symbol = l298;
7778                 var value = symbol.value;
7779                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7780                 return value;
7781             })())?l4.value: l5.value) !== l5.value ? l47 : (((v855 === (function(){
7782                 var symbol = l299;
7783                 var value = symbol.value;
7784                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7785                 return value;
7786             })())?l4.value: l5.value) !== l5.value ? l68 : (((v855 === (function(){
7787                 var symbol = l301;
7788                 var value = symbol.value;
7789                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7790                 return value;
7791             })())?l4.value: l5.value) !== l5.value ? l127 : (((v855 === (function(){
7792                 var symbol = l300;
7793                 var value = symbol.value;
7794                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7795                 return value;
7796             })())?l4.value: l5.value) !== l5.value ? l85 : (((v855 === (function(){
7797                 var symbol = l303;
7798                 var value = symbol.value;
7799                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7800                 return value;
7801             })())?l4.value: l5.value) !== l5.value ? l186 : (l48.fvalue(pv, v855) !== l5.value ? v855 : ((((function(){
7802                 var tmp = v855;
7803                 return tmp === l5.value? l5.value: tmp.car;
7804             })() === (function(){
7805                 var symbol = l302;
7806                 var value = symbol.value;
7807                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7808                 return value;
7809             })())?l4.value: l5.value) !== l5.value ? l309.fvalue(values, l35.fvalue(pv, v855)) : (((((function(){
7810                 var tmp = v855;
7811                 return tmp === l5.value? l5.value: tmp.car;
7812             })() === (function(){
7813                 var symbol = l300;
7814                 var value = symbol.value;
7815                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7816                 return value;
7817             })())?l4.value: l5.value) !== l5.value ? (((function(){
7818                 var tmp = l37.fvalue(pv, v855);
7819                 return (typeof tmp == 'object' && 'car' in tmp);
7820             })()?l4.value: l5.value) !== l5.value ? l13.fvalue(pv, l40.fvalue(pv, v855)) : l5.value) : l5.value) !== l5.value ? ({car: l30, cdr: l311.fvalue(pv, (function(){
7821                 var symbol = l309;
7822                 var func = symbol.fvalue;
7823                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7824                 return func;
7825             })(), (function(){
7826                 var tmp = v855;
7827                 return tmp === l5.value? l5.value: tmp.cdr;
7828             })())}) : l311.fvalue(values, (function(){
7829                 var symbol = l309;
7830                 var func = symbol.fvalue;
7831                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7832                 return func;
7833             })(), v855)))))))));
7834         })();
7835     }));
7836     return l309;
7837 })();
7838 (function(){
7839     var v857 = l47.fvalue(pv, l187, (function (values,v858){
7840         checkArgs(arguments, 2);
7841         return (function(){
7842             return l193.fvalue(values, l306.fvalue(pv, v858));
7843         })();
7844     }));
7845     var v859 = ({car: v857, cdr: (function(){
7846         var symbol = l230;
7847         var value = symbol.value;
7848         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7849         return value;
7850     })()});
7851     return ((l230).value = v859);
7852 })();
7853 var l320 = {name: "*BUILTINS*"};
7854 (function(){
7855     (((l320.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l320).value = l5.value));
7856     return l320;
7857 })();
7858 var l321 = {name: "DEFINE-RAW-BUILTIN"};
7859 l321;
7860 var l322 = {name: "DEFINE-BUILTIN"};
7861 l322;
7862 var l323 = {name: "TYPE-CHECK"};
7863 l323;
7864 var l324 = {name: "VARIABLE-ARITY-CALL"};
7865 (function(){
7866     (l324).fvalue = (function(v872){
7867         ((v872)["fname"] = "VARIABLE-ARITY-CALL");
7868         return v872;
7869     })((function (values,v860,v861){
7870         checkArgs(arguments, 3);
7871         return (function(){
7872             (((function(){
7873                 var tmp = v860;
7874                 return (typeof tmp == 'object' && 'car' in tmp);
7875             })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
7876                 throw "ARGS must be a non-empty list";
7877             })());
7878             return (function(v862,v863,v864){
7879                 (function(){
7880                     return (function(v865,v866){
7881                         (function(){
7882                             while(v865 !== l5.value){
7883                                 (v866 = (function(){
7884                                     var tmp = v865;
7885                                     return tmp === l5.value? l5.value: tmp.car;
7886                                 })());
7887                                 (function(){
7888                                     (((typeof (v866) == "number")?l4.value: l5.value) !== l5.value ? (function(){
7889                                         var v867 = l19.fvalue(pv, v866);
7890                                         var v868 = ({car: v867, cdr: v863});
7891                                         return (v863 = v868);
7892                                     })() : (function(v869){
7893                                         (function(){
7894                                             var v870 = v869;
7895                                             var v871 = ({car: v870, cdr: v863});
7896                                             return (v863 = v871);
7897                                         })();
7898                                         return (v864 = l157.fvalue(pv, v864, l191.fvalue(pv, "var ", v869, " = ", l193.fvalue(pv, v866), ";", (function(){
7899                                             var symbol = l156;
7900                                             var value = symbol.value;
7901                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7902                                             return value;
7903                                         })(), "if (typeof ", v869, " !== 'number') throw 'Not a number!';", (function(){
7904                                             var symbol = l156;
7905                                             var value = symbol.value;
7906                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7907                                             return value;
7908                                         })())));
7909                                     })(l191.fvalue(pv, "x", (v862 = (function(){
7910                                         var x1 = v862;
7911                                         if (typeof x1 !== 'number') throw 'Not a number!';
7912                                         return x1+1;
7913                                     })()))));
7914                                     return l5.value;
7915                                 })();
7916                                 (v865 = (function(){
7917                                     var tmp = v865;
7918                                     return tmp === l5.value? l5.value: tmp.cdr;
7919                                 })());
7920                             }return l5.value;
7921                         })();
7922                         return l5.value;
7923                     })(v860,l5.value);
7924                 })();
7925                 return l191.fvalue(values, "(function(){", (function(){
7926                     var symbol = l156;
7927                     var value = symbol.value;
7928                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7929                     return value;
7930                 })(), l195.fvalue(pv, v864, (function(){
7931                     var f = v861;
7932                     return (typeof f === 'function'? f: f.fvalue)(pv, l70.fvalue(pv, v863))
7933                 })()), "})()");
7934             })(0,l5,"");
7935         })();
7936     }));
7937     return l324;
7938 })();
7939 var l325 = {name: "VARIABLE-ARITY"};
7940 l325;
7941 var l326 = {name: "NUM-OP-NUM"};
7942 (function(){
7943     (l326).fvalue = (function(v876){
7944         ((v876)["fname"] = "NUM-OP-NUM");
7945         return v876;
7946     })((function (values,v873,v874,v875){
7947         checkArgs(arguments, 4);
7948         return (function(){
7949             return l191.fvalue(values, "(function(){", (function(){
7950                 var symbol = l156;
7951                 var value = symbol.value;
7952                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7953                 return value;
7954             })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v873, ";", (function(){
7955                 var symbol = l156;
7956                 var value = symbol.value;
7957                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7958                 return value;
7959             })()), l191.fvalue(pv, "var ", "y", " = ", v875, ";", (function(){
7960                 var symbol = l156;
7961                 var value = symbol.value;
7962                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7963                 return value;
7964             })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7965                 var symbol = l156;
7966                 var value = symbol.value;
7967                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7968                 return value;
7969             })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7970                 var symbol = l156;
7971                 var value = symbol.value;
7972                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7973                 return value;
7974             })())), l191.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
7975                 var symbol = l156;
7976                 var value = symbol.value;
7977                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7978                 return value;
7979             })(), l195.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
7980                 var symbol = l156;
7981                 var value = symbol.value;
7982                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7983                 return value;
7984             })())), l191.fvalue(pv, "return ", l191.fvalue(pv, "x", v874, "y"), ";", (function(){
7985                 var symbol = l156;
7986                 var value = symbol.value;
7987                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7988                 return value;
7989             })())), "})()");
7990         })();
7991     }));
7992     return l326;
7993 })();
7994 (function(){
7995     var v877 = l47.fvalue(pv, l65, (function (values){
7996         var v878= l5.value;
7997         for (var i = arguments.length-1; i>=1; i--)
7998             v878 = {car: arguments[i], cdr:
7999         v878};
8000         return (function(){
8001             return (l13.fvalue(pv, v878) !== l5.value ? "0" : l324.fvalue(values, v878, (function (values,v879){
8002                 checkArgs(arguments, 2);
8003                 return l191.fvalue(values, "return ", l159.fvalue(pv, v879, "+"), ";", (function(){
8004                     var symbol = l156;
8005                     var value = symbol.value;
8006                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8007                     return value;
8008                 })());
8009             })));
8010         })();
8011     }));
8012     var v880 = ({car: v877, cdr: (function(){
8013         var symbol = l320;
8014         var value = symbol.value;
8015         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8016         return value;
8017     })()});
8018     return ((l320).value = v880);
8019 })();
8020 (function(){
8021     var v881 = l47.fvalue(pv, l66, (function (values,v883){
8022         checkArgsAtLeast(arguments, 2);
8023         var v882= l5.value;
8024         for (var i = arguments.length-1; i>=2; i--)
8025             v882 = {car: arguments[i], cdr:
8026         v882};
8027         return (function(){
8028             return (function(v884){
8029                 return l324.fvalue(values, v884, (function (values,v885){
8030                     checkArgs(arguments, 2);
8031                     return l191.fvalue(values, "return ", (l13.fvalue(pv, v882) !== l5.value ? l157.fvalue(pv, "-", (function(){
8032                         var tmp = v885;
8033                         return tmp === l5.value? l5.value: tmp.car;
8034                     })()) : l159.fvalue(pv, v885, "-")), ";", (function(){
8035                         var symbol = l156;
8036                         var value = symbol.value;
8037                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8038                         return value;
8039                     })());
8040                 }));
8041             })(({car: v883, cdr: v882}));
8042         })();
8043     }));
8044     var v886 = ({car: v881, cdr: (function(){
8045         var symbol = l320;
8046         var value = symbol.value;
8047         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8048         return value;
8049     })()});
8050     return ((l320).value = v886);
8051 })();
8052 (function(){
8053     var v887 = l47.fvalue(pv, l22, (function (values){
8054         var v888= l5.value;
8055         for (var i = arguments.length-1; i>=1; i--)
8056             v888 = {car: arguments[i], cdr:
8057         v888};
8058         return (function(){
8059             return (l13.fvalue(pv, v888) !== l5.value ? "1" : l324.fvalue(values, v888, (function (values,v889){
8060                 checkArgs(arguments, 2);
8061                 return l191.fvalue(values, "return ", l159.fvalue(pv, v889, "*"), ";", (function(){
8062                     var symbol = l156;
8063                     var value = symbol.value;
8064                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8065                     return value;
8066                 })());
8067             })));
8068         })();
8069     }));
8070     var v890 = ({car: v887, cdr: (function(){
8071         var symbol = l320;
8072         var value = symbol.value;
8073         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8074         return value;
8075     })()});
8076     return ((l320).value = v890);
8077 })();
8078 (function(){
8079     var v891 = l47.fvalue(pv, l23, (function (values,v893){
8080         checkArgsAtLeast(arguments, 2);
8081         var v892= l5.value;
8082         for (var i = arguments.length-1; i>=2; i--)
8083             v892 = {car: arguments[i], cdr:
8084         v892};
8085         return (function(){
8086             return (function(v894){
8087                 return l324.fvalue(values, v894, (function (values,v895){
8088                     checkArgs(arguments, 2);
8089                     return l191.fvalue(values, "return ", (l13.fvalue(pv, v892) !== l5.value ? l157.fvalue(pv, "1 /", (function(){
8090                         var tmp = v895;
8091                         return tmp === l5.value? l5.value: tmp.car;
8092                     })()) : l159.fvalue(pv, v895, "/")), ";", (function(){
8093                         var symbol = l156;
8094                         var value = symbol.value;
8095                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8096                         return value;
8097                     })());
8098                 }));
8099             })(({car: v893, cdr: v892}));
8100         })();
8101     }));
8102     var v896 = ({car: v891, cdr: (function(){
8103         var symbol = l320;
8104         var value = symbol.value;
8105         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8106         return value;
8107     })()});
8108     return ((l320).value = v896);
8109 })();
8110 var l327 = {name: "MOD"};
8111 (function(){
8112     var v897 = l47.fvalue(pv, l327, (function (values,v898,v899){
8113         checkArgs(arguments, 3);
8114         return (function(){
8115             return (function(v900,v901){
8116                 return l326.fvalue(values, v900, "%", v901);
8117             })(l193.fvalue(pv, v898),l193.fvalue(pv, v899));
8118         })();
8119     }));
8120     var v902 = ({car: v897, cdr: (function(){
8121         var symbol = l320;
8122         var value = symbol.value;
8123         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8124         return value;
8125     })()});
8126     return ((l320).value = v902);
8127 })();
8128 var l328 = {name: "COMPARISON-CONJUNTION"};
8129 (function(){
8130     (l328).fvalue = (function(v905){
8131         ((v905)["fname"] = "COMPARISON-CONJUNTION");
8132         return v905;
8133     })((function (values,v903,v904){
8134         checkArgs(arguments, 3);
8135         return (function(){
8136             return (l13.fvalue(pv, (function(){
8137                 var tmp = v903;
8138                 return tmp === l5.value? l5.value: tmp.cdr;
8139             })()) !== l5.value ? "true" : (l13.fvalue(pv, l37.fvalue(pv, v903)) !== l5.value ? l157.fvalue(values, (function(){
8140                 var tmp = v903;
8141                 return tmp === l5.value? l5.value: tmp.car;
8142             })(), v904, l35.fvalue(pv, v903)) : l157.fvalue(values, (function(){
8143                 var tmp = v903;
8144                 return tmp === l5.value? l5.value: tmp.car;
8145             })(), v904, l35.fvalue(pv, v903), " && ", l328.fvalue(pv, (function(){
8146                 var tmp = v903;
8147                 return tmp === l5.value? l5.value: tmp.cdr;
8148             })(), v904))));
8149         })();
8150     }));
8151     return l328;
8152 })();
8153 var l329 = {name: "DEFINE-BUILTIN-COMPARISON"};
8154 l329;
8155 var l330 = {name: ">"};
8156 (function(){
8157     var v906 = l47.fvalue(pv, l330, (function (values,v908){
8158         checkArgsAtLeast(arguments, 2);
8159         var v907= l5.value;
8160         for (var i = arguments.length-1; i>=2; i--)
8161             v907 = {car: arguments[i], cdr:
8162         v907};
8163         return (function(){
8164             return (function(v909){
8165                 return l324.fvalue(values, v909, (function (values,v910){
8166                     checkArgs(arguments, 2);
8167                     return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v910, ">")), ";", (function(){
8168                         var symbol = l156;
8169                         var value = symbol.value;
8170                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8171                         return value;
8172                     })());
8173                 }));
8174             })(({car: v908, cdr: v907}));
8175         })();
8176     }));
8177     var v911 = ({car: v906, cdr: (function(){
8178         var symbol = l320;
8179         var value = symbol.value;
8180         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8181         return value;
8182     })()});
8183     return ((l320).value = v911);
8184 })();
8185 var l331 = {name: "<"};
8186 (function(){
8187     var v912 = l47.fvalue(pv, l331, (function (values,v914){
8188         checkArgsAtLeast(arguments, 2);
8189         var v913= l5.value;
8190         for (var i = arguments.length-1; i>=2; i--)
8191             v913 = {car: arguments[i], cdr:
8192         v913};
8193         return (function(){
8194             return (function(v915){
8195                 return l324.fvalue(values, v915, (function (values,v916){
8196                     checkArgs(arguments, 2);
8197                     return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v916, "<")), ";", (function(){
8198                         var symbol = l156;
8199                         var value = symbol.value;
8200                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8201                         return value;
8202                     })());
8203                 }));
8204             })(({car: v914, cdr: v913}));
8205         })();
8206     }));
8207     var v917 = ({car: v912, cdr: (function(){
8208         var symbol = l320;
8209         var value = symbol.value;
8210         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8211         return value;
8212     })()});
8213     return ((l320).value = v917);
8214 })();
8215 var l332 = {name: ">="};
8216 (function(){
8217     var v918 = l47.fvalue(pv, l332, (function (values,v920){
8218         checkArgsAtLeast(arguments, 2);
8219         var v919= l5.value;
8220         for (var i = arguments.length-1; i>=2; i--)
8221             v919 = {car: arguments[i], cdr:
8222         v919};
8223         return (function(){
8224             return (function(v921){
8225                 return l324.fvalue(values, v921, (function (values,v922){
8226                     checkArgs(arguments, 2);
8227                     return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v922, ">=")), ";", (function(){
8228                         var symbol = l156;
8229                         var value = symbol.value;
8230                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8231                         return value;
8232                     })());
8233                 }));
8234             })(({car: v920, cdr: v919}));
8235         })();
8236     }));
8237     var v923 = ({car: v918, cdr: (function(){
8238         var symbol = l320;
8239         var value = symbol.value;
8240         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8241         return value;
8242     })()});
8243     return ((l320).value = v923);
8244 })();
8245 var l333 = {name: "<="};
8246 (function(){
8247     var v924 = l47.fvalue(pv, l333, (function (values,v926){
8248         checkArgsAtLeast(arguments, 2);
8249         var v925= l5.value;
8250         for (var i = arguments.length-1; i>=2; i--)
8251             v925 = {car: arguments[i], cdr:
8252         v925};
8253         return (function(){
8254             return (function(v927){
8255                 return l324.fvalue(values, v927, (function (values,v928){
8256                     checkArgs(arguments, 2);
8257                     return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v928, "<=")), ";", (function(){
8258                         var symbol = l156;
8259                         var value = symbol.value;
8260                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8261                         return value;
8262                     })());
8263                 }));
8264             })(({car: v926, cdr: v925}));
8265         })();
8266     }));
8267     var v929 = ({car: v924, cdr: (function(){
8268         var symbol = l320;
8269         var value = symbol.value;
8270         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8271         return value;
8272     })()});
8273     return ((l320).value = v929);
8274 })();
8275 (function(){
8276     var v930 = l47.fvalue(pv, l21, (function (values,v932){
8277         checkArgsAtLeast(arguments, 2);
8278         var v931= l5.value;
8279         for (var i = arguments.length-1; i>=2; i--)
8280             v931 = {car: arguments[i], cdr:
8281         v931};
8282         return (function(){
8283             return (function(v933){
8284                 return l324.fvalue(values, v933, (function (values,v934){
8285                     checkArgs(arguments, 2);
8286                     return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v934, "==")), ";", (function(){
8287                         var symbol = l156;
8288                         var value = symbol.value;
8289                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8290                         return value;
8291                     })());
8292                 }));
8293             })(({car: v932, cdr: v931}));
8294         })();
8295     }));
8296     var v935 = ({car: v930, cdr: (function(){
8297         var symbol = l320;
8298         var value = symbol.value;
8299         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8300         return value;
8301     })()});
8302     return ((l320).value = v935);
8303 })();
8304 var l334 = {name: "NUMBERP"};
8305 (function(){
8306     var v936 = l47.fvalue(pv, l334, (function (values,v937){
8307         checkArgs(arguments, 2);
8308         return (function(){
8309             return (function(v938){
8310                 return l192.fvalue(values, l191.fvalue(pv, "(typeof (", v938, ") == \"number\")"));
8311             })(l193.fvalue(pv, v937));
8312         })();
8313     }));
8314     var v939 = ({car: v936, cdr: (function(){
8315         var symbol = l320;
8316         var value = symbol.value;
8317         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8318         return value;
8319     })()});
8320     return ((l320).value = v939);
8321 })();
8322 var l335 = {name: "FLOOR"};
8323 (function(){
8324     var v940 = l47.fvalue(pv, l335, (function (values,v941){
8325         checkArgs(arguments, 2);
8326         return (function(){
8327             return (function(v942){
8328                 return l191.fvalue(values, "(function(){", (function(){
8329                     var symbol = l156;
8330                     var value = symbol.value;
8331                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8332                     return value;
8333                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v942, ";", (function(){
8334                     var symbol = l156;
8335                     var value = symbol.value;
8336                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8337                     return value;
8338                 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
8339                     var symbol = l156;
8340                     var value = symbol.value;
8341                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8342                     return value;
8343                 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
8344                     var symbol = l156;
8345                     var value = symbol.value;
8346                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8347                     return value;
8348                 })())), l191.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){
8349                     var symbol = l156;
8350                     var value = symbol.value;
8351                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8352                     return value;
8353                 })())), "})()");
8354             })(l193.fvalue(pv, v941));
8355         })();
8356     }));
8357     var v943 = ({car: v940, cdr: (function(){
8358         var symbol = l320;
8359         var value = symbol.value;
8360         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8361         return value;
8362     })()});
8363     return ((l320).value = v943);
8364 })();
8365 (function(){
8366     var v944 = l47.fvalue(pv, l30, (function (values,v945,v946){
8367         checkArgs(arguments, 3);
8368         return (function(){
8369             return (function(v947,v948){
8370                 return l191.fvalue(values, "({car: ", v947, ", cdr: ", v948, "})");
8371             })(l193.fvalue(pv, v945),l193.fvalue(pv, v946));
8372         })();
8373     }));
8374     var v949 = ({car: v944, cdr: (function(){
8375         var symbol = l320;
8376         var value = symbol.value;
8377         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8378         return value;
8379     })()});
8380     return ((l320).value = v949);
8381 })();
8382 (function(){
8383     var v950 = l47.fvalue(pv, l31, (function (values,v951){
8384         checkArgs(arguments, 2);
8385         return (function(){
8386             return (function(v952){
8387                 return l192.fvalue(values, l191.fvalue(pv, "(function(){", (function(){
8388                     var symbol = l156;
8389                     var value = symbol.value;
8390                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8391                     return value;
8392                 })(), l195.fvalue(pv, "var tmp = ", v952, ";", (function(){
8393                     var symbol = l156;
8394                     var value = symbol.value;
8395                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8396                     return value;
8397                 })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
8398                     var symbol = l156;
8399                     var value = symbol.value;
8400                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8401                     return value;
8402                 })()), "})()"));
8403             })(l193.fvalue(pv, v951));
8404         })();
8405     }));
8406     var v953 = ({car: v950, cdr: (function(){
8407         var symbol = l320;
8408         var value = symbol.value;
8409         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8410         return value;
8411     })()});
8412     return ((l320).value = v953);
8413 })();
8414 (function(){
8415     var v954 = l47.fvalue(pv, l32, (function (values,v955){
8416         checkArgs(arguments, 2);
8417         return (function(){
8418             return (function(v956){
8419                 return l191.fvalue(values, "(function(){", (function(){
8420                     var symbol = l156;
8421                     var value = symbol.value;
8422                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8423                     return value;
8424                 })(), l195.fvalue(pv, "var tmp = ", v956, ";", (function(){
8425                     var symbol = l156;
8426                     var value = symbol.value;
8427                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8428                     return value;
8429                 })(), "return tmp === ", l193.fvalue(pv, l5.value), "? ", l193.fvalue(pv, l5.value), ": tmp.car;", (function(){
8430                     var symbol = l156;
8431                     var value = symbol.value;
8432                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8433                     return value;
8434                 })()), "})()");
8435             })(l193.fvalue(pv, v955));
8436         })();
8437     }));
8438     var v957 = ({car: v954, cdr: (function(){
8439         var symbol = l320;
8440         var value = symbol.value;
8441         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8442         return value;
8443     })()});
8444     return ((l320).value = v957);
8445 })();
8446 (function(){
8447     var v958 = l47.fvalue(pv, l33, (function (values,v959){
8448         checkArgs(arguments, 2);
8449         return (function(){
8450             return (function(v960){
8451                 return l191.fvalue(values, "(function(){", (function(){
8452                     var symbol = l156;
8453                     var value = symbol.value;
8454                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8455                     return value;
8456                 })(), l195.fvalue(pv, "var tmp = ", v960, ";", (function(){
8457                     var symbol = l156;
8458                     var value = symbol.value;
8459                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8460                     return value;
8461                 })(), "return tmp === ", l193.fvalue(pv, l5.value), "? ", l193.fvalue(pv, l5.value), ": tmp.cdr;", (function(){
8462                     var symbol = l156;
8463                     var value = symbol.value;
8464                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8465                     return value;
8466                 })()), "})()");
8467             })(l193.fvalue(pv, v959));
8468         })();
8469     }));
8470     var v961 = ({car: v958, cdr: (function(){
8471         var symbol = l320;
8472         var value = symbol.value;
8473         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8474         return value;
8475     })()});
8476     return ((l320).value = v961);
8477 })();
8478 (function(){
8479     var v962 = l47.fvalue(pv, l124, (function (values,v963,v964){
8480         checkArgs(arguments, 3);
8481         return (function(){
8482             return (function(v965,v966){
8483                 return l191.fvalue(values, "(function(){", (function(){
8484                     var symbol = l156;
8485                     var value = symbol.value;
8486                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8487                     return value;
8488                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v965, ";", (function(){
8489                     var symbol = l156;
8490                     var value = symbol.value;
8491                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8492                     return value;
8493                 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
8494                     var symbol = l156;
8495                     var value = symbol.value;
8496                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8497                     return value;
8498                 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
8499                     var symbol = l156;
8500                     var value = symbol.value;
8501                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8502                     return value;
8503                 })())), l191.fvalue(pv, "return ", l191.fvalue(pv, "(x.car = ", v966, ", x)"), ";", (function(){
8504                     var symbol = l156;
8505                     var value = symbol.value;
8506                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8507                     return value;
8508                 })())), "})()");
8509             })(l193.fvalue(pv, v963),l193.fvalue(pv, v964));
8510         })();
8511     }));
8512     var v967 = ({car: v962, cdr: (function(){
8513         var symbol = l320;
8514         var value = symbol.value;
8515         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8516         return value;
8517     })()});
8518     return ((l320).value = v967);
8519 })();
8520 (function(){
8521     var v968 = l47.fvalue(pv, l125, (function (values,v969,v970){
8522         checkArgs(arguments, 3);
8523         return (function(){
8524             return (function(v971,v972){
8525                 return l191.fvalue(values, "(function(){", (function(){
8526                     var symbol = l156;
8527                     var value = symbol.value;
8528                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8529                     return value;
8530                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v971, ";", (function(){
8531                     var symbol = l156;
8532                     var value = symbol.value;
8533                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8534                     return value;
8535                 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
8536                     var symbol = l156;
8537                     var value = symbol.value;
8538                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8539                     return value;
8540                 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
8541                     var symbol = l156;
8542                     var value = symbol.value;
8543                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8544                     return value;
8545                 })())), l191.fvalue(pv, "return ", l191.fvalue(pv, "(x.cdr = ", v972, ", x)"), ";", (function(){
8546                     var symbol = l156;
8547                     var value = symbol.value;
8548                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8549                     return value;
8550                 })())), "})()");
8551             })(l193.fvalue(pv, v969),l193.fvalue(pv, v970));
8552         })();
8553     }));
8554     var v973 = ({car: v968, cdr: (function(){
8555         var symbol = l320;
8556         var value = symbol.value;
8557         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8558         return value;
8559     })()});
8560     return ((l320).value = v973);
8561 })();
8562 var l336 = {name: "SYMBOLP"};
8563 (function(){
8564     var v974 = l47.fvalue(pv, l336, (function (values,v975){
8565         checkArgs(arguments, 2);
8566         return (function(){
8567             return (function(v976){
8568                 return l192.fvalue(values, l191.fvalue(pv, "(function(){", (function(){
8569                     var symbol = l156;
8570                     var value = symbol.value;
8571                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8572                     return value;
8573                 })(), l195.fvalue(pv, "var tmp = ", v976, ";", (function(){
8574                     var symbol = l156;
8575                     var value = symbol.value;
8576                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8577                     return value;
8578                 })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
8579                     var symbol = l156;
8580                     var value = symbol.value;
8581                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8582                     return value;
8583                 })()), "})()"));
8584             })(l193.fvalue(pv, v975));
8585         })();
8586     }));
8587     var v977 = ({car: v974, cdr: (function(){
8588         var symbol = l320;
8589         var value = symbol.value;
8590         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8591         return value;
8592     })()});
8593     return ((l320).value = v977);
8594 })();
8595 var l337 = {name: "MAKE-SYMBOL"};
8596 (function(){
8597     var v978 = l47.fvalue(pv, l337, (function (values,v979){
8598         checkArgs(arguments, 2);
8599         return (function(){
8600             return (function(v980){
8601                 return l191.fvalue(values, "(function(){", (function(){
8602                     var symbol = l156;
8603                     var value = symbol.value;
8604                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8605                     return value;
8606                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "name", " = ", v980, ";", (function(){
8607                     var symbol = l156;
8608                     var value = symbol.value;
8609                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8610                     return value;
8611                 })()), l191.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){
8612                     var symbol = l156;
8613                     var value = symbol.value;
8614                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8615                     return value;
8616                 })(), l195.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
8617                     var symbol = l156;
8618                     var value = symbol.value;
8619                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8620                     return value;
8621                 })())), l191.fvalue(pv, "return ", "({name: name})", ";", (function(){
8622                     var symbol = l156;
8623                     var value = symbol.value;
8624                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8625                     return value;
8626                 })())), "})()");
8627             })(l193.fvalue(pv, v979));
8628         })();
8629     }));
8630     var v981 = ({car: v978, cdr: (function(){
8631         var symbol = l320;
8632         var value = symbol.value;
8633         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8634         return value;
8635     })()});
8636     return ((l320).value = v981);
8637 })();
8638 var l338 = {name: "SYMBOL-NAME"};
8639 (function(){
8640     var v982 = l47.fvalue(pv, l338, (function (values,v983){
8641         checkArgs(arguments, 2);
8642         return (function(){
8643             return (function(v984){
8644                 return l191.fvalue(values, "(", v984, ").name");
8645             })(l193.fvalue(pv, v983));
8646         })();
8647     }));
8648     var v985 = ({car: v982, cdr: (function(){
8649         var symbol = l320;
8650         var value = symbol.value;
8651         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8652         return value;
8653     })()});
8654     return ((l320).value = v985);
8655 })();
8656 (function(){
8657     var v986 = l47.fvalue(pv, l256, (function (values,v987,v988){
8658         checkArgs(arguments, 3);
8659         return (function(){
8660             return (function(v989,v990){
8661                 return l191.fvalue(values, "(", v989, ").value = ", v990);
8662             })(l193.fvalue(pv, v987),l193.fvalue(pv, v988));
8663         })();
8664     }));
8665     var v991 = ({car: v986, cdr: (function(){
8666         var symbol = l320;
8667         var value = symbol.value;
8668         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8669         return value;
8670     })()});
8671     return ((l320).value = v991);
8672 })();
8673 var l339 = {name: "FSET"};
8674 (function(){
8675     var v992 = l47.fvalue(pv, l339, (function (values,v993,v994){
8676         checkArgs(arguments, 3);
8677         return (function(){
8678             return (function(v995,v996){
8679                 return l191.fvalue(values, "(", v995, ").fvalue = ", v996);
8680             })(l193.fvalue(pv, v993),l193.fvalue(pv, v994));
8681         })();
8682     }));
8683     var v997 = ({car: v992, cdr: (function(){
8684         var symbol = l320;
8685         var value = symbol.value;
8686         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8687         return value;
8688     })()});
8689     return ((l320).value = v997);
8690 })();
8691 (function(){
8692     var v998 = l47.fvalue(pv, l20, (function (values,v999){
8693         checkArgs(arguments, 2);
8694         return (function(){
8695             return (function(v1000){
8696                 return l192.fvalue(values, l191.fvalue(pv, "(", v1000, ".value !== undefined)"));
8697             })(l193.fvalue(pv, v999));
8698         })();
8699     }));
8700     var v1001 = ({car: v998, cdr: (function(){
8701         var symbol = l320;
8702         var value = symbol.value;
8703         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8704         return value;
8705     })()});
8706     return ((l320).value = v1001);
8707 })();
8708 var l340 = {name: "SYMBOL-VALUE"};
8709 (function(){
8710     var v1002 = l47.fvalue(pv, l340, (function (values,v1003){
8711         checkArgs(arguments, 2);
8712         return (function(){
8713             return (function(v1004){
8714                 return l191.fvalue(values, "(function(){", (function(){
8715                     var symbol = l156;
8716                     var value = symbol.value;
8717                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8718                     return value;
8719                 })(), l195.fvalue(pv, "var symbol = ", v1004, ";", (function(){
8720                     var symbol = l156;
8721                     var value = symbol.value;
8722                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8723                     return value;
8724                 })(), "var value = symbol.value;", (function(){
8725                     var symbol = l156;
8726                     var value = symbol.value;
8727                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8728                     return value;
8729                 })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
8730                     var symbol = l156;
8731                     var value = symbol.value;
8732                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8733                     return value;
8734                 })(), "return value;", (function(){
8735                     var symbol = l156;
8736                     var value = symbol.value;
8737                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8738                     return value;
8739                 })()), "})()");
8740             })(l193.fvalue(pv, v1003));
8741         })();
8742     }));
8743     var v1005 = ({car: v1002, cdr: (function(){
8744         var symbol = l320;
8745         var value = symbol.value;
8746         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8747         return value;
8748     })()});
8749     return ((l320).value = v1005);
8750 })();
8751 (function(){
8752     var v1006 = l47.fvalue(pv, l264, (function (values,v1007){
8753         checkArgs(arguments, 2);
8754         return (function(){
8755             return (function(v1008){
8756                 return l191.fvalue(values, "(function(){", (function(){
8757                     var symbol = l156;
8758                     var value = symbol.value;
8759                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8760                     return value;
8761                 })(), l195.fvalue(pv, "var symbol = ", v1008, ";", (function(){
8762                     var symbol = l156;
8763                     var value = symbol.value;
8764                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8765                     return value;
8766                 })(), "var func = symbol.fvalue;", (function(){
8767                     var symbol = l156;
8768                     var value = symbol.value;
8769                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8770                     return value;
8771                 })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
8772                     var symbol = l156;
8773                     var value = symbol.value;
8774                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8775                     return value;
8776                 })(), "return func;", (function(){
8777                     var symbol = l156;
8778                     var value = symbol.value;
8779                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8780                     return value;
8781                 })()), "})()");
8782             })(l193.fvalue(pv, v1007));
8783         })();
8784     }));
8785     var v1009 = ({car: v1006, cdr: (function(){
8786         var symbol = l320;
8787         var value = symbol.value;
8788         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8789         return value;
8790     })()});
8791     return ((l320).value = v1009);
8792 })();
8793 var l341 = {name: "SYMBOL-PLIST"};
8794 (function(){
8795     var v1010 = l47.fvalue(pv, l341, (function (values,v1011){
8796         checkArgs(arguments, 2);
8797         return (function(){
8798             return (function(v1012){
8799                 return l191.fvalue(values, "((", v1012, ").plist || ", l193.fvalue(pv, l5.value), ")");
8800             })(l193.fvalue(pv, v1011));
8801         })();
8802     }));
8803     var v1013 = ({car: v1010, cdr: (function(){
8804         var symbol = l320;
8805         var value = symbol.value;
8806         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8807         return value;
8808     })()});
8809     return ((l320).value = v1013);
8810 })();
8811 var l342 = {name: "LAMBDA-CODE"};
8812 (function(){
8813     var v1014 = l47.fvalue(pv, l342, (function (values,v1015){
8814         checkArgs(arguments, 2);
8815         return (function(){
8816             return (function(v1016){
8817                 return l191.fvalue(values, "(", v1016, ").toString()");
8818             })(l193.fvalue(pv, v1015));
8819         })();
8820     }));
8821     var v1017 = ({car: v1014, cdr: (function(){
8822         var symbol = l320;
8823         var value = symbol.value;
8824         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8825         return value;
8826     })()});
8827     return ((l320).value = v1017);
8828 })();
8829 var l343 = {name: "EQ"};
8830 (function(){
8831     var v1018 = l47.fvalue(pv, l343, (function (values,v1019,v1020){
8832         checkArgs(arguments, 3);
8833         return (function(){
8834             return (function(v1021,v1022){
8835                 return l192.fvalue(values, l191.fvalue(pv, "(", v1021, " === ", v1022, ")"));
8836             })(l193.fvalue(pv, v1019),l193.fvalue(pv, v1020));
8837         })();
8838     }));
8839     var v1023 = ({car: v1018, cdr: (function(){
8840         var symbol = l320;
8841         var value = symbol.value;
8842         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8843         return value;
8844     })()});
8845     return ((l320).value = v1023);
8846 })();
8847 var l344 = {name: "EQUAL"};
8848 (function(){
8849     var v1024 = l47.fvalue(pv, l344, (function (values,v1025,v1026){
8850         checkArgs(arguments, 3);
8851         return (function(){
8852             return (function(v1027,v1028){
8853                 return l192.fvalue(values, l191.fvalue(pv, "(", v1027, " == ", v1028, ")"));
8854             })(l193.fvalue(pv, v1025),l193.fvalue(pv, v1026));
8855         })();
8856     }));
8857     var v1029 = ({car: v1024, cdr: (function(){
8858         var symbol = l320;
8859         var value = symbol.value;
8860         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8861         return value;
8862     })()});
8863     return ((l320).value = v1029);
8864 })();
8865 var l345 = {name: "CHAR-TO-STRING"};
8866 (function(){
8867     var v1030 = l47.fvalue(pv, l345, (function (values,v1031){
8868         checkArgs(arguments, 2);
8869         return (function(){
8870             return (function(v1032){
8871                 return l191.fvalue(values, "(function(){", (function(){
8872                     var symbol = l156;
8873                     var value = symbol.value;
8874                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8875                     return value;
8876                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1032, ";", (function(){
8877                     var symbol = l156;
8878                     var value = symbol.value;
8879                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8880                     return value;
8881                 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
8882                     var symbol = l156;
8883                     var value = symbol.value;
8884                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8885                     return value;
8886                 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
8887                     var symbol = l156;
8888                     var value = symbol.value;
8889                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8890                     return value;
8891                 })())), l191.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){
8892                     var symbol = l156;
8893                     var value = symbol.value;
8894                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8895                     return value;
8896                 })())), "})()");
8897             })(l193.fvalue(pv, v1031));
8898         })();
8899     }));
8900     var v1033 = ({car: v1030, cdr: (function(){
8901         var symbol = l320;
8902         var value = symbol.value;
8903         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8904         return value;
8905     })()});
8906     return ((l320).value = v1033);
8907 })();
8908 var l346 = {name: "STRINGP"};
8909 (function(){
8910     var v1034 = l47.fvalue(pv, l346, (function (values,v1035){
8911         checkArgs(arguments, 2);
8912         return (function(){
8913             return (function(v1036){
8914                 return l192.fvalue(values, l191.fvalue(pv, "(typeof(", v1036, ") == \"string\")"));
8915             })(l193.fvalue(pv, v1035));
8916         })();
8917     }));
8918     var v1037 = ({car: v1034, cdr: (function(){
8919         var symbol = l320;
8920         var value = symbol.value;
8921         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8922         return value;
8923     })()});
8924     return ((l320).value = v1037);
8925 })();
8926 var l347 = {name: "STRING-UPCASE"};
8927 (function(){
8928     var v1038 = l47.fvalue(pv, l347, (function (values,v1039){
8929         checkArgs(arguments, 2);
8930         return (function(){
8931             return (function(v1040){
8932                 return l191.fvalue(values, "(function(){", (function(){
8933                     var symbol = l156;
8934                     var value = symbol.value;
8935                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8936                     return value;
8937                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1040, ";", (function(){
8938                     var symbol = l156;
8939                     var value = symbol.value;
8940                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8941                     return value;
8942                 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
8943                     var symbol = l156;
8944                     var value = symbol.value;
8945                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8946                     return value;
8947                 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
8948                     var symbol = l156;
8949                     var value = symbol.value;
8950                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8951                     return value;
8952                 })())), l191.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){
8953                     var symbol = l156;
8954                     var value = symbol.value;
8955                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8956                     return value;
8957                 })())), "})()");
8958             })(l193.fvalue(pv, v1039));
8959         })();
8960     }));
8961     var v1041 = ({car: v1038, cdr: (function(){
8962         var symbol = l320;
8963         var value = symbol.value;
8964         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8965         return value;
8966     })()});
8967     return ((l320).value = v1041);
8968 })();
8969 var l348 = {name: "STRING-LENGTH"};
8970 (function(){
8971     var v1042 = l47.fvalue(pv, l348, (function (values,v1043){
8972         checkArgs(arguments, 2);
8973         return (function(){
8974             return (function(v1044){
8975                 return l191.fvalue(values, "(function(){", (function(){
8976                     var symbol = l156;
8977                     var value = symbol.value;
8978                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8979                     return value;
8980                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1044, ";", (function(){
8981                     var symbol = l156;
8982                     var value = symbol.value;
8983                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8984                     return value;
8985                 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
8986                     var symbol = l156;
8987                     var value = symbol.value;
8988                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8989                     return value;
8990                 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
8991                     var symbol = l156;
8992                     var value = symbol.value;
8993                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8994                     return value;
8995                 })())), l191.fvalue(pv, "return ", "x.length", ";", (function(){
8996                     var symbol = l156;
8997                     var value = symbol.value;
8998                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8999                     return value;
9000                 })())), "})()");
9001             })(l193.fvalue(pv, v1043));
9002         })();
9003     }));
9004     var v1045 = ({car: v1042, cdr: (function(){
9005         var symbol = l320;
9006         var value = symbol.value;
9007         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9008         return value;
9009     })()});
9010     return ((l320).value = v1045);
9011 })();
9012 var l349 = {name: "SLICE"};
9013 (function(){
9014     var v1046 = l47.fvalue(pv, l349, (function (values,v1047,v1048,v1049){
9015         checkArgsAtLeast(arguments, 3);
9016         checkArgsAtMost(arguments, 4);
9017         var v1049;
9018         switch(arguments.length-1){
9019         case 2:
9020             v1049=l5.value;
9021         default: break;
9022         }
9023         return (function(){
9024             return l191.fvalue(values, "(function(){", (function(){
9025                 var symbol = l156;
9026                 var value = symbol.value;
9027                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9028                 return value;
9029             })(), l195.fvalue(pv, "var str = ", l193.fvalue(pv, v1047), ";", (function(){
9030                 var symbol = l156;
9031                 var value = symbol.value;
9032                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9033                 return value;
9034             })(), "var a = ", l193.fvalue(pv, v1048), ";", (function(){
9035                 var symbol = l156;
9036                 var value = symbol.value;
9037                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9038                 return value;
9039             })(), "var b;", (function(){
9040                 var symbol = l156;
9041                 var value = symbol.value;
9042                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9043                 return value;
9044             })(), (v1049 !== l5.value ? l191.fvalue(pv, "b = ", l193.fvalue(pv, v1049), ";", (function(){
9045                 var symbol = l156;
9046                 var value = symbol.value;
9047                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9048                 return value;
9049             })()) : l5.value), "return str.slice(a,b);", (function(){
9050                 var symbol = l156;
9051                 var value = symbol.value;
9052                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9053                 return value;
9054             })()), "})()");
9055         })();
9056     }));
9057     var v1050 = ({car: v1046, cdr: (function(){
9058         var symbol = l320;
9059         var value = symbol.value;
9060         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9061         return value;
9062     })()});
9063     return ((l320).value = v1050);
9064 })();
9065 var l350 = {name: "CHAR"};
9066 (function(){
9067     var v1051 = l47.fvalue(pv, l350, (function (values,v1052,v1053){
9068         checkArgs(arguments, 3);
9069         return (function(){
9070             return (function(v1054,v1055){
9071                 return l191.fvalue(values, "(function(){", (function(){
9072                     var symbol = l156;
9073                     var value = symbol.value;
9074                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9075                     return value;
9076                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "string", " = ", v1054, ";", (function(){
9077                     var symbol = l156;
9078                     var value = symbol.value;
9079                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9080                     return value;
9081                 })()), l191.fvalue(pv, "var ", "index", " = ", v1055, ";", (function(){
9082                     var symbol = l156;
9083                     var value = symbol.value;
9084                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9085                     return value;
9086                 })()), l191.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
9087                     var symbol = l156;
9088                     var value = symbol.value;
9089                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9090                     return value;
9091                 })(), l195.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
9092                     var symbol = l156;
9093                     var value = symbol.value;
9094                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9095                     return value;
9096                 })())), l191.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){
9097                     var symbol = l156;
9098                     var value = symbol.value;
9099                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9100                     return value;
9101                 })(), l195.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
9102                     var symbol = l156;
9103                     var value = symbol.value;
9104                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9105                     return value;
9106                 })())), l191.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){
9107                     var symbol = l156;
9108                     var value = symbol.value;
9109                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9110                     return value;
9111                 })())), "})()");
9112             })(l193.fvalue(pv, v1052),l193.fvalue(pv, v1053));
9113         })();
9114     }));
9115     var v1056 = ({car: v1051, cdr: (function(){
9116         var symbol = l320;
9117         var value = symbol.value;
9118         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9119         return value;
9120     })()});
9121     return ((l320).value = v1056);
9122 })();
9123 (function(){
9124     var v1057 = l47.fvalue(pv, l76, (function (values,v1058,v1059){
9125         checkArgs(arguments, 3);
9126         return (function(){
9127             return (function(v1060,v1061){
9128                 return l191.fvalue(values, "(function(){", (function(){
9129                     var symbol = l156;
9130                     var value = symbol.value;
9131                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9132                     return value;
9133                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "string1", " = ", v1060, ";", (function(){
9134                     var symbol = l156;
9135                     var value = symbol.value;
9136                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9137                     return value;
9138                 })()), l191.fvalue(pv, "var ", "string2", " = ", v1061, ";", (function(){
9139                     var symbol = l156;
9140                     var value = symbol.value;
9141                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9142                     return value;
9143                 })()), l191.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){
9144                     var symbol = l156;
9145                     var value = symbol.value;
9146                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9147                     return value;
9148                 })(), l195.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
9149                     var symbol = l156;
9150                     var value = symbol.value;
9151                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9152                     return value;
9153                 })())), l191.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){
9154                     var symbol = l156;
9155                     var value = symbol.value;
9156                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9157                     return value;
9158                 })(), l195.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
9159                     var symbol = l156;
9160                     var value = symbol.value;
9161                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9162                     return value;
9163                 })())), l191.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){
9164                     var symbol = l156;
9165                     var value = symbol.value;
9166                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9167                     return value;
9168                 })())), "})()");
9169             })(l193.fvalue(pv, v1058),l193.fvalue(pv, v1059));
9170         })();
9171     }));
9172     var v1062 = ({car: v1057, cdr: (function(){
9173         var symbol = l320;
9174         var value = symbol.value;
9175         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9176         return value;
9177     })()});
9178     return ((l320).value = v1062);
9179 })();
9180 var l351 = {name: "FUNCALL"};
9181 (function(){
9182     var v1063 = l47.fvalue(pv, l351, (function (values,v1065){
9183         checkArgsAtLeast(arguments, 2);
9184         var v1064= l5.value;
9185         for (var i = arguments.length-1; i>=2; i--)
9186             v1064 = {car: arguments[i], cdr:
9187         v1064};
9188         return (function(){
9189             return l191.fvalue(values, "(function(){", (function(){
9190                 var symbol = l156;
9191                 var value = symbol.value;
9192                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9193                 return value;
9194             })(), l195.fvalue(pv, "var f = ", l193.fvalue(pv, v1065), ";", (function(){
9195                 var symbol = l156;
9196                 var value = symbol.value;
9197                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9198                 return value;
9199             })(), "return (typeof f === 'function'? f: f.fvalue)(", l159.fvalue(pv, ({car: ((function(){
9200                 var symbol = l196;
9201                 var value = symbol.value;
9202                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9203                 return value;
9204             })() !== l5.value ? "values" : "pv"), cdr: l81.fvalue(pv, (function(){
9205                 var symbol = l193;
9206                 var func = symbol.fvalue;
9207                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9208                 return func;
9209             })(), v1064)}), ", "), ")"), "})()");
9210         })();
9211     }));
9212     var v1066 = ({car: v1063, cdr: (function(){
9213         var symbol = l320;
9214         var value = symbol.value;
9215         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9216         return value;
9217     })()});
9218     return ((l320).value = v1066);
9219 })();
9220 var l352 = {name: "APPLY"};
9221 (function(){
9222     var v1067 = l47.fvalue(pv, l352, (function (values,v1069){
9223         checkArgsAtLeast(arguments, 2);
9224         var v1068= l5.value;
9225         for (var i = arguments.length-1; i>=2; i--)
9226             v1068 = {car: arguments[i], cdr:
9227         v1068};
9228         return (function(){
9229             return (l13.fvalue(pv, v1068) !== l5.value ? l191.fvalue(values, "(", l193.fvalue(pv, v1069), ")()") : (function(v1070,v1071){
9230                 return l191.fvalue(values, "(function(){", (function(){
9231                     var symbol = l156;
9232                     var value = symbol.value;
9233                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9234                     return value;
9235                 })(), l195.fvalue(pv, "var f = ", l193.fvalue(pv, v1069), ";", (function(){
9236                     var symbol = l156;
9237                     var value = symbol.value;
9238                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9239                     return value;
9240                 })(), "var args = [", l159.fvalue(pv, ({car: ((function(){
9241                     var symbol = l196;
9242                     var value = symbol.value;
9243                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9244                     return value;
9245                 })() !== l5.value ? "values" : "pv"), cdr: l81.fvalue(pv, (function(){
9246                     var symbol = l193;
9247                     var func = symbol.fvalue;
9248                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9249                     return func;
9250                 })(), v1070)}), ", "), "];", (function(){
9251                     var symbol = l156;
9252                     var value = symbol.value;
9253                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9254                     return value;
9255                 })(), "var tail = (", l193.fvalue(pv, v1071), ");", (function(){
9256                     var symbol = l156;
9257                     var value = symbol.value;
9258                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9259                     return value;
9260                 })(), "while (tail != ", l193.fvalue(pv, l5.value), "){", (function(){
9261                     var symbol = l156;
9262                     var value = symbol.value;
9263                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9264                     return value;
9265                 })(), "    args.push(tail.car);", (function(){
9266                     var symbol = l156;
9267                     var value = symbol.value;
9268                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9269                     return value;
9270                 })(), "    tail = tail.cdr;", (function(){
9271                     var symbol = l156;
9272                     var value = symbol.value;
9273                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9274                     return value;
9275                 })(), "}", (function(){
9276                     var symbol = l156;
9277                     var value = symbol.value;
9278                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9279                     return value;
9280                 })(), "return (typeof f === 'function'? f : f.fvalue).apply(this, args);", (function(){
9281                     var symbol = l156;
9282                     var value = symbol.value;
9283                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9284                     return value;
9285                 })()), "})()");
9286             })(l95.fvalue(pv, v1068),(function(){
9287                 var tmp = l94.fvalue(pv, v1068);
9288                 return tmp === l5.value? l5.value: tmp.car;
9289             })()));
9290         })();
9291     }));
9292     var v1072 = ({car: v1067, cdr: (function(){
9293         var symbol = l320;
9294         var value = symbol.value;
9295         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9296         return value;
9297     })()});
9298     return ((l320).value = v1072);
9299 })();
9300 var l353 = {name: "JS-EVAL"};
9301 (function(){
9302     var v1073 = l47.fvalue(pv, l353, (function (values,v1074){
9303         checkArgs(arguments, 2);
9304         return (function(){
9305             return (function(v1075){
9306                 return l191.fvalue(values, "(function(){", (function(){
9307                     var symbol = l156;
9308                     var value = symbol.value;
9309                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9310                     return value;
9311                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "string", " = ", v1075, ";", (function(){
9312                     var symbol = l156;
9313                     var value = symbol.value;
9314                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9315                     return value;
9316                 })()), l191.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
9317                     var symbol = l156;
9318                     var value = symbol.value;
9319                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9320                     return value;
9321                 })(), l195.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
9322                     var symbol = l156;
9323                     var value = symbol.value;
9324                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9325                     return value;
9326                 })())), l191.fvalue(pv, "return ", ((function(){
9327                     var symbol = l196;
9328                     var value = symbol.value;
9329                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9330                     return value;
9331                 })() !== l5.value ? l191.fvalue(pv, "(function(){", (function(){
9332                     var symbol = l156;
9333                     var value = symbol.value;
9334                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9335                     return value;
9336                 })(), l195.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){
9337                     var symbol = l156;
9338                     var value = symbol.value;
9339                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9340                     return value;
9341                 })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){
9342                     var symbol = l156;
9343                     var value = symbol.value;
9344                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9345                     return value;
9346                 })(), l195.fvalue(pv, "v = [v];", (function(){
9347                     var symbol = l156;
9348                     var value = symbol.value;
9349                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9350                     return value;
9351                 })(), "v['multiple-value'] = true;", (function(){
9352                     var symbol = l156;
9353                     var value = symbol.value;
9354                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9355                     return value;
9356                 })()), "}", (function(){
9357                     var symbol = l156;
9358                     var value = symbol.value;
9359                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9360                     return value;
9361                 })(), "return values.apply(this, v);", (function(){
9362                     var symbol = l156;
9363                     var value = symbol.value;
9364                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9365                     return value;
9366                 })()), "})()") : "eval.apply(window, [string])"), ";", (function(){
9367                     var symbol = l156;
9368                     var value = symbol.value;
9369                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9370                     return value;
9371                 })())), "})()");
9372             })(l193.fvalue(pv, v1074));
9373         })();
9374     }));
9375     var v1076 = ({car: v1073, cdr: (function(){
9376         var symbol = l320;
9377         var value = symbol.value;
9378         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9379         return value;
9380     })()});
9381     return ((l320).value = v1076);
9382 })();
9383 var l354 = {name: "ERROR"};
9384 (function(){
9385     var v1077 = l47.fvalue(pv, l354, (function (values,v1078){
9386         checkArgs(arguments, 2);
9387         return (function(){
9388             return (function(v1079){
9389                 return l191.fvalue(values, "(function(){", (function(){
9390                     var symbol = l156;
9391                     var value = symbol.value;
9392                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9393                     return value;
9394                 })(), l195.fvalue(pv, "throw ", v1079, ";", (function(){
9395                     var symbol = l156;
9396                     var value = symbol.value;
9397                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9398                     return value;
9399                 })()), "})()");
9400             })(l193.fvalue(pv, v1078));
9401         })();
9402     }));
9403     var v1080 = ({car: v1077, cdr: (function(){
9404         var symbol = l320;
9405         var value = symbol.value;
9406         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9407         return value;
9408     })()});
9409     return ((l320).value = v1080);
9410 })();
9411 var l355 = {name: "NEW"};
9412 (function(){
9413     var v1081 = l47.fvalue(pv, l355, (function (values){
9414         checkArgsAtMost(arguments, 1);
9415         return (function(){
9416             return (function(){
9417                 return "{}";
9418             })();
9419         })();
9420     }));
9421     var v1082 = ({car: v1081, cdr: (function(){
9422         var symbol = l320;
9423         var value = symbol.value;
9424         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9425         return value;
9426     })()});
9427     return ((l320).value = v1082);
9428 })();
9429 var l356 = {name: "OBJECTP"};
9430 (function(){
9431     var v1083 = l47.fvalue(pv, l356, (function (values,v1084){
9432         checkArgs(arguments, 2);
9433         return (function(){
9434             return (function(v1085){
9435                 return l192.fvalue(values, l191.fvalue(pv, "(typeof (", v1085, ") === 'object')"));
9436             })(l193.fvalue(pv, v1084));
9437         })();
9438     }));
9439     var v1086 = ({car: v1083, cdr: (function(){
9440         var symbol = l320;
9441         var value = symbol.value;
9442         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9443         return value;
9444     })()});
9445     return ((l320).value = v1086);
9446 })();
9447 var l357 = {name: "OGET"};
9448 (function(){
9449     var v1087 = l47.fvalue(pv, l357, (function (values,v1088,v1089){
9450         checkArgs(arguments, 3);
9451         return (function(){
9452             return (function(v1090,v1091){
9453                 return l191.fvalue(values, "(function(){", (function(){
9454                     var symbol = l156;
9455                     var value = symbol.value;
9456                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9457                     return value;
9458                 })(), l195.fvalue(pv, "var tmp = ", "(", v1090, ")[", v1091, "];", (function(){
9459                     var symbol = l156;
9460                     var value = symbol.value;
9461                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9462                     return value;
9463                 })(), "return tmp == undefined? ", l193.fvalue(pv, l5.value), ": tmp ;", (function(){
9464                     var symbol = l156;
9465                     var value = symbol.value;
9466                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9467                     return value;
9468                 })()), "})()");
9469             })(l193.fvalue(pv, v1088),l193.fvalue(pv, v1089));
9470         })();
9471     }));
9472     var v1092 = ({car: v1087, cdr: (function(){
9473         var symbol = l320;
9474         var value = symbol.value;
9475         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9476         return value;
9477     })()});
9478     return ((l320).value = v1092);
9479 })();
9480 var l358 = {name: "OSET"};
9481 (function(){
9482     var v1093 = l47.fvalue(pv, l358, (function (values,v1094,v1095,v1096){
9483         checkArgs(arguments, 4);
9484         return (function(){
9485             return (function(v1097,v1098,v1099){
9486                 return l191.fvalue(values, "((", v1097, ")[", v1098, "] = ", v1099, ")");
9487             })(l193.fvalue(pv, v1094),l193.fvalue(pv, v1095),l193.fvalue(pv, v1096));
9488         })();
9489     }));
9490     var v1100 = ({car: v1093, cdr: (function(){
9491         var symbol = l320;
9492         var value = symbol.value;
9493         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9494         return value;
9495     })()});
9496     return ((l320).value = v1100);
9497 })();
9498 var l359 = {name: "IN"};
9499 (function(){
9500     var v1101 = l47.fvalue(pv, l359, (function (values,v1102,v1103){
9501         checkArgs(arguments, 3);
9502         return (function(){
9503             return (function(v1104,v1105){
9504                 return l192.fvalue(values, l191.fvalue(pv, "((", v1104, ") in (", v1105, "))"));
9505             })(l193.fvalue(pv, v1102),l193.fvalue(pv, v1103));
9506         })();
9507     }));
9508     var v1106 = ({car: v1101, cdr: (function(){
9509         var symbol = l320;
9510         var value = symbol.value;
9511         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9512         return value;
9513     })()});
9514     return ((l320).value = v1106);
9515 })();
9516 var l360 = {name: "FUNCTIONP"};
9517 (function(){
9518     var v1107 = l47.fvalue(pv, l360, (function (values,v1108){
9519         checkArgs(arguments, 2);
9520         return (function(){
9521             return (function(v1109){
9522                 return l192.fvalue(values, l191.fvalue(pv, "(typeof ", v1109, " == 'function')"));
9523             })(l193.fvalue(pv, v1108));
9524         })();
9525     }));
9526     var v1110 = ({car: v1107, cdr: (function(){
9527         var symbol = l320;
9528         var value = symbol.value;
9529         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9530         return value;
9531     })()});
9532     return ((l320).value = v1110);
9533 })();
9534 var l361 = {name: "WRITE-STRING"};
9535 (function(){
9536     var v1111 = l47.fvalue(pv, l361, (function (values,v1112){
9537         checkArgs(arguments, 2);
9538         return (function(){
9539             return (function(v1113){
9540                 return l191.fvalue(values, "(function(){", (function(){
9541                     var symbol = l156;
9542                     var value = symbol.value;
9543                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9544                     return value;
9545                 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1113, ";", (function(){
9546                     var symbol = l156;
9547                     var value = symbol.value;
9548                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9549                     return value;
9550                 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
9551                     var symbol = l156;
9552                     var value = symbol.value;
9553                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9554                     return value;
9555                 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
9556                     var symbol = l156;
9557                     var value = symbol.value;
9558                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9559                     return value;
9560                 })())), l191.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){
9561                     var symbol = l156;
9562                     var value = symbol.value;
9563                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9564                     return value;
9565                 })())), "})()");
9566             })(l193.fvalue(pv, v1112));
9567         })();
9568     }));
9569     var v1114 = ({car: v1111, cdr: (function(){
9570         var symbol = l320;
9571         var value = symbol.value;
9572         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9573         return value;
9574     })()});
9575     return ((l320).value = v1114);
9576 })();
9577 var l362 = {name: "MAKE-ARRAY"};
9578 (function(){
9579     var v1115 = l47.fvalue(pv, l362, (function (values,v1116){
9580         checkArgs(arguments, 2);
9581         return (function(){
9582             return (function(v1117){
9583                 return l191.fvalue(values, "(function(){", (function(){
9584                     var symbol = l156;
9585                     var value = symbol.value;
9586                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9587                     return value;
9588                 })(), l195.fvalue(pv, "var r = [];", (function(){
9589                     var symbol = l156;
9590                     var value = symbol.value;
9591                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9592                     return value;
9593                 })(), "for (var i = 0; i < ", v1117, "; i++)", (function(){
9594                     var symbol = l156;
9595                     var value = symbol.value;
9596                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9597                     return value;
9598                 })(), l195.fvalue(pv, "r.push(", l193.fvalue(pv, l5.value), ");", (function(){
9599                     var symbol = l156;
9600                     var value = symbol.value;
9601                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9602                     return value;
9603                 })()), "return r;", (function(){
9604                     var symbol = l156;
9605                     var value = symbol.value;
9606                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9607                     return value;
9608                 })()), "})()");
9609             })(l193.fvalue(pv, v1116));
9610         })();
9611     }));
9612     var v1118 = ({car: v1115, cdr: (function(){
9613         var symbol = l320;
9614         var value = symbol.value;
9615         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9616         return value;
9617     })()});
9618     return ((l320).value = v1118);
9619 })();
9620 var l363 = {name: "ARRAYP"};
9621 (function(){
9622     var v1119 = l47.fvalue(pv, l363, (function (values,v1120){
9623         checkArgs(arguments, 2);
9624         return (function(){
9625             return (function(v1121){
9626                 return l192.fvalue(values, l191.fvalue(pv, "(function(){", (function(){
9627                     var symbol = l156;
9628                     var value = symbol.value;
9629                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9630                     return value;
9631                 })(), l195.fvalue(pv, "var x = ", v1121, ";", (function(){
9632                     var symbol = l156;
9633                     var value = symbol.value;
9634                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9635                     return value;
9636                 })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
9637             })(l193.fvalue(pv, v1120));
9638         })();
9639     }));
9640     var v1122 = ({car: v1119, cdr: (function(){
9641         var symbol = l320;
9642         var value = symbol.value;
9643         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9644         return value;
9645     })()});
9646     return ((l320).value = v1122);
9647 })();
9648 var l364 = {name: "AREF"};
9649 (function(){
9650     var v1123 = l47.fvalue(pv, l364, (function (values,v1124,v1125){
9651         checkArgs(arguments, 3);
9652         return (function(){
9653             return (function(v1126,v1127){
9654                 return l191.fvalue(values, "(function(){", (function(){
9655                     var symbol = l156;
9656                     var value = symbol.value;
9657                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9658                     return value;
9659                 })(), l195.fvalue(pv, "var x = ", "(", v1126, ")[", v1127, "];", (function(){
9660                     var symbol = l156;
9661                     var value = symbol.value;
9662                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9663                     return value;
9664                 })(), "if (x === undefined) throw 'Out of range';", (function(){
9665                     var symbol = l156;
9666                     var value = symbol.value;
9667                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9668                     return value;
9669                 })(), "return x;", (function(){
9670                     var symbol = l156;
9671                     var value = symbol.value;
9672                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9673                     return value;
9674                 })()), "})()");
9675             })(l193.fvalue(pv, v1124),l193.fvalue(pv, v1125));
9676         })();
9677     }));
9678     var v1128 = ({car: v1123, cdr: (function(){
9679         var symbol = l320;
9680         var value = symbol.value;
9681         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9682         return value;
9683     })()});
9684     return ((l320).value = v1128);
9685 })();
9686 var l365 = {name: "ASET"};
9687 (function(){
9688     var v1129 = l47.fvalue(pv, l365, (function (values,v1130,v1131,v1132){
9689         checkArgs(arguments, 4);
9690         return (function(){
9691             return (function(v1133,v1134,v1135){
9692                 return l191.fvalue(values, "(function(){", (function(){
9693                     var symbol = l156;
9694                     var value = symbol.value;
9695                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9696                     return value;
9697                 })(), l195.fvalue(pv, "var x = ", v1133, ";", (function(){
9698                     var symbol = l156;
9699                     var value = symbol.value;
9700                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9701                     return value;
9702                 })(), "var i = ", v1134, ";", (function(){
9703                     var symbol = l156;
9704                     var value = symbol.value;
9705                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9706                     return value;
9707                 })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
9708                     var symbol = l156;
9709                     var value = symbol.value;
9710                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9711                     return value;
9712                 })(), "return x[i] = ", v1135, ";", (function(){
9713                     var symbol = l156;
9714                     var value = symbol.value;
9715                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9716                     return value;
9717                 })()), "})()");
9718             })(l193.fvalue(pv, v1130),l193.fvalue(pv, v1131),l193.fvalue(pv, v1132));
9719         })();
9720     }));
9721     var v1136 = ({car: v1129, cdr: (function(){
9722         var symbol = l320;
9723         var value = symbol.value;
9724         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9725         return value;
9726     })()});
9727     return ((l320).value = v1136);
9728 })();
9729 var l366 = {name: "GET-UNIX-TIME"};
9730 (function(){
9731     var v1137 = l47.fvalue(pv, l366, (function (values){
9732         checkArgsAtMost(arguments, 1);
9733         return (function(){
9734             return (function(){
9735                 return l191.fvalue(values, "(Math.round(new Date() / 1000))");
9736             })();
9737         })();
9738     }));
9739     var v1138 = ({car: v1137, cdr: (function(){
9740         var symbol = l320;
9741         var value = symbol.value;
9742         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9743         return value;
9744     })()});
9745     return ((l320).value = v1138);
9746 })();
9747 var l367 = {name: "VALUES-ARRAY"};
9748 (function(){
9749     var v1139 = l47.fvalue(pv, l367, (function (values,v1140){
9750         checkArgs(arguments, 2);
9751         return (function(){
9752             return (function(v1141){
9753                 return ((function(){
9754                     var symbol = l196;
9755                     var value = symbol.value;
9756                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9757                     return value;
9758                 })() !== l5.value ? l191.fvalue(values, "values.apply(this, ", v1141, ")") : l191.fvalue(values, "pv.apply(this, ", v1141, ")"));
9759             })(l193.fvalue(pv, v1140));
9760         })();
9761     }));
9762     var v1142 = ({car: v1139, cdr: (function(){
9763         var symbol = l320;
9764         var value = symbol.value;
9765         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9766         return value;
9767     })()});
9768     return ((l320).value = v1142);
9769 })();
9770 (function(){
9771     var v1143 = l47.fvalue(pv, l165, (function (values){
9772         var v1144= l5.value;
9773         for (var i = arguments.length-1; i>=1; i--)
9774             v1144 = {car: arguments[i], cdr:
9775         v1144};
9776         return (function(){
9777             return ((function(){
9778                 var symbol = l196;
9779                 var value = symbol.value;
9780                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9781                 return value;
9782             })() !== l5.value ? l191.fvalue(values, "values(", l159.fvalue(pv, l81.fvalue(pv, (function(){
9783                 var symbol = l193;
9784                 var func = symbol.fvalue;
9785                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9786                 return func;
9787             })(), v1144), ", "), ")") : l191.fvalue(values, "pv(", l159.fvalue(pv, l81.fvalue(pv, (function(){
9788                 var symbol = l193;
9789                 var func = symbol.fvalue;
9790                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9791                 return func;
9792             })(), v1144), ", "), ")"));
9793         })();
9794     }));
9795     var v1145 = ({car: v1143, cdr: (function(){
9796         var symbol = l320;
9797         var value = symbol.value;
9798         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9799         return value;
9800     })()});
9801     return ((l320).value = v1145);
9802 })();
9803 (function(){
9804     (l222).fvalue = (function(v1148){
9805         ((v1148)["fname"] = "MACRO");
9806         return v1148;
9807     })((function (values,v1146){
9808         checkArgs(arguments, 2);
9809         return (function(){
9810             return (((function(){
9811                 var tmp = v1146;
9812                 return (typeof tmp == 'object' && 'name' in tmp);
9813             })()?l4.value: l5.value) !== l5.value ? (function(v1147){
9814                 return (((l199.fvalue(pv, v1147) === l222)?l4.value: l5.value) !== l5.value ? v1147 : l5.value);
9815             })(l211.fvalue(pv, v1146, (function(){
9816                 var symbol = l212;
9817                 var value = symbol.value;
9818                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9819                 return value;
9820             })(), l113)) : l5.value);
9821         })();
9822     }));
9823     return l222;
9824 })();
9825 (function(){
9826     (l120).fvalue = (function(v1153){
9827         ((v1153)["fname"] = "LS-MACROEXPAND-1");
9828         return v1153;
9829     })((function (values,v1149){
9830         checkArgs(arguments, 2);
9831         return (function(){
9832             return (function(v1150){
9833                 return (v1150 !== l5.value ? (function(v1151){
9834                     (l62.fvalue(pv, v1151) !== l5.value ? (function(v1152){
9835                         l202.fvalue(pv, v1150, v1152);
9836                         return (v1151 = v1152);
9837                     })(l272.fvalue(pv, v1151)) : l5.value);
9838                     return (function(){
9839                         var f = v1151;
9840                         var args = [values];
9841                         var tail = ((function(){
9842                             var tmp = v1149;
9843                             return tmp === l5.value? l5.value: tmp.cdr;
9844                         })());
9845                         while (tail != l5.value){
9846                             args.push(tail.car);
9847                             tail = tail.cdr;
9848                         }
9849                         return (typeof f === 'function'? f : f.fvalue).apply(this, args);
9850                     })();
9851                 })(l200.fvalue(pv, v1150)) : v1149);
9852             })(l222.fvalue(pv, (function(){
9853                 var tmp = v1149;
9854                 return tmp === l5.value? l5.value: tmp.car;
9855             })()));
9856         })();
9857     }));
9858     return l120;
9859 })();
9860 var l368 = {name: "COMPILE-FUNCALL"};
9861 var l369 = {name: "G764"};
9862 (function(){
9863     (l368).fvalue = (function(v1158){
9864         ((v1158)["fname"] = "COMPILE-FUNCALL");
9865         return v1158;
9866     })((function (values,v1154,v1155){
9867         checkArgs(arguments, 3);
9868         return (function(){
9869             return (function(){
9870                 var v1156 = ((function(){
9871                     var symbol = l196;
9872                     var value = symbol.value;
9873                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9874                     return value;
9875                 })() !== l5.value ? "values" : "pv");
9876                 var v1157 = l157.fvalue(pv, "(", l159.fvalue(pv, ({car: v1156, cdr: l81.fvalue(pv, (function(){
9877                     var symbol = l193;
9878                     var func = symbol.fvalue;
9879                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9880                     return func;
9881                 })(), v1155)}), ", "), ")");
9882                 return (l267.fvalue(pv, v1154) !== l5.value ? l157.fvalue(values, l267.fvalue(pv, v1154), v1157) : ((((function(){
9883                     var tmp = v1154;
9884                     return (typeof tmp == 'object' && 'name' in tmp);
9885                 })()?l4.value: l5.value) !== l5.value ? (((l145.fvalue(pv, v1154) === l136.fvalue(pv, "COMMON-LISP"))?l4.value: l5.value) !== l5.value ? (function(){
9886                     var symbol = l369;
9887                     var value = symbol.value;
9888                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9889                     return value;
9890                 })() : l5.value) : l5.value) !== l5.value ? l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l186, v1154)), ".fvalue", v1157) : l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l113, v1154)), v1157)));
9891             })();
9892         })();
9893     }));
9894     return l368;
9895 })();
9896 (function(){
9897     (l254).fvalue = (function(v1161){
9898         ((v1161)["fname"] = "LS-COMPILE-BLOCK");
9899         return v1161;
9900     })((function (values,v1159,v1160){
9901         checkArgsAtLeast(arguments, 2);
9902         checkArgsAtMost(arguments, 3);
9903         var v1160;
9904         switch(arguments.length-1){
9905         case 1:
9906             v1160=l5.value;
9907         default: break;
9908         }
9909         return (function(){
9910             return (v1160 !== l5.value ? l191.fvalue(values, l254.fvalue(pv, l95.fvalue(pv, v1159)), "return ", l193.fvalue(pv, (function(){
9911                 var tmp = l94.fvalue(pv, v1159);
9912                 return tmp === l5.value? l5.value: tmp.car;
9913             })(), (function(){
9914                 var symbol = l196;
9915                 var value = symbol.value;
9916                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9917                 return value;
9918             })()), ";") : l160.fvalue(values, l98.fvalue(pv, (function(){
9919                 var symbol = l219;
9920                 var func = symbol.fvalue;
9921                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9922                 return func;
9923             })(), l81.fvalue(pv, (function(){
9924                 var symbol = l193;
9925                 var func = symbol.fvalue;
9926                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9927                 return func;
9928             })(), v1159)), l157.fvalue(pv, ";", (function(){
9929                 var symbol = l156;
9930                 var value = symbol.value;
9931                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9932                 return value;
9933             })())));
9934         })();
9935     }));
9936     return l254;
9937 })();
9938 (function(){
9939     (l193).fvalue = (function(v1171){
9940         ((v1171)["fname"] = "LS-COMPILE");
9941         return v1171;
9942     })((function (values,v1162,v1163){
9943         checkArgsAtLeast(arguments, 2);
9944         checkArgsAtMost(arguments, 3);
9945         var v1163;
9946         switch(arguments.length-1){
9947         case 1:
9948             v1163=l5.value;
9949         default: break;
9950         }
9951         return (function(){
9952             return (function(v1164){
9953                 try {
9954                     var tmp;
9955                     tmp = l196.value;
9956                     l196.value = v1164;
9957                     v1164 = tmp;
9958                     return (((function(){
9959                         var tmp = v1162;
9960                         return (typeof tmp == 'object' && 'name' in tmp);
9961                     })()?l4.value: l5.value) !== l5.value ? (function(v1165){
9962                         return ((v1165 !== l5.value ? l29.fvalue(pv, l96.fvalue(pv, l226, l201.fvalue(pv, v1165))) : l5.value) !== l5.value ? l200.fvalue(values, v1165) : ((function(v1166){
9963                             return (v1166 !== l5.value ? v1166 : l96.fvalue(pv, l228, l201.fvalue(pv, v1165)));
9964                         })(l144.fvalue(pv, v1162)) !== l5.value ? l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l186, v1162)), ".value") : l193.fvalue(values, l47.fvalue(pv, l340, l47.fvalue(pv, l186, v1162)))));
9965                     })(l211.fvalue(pv, v1162, (function(){
9966                         var symbol = l212;
9967                         var value = symbol.value;
9968                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9969                         return value;
9970                     })(), l114)) : (l89.fvalue(pv, v1162) !== l5.value ? l19.fvalue(values, v1162) : (((typeof(v1162) == "string")?l4.value: l5.value) !== l5.value ? l191.fvalue(values, "\"", l167.fvalue(pv, v1162), "\"") : (((function(){
9971                         var x = v1162;
9972                         return typeof x === 'object' && 'length' in x;
9973                     })()?l4.value: l5.value) !== l5.value ? l262.fvalue(values, v1162) : (l62.fvalue(pv, v1162) !== l5.value ? (function(v1167,v1168){
9974                         return (l106.fvalue(pv, v1167, (function(){
9975                             var symbol = l230;
9976                             var value = symbol.value;
9977                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9978                             return value;
9979                         })()) !== l5.value ? (function(v1169){
9980                             return (function(){
9981                                 var f = v1169;
9982                                 var args = [values];
9983                                 var tail = (v1168);
9984                                 while (tail != l5.value){
9985                                     args.push(tail.car);
9986                                     tail = tail.cdr;
9987                                 }
9988                                 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
9989                             })();
9990                         })(l43.fvalue(pv, l106.fvalue(pv, v1167, (function(){
9991                             var symbol = l230;
9992                             var value = symbol.value;
9993                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9994                             return value;
9995                         })()))) : ((l106.fvalue(pv, v1167, (function(){
9996                             var symbol = l320;
9997                             var value = symbol.value;
9998                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9999                             return value;
10000                         })()) !== l5.value ? l29.fvalue(pv, l224.fvalue(pv, v1167, l113, l227)) : l5.value) !== l5.value ? (function(v1170){
10001                             return (function(){
10002                                 var f = v1170;
10003                                 var args = [values];
10004                                 var tail = (v1168);
10005                                 while (tail != l5.value){
10006                                     args.push(tail.car);
10007                                     tail = tail.cdr;
10008                                 }
10009                                 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
10010                             })();
10011                         })(l43.fvalue(pv, l106.fvalue(pv, v1167, (function(){
10012                             var symbol = l320;
10013                             var value = symbol.value;
10014                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10015                             return value;
10016                         })()))) : (l222.fvalue(pv, v1167) !== l5.value ? l193.fvalue(values, l120.fvalue(pv, v1162), v1163) : l368.fvalue(values, v1167, v1168))));
10017                     })((function(){
10018                         var tmp = v1162;
10019                         return tmp === l5.value? l5.value: tmp.car;
10020                     })(),(function(){
10021                         var tmp = v1162;
10022                         return tmp === l5.value? l5.value: tmp.cdr;
10023                     })()) : (function(){
10024                         throw l157.fvalue(pv, "How should I compile ", l166.fvalue(pv, v1162), "?");
10025                     })())))));
10026                 }
10027                 finally {
10028                     l196.value = v1164;
10029                 }
10030             })(v1163);
10031         })();
10032     }));
10033     return l193;
10034 })();
10035 var l370 = {name: "LS-COMPILE-TOPLEVEL"};
10036 (function(){
10037     (l370).fvalue = (function(v1178){
10038         ((v1178)["fname"] = "LS-COMPILE-TOPLEVEL");
10039         return v1178;
10040     })((function (values,v1172,v1173){
10041         checkArgsAtLeast(arguments, 2);
10042         checkArgsAtMost(arguments, 3);
10043         var v1173;
10044         switch(arguments.length-1){
10045         case 1:
10046             v1173=l5.value;
10047         default: break;
10048         }
10049         return (function(){
10050             return (function(v1174){
10051                 try {
10052                     var tmp;
10053                     tmp = l217.value;
10054                     l217.value = v1174;
10055                     v1174 = tmp;
10056                     return ((((function(){
10057                         var tmp = v1172;
10058                         return (typeof tmp == 'object' && 'car' in tmp);
10059                     })()?l4.value: l5.value) !== l5.value ? (((function(){
10060                         var tmp = v1172;
10061                         return tmp === l5.value? l5.value: tmp.car;
10062                     })() === l123)?l4.value: l5.value) : l5.value) !== l5.value ? (function(v1176){
10063                         return l159.fvalue(values, l98.fvalue(pv, (function(){
10064                             var symbol = l219;
10065                             var func = symbol.fvalue;
10066                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10067                             return func;
10068                         })(), v1176));
10069                     })(l81.fvalue(pv, (function (values,v1175){
10070                         checkArgs(arguments, 2);
10071                         return l370.fvalue(values, v1175, l4.value);
10072                     }), (function(){
10073                         var tmp = v1172;
10074                         return tmp === l5.value? l5.value: tmp.cdr;
10075                     })())) : (function(v1177){
10076                         return l191.fvalue(values, l160.fvalue(pv, l220.fvalue(pv), l191.fvalue(pv, ";", (function(){
10077                             var symbol = l156;
10078                             var value = symbol.value;
10079                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10080                             return value;
10081                         })())), (v1177 !== l5.value ? l191.fvalue(pv, v1177, ";", (function(){
10082                             var symbol = l156;
10083                             var value = symbol.value;
10084                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10085                             return value;
10086                         })()) : l5.value));
10087                     })(l193.fvalue(pv, v1172, v1173)));
10088                 }
10089                 finally {
10090                     l217.value = v1174;
10091                 }
10092             })(l5.value);
10093         })();
10094     }));
10095     return l370;
10096 })();
10097 (function(){
10098     (l272).fvalue = (function(v1180){
10099         ((v1180)["fname"] = "EVAL");
10100         return v1180;
10101     })((function (values,v1179){
10102         checkArgs(arguments, 2);
10103         return (function(){
10104             return (function(){
10105                 var string = l370.fvalue(pv, v1179, l4.value);
10106                 if (typeof string != 'string')
10107                     throw 'The value ' + string + ' is not a type string.';
10108                 return (function(){
10109                     var v = eval.apply(window, [string]);
10110                     if (typeof v !== 'object' || !('multiple-value' in v)){
10111                         v = [v];
10112                         v['multiple-value'] = true;
10113                     }
10114                     return values.apply(this, v);
10115                 })();
10116             })();
10117         })();
10118     }));
10119     return l272;
10120 })();
10121 var l371 = {name: "&BODY"};
10122 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);
10123 l154.fvalue(values, l372);
10124 ((l146).value = (function(){
10125     var symbol = l142;
10126     var value = symbol.value;
10127     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10128     return value;
10129 })());
10130 (function(){
10131     var string = "var lisp";
10132     if (typeof string != 'string')
10133         throw 'The value ' + string + ' is not a type string.';
10134     return (function(){
10135         var v = eval.apply(window, [string]);
10136         if (typeof v !== 'object' || !('multiple-value' in v)){
10137             v = [v];
10138             v['multiple-value'] = true;
10139         }
10140         return values.apply(this, v);
10141     })();
10142 })();
10143 (lisp = {});
10144 (lisp.read = (function(){
10145     var symbol = l190;
10146     var func = symbol.fvalue;
10147     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10148     return func;
10149 })());
10150 (lisp.print = (function(){
10151     var symbol = l166;
10152     var func = symbol.fvalue;
10153     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10154     return func;
10155 })());
10156 (lisp.eval = (function(){
10157     var symbol = l272;
10158     var func = symbol.fvalue;
10159     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10160     return func;
10161 })());
10162 (lisp.compile = (function (values,v1181){
10163     checkArgs(arguments, 2);
10164     return l370.fvalue(values, v1181, l4.value);
10165 }));
10166 (lisp.evalString = (function (values,v1182){
10167     checkArgs(arguments, 2);
10168     return l272.fvalue(values, l190.fvalue(pv, v1182));
10169 }));
10170 (lisp.compileString = (function (values,v1183){
10171     checkArgs(arguments, 2);
10172     return l370.fvalue(values, l190.fvalue(pv, v1183), l4.value);
10173 }));
10174 var l373 = {name: "OP"};
10175 var l374 = {name: "SYM"};
10176 var l375 = {name: "X"};
10177 var l376 = {name: "ARGS"};
10178 var l377 = {name: "BODY"};
10179 var l378 = {name: "DECLS"};
10180 var l379 = {name: "DECL"};
10181 var l380 = {name: "NAME"};
10182 var l381 = {name: "ARG"};
10183 var l382 = {name: "FORM"};
10184 var l383 = {name: "PACKAGE-DESIGNATOR"};
10185 var l384 = {name: "CLAUSULES"};
10186 var l385 = {name: "VALUE"};
10187 var l386 = {name: "C"};
10188 var l387 = {name: "INTEGER"};
10189 var l388 = {name: "PLACE"};
10190 var l389 = {name: "DUMMIES"};
10191 var l390 = {name: "VALS"};
10192 var l391 = {name: "NEWVAL"};
10193 var l392 = {name: "SETTER"};
10194 var l393 = {name: "GETTER"};
10195 var l394 = {name: "G"};
10196 var l395 = {name: "PAIRS"};
10197 var l396 = {name: "VARS"};
10198 var l397 = {name: "STORE-VARS"};
10199 var l398 = {name: "WRITER-FORM"};
10200 var l399 = {name: "READER-FORM"};
10201 var l400 = {name: "RESULT"};
10202 var l401 = {name: "ACCESS-FN"};
10203 var l402 = {name: "LAMBDA-LIST"};
10204 var l403 = {name: "VALUE-FROM"};
10205 var l404 = {name: "VARIABLES"};
10206 var l405 = {name: "ITERATION"};
10207 var l406 = {name: "SEQ"};
10208 var l407 = {name: "INDEX"};
10209 var l408 = {name: "HEAD"};
10210 var l409 = {name: "TAIL"};
10211 var l410 = {name: "COLLECT"};
10212 var l411 = {name: "VARLIST"};
10213 var l412 = {name: "ENDLIST"};
10214 var l413 = {name: "V"};
10215 var l414 = {name: "ASSIGNMENTS"};
10216 var l415 = {name: "FORM1"};
10217 var l416 = {name: "FORMS"};
10218 var l417 = {name: "!FORM"};
10219 var l418 = {name: "CLAUSULE"};
10220 var l419 = {name: "ITER"};
10221 var l420 = {name: "G!TO"};
10222 var l421 = {name: "VAR"};
10223 var l422 = {name: "TO"};
10224 var l423 = {name: "G!LIST"};
10225 var l424 = {name: "DELTA"};
10226 var l425 = {name: "CONDITION"};
10227 var l426 = {name: "DOCSTRING"};
10228 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(l51,l222,QIList(l113,QIList(l6,QIList(l375,l388,l5),QIList(l115,QIList(l389,l390,l391,l392,l393,l5),QIList(l118,l388,l5),QIList(l276,QIList(QIList(l394,QIList(l18,l5),l5),l5),QIList(l187,QIList(l279,QIList(QIList(QIList(l189,l394,l5),QIList(l189,l375,l5),l5),QIList(l188,QIList(l81,QIList(l113,l47,l5),l389,l390,l5),l5),QIList(QIList(l189,QIList(l32,l391,l5),l5),QIList(l30,QIList(l189,l394,l5),QIList(l189,l393,l5),l5),l5),QIList(l188,QIList(l33,l391,l5),l5),l5),QIList(l189,l392,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l122,l222,QIList(l113,QIList(l6,QIList(l235,l395,l5),QIList(l54,QIList(QIList(l13,l395,l5),l5,l5),QIList(QIList(l13,QIList(l33,l395,l5),l5),QIList(l354,"Odd number of arguments to setf.",l5),l5),QIList(QIList(l13,QIList(l37,l395,l5),l5),QIList(l276,QIList(QIList(l388,QIList(l42,l395,l5),l5),QIList(l385,QIList(l43,l395,l5),l5),l5),QIList(l115,QIList(l396,l390,l397,l398,l399,l5),QIList(l118,l388,l5),QIList(l187,QIList(l279,QIList(l189,QIList(l81,QIList(l113,l47,l5),l396,l390,l5),l5),QIList(l115,QIList(l189,l397,l5),QIList(l189,l385,l5),QIList(l189,l398,l5),l5),l5),l5),l5),l5),l5),QIList(l4,QIList(l187,QIList(l123,QIList(l188,QIList(l72,QIList(QIList(l395,l395,QIList(l37,l395,l5),l5),QIList(l400,QIList(l186,l5,l5),QIList(l30,QIList(l187,QIList(l122,QIList(l189,QIList(l32,l395,l5),l5),QIList(l189,QIList(l35,l395,l5),l5),l5),l5),l400,l5),l5),l5),QIList(QIList(l13,l395,l5),QIList(l70,l400,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l121,l222,QIList(l113,QIList(l6,QIList(l401,l402,l235,l377,l5),QIList(l8,QIList(l336,l401,l5),QIList(l354,"ACCESS-FN must be a symbol.",l5),l5),QIList(l187,QIList(l123,QIList(l51,QIList(l30,QIList(l186,QIList(l189,l401,l5),l5),QIList(l6,QIList(l189,l402,l5),QIList(l188,l377,l5),l5),l5),l117,l5),QIList(l186,QIList(l189,l401,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l116,l222,QIList(l113,QIList(l6,QIList(l403,l5),QIList(l187,QIList(l294,QIList(l113,l47,l5),QIList(l189,l403,l5),l5),l5),l5),l5),l5,l5),QIList(l115,l222,QIList(l113,QIList(l6,QIList(l404,l403,l235,l377,l5),QIList(l187,QIList(l294,QIList(l6,QIList(l234,QIList(l188,l404,l5),l235,QIList(l189,QIList(l18,l5),l5),l5),QIList(l188,l377,l5),l5),QIList(l189,l403,l5),l5),l5),l5),l5),l5,l5),QIList(l103,l222,QIList(l113,QIList(l6,QIList(l405,l235,l377,l5),QIList(l276,QIList(QIList(l406,QIList(l18,l5),l5),QIList(l407,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l406,l5),QIList(l189,QIList(l43,l405,l5),l5),l5),l5),QIList(l54,QIList(QIList(l346,QIList(l189,l406,l5),l5),QIList(l276,QIList(QIList(QIList(l189,l407,l5),0,l5),l5),QIList(l53,QIList(QIList(l189,l407,l5),QIList(l75,QIList(l189,l406,l5),l5),l5),QIList(l276,QIList(QIList(QIList(l189,QIList(l42,l405,l5),l5),QIList(l350,QIList(l189,l406,l5),QIList(l189,l407,l5),l5),l5),l5),QIList(l188,l377,l5),l5),l5),l5),l5),QIList(QIList(l62,QIList(l189,l406,l5),l5),QIList(l52,QIList(QIList(l189,QIList(l42,l405,l5),l5),QIList(l189,l406,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(l408,QIList(l18,l5),l5),QIList(l409,QIList(l18,l5),l5),l5),QIList(l187,QIList(l279,QIList(QIList(QIList(l189,l408,l5),QIList(l30,QIList(l186,l79,l5),l5,l5),l5),QIList(QIList(l189,l409,l5),QIList(l189,l408,l5),l5),l5),QIList(l268,QIList(QIList(l410,QIList(l375,l5),QIList(l125,QIList(l189,l409,l5),QIList(l30,l375,l5,l5),l5),QIList(l119,QIList(l189,l409,l5),QIList(l33,QIList(l189,l409,l5),l5),l5),l375,l5),l5),QIList(l188,l377,l5),l5),QIList(l33,QIList(l189,l408,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l73,l222,QIList(l113,QIList(l6,QIList(l411,l412,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),l411,l5),l5),QIList(l16,l4,QIList(l7,QIList(l189,QIList(l32,l412,l5),l5),QIList(l15,QIList(l123,QIList(l188,QIList(l33,l412,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(l413,l5),QIList(l57,QIList(l31,QIList(l37,l413,l5),l5),QIList(l47,QIList(l42,l413,l5),QIList(l44,l413,l5),l5),l5),l5),l411,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l72,l222,QIList(l113,QIList(l6,QIList(l411,l412,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),l411,l5),l5),QIList(l16,l4,QIList(l7,QIList(l189,QIList(l32,l412,l5),l5),QIList(l15,QIList(l123,QIList(l188,QIList(l33,l412,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(l413,l5),QIList(l57,QIList(l31,QIList(l37,l413,l5),l5),QIList(l47,QIList(l42,l413,l5),QIList(l44,l413,l5),l5),l5),l5),l411,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l71,l222,QIList(l113,QIList(l6,QIList(l235,l395,l5),QIList(l276,QIList(QIList(l414,QIList(l186,l5,l5),l5),l5),QIList(l16,l4,QIList(l54,QIList(QIList(l13,l395,l5),QIList(l15,l5),l5),QIList(QIList(l13,QIList(l33,l395,l5),l5),QIList(l354,"Odd paris in PSETQ",l5),l5),QIList(l4,QIList(l276,QIList(QIList(l114,QIList(l32,l395,l5),l5),QIList(l385,QIList(l35,l395,l5),l5),l5),QIList(l51,QIList(l187,QIList(QIList(l189,l114,l5),QIList(l189,QIList(l18,l5),l5),QIList(l189,l385,l5),l5),l5),l414,l5),QIList(l119,l395,QIList(l37,l395,l5),l5),l5),l5),l5),l5),QIList(l119,l414,QIList(l70,l414,l5),l5),QIList(l187,QIList(l276,QIList(l189,QIList(l81,QIList(l113,l33,l5),l414,l5),l5),QIList(l119,QIList(l188,QIList(l63,QIList(l113,l68,l5),QIList(l81,QIList(l113,l95,l5),l414,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l60,l222,QIList(l113,QIList(l6,QIList(l415,l400,l235,l377,l5),QIList(l187,QIList(l59,QIList(l123,QIList(l189,l415,l5),QIList(l189,l400,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,l416,l5),QIList(l54,QIList(QIList(l13,l416,l5),l5,l5),QIList(QIList(l13,QIList(l33,l416,l5),l5),QIList(l32,l416,l5),l5),QIList(l4,QIList(l276,QIList(QIList(l394,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l394,l5),QIList(l189,QIList(l32,l416,l5),l5),l5),l5),QIList(l232,QIList(l189,l394,l5),QIList(l189,l394,l5),QIList(l58,QIList(l188,QIList(l33,l416,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l57,l222,QIList(l113,QIList(l6,QIList(l235,l416,l5),QIList(l54,QIList(QIList(l13,l416,l5),l4,l5),QIList(QIList(l13,QIList(l33,l416,l5),l5),QIList(l32,l416,l5),l5),QIList(l4,QIList(l187,QIList(l232,QIList(l189,QIList(l32,l416,l5),l5),QIList(l57,QIList(l188,QIList(l33,l416,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(l417,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l417,l5),QIList(l189,l382,l5),l5),l5),QIList(l54,QIList(l188,QIList(l81,QIList(l6,QIList(l418,l5),QIList(l232,QIList(l343,QIList(l32,l418,l5),l4,l5),l418,QIList(l187,QIList(QIList(l28,QIList(l189,l417,l5),QIList(l186,QIList(l189,QIList(l32,l418,l5),l5),l5),l5),QIList(l188,QIList(l33,l418,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(l419,l235,l377,l5),QIList(l276,QIList(QIList(l420,QIList(l18,l5),l5),QIList(l421,QIList(l42,l419,l5),l5),QIList(l422,QIList(l43,l419,l5),l5),QIList(l400,QIList(l44,l419,l5),l5),l5),QIList(l187,QIList(l208,l5,QIList(l276,QIList(QIList(QIList(l189,l421,l5),0,l5),QIList(QIList(l189,l420,l5),QIList(l189,l422,l5),l5),l5),QIList(l263,QIList(l331,QIList(l189,l421,l5),QIList(l189,l420,l5),l5),QIList(l290,QIList(l188,l377,l5),l5),QIList(l49,QIList(l189,l421,l5),l5),l5),QIList(l189,l400,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l52,l222,QIList(l113,QIList(l6,QIList(l419,l235,l377,l5),QIList(l276,QIList(QIList(l421,QIList(l42,l419,l5),l5),QIList(l423,QIList(l18,l5),l5),l5),QIList(l187,QIList(l208,l5,QIList(l276,QIList(QIList(QIList(l189,l423,l5),QIList(l189,QIList(l43,l419,l5),l5),l5),QIList(QIList(l189,l421,l5),l5,l5),l5),QIList(l263,QIList(l189,l423,l5),QIList(l119,QIList(l189,l421,l5),QIList(l32,QIList(l189,l423,l5),l5),l5),QIList(l290,QIList(l188,l377,l5),l5),QIList(l119,QIList(l189,l423,l5),QIList(l33,QIList(l189,l423,l5),l5),l5),l5),QIList(l189,QIList(l44,l419,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l222,QIList(l113,QIList(l6,QIList(l375,l388,l5),QIList(l187,QIList(l119,QIList(l189,l388,l5),QIList(l30,QIList(l189,l375,l5),QIList(l189,l388,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);
10229 ((l212).value = l427);
10230 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);
10231 (function(){
10232     l148.fvalue(pv, l426);
10233     l148.fvalue(pv, l425);
10234     l148.fvalue(pv, l424);
10235     l148.fvalue(pv, l423);
10236     l148.fvalue(pv, l422);
10237     l148.fvalue(pv, l421);
10238     l148.fvalue(pv, l420);
10239     l148.fvalue(pv, l419);
10240     l148.fvalue(pv, l418);
10241     l148.fvalue(pv, l417);
10242     l148.fvalue(pv, l416);
10243     l148.fvalue(pv, l415);
10244     l148.fvalue(pv, l414);
10245     l148.fvalue(pv, l413);
10246     l148.fvalue(pv, l412);
10247     l148.fvalue(pv, l411);
10248     l148.fvalue(pv, l410);
10249     l148.fvalue(pv, l409);
10250     l148.fvalue(pv, l408);
10251     l148.fvalue(pv, l407);
10252     l148.fvalue(pv, l406);
10253     l148.fvalue(pv, l405);
10254     l148.fvalue(pv, l404);
10255     l148.fvalue(pv, l403);
10256     l148.fvalue(pv, l402);
10257     l148.fvalue(pv, l401);
10258     l148.fvalue(pv, l400);
10259     l148.fvalue(pv, l399);
10260     l148.fvalue(pv, l398);
10261     l148.fvalue(pv, l397);
10262     l148.fvalue(pv, l396);
10263     l148.fvalue(pv, l395);
10264     l148.fvalue(pv, l394);
10265     l148.fvalue(pv, l393);
10266     l148.fvalue(pv, l392);
10267     l148.fvalue(pv, l391);
10268     l148.fvalue(pv, l390);
10269     l148.fvalue(pv, l389);
10270     l148.fvalue(pv, l388);
10271     l148.fvalue(pv, l387);
10272     l148.fvalue(pv, l386);
10273     l148.fvalue(pv, l385);
10274     l148.fvalue(pv, l384);
10275     l148.fvalue(pv, l383);
10276     l148.fvalue(pv, l382);
10277     l148.fvalue(pv, l381);
10278     l148.fvalue(pv, l380);
10279     l148.fvalue(pv, l379);
10280     l148.fvalue(pv, l378);
10281     l148.fvalue(pv, l377);
10282     l148.fvalue(pv, l376);
10283     l148.fvalue(pv, l375);
10284     l148.fvalue(pv, l374);
10285     l148.fvalue(pv, l373);
10286     l148.fvalue(pv, l371);
10287     l148.fvalue(pv, l370);
10288     l148.fvalue(pv, l369);
10289     l148.fvalue(pv, l368);
10290     l148.fvalue(pv, l367);
10291     l148.fvalue(pv, l366);
10292     l148.fvalue(pv, l365);
10293     l148.fvalue(pv, l364);
10294     l148.fvalue(pv, l363);
10295     l148.fvalue(pv, l362);
10296     l148.fvalue(pv, l361);
10297     l148.fvalue(pv, l360);
10298     l148.fvalue(pv, l359);
10299     l148.fvalue(pv, l358);
10300     l148.fvalue(pv, l357);
10301     l148.fvalue(pv, l356);
10302     l148.fvalue(pv, l355);
10303     l148.fvalue(pv, l354);
10304     l148.fvalue(pv, l353);
10305     l148.fvalue(pv, l352);
10306     l148.fvalue(pv, l351);
10307     l148.fvalue(pv, l350);
10308     l148.fvalue(pv, l349);
10309     l148.fvalue(pv, l348);
10310     l148.fvalue(pv, l347);
10311     l148.fvalue(pv, l346);
10312     l148.fvalue(pv, l345);
10313     l148.fvalue(pv, l344);
10314     l148.fvalue(pv, l343);
10315     l148.fvalue(pv, l342);
10316     l148.fvalue(pv, l341);
10317     l148.fvalue(pv, l340);
10318     l148.fvalue(pv, l339);
10319     l148.fvalue(pv, l338);
10320     l148.fvalue(pv, l337);
10321     l148.fvalue(pv, l336);
10322     l148.fvalue(pv, l335);
10323     l148.fvalue(pv, l334);
10324     l148.fvalue(pv, l333);
10325     l148.fvalue(pv, l332);
10326     l148.fvalue(pv, l331);
10327     l148.fvalue(pv, l330);
10328     l148.fvalue(pv, l329);
10329     l148.fvalue(pv, l328);
10330     l148.fvalue(pv, l327);
10331     l148.fvalue(pv, l326);
10332     l148.fvalue(pv, l325);
10333     l148.fvalue(pv, l324);
10334     l148.fvalue(pv, l323);
10335     l148.fvalue(pv, l322);
10336     l148.fvalue(pv, l321);
10337     l148.fvalue(pv, l320);
10338     l148.fvalue(pv, l319);
10339     l148.fvalue(pv, l318);
10340     l148.fvalue(pv, l317);
10341     l148.fvalue(pv, l316);
10342     l148.fvalue(pv, l315);
10343     l148.fvalue(pv, l314);
10344     l148.fvalue(pv, l313);
10345     l148.fvalue(pv, l312);
10346     l148.fvalue(pv, l311);
10347     l148.fvalue(pv, l310);
10348     l148.fvalue(pv, l309);
10349     l148.fvalue(pv, l308);
10350     l148.fvalue(pv, l307);
10351     l148.fvalue(pv, l306);
10352     l148.fvalue(pv, l305);
10353     l148.fvalue(pv, l304);
10354     l148.fvalue(pv, l303);
10355     l148.fvalue(pv, l302);
10356     l148.fvalue(pv, l301);
10357     l148.fvalue(pv, l300);
10358     l148.fvalue(pv, l299);
10359     l148.fvalue(pv, l298);
10360     l148.fvalue(pv, l297);
10361     l148.fvalue(pv, l296);
10362     l148.fvalue(pv, l295);
10363     l148.fvalue(pv, l294);
10364     l148.fvalue(pv, l293);
10365     l148.fvalue(pv, l292);
10366     l148.fvalue(pv, l290);
10367     l148.fvalue(pv, l289);
10368     l148.fvalue(pv, l288);
10369     l148.fvalue(pv, l287);
10370     l148.fvalue(pv, l286);
10371     l148.fvalue(pv, l285);
10372     l148.fvalue(pv, l284);
10373     l148.fvalue(pv, l283);
10374     l148.fvalue(pv, l282);
10375     l148.fvalue(pv, l281);
10376     l148.fvalue(pv, l280);
10377     l148.fvalue(pv, l279);
10378     l148.fvalue(pv, l278);
10379     l148.fvalue(pv, l277);
10380     l148.fvalue(pv, l276);
10381     l148.fvalue(pv, l275);
10382     l148.fvalue(pv, l274);
10383     l148.fvalue(pv, l273);
10384     l148.fvalue(pv, l272);
10385     l148.fvalue(pv, l271);
10386     l148.fvalue(pv, l270);
10387     l148.fvalue(pv, l269);
10388     l148.fvalue(pv, l268);
10389     l148.fvalue(pv, l267);
10390     l148.fvalue(pv, l266);
10391     l148.fvalue(pv, l265);
10392     l148.fvalue(pv, l264);
10393     l148.fvalue(pv, l263);
10394     l148.fvalue(pv, l262);
10395     l148.fvalue(pv, l261);
10396     l148.fvalue(pv, l260);
10397     l148.fvalue(pv, l259);
10398     l148.fvalue(pv, l258);
10399     l148.fvalue(pv, l257);
10400     l148.fvalue(pv, l256);
10401     l148.fvalue(pv, l255);
10402     l148.fvalue(pv, l254);
10403     l148.fvalue(pv, l253);
10404     l148.fvalue(pv, l252);
10405     l148.fvalue(pv, l251);
10406     l148.fvalue(pv, l250);
10407     l148.fvalue(pv, l249);
10408     l148.fvalue(pv, l248);
10409     l148.fvalue(pv, l247);
10410     l148.fvalue(pv, l246);
10411     l148.fvalue(pv, l245);
10412     l148.fvalue(pv, l244);
10413     l148.fvalue(pv, l243);
10414     l148.fvalue(pv, l242);
10415     l148.fvalue(pv, l241);
10416     l148.fvalue(pv, l240);
10417     l148.fvalue(pv, l239);
10418     l148.fvalue(pv, l238);
10419     l148.fvalue(pv, l236);
10420     l148.fvalue(pv, l235);
10421     l148.fvalue(pv, l234);
10422     l148.fvalue(pv, l233);
10423     l148.fvalue(pv, l232);
10424     l148.fvalue(pv, l231);
10425     l148.fvalue(pv, l230);
10426     l148.fvalue(pv, l229);
10427     l148.fvalue(pv, l228);
10428     l148.fvalue(pv, l227);
10429     l148.fvalue(pv, l226);
10430     l148.fvalue(pv, l225);
10431     l148.fvalue(pv, l224);
10432     l148.fvalue(pv, l223);
10433     l148.fvalue(pv, l222);
10434     l148.fvalue(pv, l221);
10435     l148.fvalue(pv, l220);
10436     l148.fvalue(pv, l219);
10437     l148.fvalue(pv, l218);
10438     l148.fvalue(pv, l217);
10439     l148.fvalue(pv, l216);
10440     l148.fvalue(pv, l215);
10441     l148.fvalue(pv, l214);
10442     l148.fvalue(pv, l213);
10443     l148.fvalue(pv, l212);
10444     l148.fvalue(pv, l211);
10445     l148.fvalue(pv, l210);
10446     l148.fvalue(pv, l209);
10447     l148.fvalue(pv, l208);
10448     l148.fvalue(pv, l207);
10449     l148.fvalue(pv, l206);
10450     l148.fvalue(pv, l205);
10451     l148.fvalue(pv, l204);
10452     l148.fvalue(pv, l203);
10453     l148.fvalue(pv, l202);
10454     l148.fvalue(pv, l201);
10455     l148.fvalue(pv, l200);
10456     l148.fvalue(pv, l199);
10457     l148.fvalue(pv, l198);
10458     l148.fvalue(pv, l197);
10459     l148.fvalue(pv, l196);
10460     l148.fvalue(pv, l195);
10461     l148.fvalue(pv, l194);
10462     l148.fvalue(pv, l193);
10463     l148.fvalue(pv, l192);
10464     l148.fvalue(pv, l191);
10465     l148.fvalue(pv, l190);
10466     l148.fvalue(pv, l189);
10467     l148.fvalue(pv, l188);
10468     l148.fvalue(pv, l187);
10469     l148.fvalue(pv, l186);
10470     l148.fvalue(pv, l185);
10471     l148.fvalue(pv, l184);
10472     l148.fvalue(pv, l183);
10473     l148.fvalue(pv, l182);
10474     l148.fvalue(pv, l181);
10475     l148.fvalue(pv, l180);
10476     l148.fvalue(pv, l179);
10477     l148.fvalue(pv, l178);
10478     l148.fvalue(pv, l177);
10479     l148.fvalue(pv, l176);
10480     l148.fvalue(pv, l175);
10481     l148.fvalue(pv, l174);
10482     l148.fvalue(pv, l173);
10483     l148.fvalue(pv, l172);
10484     l148.fvalue(pv, l171);
10485     l148.fvalue(pv, l170);
10486     l148.fvalue(pv, l169);
10487     l148.fvalue(pv, l168);
10488     l148.fvalue(pv, l167);
10489     l148.fvalue(pv, l166);
10490     l148.fvalue(pv, l165);
10491     l148.fvalue(pv, l164);
10492     l148.fvalue(pv, l163);
10493     l148.fvalue(pv, l162);
10494     l148.fvalue(pv, l161);
10495     l148.fvalue(pv, l160);
10496     l148.fvalue(pv, l159);
10497     l148.fvalue(pv, l158);
10498     l148.fvalue(pv, l157);
10499     l148.fvalue(pv, l156);
10500     l148.fvalue(pv, l155);
10501     l148.fvalue(pv, l154);
10502     l148.fvalue(pv, l153);
10503     l148.fvalue(pv, l152);
10504     l148.fvalue(pv, l151);
10505     l148.fvalue(pv, l150);
10506     l148.fvalue(pv, l149);
10507     l148.fvalue(pv, l148);
10508     l148.fvalue(pv, l147);
10509     l148.fvalue(pv, l146);
10510     l148.fvalue(pv, l145);
10511     l148.fvalue(pv, l144);
10512     l148.fvalue(pv, l143);
10513     l148.fvalue(pv, l142);
10514     l148.fvalue(pv, l141);
10515     l148.fvalue(pv, l140);
10516     l148.fvalue(pv, l139);
10517     l148.fvalue(pv, l138);
10518     l148.fvalue(pv, l137);
10519     l148.fvalue(pv, l136);
10520     l148.fvalue(pv, l135);
10521     l148.fvalue(pv, l134);
10522     l148.fvalue(pv, l133);
10523     l148.fvalue(pv, l132);
10524     l148.fvalue(pv, l131);
10525     l148.fvalue(pv, l130);
10526     l148.fvalue(pv, l129);
10527     l148.fvalue(pv, l128);
10528     l148.fvalue(pv, l127);
10529     l148.fvalue(pv, l126);
10530     l148.fvalue(pv, l125);
10531     l148.fvalue(pv, l124);
10532     l148.fvalue(pv, l123);
10533     l148.fvalue(pv, l122);
10534     l148.fvalue(pv, l121);
10535     l148.fvalue(pv, l120);
10536     l148.fvalue(pv, l119);
10537     l148.fvalue(pv, l118);
10538     l148.fvalue(pv, l117);
10539     l148.fvalue(pv, l116);
10540     l148.fvalue(pv, l115);
10541     l148.fvalue(pv, l114);
10542     l148.fvalue(pv, l113);
10543     l148.fvalue(pv, l112);
10544     l148.fvalue(pv, l111);
10545     l148.fvalue(pv, l110);
10546     l148.fvalue(pv, l109);
10547     l148.fvalue(pv, l108);
10548     l148.fvalue(pv, l107);
10549     l148.fvalue(pv, l106);
10550     l148.fvalue(pv, l105);
10551     l148.fvalue(pv, l104);
10552     l148.fvalue(pv, l103);
10553     l148.fvalue(pv, l102);
10554     l148.fvalue(pv, l101);
10555     l148.fvalue(pv, l100);
10556     l148.fvalue(pv, l99);
10557     l148.fvalue(pv, l98);
10558     l148.fvalue(pv, l97);
10559     l148.fvalue(pv, l96);
10560     l148.fvalue(pv, l95);
10561     l148.fvalue(pv, l94);
10562     l148.fvalue(pv, l93);
10563     l148.fvalue(pv, l92);
10564     l148.fvalue(pv, l91);
10565     l148.fvalue(pv, l90);
10566     l148.fvalue(pv, l89);
10567     l148.fvalue(pv, l88);
10568     l148.fvalue(pv, l87);
10569     l148.fvalue(pv, l86);
10570     l148.fvalue(pv, l85);
10571     l148.fvalue(pv, l84);
10572     l148.fvalue(pv, l83);
10573     l148.fvalue(pv, l82);
10574     l148.fvalue(pv, l81);
10575     l148.fvalue(pv, l80);
10576     l148.fvalue(pv, l79);
10577     l148.fvalue(pv, l78);
10578     l148.fvalue(pv, l77);
10579     l148.fvalue(pv, l76);
10580     l148.fvalue(pv, l75);
10581     l148.fvalue(pv, l74);
10582     l148.fvalue(pv, l73);
10583     l148.fvalue(pv, l72);
10584     l148.fvalue(pv, l71);
10585     l148.fvalue(pv, l70);
10586     l148.fvalue(pv, l69);
10587     l148.fvalue(pv, l68);
10588     l148.fvalue(pv, l67);
10589     l148.fvalue(pv, l66);
10590     l148.fvalue(pv, l65);
10591     l148.fvalue(pv, l64);
10592     l148.fvalue(pv, l63);
10593     l148.fvalue(pv, l62);
10594     l148.fvalue(pv, l61);
10595     l148.fvalue(pv, l60);
10596     l148.fvalue(pv, l59);
10597     l148.fvalue(pv, l58);
10598     l148.fvalue(pv, l57);
10599     l148.fvalue(pv, l56);
10600     l148.fvalue(pv, l55);
10601     l148.fvalue(pv, l54);
10602     l148.fvalue(pv, l53);
10603     l148.fvalue(pv, l52);
10604     l148.fvalue(pv, l51);
10605     l148.fvalue(pv, l50);
10606     l148.fvalue(pv, l49);
10607     l148.fvalue(pv, l48);
10608     l148.fvalue(pv, l47);
10609     l148.fvalue(pv, l46);
10610     l148.fvalue(pv, l45);
10611     l148.fvalue(pv, l44);
10612     l148.fvalue(pv, l43);
10613     l148.fvalue(pv, l42);
10614     l148.fvalue(pv, l41);
10615     l148.fvalue(pv, l40);
10616     l148.fvalue(pv, l39);
10617     l148.fvalue(pv, l38);
10618     l148.fvalue(pv, l37);
10619     l148.fvalue(pv, l36);
10620     l148.fvalue(pv, l35);
10621     l148.fvalue(pv, l34);
10622     l148.fvalue(pv, l33);
10623     l148.fvalue(pv, l32);
10624     l148.fvalue(pv, l31);
10625     l148.fvalue(pv, l30);
10626     l148.fvalue(pv, l29);
10627     l148.fvalue(pv, l28);
10628     l148.fvalue(pv, l27);
10629     l148.fvalue(pv, l26);
10630     l148.fvalue(pv, l25);
10631     l148.fvalue(pv, l24);
10632     l148.fvalue(pv, l23);
10633     l148.fvalue(pv, l22);
10634     l148.fvalue(pv, l21);
10635     l148.fvalue(pv, l20);
10636     l148.fvalue(pv, l19);
10637     l148.fvalue(pv, l18);
10638     l148.fvalue(pv, l17);
10639     l148.fvalue(pv, l16);
10640     l148.fvalue(pv, l15);
10641     l148.fvalue(pv, l14);
10642     l148.fvalue(pv, l13);
10643     l148.fvalue(pv, l12);
10644     l148.fvalue(pv, l11);
10645     l148.fvalue(pv, l10);
10646     l148.fvalue(pv, l9);
10647     l148.fvalue(pv, l8);
10648     l148.fvalue(pv, l7);
10649     l148.fvalue(pv, l6);
10650     l148.fvalue(pv, l5);
10651     l148.fvalue(pv, l4);
10652     l148.fvalue(pv, l3);
10653     l148.fvalue(pv, l2);
10654     l148.fvalue(pv, l1);
10655     ((l259).value = l428);
10656     ((l213).value = 1183);
10657     ((l17).value = 454);
10658     return ((l280).value = 332);
10659 })();
10660 ((l260).value = 428);