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: "NIL"};
  54 ((l3).value = l3);
  55 (nil = l3.value);
  56 var l4 = {name: "T"};
  57 ((l4).value = l4);
  58 var l5 = {name: "LAMBDA"};
  59 l5;
  60 var l6 = {name: "WHEN"};
  61 l6;
  62 var l7 = {name: "UNLESS"};
  63 l7;
  64 var l8 = {name: "DEFVAR"};
  65 l8;
  66 var l9 = {name: "DEFPARAMETER"};
  67 l9;
  68 var l10 = {name: "NAMED-LAMBDA"};
  69 l10;
  70 var l11 = {name: "DEFUN"};
  71 l11;
  72 var l12 = {name: "NULL"};
  73 (function(){
  74     (l12).fvalue = (function(v2){
  75         ((v2)["fname"] = "NULL");
  76         return v2;
  77     })((function (values,v1){
  78         checkArgs(arguments, 2);
  79         var i;
  80         return (function(){
  81             return ((v1 === l3.value)?l4.value: l3.value);
  82         })();
  83     }));
  84     return l12;
  85 })();
  86 var l13 = {name: "RETURN"};
  87 l13;
  88 var l14 = {name: "WHILE"};
  89 l14;
  90 var l15 = {name: "*GENSYM-COUNTER*"};
  91 (function(){
  92     (((l15.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l15).value = 0));
  93     return l15;
  94 })();
  95 var l16 = {name: "GENSYM"};
  96 var l17 = {name: "INTEGER-TO-STRING"};
  97 (function(){
  98     (l16).fvalue = (function(v4){
  99         ((v4)["fname"] = "GENSYM");
 100         return v4;
 101     })((function (values,v3){
 102         checkArgsAtMost(arguments, 2);
 103         switch(arguments.length-1){
 104         case 0:
 105         v3="G";
 106         default: break;
 107         }
 108         var i;
 109         return (function(){
 110             ((l15).value = (function(){
 111                 var x1 = (function(){
 112                     var symbol = l15;
 113                     var value = symbol.value;
 114                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 115                     return value;
 116                 })();
 117                 if (typeof x1 !== 'number') throw 'Not a number!';
 118                 var x2 = 1;
 119                 if (typeof x2 !== 'number') throw 'Not a number!';
 120                 return x1+x2;
 121             })());
 122             return (function(){
 123                 var name = (function(){
 124                     var string1 = v3;
 125                     var string2 = l17.fvalue(pv, (function(){
 126                         var symbol = l15;
 127                         var value = symbol.value;
 128                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 129                         return value;
 130                     })());
 131                     if (typeof string1 != 'string')
 132                         throw 'The value ' + string1 + ' is not a type string.';
 133                     if (typeof string2 != 'string')
 134                         throw 'The value ' + string2 + ' is not a type string.';
 135                     return string1.concat(string2);
 136                 })();
 137                 if (typeof name != 'string')
 138                     throw 'The value ' + name + ' is not a type string.';
 139                 return ({name: name});
 140             })();
 141         })();
 142     }));
 143     return l16;
 144 })();
 145 var l18 = {name: "BOUNDP"};
 146 (function(){
 147     (l18).fvalue = (function(v6){
 148         ((v6)["fname"] = "BOUNDP");
 149         return v6;
 150     })((function (values,v5){
 151         checkArgs(arguments, 2);
 152         var i;
 153         return (function(){
 154             return ((v5.value !== undefined)?l4.value: l3.value);
 155         })();
 156     }));
 157     return l18;
 158 })();
 159 var l19 = {name: "="};
 160 (function(){
 161     (l19).fvalue = (function(v9){
 162         ((v9)["fname"] = "=");
 163         return v9;
 164     })((function (values,v7,v8){
 165         checkArgs(arguments, 3);
 166         var i;
 167         return (function(){
 168             return (function(){
 169                 var x1 = v7;
 170                 if (typeof x1 !== 'number') throw 'Not a number!';
 171                 var x2 = v8;
 172                 if (typeof x2 !== 'number') throw 'Not a number!';
 173                 return (x1==x2?l4.value: l3.value);
 174             })();
 175         })();
 176     }));
 177     return l19;
 178 })();
 179 var l20 = {name: "*"};
 180 (function(){
 181     (l20).fvalue = (function(v12){
 182         ((v12)["fname"] = "*");
 183         return v12;
 184     })((function (values,v10,v11){
 185         checkArgs(arguments, 3);
 186         var i;
 187         return (function(){
 188             return (function(){
 189                 var x1 = v10;
 190                 if (typeof x1 !== 'number') throw 'Not a number!';
 191                 var x2 = v11;
 192                 if (typeof x2 !== 'number') throw 'Not a number!';
 193                 return x1*x2;
 194             })();
 195         })();
 196     }));
 197     return l20;
 198 })();
 199 var l21 = {name: "/"};
 200 (function(){
 201     (l21).fvalue = (function(v15){
 202         ((v15)["fname"] = "/");
 203         return v15;
 204     })((function (values,v13,v14){
 205         checkArgs(arguments, 3);
 206         var i;
 207         return (function(){
 208             return (function(){
 209                 var x1 = v13;
 210                 if (typeof x1 !== 'number') throw 'Not a number!';
 211                 var x2 = v14;
 212                 if (typeof x2 !== 'number') throw 'Not a number!';
 213                 return x1/x2;
 214             })();
 215         })();
 216     }));
 217     return l21;
 218 })();
 219 var l22 = {name: "1+"};
 220 (function(){
 221     (l22).fvalue = (function(v17){
 222         ((v17)["fname"] = "1+");
 223         return v17;
 224     })((function (values,v16){
 225         checkArgs(arguments, 2);
 226         var i;
 227         return (function(){
 228             return (function(){
 229                 var x1 = v16;
 230                 if (typeof x1 !== 'number') throw 'Not a number!';
 231                 var x2 = 1;
 232                 if (typeof x2 !== 'number') throw 'Not a number!';
 233                 return x1+x2;
 234             })();
 235         })();
 236     }));
 237     return l22;
 238 })();
 239 var l23 = {name: "1-"};
 240 (function(){
 241     (l23).fvalue = (function(v19){
 242         ((v19)["fname"] = "1-");
 243         return v19;
 244     })((function (values,v18){
 245         checkArgs(arguments, 2);
 246         var i;
 247         return (function(){
 248             return (function(){
 249                 var x1 = v18;
 250                 if (typeof x1 !== 'number') throw 'Not a number!';
 251                 var x2 = 1;
 252                 if (typeof x2 !== 'number') throw 'Not a number!';
 253                 return x1-x2;
 254             })();
 255         })();
 256     }));
 257     return l23;
 258 })();
 259 var l24 = {name: "ZEROP"};
 260 (function(){
 261     (l24).fvalue = (function(v21){
 262         ((v21)["fname"] = "ZEROP");
 263         return v21;
 264     })((function (values,v20){
 265         checkArgs(arguments, 2);
 266         var i;
 267         return (function(){
 268             return (function(){
 269                 var x1 = v20;
 270                 if (typeof x1 !== 'number') throw 'Not a number!';
 271                 var x2 = 0;
 272                 if (typeof x2 !== 'number') throw 'Not a number!';
 273                 return (x1==x2?l4.value: l3.value);
 274             })();
 275         })();
 276     }));
 277     return l24;
 278 })();
 279 var l25 = {name: "TRUNCATE"};
 280 (function(){
 281     (l25).fvalue = (function(v24){
 282         ((v24)["fname"] = "TRUNCATE");
 283         return v24;
 284     })((function (values,v22,v23){
 285         checkArgs(arguments, 3);
 286         var i;
 287         return (function(){
 288             return (function(){
 289                 var x = (function(){
 290                     var x1 = v22;
 291                     if (typeof x1 !== 'number') throw 'Not a number!';
 292                     var x2 = v23;
 293                     if (typeof x2 !== 'number') throw 'Not a number!';
 294                     return x1/x2;
 295                 })();
 296                 if (typeof x != 'number')
 297                     throw 'The value ' + x + ' is not a type number.';
 298                 return Math.floor(x);
 299             })();
 300         })();
 301     }));
 302     return l25;
 303 })();
 304 var l26 = {name: "EQL"};
 305 (function(){
 306     (l26).fvalue = (function(v27){
 307         ((v27)["fname"] = "EQL");
 308         return v27;
 309     })((function (values,v25,v26){
 310         checkArgs(arguments, 3);
 311         var i;
 312         return (function(){
 313             return ((v25 === v26)?l4.value: l3.value);
 314         })();
 315     }));
 316     return l26;
 317 })();
 318 var l27 = {name: "NOT"};
 319 (function(){
 320     (l27).fvalue = (function(v29){
 321         ((v29)["fname"] = "NOT");
 322         return v29;
 323     })((function (values,v28){
 324         checkArgs(arguments, 2);
 325         var i;
 326         return (function(){
 327             return (v28 !== l3.value ? l3.value : l4.value);
 328         })();
 329     }));
 330     return l27;
 331 })();
 332 var l28 = {name: "CONS"};
 333 (function(){
 334     (l28).fvalue = (function(v32){
 335         ((v32)["fname"] = "CONS");
 336         return v32;
 337     })((function (values,v30,v31){
 338         checkArgs(arguments, 3);
 339         var i;
 340         return (function(){
 341             return ({car: v30, cdr: v31});
 342         })();
 343     }));
 344     return l28;
 345 })();
 346 var l29 = {name: "CONSP"};
 347 (function(){
 348     (l29).fvalue = (function(v34){
 349         ((v34)["fname"] = "CONSP");
 350         return v34;
 351     })((function (values,v33){
 352         checkArgs(arguments, 2);
 353         var i;
 354         return (function(){
 355             return ((function(){
 356                 var tmp = v33;
 357                 return (typeof tmp == 'object' && 'car' in tmp);
 358             })()?l4.value: l3.value);
 359         })();
 360     }));
 361     return l29;
 362 })();
 363 var l30 = {name: "CAR"};
 364 (function(){
 365     (l30).fvalue = (function(v36){
 366         ((v36)["fname"] = "CAR");
 367         return v36;
 368     })((function(){
 369         var func = (function (values,v35){
 370             checkArgs(arguments, 2);
 371             var i;
 372             return (function(){
 373                 return (function(){
 374                     var tmp = v35;
 375                     return tmp === l3.value? l3.value: tmp.car;
 376                 })();
 377             })();
 378         });
 379         func.docstring = 'Return the CAR part of a cons, or NIL if X is null.';
 380         return func;
 381     })());
 382     return l30;
 383 })();
 384 var l31 = {name: "CDR"};
 385 (function(){
 386     (l31).fvalue = (function(v38){
 387         ((v38)["fname"] = "CDR");
 388         return v38;
 389     })((function (values,v37){
 390         checkArgs(arguments, 2);
 391         var i;
 392         return (function(){
 393             return (function(){
 394                 var tmp = v37;
 395                 return tmp === l3.value? l3.value: tmp.cdr;
 396             })();
 397         })();
 398     }));
 399     return l31;
 400 })();
 401 var l32 = {name: "CAAR"};
 402 (function(){
 403     (l32).fvalue = (function(v40){
 404         ((v40)["fname"] = "CAAR");
 405         return v40;
 406     })((function (values,v39){
 407         checkArgs(arguments, 2);
 408         var i;
 409         return (function(){
 410             return (function(){
 411                 var tmp = (function(){
 412                     var tmp = v39;
 413                     return tmp === l3.value? l3.value: tmp.car;
 414                 })();
 415                 return tmp === l3.value? l3.value: tmp.car;
 416             })();
 417         })();
 418     }));
 419     return l32;
 420 })();
 421 var l33 = {name: "CADR"};
 422 (function(){
 423     (l33).fvalue = (function(v42){
 424         ((v42)["fname"] = "CADR");
 425         return v42;
 426     })((function (values,v41){
 427         checkArgs(arguments, 2);
 428         var i;
 429         return (function(){
 430             return (function(){
 431                 var tmp = (function(){
 432                     var tmp = v41;
 433                     return tmp === l3.value? l3.value: tmp.cdr;
 434                 })();
 435                 return tmp === l3.value? l3.value: tmp.car;
 436             })();
 437         })();
 438     }));
 439     return l33;
 440 })();
 441 var l34 = {name: "CDAR"};
 442 (function(){
 443     (l34).fvalue = (function(v44){
 444         ((v44)["fname"] = "CDAR");
 445         return v44;
 446     })((function (values,v43){
 447         checkArgs(arguments, 2);
 448         var i;
 449         return (function(){
 450             return (function(){
 451                 var tmp = (function(){
 452                     var tmp = v43;
 453                     return tmp === l3.value? l3.value: tmp.car;
 454                 })();
 455                 return tmp === l3.value? l3.value: tmp.cdr;
 456             })();
 457         })();
 458     }));
 459     return l34;
 460 })();
 461 var l35 = {name: "CDDR"};
 462 (function(){
 463     (l35).fvalue = (function(v46){
 464         ((v46)["fname"] = "CDDR");
 465         return v46;
 466     })((function (values,v45){
 467         checkArgs(arguments, 2);
 468         var i;
 469         return (function(){
 470             return (function(){
 471                 var tmp = (function(){
 472                     var tmp = v45;
 473                     return tmp === l3.value? l3.value: tmp.cdr;
 474                 })();
 475                 return tmp === l3.value? l3.value: tmp.cdr;
 476             })();
 477         })();
 478     }));
 479     return l35;
 480 })();
 481 var l36 = {name: "CADDR"};
 482 (function(){
 483     (l36).fvalue = (function(v48){
 484         ((v48)["fname"] = "CADDR");
 485         return v48;
 486     })((function (values,v47){
 487         checkArgs(arguments, 2);
 488         var i;
 489         return (function(){
 490             return (function(){
 491                 var tmp = (function(){
 492                     var tmp = (function(){
 493                         var tmp = v47;
 494                         return tmp === l3.value? l3.value: tmp.cdr;
 495                     })();
 496                     return tmp === l3.value? l3.value: tmp.cdr;
 497                 })();
 498                 return tmp === l3.value? l3.value: tmp.car;
 499             })();
 500         })();
 501     }));
 502     return l36;
 503 })();
 504 var l37 = {name: "CDDDR"};
 505 (function(){
 506     (l37).fvalue = (function(v50){
 507         ((v50)["fname"] = "CDDDR");
 508         return v50;
 509     })((function (values,v49){
 510         checkArgs(arguments, 2);
 511         var i;
 512         return (function(){
 513             return (function(){
 514                 var tmp = (function(){
 515                     var tmp = (function(){
 516                         var tmp = v49;
 517                         return tmp === l3.value? l3.value: tmp.cdr;
 518                     })();
 519                     return tmp === l3.value? l3.value: tmp.cdr;
 520                 })();
 521                 return tmp === l3.value? l3.value: tmp.cdr;
 522             })();
 523         })();
 524     }));
 525     return l37;
 526 })();
 527 var l38 = {name: "CADDDR"};
 528 (function(){
 529     (l38).fvalue = (function(v52){
 530         ((v52)["fname"] = "CADDDR");
 531         return v52;
 532     })((function (values,v51){
 533         checkArgs(arguments, 2);
 534         var i;
 535         return (function(){
 536             return (function(){
 537                 var tmp = (function(){
 538                     var tmp = (function(){
 539                         var tmp = (function(){
 540                             var tmp = v51;
 541                             return tmp === l3.value? l3.value: tmp.cdr;
 542                         })();
 543                         return tmp === l3.value? l3.value: tmp.cdr;
 544                     })();
 545                     return tmp === l3.value? l3.value: tmp.cdr;
 546                 })();
 547                 return tmp === l3.value? l3.value: tmp.car;
 548             })();
 549         })();
 550     }));
 551     return l38;
 552 })();
 553 var l39 = {name: "FIRST"};
 554 (function(){
 555     (l39).fvalue = (function(v54){
 556         ((v54)["fname"] = "FIRST");
 557         return v54;
 558     })((function (values,v53){
 559         checkArgs(arguments, 2);
 560         var i;
 561         return (function(){
 562             return (function(){
 563                 var tmp = v53;
 564                 return tmp === l3.value? l3.value: tmp.car;
 565             })();
 566         })();
 567     }));
 568     return l39;
 569 })();
 570 var l40 = {name: "SECOND"};
 571 (function(){
 572     (l40).fvalue = (function(v56){
 573         ((v56)["fname"] = "SECOND");
 574         return v56;
 575     })((function (values,v55){
 576         checkArgs(arguments, 2);
 577         var i;
 578         return (function(){
 579             return l33.fvalue(values, v55);
 580         })();
 581     }));
 582     return l40;
 583 })();
 584 var l41 = {name: "THIRD"};
 585 (function(){
 586     (l41).fvalue = (function(v58){
 587         ((v58)["fname"] = "THIRD");
 588         return v58;
 589     })((function (values,v57){
 590         checkArgs(arguments, 2);
 591         var i;
 592         return (function(){
 593             return l36.fvalue(values, v57);
 594         })();
 595     }));
 596     return l41;
 597 })();
 598 var l42 = {name: "FOURTH"};
 599 (function(){
 600     (l42).fvalue = (function(v60){
 601         ((v60)["fname"] = "FOURTH");
 602         return v60;
 603     })((function (values,v59){
 604         checkArgs(arguments, 2);
 605         var i;
 606         return (function(){
 607             return l38.fvalue(values, v59);
 608         })();
 609     }));
 610     return l42;
 611 })();
 612 var l43 = {name: "REST"};
 613 (function(){
 614     (l43).fvalue = (function(v62){
 615         ((v62)["fname"] = "REST");
 616         return v62;
 617     })((function (values,v61){
 618         checkArgs(arguments, 2);
 619         var i;
 620         return (function(){
 621             return (function(){
 622                 var tmp = v61;
 623                 return tmp === l3.value? l3.value: tmp.cdr;
 624             })();
 625         })();
 626     }));
 627     return l43;
 628 })();
 629 var l44 = {name: "LIST"};
 630 (function(){
 631     (l44).fvalue = (function(v64){
 632         ((v64)["fname"] = "LIST");
 633         return v64;
 634     })((function (values){
 635         var v63= l3.value;
 636         for (var i = arguments.length-1; i>=1; i--)
 637             v63 = {car: arguments[i], cdr:
 638         v63};
 639         var i;
 640         return (function(){
 641             return v63;
 642         })();
 643     }));
 644     return l44;
 645 })();
 646 var l45 = {name: "ATOM"};
 647 (function(){
 648     (l45).fvalue = (function(v66){
 649         ((v66)["fname"] = "ATOM");
 650         return v66;
 651     })((function (values,v65){
 652         checkArgs(arguments, 2);
 653         var i;
 654         return (function(){
 655             return l27.fvalue(values, ((function(){
 656                 var tmp = v65;
 657                 return (typeof tmp == 'object' && 'car' in tmp);
 658             })()?l4.value: l3.value));
 659         })();
 660     }));
 661     return l45;
 662 })();
 663 var l46 = {name: "INCF"};
 664 l46;
 665 var l47 = {name: "DECF"};
 666 l47;
 667 var l48 = {name: "PUSH"};
 668 l48;
 669 var l49 = {name: "DOLIST"};
 670 l49;
 671 var l50 = {name: "DOTIMES"};
 672 l50;
 673 var l51 = {name: "COND"};
 674 l51;
 675 var l52 = {name: "CASE"};
 676 l52;
 677 var l53 = {name: "ECASE"};
 678 l53;
 679 var l54 = {name: "AND"};
 680 l54;
 681 var l55 = {name: "OR"};
 682 l55;
 683 var l56 = {name: "PROG1"};
 684 l56;
 685 var l57 = {name: "PROG2"};
 686 l57;
 687 var l58 = {name: "ENSURE-LIST"};
 688 var l59 = {name: "LISTP"};
 689 (function(){
 690     (l58).fvalue = (function(v68){
 691         ((v68)["fname"] = "ENSURE-LIST");
 692         return v68;
 693     })((function (values,v67){
 694         checkArgs(arguments, 2);
 695         var i;
 696         return (function(){
 697             return (l59.fvalue(pv, v67) !== l3.value ? v67 : l44.fvalue(values, v67));
 698         })();
 699     }));
 700     return l58;
 701 })();
 702 var l60 = {name: "!REDUCE"};
 703 (function(){
 704     (l60).fvalue = (function(v72){
 705         ((v72)["fname"] = "!REDUCE");
 706         return v72;
 707     })((function (values,v69,v70,v71){
 708         checkArgs(arguments, 4);
 709         var i;
 710         return (function(){
 711             return (l12.fvalue(pv, v70) !== l3.value ? v71 : l60.fvalue(values, v69, (function(){
 712                 var tmp = v70;
 713                 return tmp === l3.value? l3.value: tmp.cdr;
 714             })(), (v69)(pv, v71, (function(){
 715                 var tmp = v70;
 716                 return tmp === l3.value? l3.value: tmp.car;
 717             })())));
 718         })();
 719     }));
 720     return l60;
 721 })();
 722 var l61 = {name: "+"};
 723 (function(){
 724     (l61).fvalue = (function(v77){
 725         ((v77)["fname"] = "+");
 726         return v77;
 727     })((function (values){
 728         var v73= l3.value;
 729         for (var i = arguments.length-1; i>=1; i--)
 730             v73 = {car: arguments[i], cdr:
 731         v73};
 732         var i;
 733         return (function(){
 734             return (function(v74){
 735                 return (function(){
 736                     return (function(v75,v76){
 737                         (function(){
 738                             while(v75 !== l3.value){
 739                                 (v76 = (function(){
 740                                     var tmp = v75;
 741                                     return tmp === l3.value? l3.value: tmp.car;
 742                                 })());
 743                                 (function(){
 744                                     (v74 = (function(){
 745                                         var x1 = v74;
 746                                         if (typeof x1 !== 'number') throw 'Not a number!';
 747                                         var x2 = v76;
 748                                         if (typeof x2 !== 'number') throw 'Not a number!';
 749                                         return x1+x2;
 750                                     })());
 751                                     return l3.value;
 752                                 })();
 753                                 (v75 = (function(){
 754                                     var tmp = v75;
 755                                     return tmp === l3.value? l3.value: tmp.cdr;
 756                                 })());
 757                             }return l3.value;
 758                         })();
 759                         return v74;
 760                     })(v73,l3.value);
 761                 })();
 762             })(0);
 763         })();
 764     }));
 765     return l61;
 766 })();
 767 var l62 = {name: "-"};
 768 (function(){
 769     (l62).fvalue = (function(v83){
 770         ((v83)["fname"] = "-");
 771         return v83;
 772     })((function (values,v79){
 773         checkArgsAtLeast(arguments, 2);
 774         var v78= l3.value;
 775         for (var i = arguments.length-1; i>=2; i--)
 776             v78 = {car: arguments[i], cdr:
 777         v78};
 778         var i;
 779         return (function(){
 780             return (l12.fvalue(pv, v78) !== l3.value ? (function(){
 781                 var x1 = v79;
 782                 if (typeof x1 !== 'number') throw 'Not a number!';
 783                 return -x1;
 784             })() : (function(v80){
 785                 return (function(){
 786                     return (function(v81,v82){
 787                         (function(){
 788                             while(v81 !== l3.value){
 789                                 (v82 = (function(){
 790                                     var tmp = v81;
 791                                     return tmp === l3.value? l3.value: tmp.car;
 792                                 })());
 793                                 (function(){
 794                                     (v80 = (function(){
 795                                         var x1 = v80;
 796                                         if (typeof x1 !== 'number') throw 'Not a number!';
 797                                         var x2 = v82;
 798                                         if (typeof x2 !== 'number') throw 'Not a number!';
 799                                         return x1-x2;
 800                                     })());
 801                                     return l3.value;
 802                                 })();
 803                                 (v81 = (function(){
 804                                     var tmp = v81;
 805                                     return tmp === l3.value? l3.value: tmp.cdr;
 806                                 })());
 807                             }return l3.value;
 808                         })();
 809                         return v80;
 810                     })(v78,l3.value);
 811                 })();
 812             })(v79));
 813         })();
 814     }));
 815     return l62;
 816 })();
 817 var l63 = {name: "APPEND-TWO"};
 818 var l64 = {name: "APPEND"};
 819 (function(){
 820     (l63).fvalue = (function(v86){
 821         ((v86)["fname"] = "APPEND-TWO");
 822         return v86;
 823     })((function (values,v84,v85){
 824         checkArgs(arguments, 3);
 825         var i;
 826         return (function(){
 827             return (l12.fvalue(pv, v84) !== l3.value ? v85 : ({car: (function(){
 828                 var tmp = v84;
 829                 return tmp === l3.value? l3.value: tmp.car;
 830             })(), cdr: l64.fvalue(pv, (function(){
 831                 var tmp = v84;
 832                 return tmp === l3.value? l3.value: tmp.cdr;
 833             })(), v85)}));
 834         })();
 835     }));
 836     return l63;
 837 })();
 838 (function(){
 839     (l64).fvalue = (function(v88){
 840         ((v88)["fname"] = "APPEND");
 841         return v88;
 842     })((function (values){
 843         var v87= l3.value;
 844         for (var i = arguments.length-1; i>=1; i--)
 845             v87 = {car: arguments[i], cdr:
 846         v87};
 847         var i;
 848         return (function(){
 849             return l60.fvalue(values, (function(){
 850                 var symbol = l63;
 851                 var func = symbol.fvalue;
 852                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
 853                 return func;
 854             })(), v87, l3);
 855         })();
 856     }));
 857     return l64;
 858 })();
 859 var l65 = {name: "REVAPPEND"};
 860 (function(){
 861     (l65).fvalue = (function(v91){
 862         ((v91)["fname"] = "REVAPPEND");
 863         return v91;
 864     })((function (values,v89,v90){
 865         checkArgs(arguments, 3);
 866         var i;
 867         return (function(){
 868             (function(){
 869                 return (function(){
 870                     while(v89 !== l3.value){
 871                         (v90 = ({car: (function(){
 872                             var tmp = v89;
 873                             return tmp === l3.value? l3.value: tmp.car;
 874                         })(), cdr: v90}));
 875                         (v89 = (function(){
 876                             var tmp = v89;
 877                             return tmp === l3.value? l3.value: tmp.cdr;
 878                         })());
 879                     }return l3.value;
 880                 })();
 881             })();
 882             return v90;
 883         })();
 884     }));
 885     return l65;
 886 })();
 887 var l66 = {name: "REVERSE"};
 888 (function(){
 889     (l66).fvalue = (function(v93){
 890         ((v93)["fname"] = "REVERSE");
 891         return v93;
 892     })((function (values,v92){
 893         checkArgs(arguments, 2);
 894         var i;
 895         return (function(){
 896             return l65.fvalue(values, v92, l3);
 897         })();
 898     }));
 899     return l66;
 900 })();
 901 var l67 = {name: "PSETQ"};
 902 l67;
 903 var l68 = {name: "DO"};
 904 l68;
 905 var l69 = {name: "DO*"};
 906 l69;
 907 var l70 = {name: "LIST-LENGTH"};
 908 (function(){
 909     (l70).fvalue = (function(v96){
 910         ((v96)["fname"] = "LIST-LENGTH");
 911         return v96;
 912     })((function (values,v94){
 913         checkArgs(arguments, 2);
 914         var i;
 915         return (function(){
 916             return (function(v95){
 917                 (function(){
 918                     return (function(){
 919                         while(l27.fvalue(pv, l12.fvalue(pv, v94)) !== l3.value){
 920                             (v95 = (function(){
 921                                 var x1 = v95;
 922                                 if (typeof x1 !== 'number') throw 'Not a number!';
 923                                 var x2 = 1;
 924                                 if (typeof x2 !== 'number') throw 'Not a number!';
 925                                 return x1+x2;
 926                             })());
 927                             (v94 = (function(){
 928                                 var tmp = v94;
 929                                 return tmp === l3.value? l3.value: tmp.cdr;
 930                             })());
 931                         }return l3.value;
 932                     })();
 933                 })();
 934                 return v95;
 935             })(0);
 936         })();
 937     }));
 938     return l70;
 939 })();
 940 var l71 = {name: "LENGTH"};
 941 (function(){
 942     (l71).fvalue = (function(v98){
 943         ((v98)["fname"] = "LENGTH");
 944         return v98;
 945     })((function (values,v97){
 946         checkArgs(arguments, 2);
 947         var i;
 948         return (function(){
 949             return (((typeof(v97) == "string")?l4.value: l3.value) !== l3.value ? (function(){
 950                 var x = v97;
 951                 if (typeof x != 'string')
 952                     throw 'The value ' + x + ' is not a type string.';
 953                 return x.length;
 954             })() : (((function(){
 955                 var x = v97;
 956                 return typeof x === 'object' && 'length' in x;
 957             })()?l4.value: l3.value) !== l3.value ? (function(){
 958                 var tmp = (v97)["length"];
 959                 return tmp == undefined? l3.value: tmp ;
 960             })() : (l59.fvalue(pv, v97) !== l3.value ? l70.fvalue(values, v97) : l3.value)));
 961         })();
 962     }));
 963     return l71;
 964 })();
 965 var l72 = {name: "CONCAT-TWO"};
 966 (function(){
 967     (l72).fvalue = (function(v101){
 968         ((v101)["fname"] = "CONCAT-TWO");
 969         return v101;
 970     })((function (values,v99,v100){
 971         checkArgs(arguments, 3);
 972         var i;
 973         return (function(){
 974             return (function(){
 975                 var string1 = v99;
 976                 var string2 = v100;
 977                 if (typeof string1 != 'string')
 978                     throw 'The value ' + string1 + ' is not a type string.';
 979                 if (typeof string2 != 'string')
 980                     throw 'The value ' + string2 + ' is not a type string.';
 981                 return string1.concat(string2);
 982             })();
 983         })();
 984     }));
 985     return l72;
 986 })();
 987 var l73 = {name: "MAPCAR"};
 988 var l74 = {name: "SENTINEL"};
 989 (function(){
 990     (l73).fvalue = (function(v107){
 991         ((v107)["fname"] = "MAPCAR");
 992         return v107;
 993     })((function (values,v102,v103){
 994         checkArgs(arguments, 3);
 995         var i;
 996         return (function(){
 997             return (function(){
 998                 var v104 = ({car: l74, cdr: l3.value});
 999                 var v105 = v104;
1000                 (function(){
1001                     return (function(){
1002                         while(l27.fvalue(pv, l12.fvalue(pv, v103)) !== l3.value){
1003                             (function(v106){
1004                                 (function(){
1005                                     var x = v105;
1006                                     if (typeof x != 'object')
1007                                         throw 'The value ' + x + ' is not a type object.';
1008                                     return (x.cdr = v106, x);
1009                                 })();
1010                                 return (v105 = v106, v103 = (function(){
1011                                     var tmp = v103;
1012                                     return tmp === l3.value? l3.value: tmp.cdr;
1013                                 })());
1014                             })(({car: (v102)(pv, (function(){
1015                                 var tmp = v103;
1016                                 return tmp === l3.value? l3.value: tmp.car;
1017                             })()), cdr: l3.value}));
1018                         }return l3.value;
1019                     })();
1020                 })();
1021                 return (function(){
1022                     var tmp = v104;
1023                     return tmp === l3.value? l3.value: tmp.cdr;
1024                 })();
1025             })();
1026         })();
1027     }));
1028     return l73;
1029 })();
1030 var l75 = {name: "IDENTITY"};
1031 (function(){
1032     (l75).fvalue = (function(v109){
1033         ((v109)["fname"] = "IDENTITY");
1034         return v109;
1035     })((function (values,v108){
1036         checkArgs(arguments, 2);
1037         var i;
1038         return (function(){
1039             return v108;
1040         })();
1041     }));
1042     return l75;
1043 })();
1044 var l76 = {name: "CONSTANTLY"};
1045 (function(){
1046     (l76).fvalue = (function(v112){
1047         ((v112)["fname"] = "CONSTANTLY");
1048         return v112;
1049     })((function (values,v110){
1050         checkArgs(arguments, 2);
1051         var i;
1052         return (function(){
1053             return (function (values){
1054                 var v111= l3.value;
1055                 for (var i = arguments.length-1; i>=1; i--)
1056                     v111 = {car: arguments[i], cdr:
1057                 v111};
1058                 var i;
1059                 return v110;
1060             });
1061         })();
1062     }));
1063     return l76;
1064 })();
1065 var l77 = {name: "COPY-LIST"};
1066 (function(){
1067     (l77).fvalue = (function(v114){
1068         ((v114)["fname"] = "COPY-LIST");
1069         return v114;
1070     })((function (values,v113){
1071         checkArgs(arguments, 2);
1072         var i;
1073         return (function(){
1074             return l73.fvalue(values, (function(){
1075                 var symbol = l75;
1076                 var func = symbol.fvalue;
1077                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1078                 return func;
1079             })(), v113);
1080         })();
1081     }));
1082     return l77;
1083 })();
1084 var l78 = {name: "CODE-CHAR"};
1085 (function(){
1086     (l78).fvalue = (function(v116){
1087         ((v116)["fname"] = "CODE-CHAR");
1088         return v116;
1089     })((function (values,v115){
1090         checkArgs(arguments, 2);
1091         var i;
1092         return (function(){
1093             return v115;
1094         })();
1095     }));
1096     return l78;
1097 })();
1098 var l79 = {name: "CHAR-CODE"};
1099 (function(){
1100     (l79).fvalue = (function(v118){
1101         ((v118)["fname"] = "CHAR-CODE");
1102         return v118;
1103     })((function (values,v117){
1104         checkArgs(arguments, 2);
1105         var i;
1106         return (function(){
1107             return v117;
1108         })();
1109     }));
1110     return l79;
1111 })();
1112 var l80 = {name: "CHAR="};
1113 (function(){
1114     (l80).fvalue = (function(v121){
1115         ((v121)["fname"] = "CHAR=");
1116         return v121;
1117     })((function (values,v119,v120){
1118         checkArgs(arguments, 3);
1119         var i;
1120         return (function(){
1121             return (function(){
1122                 var x1 = v119;
1123                 if (typeof x1 !== 'number') throw 'Not a number!';
1124                 var x2 = v120;
1125                 if (typeof x2 !== 'number') throw 'Not a number!';
1126                 return (x1==x2?l4.value: l3.value);
1127             })();
1128         })();
1129     }));
1130     return l80;
1131 })();
1132 var l81 = {name: "INTEGERP"};
1133 (function(){
1134     (l81).fvalue = (function(v123){
1135         ((v123)["fname"] = "INTEGERP");
1136         return v123;
1137     })((function (values,v122){
1138         checkArgs(arguments, 2);
1139         var i;
1140         return (function(){
1141             return (((typeof (v122) == "number")?l4.value: l3.value) !== l3.value ? (function(){
1142                 var x1 = (function(){
1143                     var x = v122;
1144                     if (typeof x != 'number')
1145                         throw 'The value ' + x + ' is not a type number.';
1146                     return Math.floor(x);
1147                 })();
1148                 if (typeof x1 !== 'number') throw 'Not a number!';
1149                 var x2 = v122;
1150                 if (typeof x2 !== 'number') throw 'Not a number!';
1151                 return (x1==x2?l4.value: l3.value);
1152             })() : l3.value);
1153         })();
1154     }));
1155     return l81;
1156 })();
1157 var l82 = {name: "PLUSP"};
1158 (function(){
1159     (l82).fvalue = (function(v125){
1160         ((v125)["fname"] = "PLUSP");
1161         return v125;
1162     })((function (values,v124){
1163         checkArgs(arguments, 2);
1164         var i;
1165         return (function(){
1166             return (function(){
1167                 var x1 = 0;
1168                 if (typeof x1 !== 'number') throw 'Not a number!';
1169                 var x2 = v124;
1170                 if (typeof x2 !== 'number') throw 'Not a number!';
1171                 return (x1<x2?l4.value: l3.value);
1172             })();
1173         })();
1174     }));
1175     return l82;
1176 })();
1177 var l83 = {name: "MINUSP"};
1178 (function(){
1179     (l83).fvalue = (function(v127){
1180         ((v127)["fname"] = "MINUSP");
1181         return v127;
1182     })((function (values,v126){
1183         checkArgs(arguments, 2);
1184         var i;
1185         return (function(){
1186             return (function(){
1187                 var x1 = v126;
1188                 if (typeof x1 !== 'number') throw 'Not a number!';
1189                 var x2 = 0;
1190                 if (typeof x2 !== 'number') throw 'Not a number!';
1191                 return (x1<x2?l4.value: l3.value);
1192             })();
1193         })();
1194     }));
1195     return l83;
1196 })();
1197 (function(){
1198     (l59).fvalue = (function(v130){
1199         ((v130)["fname"] = "LISTP");
1200         return v130;
1201     })((function (values,v128){
1202         checkArgs(arguments, 2);
1203         var i;
1204         return (function(){
1205             return (function(v129){
1206                 return (v129 !== l3.value ? v129 : l12.fvalue(values, v128));
1207             })(((function(){
1208                 var tmp = v128;
1209                 return (typeof tmp == 'object' && 'car' in tmp);
1210             })()?l4.value: l3.value));
1211         })();
1212     }));
1213     return l59;
1214 })();
1215 var l84 = {name: "NTHCDR"};
1216 (function(){
1217     (l84).fvalue = (function(v133){
1218         ((v133)["fname"] = "NTHCDR");
1219         return v133;
1220     })((function (values,v131,v132){
1221         checkArgs(arguments, 3);
1222         var i;
1223         return (function(){
1224             (function(){
1225                 return (function(){
1226                     while((l82.fvalue(pv, v131) !== l3.value ? v132 : l3.value) !== l3.value){
1227                         (v131 = l23.fvalue(pv, v131));
1228                         (v132 = (function(){
1229                             var tmp = v132;
1230                             return tmp === l3.value? l3.value: tmp.cdr;
1231                         })());
1232                     }return l3.value;
1233                 })();
1234             })();
1235             return v132;
1236         })();
1237     }));
1238     return l84;
1239 })();
1240 var l85 = {name: "NTH"};
1241 (function(){
1242     (l85).fvalue = (function(v136){
1243         ((v136)["fname"] = "NTH");
1244         return v136;
1245     })((function (values,v134,v135){
1246         checkArgs(arguments, 3);
1247         var i;
1248         return (function(){
1249             return (function(){
1250                 var tmp = l84.fvalue(pv, v134, v135);
1251                 return tmp === l3.value? l3.value: tmp.car;
1252             })();
1253         })();
1254     }));
1255     return l85;
1256 })();
1257 var l86 = {name: "LAST"};
1258 (function(){
1259     (l86).fvalue = (function(v138){
1260         ((v138)["fname"] = "LAST");
1261         return v138;
1262     })((function (values,v137){
1263         checkArgs(arguments, 2);
1264         var i;
1265         return (function(){
1266             (function(){
1267                 return (function(){
1268                     while(((function(){
1269                         var tmp = (function(){
1270                             var tmp = v137;
1271                             return tmp === l3.value? l3.value: tmp.cdr;
1272                         })();
1273                         return (typeof tmp == 'object' && 'car' in tmp);
1274                     })()?l4.value: l3.value) !== l3.value){
1275                         (v137 = (function(){
1276                             var tmp = v137;
1277                             return tmp === l3.value? l3.value: tmp.cdr;
1278                         })());
1279                     }return l3.value;
1280                 })();
1281             })();
1282             return v137;
1283         })();
1284     }));
1285     return l86;
1286 })();
1287 var l87 = {name: "BUTLAST"};
1288 (function(){
1289     (l87).fvalue = (function(v140){
1290         ((v140)["fname"] = "BUTLAST");
1291         return v140;
1292     })((function (values,v139){
1293         checkArgs(arguments, 2);
1294         var i;
1295         return (function(){
1296             return (((function(){
1297                 var tmp = (function(){
1298                     var tmp = v139;
1299                     return tmp === l3.value? l3.value: tmp.cdr;
1300                 })();
1301                 return (typeof tmp == 'object' && 'car' in tmp);
1302             })()?l4.value: l3.value) !== l3.value ? ({car: (function(){
1303                 var tmp = v139;
1304                 return tmp === l3.value? l3.value: tmp.car;
1305             })(), cdr: l87.fvalue(pv, (function(){
1306                 var tmp = v139;
1307                 return tmp === l3.value? l3.value: tmp.cdr;
1308             })())}) : l3.value);
1309         })();
1310     }));
1311     return l87;
1312 })();
1313 var l88 = {name: "MEMBER"};
1314 (function(){
1315     (l88).fvalue = (function(v143){
1316         ((v143)["fname"] = "MEMBER");
1317         return v143;
1318     })((function (values,v141,v142){
1319         checkArgs(arguments, 3);
1320         var i;
1321         return (function(){
1322             return (function(){
1323                 try {
1324                     return (function(){
1325                         while(v142 !== l3.value){
1326                             (l26.fvalue(pv, v141, (function(){
1327                                 var tmp = v142;
1328                                 return tmp === l3.value? l3.value: tmp.car;
1329                             })()) !== l3.value ? (function(){
1330                                 var values = mv;
1331                                 throw ({type: 'block', id: 65, values: v142, message: 'Return from unknown block NIL.'})
1332                             })() : l3.value);
1333                             (v142 = (function(){
1334                                 var tmp = v142;
1335                                 return tmp === l3.value? l3.value: tmp.cdr;
1336                             })());
1337                         }return l3.value;
1338                     })();
1339                 }
1340                 catch (cf){
1341                     if (cf.type == 'block' && cf.id == 65)
1342                         return values.apply(this, forcemv(cf.values));
1343                     else
1344                         throw cf;
1345                 }
1346             })();
1347         })();
1348     }));
1349     return l88;
1350 })();
1351 var l89 = {name: "REMOVE"};
1352 (function(){
1353     (l89).fvalue = (function(v146){
1354         ((v146)["fname"] = "REMOVE");
1355         return v146;
1356     })((function (values,v144,v145){
1357         checkArgs(arguments, 3);
1358         var i;
1359         return (function(){
1360             return (l12.fvalue(pv, v145) !== l3.value ? l3.value : (l26.fvalue(pv, v144, (function(){
1361                 var tmp = v145;
1362                 return tmp === l3.value? l3.value: tmp.car;
1363             })()) !== l3.value ? l89.fvalue(values, v144, (function(){
1364                 var tmp = v145;
1365                 return tmp === l3.value? l3.value: tmp.cdr;
1366             })()) : ({car: (function(){
1367                 var tmp = v145;
1368                 return tmp === l3.value? l3.value: tmp.car;
1369             })(), cdr: l89.fvalue(pv, v144, (function(){
1370                 var tmp = v145;
1371                 return tmp === l3.value? l3.value: tmp.cdr;
1372             })())})));
1373         })();
1374     }));
1375     return l89;
1376 })();
1377 var l90 = {name: "REMOVE-IF"};
1378 (function(){
1379     (l90).fvalue = (function(v149){
1380         ((v149)["fname"] = "REMOVE-IF");
1381         return v149;
1382     })((function (values,v147,v148){
1383         checkArgs(arguments, 3);
1384         var i;
1385         return (function(){
1386             return (l12.fvalue(pv, v148) !== l3.value ? l3.value : ((v147)(pv, (function(){
1387                 var tmp = v148;
1388                 return tmp === l3.value? l3.value: tmp.car;
1389             })()) !== l3.value ? l90.fvalue(values, v147, (function(){
1390                 var tmp = v148;
1391                 return tmp === l3.value? l3.value: tmp.cdr;
1392             })()) : ({car: (function(){
1393                 var tmp = v148;
1394                 return tmp === l3.value? l3.value: tmp.car;
1395             })(), cdr: l90.fvalue(pv, v147, (function(){
1396                 var tmp = v148;
1397                 return tmp === l3.value? l3.value: tmp.cdr;
1398             })())})));
1399         })();
1400     }));
1401     return l90;
1402 })();
1403 var l91 = {name: "REMOVE-IF-NOT"};
1404 (function(){
1405     (l91).fvalue = (function(v152){
1406         ((v152)["fname"] = "REMOVE-IF-NOT");
1407         return v152;
1408     })((function (values,v150,v151){
1409         checkArgs(arguments, 3);
1410         var i;
1411         return (function(){
1412             return (l12.fvalue(pv, v151) !== l3.value ? l3.value : ((v150)(pv, (function(){
1413                 var tmp = v151;
1414                 return tmp === l3.value? l3.value: tmp.car;
1415             })()) !== l3.value ? ({car: (function(){
1416                 var tmp = v151;
1417                 return tmp === l3.value? l3.value: tmp.car;
1418             })(), cdr: l91.fvalue(pv, v150, (function(){
1419                 var tmp = v151;
1420                 return tmp === l3.value? l3.value: tmp.cdr;
1421             })())}) : l91.fvalue(values, v150, (function(){
1422                 var tmp = v151;
1423                 return tmp === l3.value? l3.value: tmp.cdr;
1424             })())));
1425         })();
1426     }));
1427     return l91;
1428 })();
1429 var l92 = {name: "DIGIT-CHAR-P"};
1430 (function(){
1431     (l92).fvalue = (function(v154){
1432         ((v154)["fname"] = "DIGIT-CHAR-P");
1433         return v154;
1434     })((function (values,v153){
1435         checkArgs(arguments, 2);
1436         var i;
1437         return (function(){
1438             return (((function(){
1439                 var x1 = 48;
1440                 if (typeof x1 !== 'number') throw 'Not a number!';
1441                 var x2 = v153;
1442                 if (typeof x2 !== 'number') throw 'Not a number!';
1443                 return (x1<=x2?l4.value: l3.value);
1444             })() !== l3.value ? (function(){
1445                 var x1 = v153;
1446                 if (typeof x1 !== 'number') throw 'Not a number!';
1447                 var x2 = 57;
1448                 if (typeof x2 !== 'number') throw 'Not a number!';
1449                 return (x1<=x2?l4.value: l3.value);
1450             })() : l3.value) !== l3.value ? (function(){
1451                 var x1 = v153;
1452                 if (typeof x1 !== 'number') throw 'Not a number!';
1453                 var x2 = 48;
1454                 if (typeof x2 !== 'number') throw 'Not a number!';
1455                 return x1-x2;
1456             })() : l3.value);
1457         })();
1458     }));
1459     return l92;
1460 })();
1461 var l93 = {name: "DIGIT-CHAR"};
1462 (function(){
1463     (l93).fvalue = (function(v156){
1464         ((v156)["fname"] = "DIGIT-CHAR");
1465         return v156;
1466     })((function (values,v155){
1467         checkArgs(arguments, 2);
1468         var i;
1469         return (function(){
1470             return ((function(){
1471                 var x1 = 0;
1472                 if (typeof x1 !== 'number') throw 'Not a number!';
1473                 var x2 = v155;
1474                 if (typeof x2 !== 'number') throw 'Not a number!';
1475                 var x3 = 9;
1476                 if (typeof x3 !== 'number') throw 'Not a number!';
1477                 return (x1<=x2 && x2<=x3?l4.value: l3.value);
1478             })() !== l3.value ? (function(){
1479                 var string = "0123456789";
1480                 var index = v155;
1481                 if (typeof string != 'string')
1482                     throw 'The value ' + string + ' is not a type string.';
1483                 if (typeof index != 'number')
1484                     throw 'The value ' + index + ' is not a type number.';
1485                 return string.charCodeAt(index);
1486             })() : l3.value);
1487         })();
1488     }));
1489     return l93;
1490 })();
1491 var l94 = {name: "SUBSEQ"};
1492 (function(){
1493     (l94).fvalue = (function(v160){
1494         ((v160)["fname"] = "SUBSEQ");
1495         return v160;
1496     })((function (values,v157,v158,v159){
1497         checkArgsAtLeast(arguments, 3);
1498         checkArgsAtMost(arguments, 4);
1499         switch(arguments.length-1){
1500         case 2:
1501         v159=l3.value;
1502         default: break;
1503         }
1504         var i;
1505         return (function(){
1506             return (((typeof(v157) == "string")?l4.value: l3.value) !== l3.value ? (v159 !== l3.value ? (function(){
1507                 var str = v157;
1508                 var a = v158;
1509                 var b;
1510                 b = v159;
1511                 return str.slice(a,b);
1512             })() : (function(){
1513                 var str = v157;
1514                 var a = v158;
1515                 var b;
1516                 return str.slice(a,b);
1517             })()) : (function(){
1518                 throw "Unsupported argument.";
1519             })());
1520         })();
1521     }));
1522     return l94;
1523 })();
1524 var l95 = {name: "SOME"};
1525 (function(){
1526     (l95).fvalue = (function(v167){
1527         ((v167)["fname"] = "SOME");
1528         return v167;
1529     })((function (values,v161,v162){
1530         checkArgs(arguments, 3);
1531         var i;
1532         return (function(){
1533             try {
1534                 return (((typeof(v162) == "string")?l4.value: l3.value) !== l3.value ? (function(v163,v164){
1535                     (function(){
1536                         return (function(){
1537                             while((function(){
1538                                 var x1 = v163;
1539                                 if (typeof x1 !== 'number') throw 'Not a number!';
1540                                 var x2 = v164;
1541                                 if (typeof x2 !== 'number') throw 'Not a number!';
1542                                 return (x1<x2?l4.value: l3.value);
1543                             })() !== l3.value){
1544                                 ((v161)(pv, (function(){
1545                                     var string = v162;
1546                                     var index = v163;
1547                                     if (typeof string != 'string')
1548                                         throw 'The value ' + string + ' is not a type string.';
1549                                     if (typeof index != 'number')
1550                                         throw 'The value ' + index + ' is not a type number.';
1551                                     return string.charCodeAt(index);
1552                                 })()) !== l3.value ? (function(){
1553                                     var values = mv;
1554                                     throw ({type: 'block', id: 72, values: l4.value, message: 'Return from unknown block SOME.'})
1555                                 })() : l3.value);
1556                                 (v163 = (function(){
1557                                     var x1 = v163;
1558                                     if (typeof x1 !== 'number') throw 'Not a number!';
1559                                     var x2 = 1;
1560                                     if (typeof x2 !== 'number') throw 'Not a number!';
1561                                     return x1+x2;
1562                                 })());
1563                             }return l3.value;
1564                         })();
1565                     })();
1566                     return l3.value;
1567                 })(0,l71.fvalue(pv, v162)) : (l59.fvalue(pv, v162) !== l3.value ? (function(){
1568                     try {
1569                         return (function(v165,v166){
1570                             (function(){
1571                                 while(v165 !== l3.value){
1572                                     (v166 = (function(){
1573                                         var tmp = v165;
1574                                         return tmp === l3.value? l3.value: tmp.car;
1575                                     })());
1576                                     (function(){
1577                                         ((v161)(pv, v166) !== l3.value ? (function(){
1578                                             var values = mv;
1579                                             throw ({type: 'block', id: 74, values: l4.value, message: 'Return from unknown block NIL.'})
1580                                         })() : l3.value);
1581                                         return l3.value;
1582                                     })();
1583                                     (v165 = (function(){
1584                                         var tmp = v165;
1585                                         return tmp === l3.value? l3.value: tmp.cdr;
1586                                     })());
1587                                 }return l3.value;
1588                             })();
1589                             return l3.value;
1590                         })(v162,l3.value);
1591                     }
1592                     catch (cf){
1593                         if (cf.type == 'block' && cf.id == 74)
1594                             return values.apply(this, forcemv(cf.values));
1595                         else
1596                             throw cf;
1597                     }
1598                 })() : (function(){
1599                     throw "Unknown sequence.";
1600                 })()));
1601             }
1602             catch (cf){
1603                 if (cf.type == 'block' && cf.id == 72)
1604                     return values.apply(this, forcemv(cf.values));
1605                 else
1606                     throw cf;
1607             }
1608         })();
1609     }));
1610     return l95;
1611 })();
1612 var l96 = {name: "EVERY"};
1613 (function(){
1614     (l96).fvalue = (function(v174){
1615         ((v174)["fname"] = "EVERY");
1616         return v174;
1617     })((function (values,v168,v169){
1618         checkArgs(arguments, 3);
1619         var i;
1620         return (function(){
1621             try {
1622                 return (((typeof(v169) == "string")?l4.value: l3.value) !== l3.value ? (function(v170,v171){
1623                     (function(){
1624                         return (function(){
1625                             while((function(){
1626                                 var x1 = v170;
1627                                 if (typeof x1 !== 'number') throw 'Not a number!';
1628                                 var x2 = v171;
1629                                 if (typeof x2 !== 'number') throw 'Not a number!';
1630                                 return (x1<x2?l4.value: l3.value);
1631                             })() !== l3.value){
1632                                 ((v168)(pv, (function(){
1633                                     var string = v169;
1634                                     var index = v170;
1635                                     if (typeof string != 'string')
1636                                         throw 'The value ' + string + ' is not a type string.';
1637                                     if (typeof index != 'number')
1638                                         throw 'The value ' + index + ' is not a type number.';
1639                                     return string.charCodeAt(index);
1640                                 })()) !== l3.value ? l3.value : (function(){
1641                                     var values = mv;
1642                                     throw ({type: 'block', id: 75, values: l3.value, message: 'Return from unknown block EVERY.'})
1643                                 })());
1644                                 (v170 = (function(){
1645                                     var x1 = v170;
1646                                     if (typeof x1 !== 'number') throw 'Not a number!';
1647                                     var x2 = 1;
1648                                     if (typeof x2 !== 'number') throw 'Not a number!';
1649                                     return x1+x2;
1650                                 })());
1651                             }return l3.value;
1652                         })();
1653                     })();
1654                     return l4.value;
1655                 })(0,l71.fvalue(pv, v169)) : (l59.fvalue(pv, v169) !== l3.value ? (function(){
1656                     try {
1657                         return (function(v172,v173){
1658                             (function(){
1659                                 while(v172 !== l3.value){
1660                                     (v173 = (function(){
1661                                         var tmp = v172;
1662                                         return tmp === l3.value? l3.value: tmp.car;
1663                                     })());
1664                                     (function(){
1665                                         ((v168)(pv, v173) !== l3.value ? l3.value : (function(){
1666                                             var values = mv;
1667                                             throw ({type: 'block', id: 77, values: l3.value, message: 'Return from unknown block NIL.'})
1668                                         })());
1669                                         return l3.value;
1670                                     })();
1671                                     (v172 = (function(){
1672                                         var tmp = v172;
1673                                         return tmp === l3.value? l3.value: tmp.cdr;
1674                                     })());
1675                                 }return l3.value;
1676                             })();
1677                             return l4.value;
1678                         })(v169,l3.value);
1679                     }
1680                     catch (cf){
1681                         if (cf.type == 'block' && cf.id == 77)
1682                             return values.apply(this, forcemv(cf.values));
1683                         else
1684                             throw cf;
1685                     }
1686                 })() : (function(){
1687                     throw "Unknown sequence.";
1688                 })()));
1689             }
1690             catch (cf){
1691                 if (cf.type == 'block' && cf.id == 75)
1692                     return values.apply(this, forcemv(cf.values));
1693                 else
1694                     throw cf;
1695             }
1696         })();
1697     }));
1698     return l96;
1699 })();
1700 var l97 = {name: "ASSOC"};
1701 (function(){
1702     (l97).fvalue = (function(v177){
1703         ((v177)["fname"] = "ASSOC");
1704         return v177;
1705     })((function (values,v175,v176){
1706         checkArgs(arguments, 3);
1707         var i;
1708         return (function(){
1709             (function(){
1710                 try {
1711                     return (function(){
1712                         while(v176 !== l3.value){
1713                             (l26.fvalue(pv, v175, l32.fvalue(pv, v176)) !== l3.value ? (function(){
1714                                 throw ({type: 'block', id: 79, values: l3.value, message: 'Return from unknown block NIL.'})
1715                             })() : (v176 = (function(){
1716                                 var tmp = v176;
1717                                 return tmp === l3.value? l3.value: tmp.cdr;
1718                             })()));
1719                         }return l3.value;
1720                     })();
1721                 }
1722                 catch (cf){
1723                     if (cf.type == 'block' && cf.id == 79)
1724                         return cf.values;
1725                     else
1726                         throw cf;
1727                 }
1728             })();
1729             return (function(){
1730                 var tmp = v176;
1731                 return tmp === l3.value? l3.value: tmp.car;
1732             })();
1733         })();
1734     }));
1735     return l97;
1736 })();
1737 var l98 = {name: "STRING"};
1738 (function(){
1739     (l98).fvalue = (function(v179){
1740         ((v179)["fname"] = "STRING");
1741         return v179;
1742     })((function (values,v178){
1743         checkArgs(arguments, 2);
1744         var i;
1745         return (function(){
1746             return (((typeof(v178) == "string")?l4.value: l3.value) !== l3.value ? v178 : (((function(){
1747                 var tmp = v178;
1748                 return (typeof tmp == 'object' && 'name' in tmp);
1749             })()?l4.value: l3.value) !== l3.value ? (v178).name : (function(){
1750                 var x = v178;
1751                 if (typeof x != 'number')
1752                     throw 'The value ' + x + ' is not a type number.';
1753                 return String.fromCharCode(x);
1754             })()));
1755         })();
1756     }));
1757     return l98;
1758 })();
1759 var l99 = {name: "STRING="};
1760 (function(){
1761     (l99).fvalue = (function(v182){
1762         ((v182)["fname"] = "STRING=");
1763         return v182;
1764     })((function (values,v180,v181){
1765         checkArgs(arguments, 3);
1766         var i;
1767         return (function(){
1768             return ((v180 == v181)?l4.value: l3.value);
1769         })();
1770     }));
1771     return l99;
1772 })();
1773 var l100 = {name: "FDEFINITION"};
1774 (function(){
1775     (l100).fvalue = (function(v184){
1776         ((v184)["fname"] = "FDEFINITION");
1777         return v184;
1778     })((function (values,v183){
1779         checkArgs(arguments, 2);
1780         var i;
1781         return (function(){
1782             return (((typeof v183 == 'function')?l4.value: l3.value) !== l3.value ? v183 : (((function(){
1783                 var tmp = v183;
1784                 return (typeof tmp == 'object' && 'name' in tmp);
1785             })()?l4.value: l3.value) !== l3.value ? (function(){
1786                 var symbol = v183;
1787                 var func = symbol.fvalue;
1788                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1789                 return func;
1790             })() : (function(){
1791                 throw "Invalid function";
1792             })()));
1793         })();
1794     }));
1795     return l100;
1796 })();
1797 var l101 = {name: "DISASSEMBLE"};
1798 var l102 = {name: "WRITE-LINE"};
1799 (function(){
1800     (l101).fvalue = (function(v186){
1801         ((v186)["fname"] = "DISASSEMBLE");
1802         return v186;
1803     })((function (values,v185){
1804         checkArgs(arguments, 2);
1805         var i;
1806         return (function(){
1807             l102.fvalue(pv, (l100.fvalue(pv, v185)).toString());
1808             return l3.value;
1809         })();
1810     }));
1811     return l101;
1812 })();
1813 var l103 = {name: "DOCUMENTATION"};
1814 var l104 = {name: "FUNCTION"};
1815 var l105 = {name: "VARIABLE"};
1816 (function(){
1817     (l103).fvalue = (function(v191){
1818         ((v191)["fname"] = "DOCUMENTATION");
1819         return v191;
1820     })((function(){
1821         var func = (function (values,v187,v188){
1822             checkArgs(arguments, 3);
1823             var i;
1824             return (function(){
1825                 return (function(v189){
1826                     return (l26.fvalue(pv, v189, l104) !== l3.value ? (function(v190){
1827                         return (function(){
1828                             var tmp = (v190)["docstring"];
1829                             return tmp == undefined? l3.value: tmp ;
1830                         })();
1831                     })(l100.fvalue(pv, v187)) : (l26.fvalue(pv, v189, l105) !== l3.value ? (function(){
1832                         (((function(){
1833                             var tmp = v187;
1834                             return (typeof tmp == 'object' && 'name' in tmp);
1835                         })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
1836                             throw "Wrong argument type! it should be a symbol";
1837                         })());
1838                         return (function(){
1839                             var tmp = (v187)["vardoc"];
1840                             return tmp == undefined? l3.value: tmp ;
1841                         })();
1842                     })() : (function(){
1843                         throw "ECASE expression failed.";
1844                     })()));
1845                 })(v188);
1846             })();
1847         });
1848         func.docstring = 'Return the documentation of X. TYPE must be the symbol VARIABLE or FUNCTION.';
1849         return func;
1850     })());
1851     return l103;
1852 })();
1853 var l106 = {name: "MULTIPLE-VALUE-BIND"};
1854 l106;
1855 var l107 = {name: "MULTIPLE-VALUE-LIST"};
1856 l107;
1857 var l108 = {name: "*PACKAGE-LIST*"};
1858 (function(){
1859     (((l108.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l108).value = l3.value));
1860     return l108;
1861 })();
1862 var l109 = {name: "LIST-ALL-PACKAGES"};
1863 (function(){
1864     (l109).fvalue = (function(v192){
1865         ((v192)["fname"] = "LIST-ALL-PACKAGES");
1866         return v192;
1867     })((function (values){
1868         checkArgsAtMost(arguments, 1);
1869         var i;
1870         return (function(){
1871             return (function(){
1872                 var symbol = l108;
1873                 var value = symbol.value;
1874                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1875                 return value;
1876             })();
1877         })();
1878     }));
1879     return l109;
1880 })();
1881 var l110 = {name: "MAKE-PACKAGE"};
1882 var l111 = {name: "FIND-PACKAGE-OR-FAIL"};
1883 (function(){
1884     (l110).fvalue = (function(v197){
1885         ((v197)["fname"] = "MAKE-PACKAGE");
1886         return v197;
1887     })((function (values,v193,v194){
1888         checkArgsAtLeast(arguments, 2);
1889         checkArgsAtMost(arguments, 3);
1890         switch(arguments.length-1){
1891         case 1:
1892         v194=l3.value;
1893         default: break;
1894         }
1895         var i;
1896         return (function(){
1897             return (function(v195,v196){
1898                 ((v195)["packageName"] = v193);
1899                 ((v195)["symbols"] = {});
1900                 ((v195)["exports"] = {});
1901                 ((v195)["use"] = v196);
1902                 ((l108).value = ({car: v195, cdr: (function(){
1903                     var symbol = l108;
1904                     var value = symbol.value;
1905                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1906                     return value;
1907                 })()}));
1908                 return v195;
1909             })({},l73.fvalue(pv, (function(){
1910                 var symbol = l111;
1911                 var func = symbol.fvalue;
1912                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1913                 return func;
1914             })(), v194));
1915         })();
1916     }));
1917     return l110;
1918 })();
1919 var l112 = {name: "PACKAGEP"};
1920 (function(){
1921     (l112).fvalue = (function(v199){
1922         ((v199)["fname"] = "PACKAGEP");
1923         return v199;
1924     })((function (values,v198){
1925         checkArgs(arguments, 2);
1926         var i;
1927         return (function(){
1928             return (((typeof (v198) === 'object')?l4.value: l3.value) !== l3.value ? ((("symbols") in (v198))?l4.value: l3.value) : l3.value);
1929         })();
1930     }));
1931     return l112;
1932 })();
1933 var l113 = {name: "FIND-PACKAGE"};
1934 var l114 = {name: "PACKAGE-NAME"};
1935 (function(){
1936     (l113).fvalue = (function(v204){
1937         ((v204)["fname"] = "FIND-PACKAGE");
1938         return v204;
1939     })((function (values,v200){
1940         checkArgs(arguments, 2);
1941         var i;
1942         return (function(){
1943             try {
1944                 (l112.fvalue(pv, v200) !== l3.value ? (function(){
1945                     var values = mv;
1946                     throw ({type: 'block', id: 88, values: v200, message: 'Return from unknown block FIND-PACKAGE.'})
1947                 })() : l3.value);
1948                 return (function(v201){
1949                     return (function(){
1950                         try {
1951                             return (function(v202,v203){
1952                                 (function(){
1953                                     while(v202 !== l3.value){
1954                                         (v203 = (function(){
1955                                             var tmp = v202;
1956                                             return tmp === l3.value? l3.value: tmp.car;
1957                                         })());
1958                                         (function(){
1959                                             (l99.fvalue(pv, l114.fvalue(pv, v203), v201) !== l3.value ? (function(){
1960                                                 var values = mv;
1961                                                 throw ({type: 'block', id: 89, values: v203, message: 'Return from unknown block NIL.'})
1962                                             })() : l3.value);
1963                                             return l3.value;
1964                                         })();
1965                                         (v202 = (function(){
1966                                             var tmp = v202;
1967                                             return tmp === l3.value? l3.value: tmp.cdr;
1968                                         })());
1969                                     }return l3.value;
1970                                 })();
1971                                 return l3.value;
1972                             })((function(){
1973                                 var symbol = l108;
1974                                 var value = symbol.value;
1975                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1976                                 return value;
1977                             })(),l3.value);
1978                         }
1979                         catch (cf){
1980                             if (cf.type == 'block' && cf.id == 89)
1981                                 return values.apply(this, forcemv(cf.values));
1982                             else
1983                                 throw cf;
1984                         }
1985                     })();
1986                 })(l98.fvalue(pv, v200));
1987             }
1988             catch (cf){
1989                 if (cf.type == 'block' && cf.id == 88)
1990                     return values.apply(this, forcemv(cf.values));
1991                 else
1992                     throw cf;
1993             }
1994         })();
1995     }));
1996     return l113;
1997 })();
1998 (function(){
1999     (l111).fvalue = (function(v207){
2000         ((v207)["fname"] = "FIND-PACKAGE-OR-FAIL");
2001         return v207;
2002     })((function (values,v205){
2003         checkArgs(arguments, 2);
2004         var i;
2005         return (function(){
2006             return (function(v206){
2007                 return (v206 !== l3.value ? v206 : (function(){
2008                     throw "Package unknown.";
2009                 })());
2010             })(l113.fvalue(pv, v205));
2011         })();
2012     }));
2013     return l111;
2014 })();
2015 (function(){
2016     (l114).fvalue = (function(v210){
2017         ((v210)["fname"] = "PACKAGE-NAME");
2018         return v210;
2019     })((function (values,v208){
2020         checkArgs(arguments, 2);
2021         var i;
2022         return (function(){
2023             return (function(v209){
2024                 return (function(){
2025                     var tmp = (v209)["packageName"];
2026                     return tmp == undefined? l3.value: tmp ;
2027                 })();
2028             })(l111.fvalue(pv, v208));
2029         })();
2030     }));
2031     return l114;
2032 })();
2033 var l115 = {name: "%PACKAGE-SYMBOLS"};
2034 (function(){
2035     (l115).fvalue = (function(v213){
2036         ((v213)["fname"] = "%PACKAGE-SYMBOLS");
2037         return v213;
2038     })((function (values,v211){
2039         checkArgs(arguments, 2);
2040         var i;
2041         return (function(){
2042             return (function(v212){
2043                 return (function(){
2044                     var tmp = (v212)["symbols"];
2045                     return tmp == undefined? l3.value: tmp ;
2046                 })();
2047             })(l111.fvalue(pv, v211));
2048         })();
2049     }));
2050     return l115;
2051 })();
2052 var l116 = {name: "PACKAGE-USE-LIST"};
2053 (function(){
2054     (l116).fvalue = (function(v216){
2055         ((v216)["fname"] = "PACKAGE-USE-LIST");
2056         return v216;
2057     })((function (values,v214){
2058         checkArgs(arguments, 2);
2059         var i;
2060         return (function(){
2061             return (function(v215){
2062                 return (function(){
2063                     var tmp = (v215)["use"];
2064                     return tmp == undefined? l3.value: tmp ;
2065                 })();
2066             })(l111.fvalue(pv, v214));
2067         })();
2068     }));
2069     return l116;
2070 })();
2071 var l117 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
2072 (function(){
2073     (l117).fvalue = (function(v219){
2074         ((v219)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
2075         return v219;
2076     })((function (values,v217){
2077         checkArgs(arguments, 2);
2078         var i;
2079         return (function(){
2080             return (function(v218){
2081                 return (function(){
2082                     var tmp = (v218)["exports"];
2083                     return tmp == undefined? l3.value: tmp ;
2084                 })();
2085             })(l111.fvalue(pv, v217));
2086         })();
2087     }));
2088     return l117;
2089 })();
2090 var l118 = {name: "*COMMON-LISP-PACKAGE*"};
2091 (function(){
2092     (((l118.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l118).value = l110.fvalue(pv, "CL")));
2093     return l118;
2094 })();
2095 var l119 = {name: "*USER-PACKAGE*"};
2096 (function(){
2097     (((l119.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l119).value = l110.fvalue(pv, "CL-USER", l44.fvalue(pv, (function(){
2098         var symbol = l118;
2099         var value = symbol.value;
2100         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2101         return value;
2102     })()))));
2103     return l119;
2104 })();
2105 var l120 = {name: "*KEYWORD-PACKAGE*"};
2106 (function(){
2107     (((l120.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l120).value = l110.fvalue(pv, "KEYWORD")));
2108     return l120;
2109 })();
2110 var l121 = {name: "KEYWORDP"};
2111 var l122 = {name: "SYMBOL-PACKAGE"};
2112 (function(){
2113     (l121).fvalue = (function(v221){
2114         ((v221)["fname"] = "KEYWORDP");
2115         return v221;
2116     })((function (values,v220){
2117         checkArgs(arguments, 2);
2118         var i;
2119         return (function(){
2120             return (((function(){
2121                 var tmp = v220;
2122                 return (typeof tmp == 'object' && 'name' in tmp);
2123             })()?l4.value: l3.value) !== l3.value ? ((l122.fvalue(pv, v220) === (function(){
2124                 var symbol = l120;
2125                 var value = symbol.value;
2126                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2127                 return value;
2128             })())?l4.value: l3.value) : l3.value);
2129         })();
2130     }));
2131     return l121;
2132 })();
2133 var l123 = {name: "*PACKAGE*"};
2134 (function(){
2135     (((l123.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l123).value = (function(){
2136         var symbol = l118;
2137         var value = symbol.value;
2138         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2139         return value;
2140     })()));
2141     return l123;
2142 })();
2143 var l124 = {name: "IN-PACKAGE"};
2144 l124;
2145 var l125 = {name: "%INTERN-SYMBOL"};
2146 (function(){
2147     (l125).fvalue = (function(v225){
2148         ((v225)["fname"] = "%INTERN-SYMBOL");
2149         return v225;
2150     })((function (values,v222){
2151         checkArgs(arguments, 2);
2152         var i;
2153         return (function(){
2154             return (function(){
2155                 var v223 = (((("package") in (v222))?l4.value: l3.value) !== l3.value ? l111.fvalue(pv, (function(){
2156                     var tmp = (v222)["package"];
2157                     return tmp == undefined? l3.value: tmp ;
2158                 })()) : (function(){
2159                     var symbol = l118;
2160                     var value = symbol.value;
2161                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2162                     return value;
2163                 })());
2164                 var v224 = l115.fvalue(pv, v223);
2165                 ((v222)["package"] = v223);
2166                 (((v223 === (function(){
2167                     var symbol = l120;
2168                     var value = symbol.value;
2169                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2170                     return value;
2171                 })())?l4.value: l3.value) !== l3.value ? ((v222)["value"] = v222) : l3.value);
2172                 return ((v224)[(v222).name] = v222);
2173             })();
2174         })();
2175     }));
2176     return l125;
2177 })();
2178 var l126 = {name: "FIND-SYMBOL"};
2179 var l127 = {name: "EXTERNAL", 'package': 'KEYWORD'};
2180 var l128 = {name: "INTERNAL", 'package': 'KEYWORD'};
2181 var l129 = {name: "INHERIT", 'package': 'KEYWORD'};
2182 (function(){
2183     (l126).fvalue = (function(v234){
2184         ((v234)["fname"] = "FIND-SYMBOL");
2185         return v234;
2186     })((function (values,v226,v227){
2187         checkArgsAtLeast(arguments, 2);
2188         checkArgsAtMost(arguments, 3);
2189         switch(arguments.length-1){
2190         case 1:
2191         v227=(function(){
2192             var symbol = l123;
2193             var value = symbol.value;
2194             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2195             return value;
2196         })();
2197         default: break;
2198         }
2199         var i;
2200         return (function(){
2201             return (function(){
2202                 var v228 = l111.fvalue(pv, v227);
2203                 var v229 = l117.fvalue(pv, v228);
2204                 var v230 = l115.fvalue(pv, v228);
2205                 return ((((v226) in (v229))?l4.value: l3.value) !== l3.value ? values((function(){
2206                     var tmp = (v229)[v226];
2207                     return tmp == undefined? l3.value: tmp ;
2208                 })(), l127.value) : ((((v226) in (v230))?l4.value: l3.value) !== l3.value ? values((function(){
2209                     var tmp = (v230)[v226];
2210                     return tmp == undefined? l3.value: tmp ;
2211                 })(), l128.value) : (function(){
2212                     try {
2213                         return (function(v231,v232){
2214                             (function(){
2215                                 while(v231 !== l3.value){
2216                                     (v232 = (function(){
2217                                         var tmp = v231;
2218                                         return tmp === l3.value? l3.value: tmp.car;
2219                                     })());
2220                                     (function(){
2221                                         (function(v233){
2222                                             return ((((v226) in (v233))?l4.value: l3.value) !== l3.value ? (function(){
2223                                                 var values = mv;
2224                                                 throw ({type: 'block', id: 98, values: values((function(){
2225                                                     var tmp = (v233)[v226];
2226                                                     return tmp == undefined? l3.value: tmp ;
2227                                                 })(), l129.value), message: 'Return from unknown block NIL.'})
2228                                             })() : l3.value);
2229                                         })(l117.fvalue(pv, v232));
2230                                         return l3.value;
2231                                     })();
2232                                     (v231 = (function(){
2233                                         var tmp = v231;
2234                                         return tmp === l3.value? l3.value: tmp.cdr;
2235                                     })());
2236                                 }return l3.value;
2237                             })();
2238                             return values(l3.value, l3.value);
2239                         })(l116.fvalue(pv, v228),l3.value);
2240                     }
2241                     catch (cf){
2242                         if (cf.type == 'block' && cf.id == 98)
2243                             return values.apply(this, forcemv(cf.values));
2244                         else
2245                             throw cf;
2246                     }
2247                 })()));
2248             })();
2249         })();
2250     }));
2251     return l126;
2252 })();
2253 var l130 = {name: "INTERN"};
2254 var l131 = {name: "EXPORT"};
2255 (function(){
2256     (l130).fvalue = (function(v243){
2257         ((v243)["fname"] = "INTERN");
2258         return v243;
2259     })((function (values,v235,v236){
2260         checkArgsAtLeast(arguments, 2);
2261         checkArgsAtMost(arguments, 3);
2262         switch(arguments.length-1){
2263         case 1:
2264         v236=(function(){
2265             var symbol = l123;
2266             var value = symbol.value;
2267             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2268             return value;
2269         })();
2270         default: break;
2271         }
2272         var i;
2273         return (function(){
2274             return (function(v237){
2275                 return (function(){
2276                     var func = (function (values,v239,v240){
2277                         switch(arguments.length-1){
2278                         case 0:
2279                         v239=l3.value;
2280                         case 1:
2281                         v240=l3.value;
2282                         default: break;
2283                         }
2284                         var v238= l3.value;
2285                         for (var i = arguments.length-1; i>=3; i--)
2286                             v238 = {car: arguments[i], cdr:
2287                         v238};
2288                         var i;
2289                         return (v240 !== l3.value ? values(v239, v240) : (function(v241){
2290                             (function(){
2291                                 var tmp = (v241)[v235];
2292                                 return tmp == undefined? l3.value: tmp ;
2293                             })();
2294                             return (function(v242){
2295                                 ((v242)["package"] = v237);
2296                                 (((v237 === (function(){
2297                                     var symbol = l120;
2298                                     var value = symbol.value;
2299                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2300                                     return value;
2301                                 })())?l4.value: l3.value) !== l3.value ? (function(){
2302                                     ((v242)["value"] = v242);
2303                                     return l131.fvalue(pv, l44.fvalue(pv, v242), v237);
2304                                 })() : l3.value);
2305                                 ((v241)[v235] = v242);
2306                                 return values(v242, l3.value);
2307                             })((function(){
2308                                 var name = v235;
2309                                 if (typeof name != 'string')
2310                                     throw 'The value ' + name + ' is not a type string.';
2311                                 return ({name: name});
2312                             })());
2313                         })(l115.fvalue(pv, v237)));
2314                     });
2315                     var args = [values];
2316                     return (function(){
2317                         var values = mv;
2318                         var vs;
2319                         vs = l126.fvalue(values, v235, v237);
2320                         if (typeof vs === 'object' && 'multiple-value' in vs)
2321                             args = args.concat(vs);
2322                         else
2323                             args.push(vs);
2324                         return func.apply(window, args);
2325                     })();
2326                 })();
2327             })(l111.fvalue(pv, v236));
2328         })();
2329     }));
2330     return l130;
2331 })();
2332 (function(){
2333     (l122).fvalue = (function(v245){
2334         ((v245)["fname"] = "SYMBOL-PACKAGE");
2335         return v245;
2336     })((function (values,v244){
2337         checkArgs(arguments, 2);
2338         var i;
2339         return (function(){
2340             (((function(){
2341                 var tmp = v244;
2342                 return (typeof tmp == 'object' && 'name' in tmp);
2343             })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
2344                 throw "it is not a symbol";
2345             })());
2346             return (function(){
2347                 var tmp = (v244)["package"];
2348                 return tmp == undefined? l3.value: tmp ;
2349             })();
2350         })();
2351     }));
2352     return l122;
2353 })();
2354 (function(){
2355     (l131).fvalue = (function(v251){
2356         ((v251)["fname"] = "EXPORT");
2357         return v251;
2358     })((function (values,v246,v247){
2359         checkArgsAtLeast(arguments, 2);
2360         checkArgsAtMost(arguments, 3);
2361         switch(arguments.length-1){
2362         case 1:
2363         v247=(function(){
2364             var symbol = l123;
2365             var value = symbol.value;
2366             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2367             return value;
2368         })();
2369         default: break;
2370         }
2371         var i;
2372         return (function(){
2373             return (function(v248){
2374                 return (function(){
2375                     return (function(v249,v250){
2376                         (function(){
2377                             while(v249 !== l3.value){
2378                                 (v250 = (function(){
2379                                     var tmp = v249;
2380                                     return tmp === l3.value? l3.value: tmp.car;
2381                                 })());
2382                                 (function(){
2383                                     ((v248)[(v250).name] = v250);
2384                                     return l3.value;
2385                                 })();
2386                                 (v249 = (function(){
2387                                     var tmp = v249;
2388                                     return tmp === l3.value? l3.value: tmp.cdr;
2389                                 })());
2390                             }return l3.value;
2391                         })();
2392                         return l4.value;
2393                     })(v246,l3.value);
2394                 })();
2395             })(l117.fvalue(pv, v247));
2396         })();
2397     }));
2398     return l131;
2399 })();
2400 var l132 = {name: "GET-UNIVERSAL-TIME"};
2401 (function(){
2402     (l132).fvalue = (function(v252){
2403         ((v252)["fname"] = "GET-UNIVERSAL-TIME");
2404         return v252;
2405     })((function (values){
2406         checkArgsAtMost(arguments, 1);
2407         var i;
2408         return (function(){
2409             return (function(){
2410                 var x1 = (Math.round(new Date() / 1000));
2411                 if (typeof x1 !== 'number') throw 'Not a number!';
2412                 var x2 = 2208988800;
2413                 if (typeof x2 !== 'number') throw 'Not a number!';
2414                 return x1+x2;
2415             })();
2416         })();
2417     }));
2418     return l132;
2419 })();
2420 var l133 = {name: "*NEWLINE*"};
2421 (function(){
2422     (((l133.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l133).value = l98.fvalue(pv, l78.fvalue(pv, 10))));
2423     return l133;
2424 })();
2425 var l134 = {name: "CONCAT"};
2426 (function(){
2427     (l134).fvalue = (function(v254){
2428         ((v254)["fname"] = "CONCAT");
2429         return v254;
2430     })((function (values){
2431         var v253= l3.value;
2432         for (var i = arguments.length-1; i>=1; i--)
2433             v253 = {car: arguments[i], cdr:
2434         v253};
2435         var i;
2436         return (function(){
2437             return l60.fvalue(values, (function(){
2438                 var symbol = l72;
2439                 var func = symbol.fvalue;
2440                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2441                 return func;
2442             })(), v253, "");
2443         })();
2444     }));
2445     return l134;
2446 })();
2447 var l135 = {name: "CONCATF"};
2448 l135;
2449 var l136 = {name: "JOIN"};
2450 (function(){
2451     (l136).fvalue = (function(v257){
2452         ((v257)["fname"] = "JOIN");
2453         return v257;
2454     })((function (values,v255,v256){
2455         checkArgsAtLeast(arguments, 2);
2456         checkArgsAtMost(arguments, 3);
2457         switch(arguments.length-1){
2458         case 1:
2459         v256="";
2460         default: break;
2461         }
2462         var i;
2463         return (function(){
2464             return (l12.fvalue(pv, v255) !== l3.value ? "" : (l12.fvalue(pv, (function(){
2465                 var tmp = v255;
2466                 return tmp === l3.value? l3.value: tmp.cdr;
2467             })()) !== l3.value ? (function(){
2468                 var tmp = v255;
2469                 return tmp === l3.value? l3.value: tmp.car;
2470             })() : l134.fvalue(values, (function(){
2471                 var tmp = v255;
2472                 return tmp === l3.value? l3.value: tmp.car;
2473             })(), v256, l136.fvalue(pv, (function(){
2474                 var tmp = v255;
2475                 return tmp === l3.value? l3.value: tmp.cdr;
2476             })(), v256))));
2477         })();
2478     }));
2479     return l136;
2480 })();
2481 var l137 = {name: "JOIN-TRAILING"};
2482 (function(){
2483     (l137).fvalue = (function(v260){
2484         ((v260)["fname"] = "JOIN-TRAILING");
2485         return v260;
2486     })((function (values,v258,v259){
2487         checkArgsAtLeast(arguments, 2);
2488         checkArgsAtMost(arguments, 3);
2489         switch(arguments.length-1){
2490         case 1:
2491         v259="";
2492         default: break;
2493         }
2494         var i;
2495         return (function(){
2496             return (l12.fvalue(pv, v258) !== l3.value ? "" : l134.fvalue(values, (function(){
2497                 var tmp = v258;
2498                 return tmp === l3.value? l3.value: tmp.car;
2499             })(), v259, l137.fvalue(pv, (function(){
2500                 var tmp = v258;
2501                 return tmp === l3.value? l3.value: tmp.cdr;
2502             })(), v259)));
2503         })();
2504     }));
2505     return l137;
2506 })();
2507 var l138 = {name: "MAPCONCAT"};
2508 (function(){
2509     (l138).fvalue = (function(v263){
2510         ((v263)["fname"] = "MAPCONCAT");
2511         return v263;
2512     })((function (values,v261,v262){
2513         checkArgs(arguments, 3);
2514         var i;
2515         return (function(){
2516             return l136.fvalue(values, l73.fvalue(pv, v261, v262));
2517         })();
2518     }));
2519     return l138;
2520 })();
2521 var l139 = {name: "VECTOR-TO-LIST"};
2522 (function(){
2523     (l139).fvalue = (function(v269){
2524         ((v269)["fname"] = "VECTOR-TO-LIST");
2525         return v269;
2526     })((function (values,v264){
2527         checkArgs(arguments, 2);
2528         var i;
2529         return (function(){
2530             return (function(v265,v266){
2531                 return (function(){
2532                     return (function(v267,v268){
2533                         (function(){
2534                             while((function(){
2535                                 var x1 = v267;
2536                                 if (typeof x1 !== 'number') throw 'Not a number!';
2537                                 var x2 = v268;
2538                                 if (typeof x2 !== 'number') throw 'Not a number!';
2539                                 return (x1<x2?l4.value: l3.value);
2540                             })() !== l3.value){
2541                                 (function(){
2542                                     (v265 = ({car: (function(){
2543                                         var x = (v264)[v267];
2544                                         if (x === undefined) throw 'Out of range';
2545                                         return x;
2546                                     })(), cdr: v265}));
2547                                     return l3.value;
2548                                 })();
2549                                 (v267 = (function(){
2550                                     var x1 = v267;
2551                                     if (typeof x1 !== 'number') throw 'Not a number!';
2552                                     var x2 = 1;
2553                                     if (typeof x2 !== 'number') throw 'Not a number!';
2554                                     return x1+x2;
2555                                 })());
2556                             }return l3.value;
2557                         })();
2558                         return l66.fvalue(values, v265);
2559                     })(0,v266);
2560                 })();
2561             })(l3.value,l71.fvalue(pv, v264));
2562         })();
2563     }));
2564     return l139;
2565 })();
2566 var l140 = {name: "LIST-TO-VECTOR"};
2567 (function(){
2568     (l140).fvalue = (function(v275){
2569         ((v275)["fname"] = "LIST-TO-VECTOR");
2570         return v275;
2571     })((function (values,v270){
2572         checkArgs(arguments, 2);
2573         var i;
2574         return (function(){
2575             return (function(v271,v272){
2576                 return (function(){
2577                     return (function(v273,v274){
2578                         (function(){
2579                             while(v273 !== l3.value){
2580                                 (v274 = (function(){
2581                                     var tmp = v273;
2582                                     return tmp === l3.value? l3.value: tmp.car;
2583                                 })());
2584                                 (function(){
2585                                     (function(){
2586                                         var x = v271;
2587                                         var i = v272;
2588                                         if (i < 0 || i >= x.length) throw 'Out of range';
2589                                         return x[i] = v274;
2590                                     })();
2591                                     (v272 = (function(){
2592                                         var x1 = v272;
2593                                         if (typeof x1 !== 'number') throw 'Not a number!';
2594                                         var x2 = 1;
2595                                         if (typeof x2 !== 'number') throw 'Not a number!';
2596                                         return x1+x2;
2597                                     })());
2598                                     return l3.value;
2599                                 })();
2600                                 (v273 = (function(){
2601                                     var tmp = v273;
2602                                     return tmp === l3.value? l3.value: tmp.cdr;
2603                                 })());
2604                             }return l3.value;
2605                         })();
2606                         return v271;
2607                     })(v270,l3.value);
2608                 })();
2609             })((function(){
2610                 var r = [];
2611                 for (var i = 0; i < l71.fvalue(pv, v270); i++)
2612                     r.push(l3.value);
2613                 return r;
2614             })(),0);
2615         })();
2616     }));
2617     return l140;
2618 })();
2619 var l141 = {name: "VALUES-LIST"};
2620 (function(){
2621     (l141).fvalue = (function(v277){
2622         ((v277)["fname"] = "VALUES-LIST");
2623         return v277;
2624     })((function (values,v276){
2625         checkArgs(arguments, 2);
2626         var i;
2627         return (function(){
2628             return values.apply(this, l140.fvalue(pv, v276));
2629         })();
2630     }));
2631     return l141;
2632 })();
2633 var l142 = {name: "VALUES"};
2634 (function(){
2635     (l142).fvalue = (function(v279){
2636         ((v279)["fname"] = "VALUES");
2637         return v279;
2638     })((function (values){
2639         var v278= l3.value;
2640         for (var i = arguments.length-1; i>=1; i--)
2641             v278 = {car: arguments[i], cdr:
2642         v278};
2643         var i;
2644         return (function(){
2645             return l141.fvalue(values, v278);
2646         })();
2647     }));
2648     return l142;
2649 })();
2650 var l143 = {name: "INDENT"};
2651 (function(){
2652     (l143).fvalue = (function(v286){
2653         ((v286)["fname"] = "INDENT");
2654         return v286;
2655     })((function (values){
2656         var v280= l3.value;
2657         for (var i = arguments.length-1; i>=1; i--)
2658             v280 = {car: arguments[i], cdr:
2659         v280};
2660         var i;
2661         return (function(){
2662             return (function(v281){
2663                 return (function(v282,v283,v284){
2664                     (l82.fvalue(pv, l71.fvalue(pv, v281)) !== l3.value ? (v282 = l134.fvalue(pv, v282, "    ")) : l3.value);
2665                     (function(){
2666                         return (function(){
2667                             while((function(){
2668                                 var x1 = v283;
2669                                 if (typeof x1 !== 'number') throw 'Not a number!';
2670                                 var x2 = v284;
2671                                 if (typeof x2 !== 'number') throw 'Not a number!';
2672                                 return (x1<x2?l4.value: l3.value);
2673                             })() !== l3.value){
2674                                 (function(v285){
2675                                     return (v282 = l134.fvalue(pv, v282, v285));
2676                                 })(((l80.fvalue(pv, (function(){
2677                                     var string = v281;
2678                                     var index = v283;
2679                                     if (typeof string != 'string')
2680                                         throw 'The value ' + string + ' is not a type string.';
2681                                     if (typeof index != 'number')
2682                                         throw 'The value ' + index + ' is not a type number.';
2683                                     return string.charCodeAt(index);
2684                                 })(), 10) !== l3.value ? ((function(){
2685                                     var x1 = v283;
2686                                     if (typeof x1 !== 'number') throw 'Not a number!';
2687                                     var x2 = l23.fvalue(pv, v284);
2688                                     if (typeof x2 !== 'number') throw 'Not a number!';
2689                                     return (x1<x2?l4.value: l3.value);
2690                                 })() !== l3.value ? l27.fvalue(pv, l80.fvalue(pv, (function(){
2691                                     var string = v281;
2692                                     var index = l22.fvalue(pv, v283);
2693                                     if (typeof string != 'string')
2694                                         throw 'The value ' + string + ' is not a type string.';
2695                                     if (typeof index != 'number')
2696                                         throw 'The value ' + index + ' is not a type number.';
2697                                     return string.charCodeAt(index);
2698                                 })(), 10)) : l3.value) : l3.value) !== l3.value ? l134.fvalue(pv, l98.fvalue(pv, 10), "    ") : l98.fvalue(pv, (function(){
2699                                     var string = v281;
2700                                     var index = v283;
2701                                     if (typeof string != 'string')
2702                                         throw 'The value ' + string + ' is not a type string.';
2703                                     if (typeof index != 'number')
2704                                         throw 'The value ' + index + ' is not a type number.';
2705                                     return string.charCodeAt(index);
2706                                 })())));
2707                                 (v283 = (function(){
2708                                     var x1 = v283;
2709                                     if (typeof x1 !== 'number') throw 'Not a number!';
2710                                     var x2 = 1;
2711                                     if (typeof x2 !== 'number') throw 'Not a number!';
2712                                     return x1+x2;
2713                                 })());
2714                             }return l3.value;
2715                         })();
2716                     })();
2717                     return v282;
2718                 })("",0,l71.fvalue(pv, v281));
2719             })(l136.fvalue(pv, v280));
2720         })();
2721     }));
2722     return l143;
2723 })();
2724 (function(){
2725     (l17).fvalue = (function(v290){
2726         ((v290)["fname"] = "INTEGER-TO-STRING");
2727         return v290;
2728     })((function (values,v287){
2729         checkArgs(arguments, 2);
2730         var i;
2731         return (function(){
2732             return (l24.fvalue(pv, v287) !== l3.value ? "0" : (l83.fvalue(pv, v287) !== l3.value ? l134.fvalue(values, "-", l17.fvalue(pv, (function(){
2733                 var x1 = 0;
2734                 if (typeof x1 !== 'number') throw 'Not a number!';
2735                 var x2 = v287;
2736                 if (typeof x2 !== 'number') throw 'Not a number!';
2737                 return x1-x2;
2738             })())) : (function(v288){
2739                 (function(){
2740                     return (function(){
2741                         while(l27.fvalue(pv, l24.fvalue(pv, v287)) !== l3.value){
2742                             (v288 = ({car: (function(){
2743                                 var x = v287;
2744                                 var y = 10;
2745                                 if (typeof x != 'number')
2746                                     throw 'The value ' + x + ' is not a type number.';
2747                                 if (typeof y != 'number')
2748                                     throw 'The value ' + y + ' is not a type number.';
2749                                 return x%y;
2750                             })(), cdr: v288}));
2751                             (v287 = l25.fvalue(pv, v287, 10));
2752                         }return l3.value;
2753                     })();
2754                 })();
2755                 return l138.fvalue(values, (function (values,v289){
2756                     checkArgs(arguments, 2);
2757                     var i;
2758                     return l98.fvalue(values, l93.fvalue(pv, v289));
2759                 }), v288);
2760             })(l3.value)));
2761         })();
2762     }));
2763     return l17;
2764 })();
2765 var l144 = {name: "JS!BOOL"};
2766 var l145 = {name: "LS-COMPILE"};
2767 (function(){
2768     (l144).fvalue = (function(v292){
2769         ((v292)["fname"] = "JS!BOOL");
2770         return v292;
2771     })((function (values,v291){
2772         checkArgs(arguments, 2);
2773         var i;
2774         return (function(){
2775             return l134.fvalue(values, "(", v291, "?", l145.fvalue(pv, l4.value), ": ", l145.fvalue(pv, l3.value), ")");
2776         })();
2777     }));
2778     return l144;
2779 })();
2780 var l146 = {name: "JS!SELFCALL"};
2781 l146;
2782 var l147 = {name: "PRIN1-TO-STRING"};
2783 var l148 = {name: "ESCAPE-STRING"};
2784 (function(){
2785     (l147).fvalue = (function(v301){
2786         ((v301)["fname"] = "PRIN1-TO-STRING");
2787         return v301;
2788     })((function (values,v293){
2789         checkArgs(arguments, 2);
2790         var i;
2791         return (function(){
2792             return (((function(){
2793                 var tmp = v293;
2794                 return (typeof tmp == 'object' && 'name' in tmp);
2795             })()?l4.value: l3.value) !== l3.value ? (function(){
2796                 var func = (function (values,v295,v296){
2797                     switch(arguments.length-1){
2798                     case 0:
2799                     v295=l3.value;
2800                     case 1:
2801                     v296=l3.value;
2802                     default: break;
2803                     }
2804                     var v294= l3.value;
2805                     for (var i = arguments.length-1; i>=3; i--)
2806                         v294 = {car: arguments[i], cdr:
2807                     v294};
2808                     var i;
2809                     return ((v296 !== l3.value ? ((v295 === v293)?l4.value: l3.value) : l3.value) !== l3.value ? (v293).name : (function(v297,v298){
2810                         return l134.fvalue(values, (l12.fvalue(pv, v297) !== l3.value ? "#" : (((v297 === l113.fvalue(pv, "KEYWORD"))?l4.value: l3.value) !== l3.value ? "" : l114.fvalue(pv, v297))), ":", v298);
2811                     })(l122.fvalue(pv, v293),(v293).name));
2812                 });
2813                 var args = [values];
2814                 return (function(){
2815                     var values = mv;
2816                     var vs;
2817                     vs = l126.fvalue(values, (v293).name, (function(){
2818                         var symbol = l123;
2819                         var value = symbol.value;
2820                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2821                         return value;
2822                     })());
2823                     if (typeof vs === 'object' && 'multiple-value' in vs)
2824                         args = args.concat(vs);
2825                     else
2826                         args.push(vs);
2827                     return func.apply(window, args);
2828                 })();
2829             })() : (l81.fvalue(pv, v293) !== l3.value ? l17.fvalue(values, v293) : (((typeof(v293) == "string")?l4.value: l3.value) !== l3.value ? l134.fvalue(values, "\"", l148.fvalue(pv, v293), "\"") : (((typeof v293 == 'function')?l4.value: l3.value) !== l3.value ? (function(v299){
2830                 return (v299 !== l3.value ? l134.fvalue(values, "#<FUNCTION ", v299, ">") : l134.fvalue(values, "#<FUNCTION>"));
2831             })((function(){
2832                 var tmp = (v293)["fname"];
2833                 return tmp == undefined? l3.value: tmp ;
2834             })()) : (l59.fvalue(pv, v293) !== l3.value ? l134.fvalue(values, "(", l137.fvalue(pv, l73.fvalue(pv, (function(){
2835                 var symbol = l147;
2836                 var func = symbol.fvalue;
2837                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2838                 return func;
2839             })(), l87.fvalue(pv, v293)), " "), (function(v300){
2840                 return (l12.fvalue(pv, (function(){
2841                     var tmp = v300;
2842                     return tmp === l3.value? l3.value: tmp.cdr;
2843                 })()) !== l3.value ? l147.fvalue(pv, (function(){
2844                     var tmp = v300;
2845                     return tmp === l3.value? l3.value: tmp.car;
2846                 })()) : l134.fvalue(pv, l147.fvalue(pv, (function(){
2847                     var tmp = v300;
2848                     return tmp === l3.value? l3.value: tmp.car;
2849                 })()), " . ", l147.fvalue(pv, (function(){
2850                     var tmp = v300;
2851                     return tmp === l3.value? l3.value: tmp.cdr;
2852                 })())));
2853             })(l86.fvalue(pv, v293)), ")") : (((function(){
2854                 var x = v293;
2855                 return typeof x === 'object' && 'length' in x;
2856             })()?l4.value: l3.value) !== l3.value ? l134.fvalue(values, "#", l147.fvalue(pv, l139.fvalue(pv, v293))) : (l112.fvalue(pv, v293) !== l3.value ? l134.fvalue(values, "#<PACKAGE ", l114.fvalue(pv, v293), ">") : l3.value)))))));
2857         })();
2858     }));
2859     return l147;
2860 })();
2861 (function(){
2862     (l102).fvalue = (function(v303){
2863         ((v303)["fname"] = "WRITE-LINE");
2864         return v303;
2865     })((function (values,v302){
2866         checkArgs(arguments, 2);
2867         var i;
2868         return (function(){
2869             (function(){
2870                 var x = v302;
2871                 if (typeof x != 'string')
2872                     throw 'The value ' + x + ' is not a type string.';
2873                 return lisp.write(x);
2874             })();
2875             (function(){
2876                 var x = (function(){
2877                     var symbol = l133;
2878                     var value = symbol.value;
2879                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2880                     return value;
2881                 })();
2882                 if (typeof x != 'string')
2883                     throw 'The value ' + x + ' is not a type string.';
2884                 return lisp.write(x);
2885             })();
2886             return v302;
2887         })();
2888     }));
2889     return l102;
2890 })();
2891 var l149 = {name: "WARN"};
2892 (function(){
2893     (l149).fvalue = (function(v305){
2894         ((v305)["fname"] = "WARN");
2895         return v305;
2896     })((function (values,v304){
2897         checkArgs(arguments, 2);
2898         var i;
2899         return (function(){
2900             (function(){
2901                 var x = "WARNING: ";
2902                 if (typeof x != 'string')
2903                     throw 'The value ' + x + ' is not a type string.';
2904                 return lisp.write(x);
2905             })();
2906             return l102.fvalue(values, v304);
2907         })();
2908     }));
2909     return l149;
2910 })();
2911 var l150 = {name: "PRINT"};
2912 (function(){
2913     (l150).fvalue = (function(v307){
2914         ((v307)["fname"] = "PRINT");
2915         return v307;
2916     })((function (values,v306){
2917         checkArgs(arguments, 2);
2918         var i;
2919         return (function(){
2920             l102.fvalue(pv, l147.fvalue(pv, v306));
2921             return v306;
2922         })();
2923     }));
2924     return l150;
2925 })();
2926 var l151 = {name: "MAKE-STRING-STREAM"};
2927 (function(){
2928     (l151).fvalue = (function(v309){
2929         ((v309)["fname"] = "MAKE-STRING-STREAM");
2930         return v309;
2931     })((function (values,v308){
2932         checkArgs(arguments, 2);
2933         var i;
2934         return (function(){
2935             return ({car: v308, cdr: 0});
2936         })();
2937     }));
2938     return l151;
2939 })();
2940 var l152 = {name: "%PEEK-CHAR"};
2941 (function(){
2942     (l152).fvalue = (function(v311){
2943         ((v311)["fname"] = "%PEEK-CHAR");
2944         return v311;
2945     })((function (values,v310){
2946         checkArgs(arguments, 2);
2947         var i;
2948         return (function(){
2949             return ((function(){
2950                 var x1 = (function(){
2951                     var tmp = v310;
2952                     return tmp === l3.value? l3.value: tmp.cdr;
2953                 })();
2954                 if (typeof x1 !== 'number') throw 'Not a number!';
2955                 var x2 = l71.fvalue(pv, (function(){
2956                     var tmp = v310;
2957                     return tmp === l3.value? l3.value: tmp.car;
2958                 })());
2959                 if (typeof x2 !== 'number') throw 'Not a number!';
2960                 return (x1<x2?l4.value: l3.value);
2961             })() !== l3.value ? (function(){
2962                 var string = (function(){
2963                     var tmp = v310;
2964                     return tmp === l3.value? l3.value: tmp.car;
2965                 })();
2966                 var index = (function(){
2967                     var tmp = v310;
2968                     return tmp === l3.value? l3.value: tmp.cdr;
2969                 })();
2970                 if (typeof string != 'string')
2971                     throw 'The value ' + string + ' is not a type string.';
2972                 if (typeof index != 'number')
2973                     throw 'The value ' + index + ' is not a type number.';
2974                 return string.charCodeAt(index);
2975             })() : l3.value);
2976         })();
2977     }));
2978     return l152;
2979 })();
2980 var l153 = {name: "%READ-CHAR"};
2981 (function(){
2982     (l153).fvalue = (function(v314){
2983         ((v314)["fname"] = "%READ-CHAR");
2984         return v314;
2985     })((function (values,v312){
2986         checkArgs(arguments, 2);
2987         var i;
2988         return (function(){
2989             return ((function(){
2990                 var x1 = (function(){
2991                     var tmp = v312;
2992                     return tmp === l3.value? l3.value: tmp.cdr;
2993                 })();
2994                 if (typeof x1 !== 'number') throw 'Not a number!';
2995                 var x2 = l71.fvalue(pv, (function(){
2996                     var tmp = v312;
2997                     return tmp === l3.value? l3.value: tmp.car;
2998                 })());
2999                 if (typeof x2 !== 'number') throw 'Not a number!';
3000                 return (x1<x2?l4.value: l3.value);
3001             })() !== l3.value ? (function(v313){
3002                 (function(){
3003                     var x = v312;
3004                     if (typeof x != 'object')
3005                         throw 'The value ' + x + ' is not a type object.';
3006                     return (x.cdr = l22.fvalue(pv, (function(){
3007                         var tmp = v312;
3008                         return tmp === l3.value? l3.value: tmp.cdr;
3009                     })()), x);
3010                 })();
3011                 return v313;
3012             })((function(){
3013                 var string = (function(){
3014                     var tmp = v312;
3015                     return tmp === l3.value? l3.value: tmp.car;
3016                 })();
3017                 var index = (function(){
3018                     var tmp = v312;
3019                     return tmp === l3.value? l3.value: tmp.cdr;
3020                 })();
3021                 if (typeof string != 'string')
3022                     throw 'The value ' + string + ' is not a type string.';
3023                 if (typeof index != 'number')
3024                     throw 'The value ' + index + ' is not a type number.';
3025                 return string.charCodeAt(index);
3026             })()) : l3.value);
3027         })();
3028     }));
3029     return l153;
3030 })();
3031 var l154 = {name: "WHITESPACEP"};
3032 (function(){
3033     (l154).fvalue = (function(v318){
3034         ((v318)["fname"] = "WHITESPACEP");
3035         return v318;
3036     })((function (values,v315){
3037         checkArgs(arguments, 2);
3038         var i;
3039         return (function(){
3040             return (function(v316){
3041                 return (v316 !== l3.value ? v316 : (function(v317){
3042                     return (v317 !== l3.value ? v317 : l80.fvalue(values, v315, 9));
3043                 })(l80.fvalue(pv, v315, 10)));
3044             })(l80.fvalue(pv, v315, 32));
3045         })();
3046     }));
3047     return l154;
3048 })();
3049 var l155 = {name: "SKIP-WHITESPACES"};
3050 (function(){
3051     (l155).fvalue = (function(v321){
3052         ((v321)["fname"] = "SKIP-WHITESPACES");
3053         return v321;
3054     })((function (values,v319){
3055         checkArgs(arguments, 2);
3056         var i;
3057         return (function(){
3058             return (function(v320){
3059                 (v320 = l152.fvalue(pv, v319));
3060                 return (function(){
3061                     return (function(){
3062                         while((v320 !== l3.value ? l154.fvalue(pv, v320) : l3.value) !== l3.value){
3063                             l153.fvalue(pv, v319);
3064                             (v320 = l152.fvalue(pv, v319));
3065                         }return l3.value;
3066                     })();
3067                 })();
3068             })(l3.value);
3069         })();
3070     }));
3071     return l155;
3072 })();
3073 var l156 = {name: "TERMINALP"};
3074 (function(){
3075     (l156).fvalue = (function(v326){
3076         ((v326)["fname"] = "TERMINALP");
3077         return v326;
3078     })((function (values,v322){
3079         checkArgs(arguments, 2);
3080         var i;
3081         return (function(){
3082             return (function(v323){
3083                 return (v323 !== l3.value ? v323 : (function(v324){
3084                     return (v324 !== l3.value ? v324 : (function(v325){
3085                         return (v325 !== l3.value ? v325 : l80.fvalue(values, 40, v322));
3086                     })(l80.fvalue(pv, 41, v322)));
3087                 })(l154.fvalue(pv, v322)));
3088             })(l12.fvalue(pv, v322));
3089         })();
3090     }));
3091     return l156;
3092 })();
3093 var l157 = {name: "READ-UNTIL"};
3094 (function(){
3095     (l157).fvalue = (function(v331){
3096         ((v331)["fname"] = "READ-UNTIL");
3097         return v331;
3098     })((function (values,v327,v328){
3099         checkArgs(arguments, 3);
3100         var i;
3101         return (function(){
3102             return (function(v329,v330){
3103                 (v330 = l152.fvalue(pv, v327));
3104                 (function(){
3105                     return (function(){
3106                         while((v330 !== l3.value ? l27.fvalue(pv, (v328)(pv, v330)) : l3.value) !== l3.value){
3107                             (v329 = l134.fvalue(pv, v329, l98.fvalue(pv, v330)));
3108                             l153.fvalue(pv, v327);
3109                             (v330 = l152.fvalue(pv, v327));
3110                         }return l3.value;
3111                     })();
3112                 })();
3113                 return v329;
3114             })("",l3.value);
3115         })();
3116     }));
3117     return l157;
3118 })();
3119 var l158 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
3120 (function(){
3121     (l158).fvalue = (function(v335){
3122         ((v335)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
3123         return v335;
3124     })((function (values,v332){
3125         checkArgs(arguments, 2);
3126         var i;
3127         return (function(){
3128             return (function(v333){
3129                 l155.fvalue(pv, v332);
3130                 (v333 = l152.fvalue(pv, v332));
3131                 return (function(){
3132                     return (function(){
3133                         while((v333 !== l3.value ? l80.fvalue(pv, v333, 59) : l3.value) !== l3.value){
3134                             l157.fvalue(pv, v332, (function (values,v334){
3135                                 checkArgs(arguments, 2);
3136                                 var i;
3137                                 return l80.fvalue(values, v334, 10);
3138                             }));
3139                             l155.fvalue(pv, v332);
3140                             (v333 = l152.fvalue(pv, v332));
3141                         }return l3.value;
3142                     })();
3143                 })();
3144             })(l3.value);
3145         })();
3146     }));
3147     return l158;
3148 })();
3149 var l159 = {name: "%READ-LIST"};
3150 var l160 = {name: "LS-READ"};
3151 (function(){
3152     (l159).fvalue = (function(v339){
3153         ((v339)["fname"] = "%READ-LIST");
3154         return v339;
3155     })((function (values,v336){
3156         checkArgs(arguments, 2);
3157         var i;
3158         return (function(){
3159             l158.fvalue(pv, v336);
3160             return (function(v337){
3161                 return (l12.fvalue(pv, v337) !== l3.value ? (function(){
3162                     throw "Unspected EOF";
3163                 })() : (l80.fvalue(pv, v337, 41) !== l3.value ? (function(){
3164                     l153.fvalue(pv, v336);
3165                     return l3.value;
3166                 })() : (l80.fvalue(pv, v337, 46) !== l3.value ? (function(){
3167                     l153.fvalue(pv, v336);
3168                     return (function(v338){
3169                         l158.fvalue(pv, v336);
3170                         (l80.fvalue(pv, l153.fvalue(pv, v336), 41) !== l3.value ? l3.value : (function(){
3171                             throw "')' was expected.";
3172                         })());
3173                         return v338;
3174                     })(l160.fvalue(pv, v336));
3175                 })() : ({car: l160.fvalue(pv, v336), cdr: l159.fvalue(pv, v336)}))));
3176             })(l152.fvalue(pv, v336));
3177         })();
3178     }));
3179     return l159;
3180 })();
3181 var l161 = {name: "READ-STRING"};
3182 (function(){
3183     (l161).fvalue = (function(v343){
3184         ((v343)["fname"] = "READ-STRING");
3185         return v343;
3186     })((function (values,v340){
3187         checkArgs(arguments, 2);
3188         var i;
3189         return (function(){
3190             return (function(v341,v342){
3191                 (v342 = l153.fvalue(pv, v340));
3192                 (function(){
3193                     return (function(){
3194                         while(l27.fvalue(pv, l26.fvalue(pv, v342, 34)) !== l3.value){
3195                             (l12.fvalue(pv, v342) !== l3.value ? (function(){
3196                                 throw "Unexpected EOF";
3197                             })() : l3.value);
3198                             (l26.fvalue(pv, v342, 92) !== l3.value ? (v342 = l153.fvalue(pv, v340)) : l3.value);
3199                             (v341 = l134.fvalue(pv, v341, l98.fvalue(pv, v342)));
3200                             (v342 = l153.fvalue(pv, v340));
3201                         }return l3.value;
3202                     })();
3203                 })();
3204                 return v341;
3205             })("",l3.value);
3206         })();
3207     }));
3208     return l161;
3209 })();
3210 var l162 = {name: "READ-SHARP"};
3211 (function(){
3212     (l162).fvalue = (function(v348){
3213         ((v348)["fname"] = "READ-SHARP");
3214         return v348;
3215     })((function (values,v344){
3216         checkArgs(arguments, 2);
3217         var i;
3218         return (function(){
3219             l153.fvalue(pv, v344);
3220             return (function(v345){
3221                 return (l26.fvalue(pv, v345, 39) !== l3.value ? l44.fvalue(values, l104, l160.fvalue(pv, v344)) : (l26.fvalue(pv, v345, 40) !== l3.value ? l140.fvalue(values, l159.fvalue(pv, v344)) : (l26.fvalue(pv, v345, 58) !== l3.value ? (function(){
3222                     var name = (function(){
3223                         var x = l157.fvalue(pv, v344, (function(){
3224                             var symbol = l156;
3225                             var func = symbol.fvalue;
3226                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3227                             return func;
3228                         })());
3229                         if (typeof x != 'string')
3230                             throw 'The value ' + x + ' is not a type string.';
3231                         return x.toUpperCase();
3232                     })();
3233                     if (typeof name != 'string')
3234                         throw 'The value ' + name + ' is not a type string.';
3235                     return ({name: name});
3236                 })() : (l26.fvalue(pv, v345, 92) !== l3.value ? (function(v346){
3237                     return (l99.fvalue(pv, v346, "space") !== l3.value ? l79.fvalue(values, 32) : (l99.fvalue(pv, v346, "tab") !== l3.value ? l79.fvalue(values, 9) : (l99.fvalue(pv, v346, "newline") !== l3.value ? l79.fvalue(values, 10) : l79.fvalue(values, (function(){
3238                         var string = v346;
3239                         var index = 0;
3240                         if (typeof string != 'string')
3241                             throw 'The value ' + string + ' is not a type string.';
3242                         if (typeof index != 'number')
3243                             throw 'The value ' + index + ' is not a type number.';
3244                         return string.charCodeAt(index);
3245                     })()))));
3246                 })(l134.fvalue(pv, l98.fvalue(pv, l153.fvalue(pv, v344)), l157.fvalue(pv, v344, (function(){
3247                     var symbol = l156;
3248                     var func = symbol.fvalue;
3249                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3250                     return func;
3251                 })()))) : (l26.fvalue(pv, v345, 43) !== l3.value ? (function(v347){
3252                     return (l99.fvalue(pv, v347, "common-lisp") !== l3.value ? (function(){
3253                         l160.fvalue(pv, v344);
3254                         return l160.fvalue(values, v344);
3255                     })() : (l99.fvalue(pv, v347, "ecmalisp") !== l3.value ? l160.fvalue(values, v344) : (function(){
3256                         throw "Unknown reader form.";
3257                     })()));
3258                 })(l157.fvalue(pv, v344, (function(){
3259                     var symbol = l156;
3260                     var func = symbol.fvalue;
3261                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3262                     return func;
3263                 })())) : (function(){
3264                     throw "ECASE expression failed.";
3265                 })())))));
3266             })(l153.fvalue(pv, v344));
3267         })();
3268     }));
3269     return l162;
3270 })();
3271 var l163 = {name: "READ-SYMBOL"};
3272 (function(){
3273     (l163).fvalue = (function(v356){
3274         ((v356)["fname"] = "READ-SYMBOL");
3275         return v356;
3276     })((function (values,v349){
3277         checkArgs(arguments, 2);
3278         var i;
3279         return (function(){
3280             return (function(v350,v351,v352,v353,v354){
3281                 (v354 = 0);
3282                 (function(){
3283                     return (function(){
3284                         while(((function(){
3285                             var x1 = v354;
3286                             if (typeof x1 !== 'number') throw 'Not a number!';
3287                             var x2 = v350;
3288                             if (typeof x2 !== 'number') throw 'Not a number!';
3289                             return (x1<x2?l4.value: l3.value);
3290                         })() !== l3.value ? l27.fvalue(pv, l80.fvalue(pv, (function(){
3291                             var string = v349;
3292                             var index = v354;
3293                             if (typeof string != 'string')
3294                                 throw 'The value ' + string + ' is not a type string.';
3295                             if (typeof index != 'number')
3296                                 throw 'The value ' + index + ' is not a type number.';
3297                             return string.charCodeAt(index);
3298                         })(), 58)) : l3.value) !== l3.value){
3299                             (v354 = (function(){
3300                                 var x1 = v354;
3301                                 if (typeof x1 !== 'number') throw 'Not a number!';
3302                                 var x2 = 1;
3303                                 if (typeof x2 !== 'number') throw 'Not a number!';
3304                                 return x1+x2;
3305                             })());
3306                         }return l3.value;
3307                     })();
3308                 })();
3309                 ((function(){
3310                     var x1 = v354;
3311                     if (typeof x1 !== 'number') throw 'Not a number!';
3312                     var x2 = v350;
3313                     if (typeof x2 !== 'number') throw 'Not a number!';
3314                     return (x1==x2?l4.value: l3.value);
3315                 })() !== l3.value ? (function(){
3316                     (v352 = v349);
3317                     (v351 = (function(){
3318                         var symbol = l123;
3319                         var value = symbol.value;
3320                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3321                         return value;
3322                     })());
3323                     return (v353 = l4.value);
3324                 })() : (function(){
3325                     (l24.fvalue(pv, v354) !== l3.value ? (v351 = "KEYWORD") : (v351 = (function(){
3326                         var x = l94.fvalue(pv, v349, 0, v354);
3327                         if (typeof x != 'string')
3328                             throw 'The value ' + x + ' is not a type string.';
3329                         return x.toUpperCase();
3330                     })()));
3331                     (v354 = (function(){
3332                         var x1 = v354;
3333                         if (typeof x1 !== 'number') throw 'Not a number!';
3334                         var x2 = 1;
3335                         if (typeof x2 !== 'number') throw 'Not a number!';
3336                         return x1+x2;
3337                     })());
3338                     (l80.fvalue(pv, (function(){
3339                         var string = v349;
3340                         var index = v354;
3341                         if (typeof string != 'string')
3342                             throw 'The value ' + string + ' is not a type string.';
3343                         if (typeof index != 'number')
3344                             throw 'The value ' + index + ' is not a type number.';
3345                         return string.charCodeAt(index);
3346                     })(), 58) !== l3.value ? (function(){
3347                         (v353 = l4.value);
3348                         return (v354 = (function(){
3349                             var x1 = v354;
3350                             if (typeof x1 !== 'number') throw 'Not a number!';
3351                             var x2 = 1;
3352                             if (typeof x2 !== 'number') throw 'Not a number!';
3353                             return x1+x2;
3354                         })());
3355                     })() : l3.value);
3356                     return (v352 = l94.fvalue(pv, v349, v354));
3357                 })());
3358                 (v352 = (function(){
3359                     var x = v352;
3360                     if (typeof x != 'string')
3361                         throw 'The value ' + x + ' is not a type string.';
3362                     return x.toUpperCase();
3363                 })());
3364                 (v351 = l113.fvalue(pv, v351));
3365                 return ((function(v355){
3366                     return (v355 !== l3.value ? v355 : ((v351 === l113.fvalue(pv, "KEYWORD"))?l4.value: l3.value));
3367                 })(v353) !== l3.value ? l130.fvalue(values, v352, v351) : l126.fvalue(values, v352, v351));
3368             })(l71.fvalue(pv, v349),l3.value,l3.value,l3.value,l3.value);
3369         })();
3370     }));
3371     return l163;
3372 })();
3373 var l164 = {name: "!PARSE-INTEGER"};
3374 (function(){
3375     (l164).fvalue = (function(v367){
3376         ((v367)["fname"] = "!PARSE-INTEGER");
3377         return v367;
3378     })((function (values,v357,v358){
3379         checkArgs(arguments, 3);
3380         var i;
3381         return (function(){
3382             return (function(){
3383                 try {
3384                     return (function(v359,v360,v361,v362){
3385                         (l24.fvalue(pv, v361) !== l3.value ? (function(){
3386                             var values = mv;
3387                             throw ({type: 'block', id: 141, values: values(l3.value, 0), message: 'Return from unknown block NIL.'})
3388                         })() : l3.value);
3389                         (function(v363){
3390                             return (l26.fvalue(pv, v363, 43) !== l3.value ? (v360 = (function(){
3391                                 var x1 = v360;
3392                                 if (typeof x1 !== 'number') throw 'Not a number!';
3393                                 var x2 = 1;
3394                                 if (typeof x2 !== 'number') throw 'Not a number!';
3395                                 return x1+x2;
3396                             })()) : (l26.fvalue(pv, v363, 45) !== l3.value ? (function(){
3397                                 (v362 = -1);
3398                                 return (v360 = (function(){
3399                                     var x1 = v360;
3400                                     if (typeof x1 !== 'number') throw 'Not a number!';
3401                                     var x2 = 1;
3402                                     if (typeof x2 !== 'number') throw 'Not a number!';
3403                                     return x1+x2;
3404                                 })());
3405                             })() : l3.value));
3406                         })((function(){
3407                             var string = v357;
3408                             var index = 0;
3409                             if (typeof string != 'string')
3410                                 throw 'The value ' + string + ' is not a type string.';
3411                             if (typeof index != 'number')
3412                                 throw 'The value ' + index + ' is not a type number.';
3413                             return string.charCodeAt(index);
3414                         })());
3415                         (((function(){
3416                             var x1 = v360;
3417                             if (typeof x1 !== 'number') throw 'Not a number!';
3418                             var x2 = v361;
3419                             if (typeof x2 !== 'number') throw 'Not a number!';
3420                             return (x1<x2?l4.value: l3.value);
3421                         })() !== l3.value ? (v359 = l92.fvalue(pv, (function(){
3422                             var string = v357;
3423                             var index = v360;
3424                             if (typeof string != 'string')
3425                                 throw 'The value ' + string + ' is not a type string.';
3426                             if (typeof index != 'number')
3427                                 throw 'The value ' + index + ' is not a type number.';
3428                             return string.charCodeAt(index);
3429                         })())) : l3.value) !== l3.value ? l3.value : (function(){
3430                             var values = mv;
3431                             throw ({type: 'block', id: 141, values: values(l3.value, v360), message: 'Return from unknown block NIL.'})
3432                         })());
3433                         (v360 = (function(){
3434                             var x1 = v360;
3435                             if (typeof x1 !== 'number') throw 'Not a number!';
3436                             var x2 = 1;
3437                             if (typeof x2 !== 'number') throw 'Not a number!';
3438                             return x1+x2;
3439                         })());
3440                         (function(){
3441                             try {
3442                                 return (function(){
3443                                     while((function(){
3444                                         var x1 = v360;
3445                                         if (typeof x1 !== 'number') throw 'Not a number!';
3446                                         var x2 = v361;
3447                                         if (typeof x2 !== 'number') throw 'Not a number!';
3448                                         return (x1<x2?l4.value: l3.value);
3449                                     })() !== l3.value){
3450                                         (function(v364){
3451                                             (v364 !== l3.value ? l3.value : (function(){
3452                                                 throw ({type: 'block', id: 142, values: l3.value, message: 'Return from unknown block NIL.'})
3453                                             })());
3454                                             (v359 = (function(){
3455                                                 var x1 = (function(){
3456                                                     var x1 = v359;
3457                                                     if (typeof x1 !== 'number') throw 'Not a number!';
3458                                                     var x2 = 10;
3459                                                     if (typeof x2 !== 'number') throw 'Not a number!';
3460                                                     return x1*x2;
3461                                                 })();
3462                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3463                                                 var x2 = v364;
3464                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3465                                                 return x1+x2;
3466                                             })());
3467                                             return (v360 = (function(){
3468                                                 var x1 = v360;
3469                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3470                                                 var x2 = 1;
3471                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3472                                                 return x1+x2;
3473                                             })());
3474                                         })(l92.fvalue(pv, (function(){
3475                                             var string = v357;
3476                                             var index = v360;
3477                                             if (typeof string != 'string')
3478                                                 throw 'The value ' + string + ' is not a type string.';
3479                                             if (typeof index != 'number')
3480                                                 throw 'The value ' + index + ' is not a type number.';
3481                                             return string.charCodeAt(index);
3482                                         })()));
3483                                     }return l3.value;
3484                                 })();
3485                             }
3486                             catch (cf){
3487                                 if (cf.type == 'block' && cf.id == 142)
3488                                     return cf.values;
3489                                 else
3490                                     throw cf;
3491                             }
3492                         })();
3493                         return ((function(v365){
3494                             return (v365 !== l3.value ? v365 : (function(v366){
3495                                 return (v366 !== l3.value ? v366 : l80.fvalue(pv, (function(){
3496                                     var string = v357;
3497                                     var index = v360;
3498                                     if (typeof string != 'string')
3499                                         throw 'The value ' + string + ' is not a type string.';
3500                                     if (typeof index != 'number')
3501                                         throw 'The value ' + index + ' is not a type number.';
3502                                     return string.charCodeAt(index);
3503                                 })(), 32));
3504                             })((function(){
3505                                 var x1 = v360;
3506                                 if (typeof x1 !== 'number') throw 'Not a number!';
3507                                 var x2 = v361;
3508                                 if (typeof x2 !== 'number') throw 'Not a number!';
3509                                 return (x1==x2?l4.value: l3.value);
3510                             })()));
3511                         })(v358) !== l3.value ? values((function(){
3512                             var x1 = v362;
3513                             if (typeof x1 !== 'number') throw 'Not a number!';
3514                             var x2 = v359;
3515                             if (typeof x2 !== 'number') throw 'Not a number!';
3516                             return x1*x2;
3517                         })(), v360) : values(l3.value, v360));
3518                     })(0,0,l71.fvalue(pv, v357),1);
3519                 }
3520                 catch (cf){
3521                     if (cf.type == 'block' && cf.id == 141)
3522                         return values.apply(this, forcemv(cf.values));
3523                     else
3524                         throw cf;
3525                 }
3526             })();
3527         })();
3528     }));
3529     return l164;
3530 })();
3531 var l165 = {name: "PARSE-INTEGER"};
3532 (function(){
3533     (l165).fvalue = (function(v369){
3534         ((v369)["fname"] = "PARSE-INTEGER");
3535         return v369;
3536     })((function (values,v368){
3537         checkArgs(arguments, 2);
3538         var i;
3539         return (function(){
3540             return l164.fvalue(values, v368, l3.value);
3541         })();
3542     }));
3543     return l165;
3544 })();
3545 var l166 = {name: "*EOF*"};
3546 (function(){
3547     (((l166.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l166).value = l16.fvalue(pv)));
3548     return l166;
3549 })();
3550 var l167 = {name: "QUOTE"};
3551 var l168 = {name: "BACKQUOTE"};
3552 var l169 = {name: "UNQUOTE-SPLICING"};
3553 var l170 = {name: "UNQUOTE"};
3554 (function(){
3555     (l160).fvalue = (function(v375){
3556         ((v375)["fname"] = "LS-READ");
3557         return v375;
3558     })((function (values,v370){
3559         checkArgs(arguments, 2);
3560         var i;
3561         return (function(){
3562             l158.fvalue(pv, v370);
3563             return (function(v371){
3564                 return ((function(v372){
3565                     return (v372 !== l3.value ? v372 : l80.fvalue(pv, v371, 41));
3566                 })(l12.fvalue(pv, v371)) !== l3.value ? (function(){
3567                     var symbol = l166;
3568                     var value = symbol.value;
3569                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3570                     return value;
3571                 })() : (l80.fvalue(pv, v371, 40) !== l3.value ? (function(){
3572                     l153.fvalue(pv, v370);
3573                     return l159.fvalue(values, v370);
3574                 })() : (l80.fvalue(pv, v371, 39) !== l3.value ? (function(){
3575                     l153.fvalue(pv, v370);
3576                     return l44.fvalue(values, l167, l160.fvalue(pv, v370));
3577                 })() : (l80.fvalue(pv, v371, 96) !== l3.value ? (function(){
3578                     l153.fvalue(pv, v370);
3579                     return l44.fvalue(values, l168, l160.fvalue(pv, v370));
3580                 })() : (l80.fvalue(pv, v371, 34) !== l3.value ? (function(){
3581                     l153.fvalue(pv, v370);
3582                     return l161.fvalue(values, v370);
3583                 })() : (l80.fvalue(pv, v371, 44) !== l3.value ? (function(){
3584                     l153.fvalue(pv, v370);
3585                     return (l26.fvalue(pv, l152.fvalue(pv, v370), 64) !== l3.value ? (function(){
3586                         l153.fvalue(pv, v370);
3587                         return l44.fvalue(values, l169, l160.fvalue(pv, v370));
3588                     })() : l44.fvalue(values, l170, l160.fvalue(pv, v370)));
3589                 })() : (l80.fvalue(pv, v371, 35) !== l3.value ? l162.fvalue(values, v370) : (function(v373){
3590                     return (function(v374){
3591                         return (v374 !== l3.value ? v374 : l163.fvalue(values, v373));
3592                     })(pv(l164.fvalue(pv, v373, l3.value)));
3593                 })(l157.fvalue(pv, v370, (function(){
3594                     var symbol = l156;
3595                     var func = symbol.fvalue;
3596                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3597                     return func;
3598                 })())))))))));
3599             })(l152.fvalue(pv, v370));
3600         })();
3601     }));
3602     return l160;
3603 })();
3604 var l171 = {name: "LS-READ-FROM-STRING"};
3605 (function(){
3606     (l171).fvalue = (function(v377){
3607         ((v377)["fname"] = "LS-READ-FROM-STRING");
3608         return v377;
3609     })((function (values,v376){
3610         checkArgs(arguments, 2);
3611         var i;
3612         return (function(){
3613             return l160.fvalue(values, l151.fvalue(pv, v376));
3614         })();
3615     }));
3616     return l171;
3617 })();
3618 var l172 = {name: "*MULTIPLE-VALUE-P*"};
3619 (function(){
3620     (((l172.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l172).value = l3.value));
3621     return l172;
3622 })();
3623 var l173 = {name: "MAKE-BINDING"};
3624 (function(){
3625     (l173).fvalue = (function(v382){
3626         ((v382)["fname"] = "MAKE-BINDING");
3627         return v382;
3628     })((function (values,v378,v379,v380,v381){
3629         checkArgsAtLeast(arguments, 4);
3630         checkArgsAtMost(arguments, 5);
3631         switch(arguments.length-1){
3632         case 3:
3633         v381=l3.value;
3634         default: break;
3635         }
3636         var i;
3637         return (function(){
3638             return l44.fvalue(values, v378, v379, v380, v381);
3639         })();
3640     }));
3641     return l173;
3642 })();
3643 var l174 = {name: "BINDING-NAME"};
3644 (function(){
3645     (l174).fvalue = (function(v384){
3646         ((v384)["fname"] = "BINDING-NAME");
3647         return v384;
3648     })((function (values,v383){
3649         checkArgs(arguments, 2);
3650         var i;
3651         return (function(){
3652             return l39.fvalue(values, v383);
3653         })();
3654     }));
3655     return l174;
3656 })();
3657 var l175 = {name: "BINDING-TYPE"};
3658 (function(){
3659     (l175).fvalue = (function(v386){
3660         ((v386)["fname"] = "BINDING-TYPE");
3661         return v386;
3662     })((function (values,v385){
3663         checkArgs(arguments, 2);
3664         var i;
3665         return (function(){
3666             return l40.fvalue(values, v385);
3667         })();
3668     }));
3669     return l175;
3670 })();
3671 var l176 = {name: "BINDING-VALUE"};
3672 (function(){
3673     (l176).fvalue = (function(v388){
3674         ((v388)["fname"] = "BINDING-VALUE");
3675         return v388;
3676     })((function (values,v387){
3677         checkArgs(arguments, 2);
3678         var i;
3679         return (function(){
3680             return l41.fvalue(values, v387);
3681         })();
3682     }));
3683     return l176;
3684 })();
3685 var l177 = {name: "BINDING-DECLARATIONS"};
3686 (function(){
3687     (l177).fvalue = (function(v390){
3688         ((v390)["fname"] = "BINDING-DECLARATIONS");
3689         return v390;
3690     })((function (values,v389){
3691         checkArgs(arguments, 2);
3692         var i;
3693         return (function(){
3694             return l42.fvalue(values, v389);
3695         })();
3696     }));
3697     return l177;
3698 })();
3699 var l178 = {name: "SET-BINDING-VALUE"};
3700 (function(){
3701     (l178).fvalue = (function(v393){
3702         ((v393)["fname"] = "SET-BINDING-VALUE");
3703         return v393;
3704     })((function (values,v391,v392){
3705         checkArgs(arguments, 3);
3706         var i;
3707         return (function(){
3708             return (function(){
3709                 var x = l35.fvalue(pv, v391);
3710                 if (typeof x != 'object')
3711                     throw 'The value ' + x + ' is not a type object.';
3712                 return (x.car = v392, x);
3713             })();
3714         })();
3715     }));
3716     return l178;
3717 })();
3718 var l179 = {name: "SET-BINDING-DECLARATIONS"};
3719 (function(){
3720     (l179).fvalue = (function(v396){
3721         ((v396)["fname"] = "SET-BINDING-DECLARATIONS");
3722         return v396;
3723     })((function (values,v394,v395){
3724         checkArgs(arguments, 3);
3725         var i;
3726         return (function(){
3727             return (function(){
3728                 var x = l37.fvalue(pv, v394);
3729                 if (typeof x != 'object')
3730                     throw 'The value ' + x + ' is not a type object.';
3731                 return (x.car = v395, x);
3732             })();
3733         })();
3734     }));
3735     return l179;
3736 })();
3737 var l180 = {name: "PUSH-BINDING-DECLARATION"};
3738 (function(){
3739     (l180).fvalue = (function(v399){
3740         ((v399)["fname"] = "PUSH-BINDING-DECLARATION");
3741         return v399;
3742     })((function (values,v397,v398){
3743         checkArgs(arguments, 3);
3744         var i;
3745         return (function(){
3746             return l179.fvalue(values, v398, ({car: v397, cdr: l177.fvalue(pv, v398)}));
3747         })();
3748     }));
3749     return l180;
3750 })();
3751 var l181 = {name: "MAKE-LEXENV"};
3752 (function(){
3753     (l181).fvalue = (function(v400){
3754         ((v400)["fname"] = "MAKE-LEXENV");
3755         return v400;
3756     })((function (values){
3757         checkArgsAtMost(arguments, 1);
3758         var i;
3759         return (function(){
3760             return l44.fvalue(values, l3.value, l3.value, l3.value, l3.value);
3761         })();
3762     }));
3763     return l181;
3764 })();
3765 var l182 = {name: "COPY-LEXENV"};
3766 (function(){
3767     (l182).fvalue = (function(v402){
3768         ((v402)["fname"] = "COPY-LEXENV");
3769         return v402;
3770     })((function (values,v401){
3771         checkArgs(arguments, 2);
3772         var i;
3773         return (function(){
3774             return l77.fvalue(values, v401);
3775         })();
3776     }));
3777     return l182;
3778 })();
3779 var l183 = {name: "PUSH-TO-LEXENV"};
3780 var l184 = {name: "BLOCK"};
3781 var l185 = {name: "GOTAG"};
3782 (function(){
3783     (l183).fvalue = (function(v407){
3784         ((v407)["fname"] = "PUSH-TO-LEXENV");
3785         return v407;
3786     })((function (values,v403,v404,v405){
3787         checkArgs(arguments, 4);
3788         var i;
3789         return (function(){
3790             return (function(v406){
3791                 return (l26.fvalue(pv, v406, l105) !== l3.value ? (function(){
3792                     var x = v404;
3793                     if (typeof x != 'object')
3794                         throw 'The value ' + x + ' is not a type object.';
3795                     return (x.car = ({car: v403, cdr: (function(){
3796                         var tmp = v404;
3797                         return tmp === l3.value? l3.value: tmp.car;
3798                     })()}), x);
3799                 })() : (l26.fvalue(pv, v406, l104) !== l3.value ? (function(){
3800                     var x = (function(){
3801                         var tmp = v404;
3802                         return tmp === l3.value? l3.value: tmp.cdr;
3803                     })();
3804                     if (typeof x != 'object')
3805                         throw 'The value ' + x + ' is not a type object.';
3806                     return (x.car = ({car: v403, cdr: l33.fvalue(pv, v404)}), x);
3807                 })() : (l26.fvalue(pv, v406, l184) !== l3.value ? (function(){
3808                     var x = l35.fvalue(pv, v404);
3809                     if (typeof x != 'object')
3810                         throw 'The value ' + x + ' is not a type object.';
3811                     return (x.car = ({car: v403, cdr: l36.fvalue(pv, v404)}), x);
3812                 })() : (l26.fvalue(pv, v406, l185) !== l3.value ? (function(){
3813                     var x = l37.fvalue(pv, v404);
3814                     if (typeof x != 'object')
3815                         throw 'The value ' + x + ' is not a type object.';
3816                     return (x.car = ({car: v403, cdr: l38.fvalue(pv, v404)}), x);
3817                 })() : (function(){
3818                     throw "ECASE expression failed.";
3819                 })()))));
3820             })(v405);
3821         })();
3822     }));
3823     return l183;
3824 })();
3825 var l186 = {name: "EXTEND-LEXENV"};
3826 (function(){
3827     (l186).fvalue = (function(v414){
3828         ((v414)["fname"] = "EXTEND-LEXENV");
3829         return v414;
3830     })((function (values,v408,v409,v410){
3831         checkArgs(arguments, 4);
3832         var i;
3833         return (function(){
3834             return (function(v411){
3835                 return (function(){
3836                     return (function(v412,v413){
3837                         (function(){
3838                             while(v412 !== l3.value){
3839                                 (v413 = (function(){
3840                                     var tmp = v412;
3841                                     return tmp === l3.value? l3.value: tmp.car;
3842                                 })());
3843                                 (function(){
3844                                     l183.fvalue(pv, v413, v411, v410);
3845                                     return l3.value;
3846                                 })();
3847                                 (v412 = (function(){
3848                                     var tmp = v412;
3849                                     return tmp === l3.value? l3.value: tmp.cdr;
3850                                 })());
3851                             }return l3.value;
3852                         })();
3853                         return v411;
3854                     })(l66.fvalue(pv, v408),l3.value);
3855                 })();
3856             })(l182.fvalue(pv, v409));
3857         })();
3858     }));
3859     return l186;
3860 })();
3861 var l187 = {name: "LOOKUP-IN-LEXENV"};
3862 (function(){
3863     (l187).fvalue = (function(v419){
3864         ((v419)["fname"] = "LOOKUP-IN-LEXENV");
3865         return v419;
3866     })((function (values,v415,v416,v417){
3867         checkArgs(arguments, 4);
3868         var i;
3869         return (function(){
3870             return l97.fvalue(values, v415, (function(v418){
3871                 return (l26.fvalue(pv, v418, l105) !== l3.value ? l39.fvalue(pv, v416) : (l26.fvalue(pv, v418, l104) !== l3.value ? l40.fvalue(pv, v416) : (l26.fvalue(pv, v418, l184) !== l3.value ? l41.fvalue(pv, v416) : (l26.fvalue(pv, v418, l185) !== l3.value ? l42.fvalue(pv, v416) : (function(){
3872                     throw "ECASE expression failed.";
3873                 })()))));
3874             })(v417));
3875         })();
3876     }));
3877     return l187;
3878 })();
3879 var l188 = {name: "*ENVIRONMENT*"};
3880 (function(){
3881     (((l188.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l188).value = l181.fvalue(pv)));
3882     return l188;
3883 })();
3884 var l189 = {name: "*VARIABLE-COUNTER*"};
3885 (function(){
3886     (((l189.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l189).value = 0));
3887     return l189;
3888 })();
3889 var l190 = {name: "GVARNAME"};
3890 (function(){
3891     (l190).fvalue = (function(v421){
3892         ((v421)["fname"] = "GVARNAME");
3893         return v421;
3894     })((function (values,v420){
3895         checkArgs(arguments, 2);
3896         var i;
3897         return (function(){
3898             return l134.fvalue(values, "v", l17.fvalue(pv, ((l189).value = (function(){
3899                 var x1 = (function(){
3900                     var symbol = l189;
3901                     var value = symbol.value;
3902                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3903                     return value;
3904                 })();
3905                 if (typeof x1 !== 'number') throw 'Not a number!';
3906                 var x2 = 1;
3907                 if (typeof x2 !== 'number') throw 'Not a number!';
3908                 return x1+x2;
3909             })())));
3910         })();
3911     }));
3912     return l190;
3913 })();
3914 var l191 = {name: "TRANSLATE-VARIABLE"};
3915 (function(){
3916     (l191).fvalue = (function(v423){
3917         ((v423)["fname"] = "TRANSLATE-VARIABLE");
3918         return v423;
3919     })((function (values,v422){
3920         checkArgs(arguments, 2);
3921         var i;
3922         return (function(){
3923             return l176.fvalue(values, l187.fvalue(pv, v422, (function(){
3924                 var symbol = l188;
3925                 var value = symbol.value;
3926                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3927                 return value;
3928             })(), l105));
3929         })();
3930     }));
3931     return l191;
3932 })();
3933 var l192 = {name: "EXTEND-LOCAL-ENV"};
3934 (function(){
3935     (l192).fvalue = (function(v429){
3936         ((v429)["fname"] = "EXTEND-LOCAL-ENV");
3937         return v429;
3938     })((function (values,v424){
3939         checkArgs(arguments, 2);
3940         var i;
3941         return (function(){
3942             return (function(v425){
3943                 return (function(){
3944                     return (function(v426,v427){
3945                         (function(){
3946                             while(v426 !== l3.value){
3947                                 (v427 = (function(){
3948                                     var tmp = v426;
3949                                     return tmp === l3.value? l3.value: tmp.car;
3950                                 })());
3951                                 (function(){
3952                                     (function(v428){
3953                                         return l183.fvalue(pv, v428, v425, l105);
3954                                     })(l173.fvalue(pv, v427, l105, l190.fvalue(pv, v427)));
3955                                     return l3.value;
3956                                 })();
3957                                 (v426 = (function(){
3958                                     var tmp = v426;
3959                                     return tmp === l3.value? l3.value: tmp.cdr;
3960                                 })());
3961                             }return l3.value;
3962                         })();
3963                         return v425;
3964                     })(v424,l3.value);
3965                 })();
3966             })(l182.fvalue(pv, (function(){
3967                 var symbol = l188;
3968                 var value = symbol.value;
3969                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3970                 return value;
3971             })()));
3972         })();
3973     }));
3974     return l192;
3975 })();
3976 var l193 = {name: "*TOPLEVEL-COMPILATIONS*"};
3977 (function(){
3978     (((l193.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l193).value = l3.value));
3979     return l193;
3980 })();
3981 var l194 = {name: "TOPLEVEL-COMPILATION"};
3982 (function(){
3983     (l194).fvalue = (function(v431){
3984         ((v431)["fname"] = "TOPLEVEL-COMPILATION");
3985         return v431;
3986     })((function (values,v430){
3987         checkArgs(arguments, 2);
3988         var i;
3989         return (function(){
3990             return ((l193).value = ({car: v430, cdr: (function(){
3991                 var symbol = l193;
3992                 var value = symbol.value;
3993                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3994                 return value;
3995             })()}));
3996         })();
3997     }));
3998     return l194;
3999 })();
4000 var l195 = {name: "NULL-OR-EMPTY-P"};
4001 (function(){
4002     (l195).fvalue = (function(v433){
4003         ((v433)["fname"] = "NULL-OR-EMPTY-P");
4004         return v433;
4005     })((function (values,v432){
4006         checkArgs(arguments, 2);
4007         var i;
4008         return (function(){
4009             return l24.fvalue(values, l71.fvalue(pv, v432));
4010         })();
4011     }));
4012     return l195;
4013 })();
4014 var l196 = {name: "GET-TOPLEVEL-COMPILATIONS"};
4015 (function(){
4016     (l196).fvalue = (function(v434){
4017         ((v434)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
4018         return v434;
4019     })((function (values){
4020         checkArgsAtMost(arguments, 1);
4021         var i;
4022         return (function(){
4023             return l66.fvalue(values, l90.fvalue(pv, (function(){
4024                 var symbol = l195;
4025                 var func = symbol.fvalue;
4026                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4027                 return func;
4028             })(), (function(){
4029                 var symbol = l193;
4030                 var value = symbol.value;
4031                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4032                 return value;
4033             })()));
4034         })();
4035     }));
4036     return l196;
4037 })();
4038 var l197 = {name: "%COMPILE-DEFMACRO"};
4039 var l198 = {name: "MACRO"};
4040 (function(){
4041     (l197).fvalue = (function(v437){
4042         ((v437)["fname"] = "%COMPILE-DEFMACRO");
4043         return v437;
4044     })((function (values,v435,v436){
4045         checkArgs(arguments, 3);
4046         var i;
4047         return (function(){
4048             l194.fvalue(pv, l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, v435))));
4049             l183.fvalue(pv, l173.fvalue(pv, v435, l198, v436), (function(){
4050                 var symbol = l188;
4051                 var value = symbol.value;
4052                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4053                 return value;
4054             })(), l104);
4055             return v435;
4056         })();
4057     }));
4058     return l197;
4059 })();
4060 var l199 = {name: "GLOBAL-BINDING"};
4061 (function(){
4062     (l199).fvalue = (function(v443){
4063         ((v443)["fname"] = "GLOBAL-BINDING");
4064         return v443;
4065     })((function (values,v438,v439,v440){
4066         checkArgs(arguments, 4);
4067         var i;
4068         return (function(){
4069             return (function(v441){
4070                 return (v441 !== l3.value ? v441 : (function(v442){
4071                     l183.fvalue(pv, v442, (function(){
4072                         var symbol = l188;
4073                         var value = symbol.value;
4074                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4075                         return value;
4076                     })(), v440);
4077                     return v442;
4078                 })(l173.fvalue(pv, v438, v439, l3.value)));
4079             })(l187.fvalue(pv, v438, (function(){
4080                 var symbol = l188;
4081                 var value = symbol.value;
4082                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4083                 return value;
4084             })(), v440));
4085         })();
4086     }));
4087     return l199;
4088 })();
4089 var l200 = {name: "CLAIMP"};
4090 (function(){
4091     (l200).fvalue = (function(v448){
4092         ((v448)["fname"] = "CLAIMP");
4093         return v448;
4094     })((function (values,v444,v445,v446){
4095         checkArgs(arguments, 4);
4096         var i;
4097         return (function(){
4098             return (function(v447){
4099                 return (v447 !== l3.value ? l88.fvalue(values, v446, l177.fvalue(pv, v447)) : l3.value);
4100             })(l187.fvalue(pv, v444, (function(){
4101                 var symbol = l188;
4102                 var value = symbol.value;
4103                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4104                 return value;
4105             })(), v445));
4106         })();
4107     }));
4108     return l200;
4109 })();
4110 var l201 = {name: "!PROCLAIM"};
4111 var l202 = {name: "SPECIAL"};
4112 var l203 = {name: "NOTINLINE"};
4113 var l204 = {name: "CONSTANT"};
4114 (function(){
4115     (l201).fvalue = (function(v460){
4116         ((v460)["fname"] = "!PROCLAIM");
4117         return v460;
4118     })((function (values,v449){
4119         checkArgs(arguments, 2);
4120         var i;
4121         return (function(){
4122             return (function(v450){
4123                 return (l26.fvalue(pv, v450, l202) !== l3.value ? (function(){
4124                     return (function(v451,v452){
4125                         (function(){
4126                             while(v451 !== l3.value){
4127                                 (v452 = (function(){
4128                                     var tmp = v451;
4129                                     return tmp === l3.value? l3.value: tmp.car;
4130                                 })());
4131                                 (function(){
4132                                     (function(v453){
4133                                         return l180.fvalue(pv, l202, v453);
4134                                     })(l199.fvalue(pv, v452, l105, l105));
4135                                     return l3.value;
4136                                 })();
4137                                 (v451 = (function(){
4138                                     var tmp = v451;
4139                                     return tmp === l3.value? l3.value: tmp.cdr;
4140                                 })());
4141                             }return l3.value;
4142                         })();
4143                         return l3.value;
4144                     })((function(){
4145                         var tmp = v449;
4146                         return tmp === l3.value? l3.value: tmp.cdr;
4147                     })(),l3.value);
4148                 })() : (l26.fvalue(pv, v450, l203) !== l3.value ? (function(){
4149                     return (function(v454,v455){
4150                         (function(){
4151                             while(v454 !== l3.value){
4152                                 (v455 = (function(){
4153                                     var tmp = v454;
4154                                     return tmp === l3.value? l3.value: tmp.car;
4155                                 })());
4156                                 (function(){
4157                                     (function(v456){
4158                                         return l180.fvalue(pv, l203, v456);
4159                                     })(l199.fvalue(pv, v455, l104, l104));
4160                                     return l3.value;
4161                                 })();
4162                                 (v454 = (function(){
4163                                     var tmp = v454;
4164                                     return tmp === l3.value? l3.value: tmp.cdr;
4165                                 })());
4166                             }return l3.value;
4167                         })();
4168                         return l3.value;
4169                     })((function(){
4170                         var tmp = v449;
4171                         return tmp === l3.value? l3.value: tmp.cdr;
4172                     })(),l3.value);
4173                 })() : (l26.fvalue(pv, v450, l204) !== l3.value ? (function(){
4174                     return (function(v457,v458){
4175                         (function(){
4176                             while(v457 !== l3.value){
4177                                 (v458 = (function(){
4178                                     var tmp = v457;
4179                                     return tmp === l3.value? l3.value: tmp.car;
4180                                 })());
4181                                 (function(){
4182                                     (function(v459){
4183                                         return l180.fvalue(pv, l204, v459);
4184                                     })(l199.fvalue(pv, v458, l105, l105));
4185                                     return l3.value;
4186                                 })();
4187                                 (v457 = (function(){
4188                                     var tmp = v457;
4189                                     return tmp === l3.value? l3.value: tmp.cdr;
4190                                 })());
4191                             }return l3.value;
4192                         })();
4193                         return l3.value;
4194                     })((function(){
4195                         var tmp = v449;
4196                         return tmp === l3.value? l3.value: tmp.cdr;
4197                     })(),l3.value);
4198                 })() : l3.value)));
4199             })((function(){
4200                 var tmp = v449;
4201                 return tmp === l3.value? l3.value: tmp.car;
4202             })());
4203         })();
4204     }));
4205     return l201;
4206 })();
4207 var l205 = {name: "PROCLAIM"};
4208 (l205).fvalue = (function(){
4209     var symbol = l201;
4210     var func = symbol.fvalue;
4211     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4212     return func;
4213 })();
4214 var l206 = {name: "*COMPILATIONS*"};
4215 (function(){
4216     (((l206.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l206).value = l3.value));
4217     return l206;
4218 })();
4219 var l207 = {name: "DEFINE-COMPILATION"};
4220 l207;
4221 var l208 = {name: "IF"};
4222 ((l206).value = ({car: l44.fvalue(pv, l208, (function (values,v461,v462,v463){
4223     checkArgs(arguments, 4);
4224     var i;
4225     return (function(){
4226         return l134.fvalue(values, "(", l145.fvalue(pv, v461), " !== ", l145.fvalue(pv, l3.value), " ? ", l145.fvalue(pv, v462, (function(){
4227             var symbol = l172;
4228             var value = symbol.value;
4229             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4230             return value;
4231         })()), " : ", l145.fvalue(pv, v463, (function(){
4232             var symbol = l172;
4233             var value = symbol.value;
4234             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4235             return value;
4236         })()), ")");
4237     })();
4238 })), cdr: (function(){
4239     var symbol = l206;
4240     var value = symbol.value;
4241     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4242     return value;
4243 })()}));
4244 var l209 = {name: "*LAMBDA-LIST-KEYWORDS*"};
4245 var l210 = {name: "&OPTIONAL"};
4246 var l211 = {name: "&REST"};
4247 var l212 = {name: "&KEY"};
4248 var l213 = QIList(l210,l211,l212,l3);
4249 (function(){
4250     (((l209.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l209).value = l213));
4251     return l209;
4252 })();
4253 var l214 = {name: "LIST-UNTIL-KEYWORD"};
4254 (function(){
4255     (l214).fvalue = (function(v466){
4256         ((v466)["fname"] = "LIST-UNTIL-KEYWORD");
4257         return v466;
4258     })((function (values,v464){
4259         checkArgs(arguments, 2);
4260         var i;
4261         return (function(){
4262             return ((function(v465){
4263                 return (v465 !== l3.value ? v465 : l88.fvalue(pv, (function(){
4264                     var tmp = v464;
4265                     return tmp === l3.value? l3.value: tmp.car;
4266                 })(), (function(){
4267                     var symbol = l209;
4268                     var value = symbol.value;
4269                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4270                     return value;
4271                 })()));
4272             })(l12.fvalue(pv, v464)) !== l3.value ? l3.value : ({car: (function(){
4273                 var tmp = v464;
4274                 return tmp === l3.value? l3.value: tmp.car;
4275             })(), cdr: l214.fvalue(pv, (function(){
4276                 var tmp = v464;
4277                 return tmp === l3.value? l3.value: tmp.cdr;
4278             })())}));
4279         })();
4280     }));
4281     return l214;
4282 })();
4283 var l215 = {name: "LAMBDA-LIST-SECTION"};
4284 (function(){
4285     (l215).fvalue = (function(v469){
4286         ((v469)["fname"] = "LAMBDA-LIST-SECTION");
4287         return v469;
4288     })((function (values,v467,v468){
4289         checkArgs(arguments, 3);
4290         var i;
4291         return (function(){
4292             return l214.fvalue(values, (function(){
4293                 var tmp = l88.fvalue(pv, v467, v468);
4294                 return tmp === l3.value? l3.value: tmp.cdr;
4295             })());
4296         })();
4297     }));
4298     return l215;
4299 })();
4300 var l216 = {name: "LAMBDA-LIST-REQUIRED-ARGUMENTS"};
4301 (function(){
4302     (l216).fvalue = (function(v471){
4303         ((v471)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
4304         return v471;
4305     })((function (values,v470){
4306         checkArgs(arguments, 2);
4307         var i;
4308         return (function(){
4309             return l214.fvalue(values, v470);
4310         })();
4311     }));
4312     return l216;
4313 })();
4314 var l217 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"};
4315 (function(){
4316     (l217).fvalue = (function(v473){
4317         ((v473)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
4318         return v473;
4319     })((function (values,v472){
4320         checkArgs(arguments, 2);
4321         var i;
4322         return (function(){
4323             return l73.fvalue(values, (function(){
4324                 var symbol = l58;
4325                 var func = symbol.fvalue;
4326                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4327                 return func;
4328             })(), l215.fvalue(pv, l210, v472));
4329         })();
4330     }));
4331     return l217;
4332 })();
4333 var l218 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS"};
4334 (function(){
4335     (l218).fvalue = (function(v475){
4336         ((v475)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
4337         return v475;
4338     })((function (values,v474){
4339         checkArgs(arguments, 2);
4340         var i;
4341         return (function(){
4342             return l73.fvalue(values, (function(){
4343                 var symbol = l30;
4344                 var func = symbol.fvalue;
4345                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4346                 return func;
4347             })(), l217.fvalue(pv, v474));
4348         })();
4349     }));
4350     return l218;
4351 })();
4352 var l219 = {name: "LAMBDA-LIST-REST-ARGUMENT"};
4353 (function(){
4354     (l219).fvalue = (function(v478){
4355         ((v478)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
4356         return v478;
4357     })((function (values,v476){
4358         checkArgs(arguments, 2);
4359         var i;
4360         return (function(){
4361             return (function(v477){
4362                 ((function(){
4363                     var tmp = v477;
4364                     return tmp === l3.value? l3.value: tmp.cdr;
4365                 })() !== l3.value ? (function(){
4366                     throw "Bad lambda-list";
4367                 })() : l3.value);
4368                 return (function(){
4369                     var tmp = v477;
4370                     return tmp === l3.value? l3.value: tmp.car;
4371                 })();
4372             })(l215.fvalue(pv, l211, v476));
4373         })();
4374     }));
4375     return l219;
4376 })();
4377 var l220 = {name: "LAMBDA-LIST-KEYWORD-ARGUMENTS-CANONICAL"};
4378 (function(){
4379     (l220).fvalue = (function(v486){
4380         ((v486)["fname"] = "LAMBDA-LIST-KEYWORD-ARGUMENTS-CANONICAL");
4381         return v486;
4382     })((function (values,v479){
4383         checkArgs(arguments, 2);
4384         var i;
4385         return (function(){
4386             return (function(v485){
4387                 return l73.fvalue(values, v485, l215.fvalue(pv, l212, v479));
4388             })((function (values,v480){
4389                 checkArgs(arguments, 2);
4390                 var i;
4391                 return (function(){
4392                     var v481 = l58.fvalue(pv, v480);
4393                     var v482 = l33.fvalue(pv, v481);
4394                     var v483 = l3.value;
4395                     var v484 = l3.value;
4396                     (l59.fvalue(pv, (function(){
4397                         var tmp = v481;
4398                         return tmp === l3.value? l3.value: tmp.car;
4399                     })()) !== l3.value ? (v483 = l33.fvalue(pv, (function(){
4400                         var tmp = v481;
4401                         return tmp === l3.value? l3.value: tmp.car;
4402                     })()), v484 = (function(){
4403                         var tmp = (function(){
4404                             var tmp = v481;
4405                             return tmp === l3.value? l3.value: tmp.car;
4406                         })();
4407                         return tmp === l3.value? l3.value: tmp.car;
4408                     })()) : (v483 = (function(){
4409                         var tmp = v481;
4410                         return tmp === l3.value? l3.value: tmp.car;
4411                     })(), v484 = l130.fvalue(pv, ((function(){
4412                         var tmp = v481;
4413                         return tmp === l3.value? l3.value: tmp.car;
4414                     })()).name, "KEYWORD")));
4415                     return l64.fvalue(pv, l44.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, v484), l44.fvalue(pv, v483))), l44.fvalue(pv, v482));
4416                 })();
4417             }));
4418         })();
4419     }));
4420     return l220;
4421 })();
4422 var l221 = {name: "LAMBDA-LIST-KEYWORD-ARGUMENTS"};
4423 (function(){
4424     (l221).fvalue = (function(v489){
4425         ((v489)["fname"] = "LAMBDA-LIST-KEYWORD-ARGUMENTS");
4426         return v489;
4427     })((function (values,v487){
4428         checkArgs(arguments, 2);
4429         var i;
4430         return (function(){
4431             return l73.fvalue(values, (function (values,v488){
4432                 checkArgs(arguments, 2);
4433                 var i;
4434                 return l40.fvalue(values, l39.fvalue(pv, v488));
4435             }), l220.fvalue(pv, v487));
4436         })();
4437     }));
4438     return l221;
4439 })();
4440 var l222 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
4441 (function(){
4442     (l222).fvalue = (function(v492){
4443         ((v492)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
4444         return v492;
4445     })((function (values,v491){
4446         checkArgsAtLeast(arguments, 2);
4447         var v490= l3.value;
4448         for (var i = arguments.length-1; i>=2; i--)
4449             v490 = {car: arguments[i], cdr:
4450         v490};
4451         var i;
4452         return (function(){
4453             return (v491 !== l3.value ? l134.fvalue(values, "(function(){", (function(){
4454                 var symbol = l133;
4455                 var value = symbol.value;
4456                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4457                 return value;
4458             })(), l143.fvalue(pv, "var func = ", l136.fvalue(pv, v490), ";", (function(){
4459                 var symbol = l133;
4460                 var value = symbol.value;
4461                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4462                 return value;
4463             })(), "func.docstring = '", v491, "';", (function(){
4464                 var symbol = l133;
4465                 var value = symbol.value;
4466                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4467                 return value;
4468             })(), "return func;", (function(){
4469                 var symbol = l133;
4470                 var value = symbol.value;
4471                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4472                 return value;
4473             })()), "})()") : l136.fvalue(values, v490));
4474         })();
4475     }));
4476     return l222;
4477 })();
4478 var l223 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"};
4479 var l224 = {name: "N/A"};
4480 (function(){
4481     (l223).fvalue = (function(v498){
4482         ((v498)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT");
4483         return v498;
4484     })((function (values,v493,v494,v495){
4485         checkArgs(arguments, 4);
4486         var i;
4487         return (function(){
4488             return (function(v496,v497){
4489                 return (function(){
4490                     try {
4491                         (((function(){
4492                             var x1 = 1;
4493                             if (typeof x1 !== 'number') throw 'Not a number!';
4494                             var x2 = v496;
4495                             if (typeof x2 !== 'number') throw 'Not a number!';
4496                             return (x1<x2?l4.value: l3.value);
4497                         })() !== l3.value ? l26.fvalue(pv, v496, v497) : l3.value) !== l3.value ? (function(){
4498                             var values = mv;
4499                             throw ({type: 'block', id: 185, values: l134.fvalue(values, "checkArgs(arguments, ", l17.fvalue(pv, v496), ");", (function(){
4500                                 var symbol = l133;
4501                                 var value = symbol.value;
4502                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4503                                 return value;
4504                             })()), message: 'Return from unknown block NIL.'})
4505                         })() : l3.value);
4506                         return l134.fvalue(values, ((function(){
4507                             var x1 = 1;
4508                             if (typeof x1 !== 'number') throw 'Not a number!';
4509                             var x2 = v496;
4510                             if (typeof x2 !== 'number') throw 'Not a number!';
4511                             return (x1<x2?l4.value: l3.value);
4512                         })() !== l3.value ? l134.fvalue(pv, "checkArgsAtLeast(arguments, ", l17.fvalue(pv, v496), ");", (function(){
4513                             var symbol = l133;
4514                             var value = symbol.value;
4515                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4516                             return value;
4517                         })()) : ""), (((typeof (v497) == "number")?l4.value: l3.value) !== l3.value ? l134.fvalue(pv, "checkArgsAtMost(arguments, ", l17.fvalue(pv, v497), ");", (function(){
4518                             var symbol = l133;
4519                             var value = symbol.value;
4520                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4521                             return value;
4522                         })()) : ""));
4523                     }
4524                     catch (cf){
4525                         if (cf.type == 'block' && cf.id == 185)
4526                             return values.apply(this, forcemv(cf.values));
4527                         else
4528                             throw cf;
4529                     }
4530                 })();
4531             })(l22.fvalue(pv, v493),(v495 !== l3.value ? l224 : (function(){
4532                 var x1 = 1;
4533                 if (typeof x1 !== 'number') throw 'Not a number!';
4534                 var x2 = v493;
4535                 if (typeof x2 !== 'number') throw 'Not a number!';
4536                 var x3 = v494;
4537                 if (typeof x3 !== 'number') throw 'Not a number!';
4538                 return x1+x2+x3;
4539             })()));
4540         })();
4541     }));
4542     return l223;
4543 })();
4544 var l225 = {name: "COMPILE-LAMBDA-OPTIONAL"};
4545 (function(){
4546     (l225).fvalue = (function(v507){
4547         ((v507)["fname"] = "COMPILE-LAMBDA-OPTIONAL");
4548         return v507;
4549     })((function (values,v499){
4550         checkArgs(arguments, 2);
4551         var i;
4552         return (function(){
4553             return (function(){
4554                 var v500 = l218.fvalue(pv, v499);
4555                 var v501 = l71.fvalue(pv, l216.fvalue(pv, v499));
4556                 var v502 = l71.fvalue(pv, v500);
4557                 return (v500 !== l3.value ? l134.fvalue(values, "switch(arguments.length-1){", (function(){
4558                     var symbol = l133;
4559                     var value = symbol.value;
4560                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4561                     return value;
4562                 })(), (function(v503,v504,v505){
4563                     return (function(){
4564                         (function(){
4565                             return (function(){
4566                                 while((function(){
4567                                     var x1 = v505;
4568                                     if (typeof x1 !== 'number') throw 'Not a number!';
4569                                     var x2 = v502;
4570                                     if (typeof x2 !== 'number') throw 'Not a number!';
4571                                     return (x1<x2?l4.value: l3.value);
4572                                 })() !== l3.value){
4573                                     (function(v506){
4574                                         (v504 = ({car: l134.fvalue(pv, "case ", l17.fvalue(pv, (function(){
4575                                             var x1 = v505;
4576                                             if (typeof x1 !== 'number') throw 'Not a number!';
4577                                             var x2 = v501;
4578                                             if (typeof x2 !== 'number') throw 'Not a number!';
4579                                             return x1+x2;
4580                                         })()), ":", (function(){
4581                                             var symbol = l133;
4582                                             var value = symbol.value;
4583                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4584                                             return value;
4585                                         })(), l191.fvalue(pv, (function(){
4586                                             var tmp = v506;
4587                                             return tmp === l3.value? l3.value: tmp.car;
4588                                         })()), "=", l145.fvalue(pv, l33.fvalue(pv, v506)), ";", (function(){
4589                                             var symbol = l133;
4590                                             var value = symbol.value;
4591                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4592                                             return value;
4593                                         })()), cdr: v504}));
4594                                         return (v505 = (function(){
4595                                             var x1 = v505;
4596                                             if (typeof x1 !== 'number') throw 'Not a number!';
4597                                             var x2 = 1;
4598                                             if (typeof x2 !== 'number') throw 'Not a number!';
4599                                             return x1+x2;
4600                                         })());
4601                                     })(l85.fvalue(pv, v505, v503));
4602                                 }return l3.value;
4603                             })();
4604                         })();
4605                         (v504 = ({car: l134.fvalue(pv, "default: break;", (function(){
4606                             var symbol = l133;
4607                             var value = symbol.value;
4608                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4609                             return value;
4610                         })()), cdr: v504}));
4611                         return l136.fvalue(pv, l66.fvalue(pv, v504));
4612                     })();
4613                 })(l217.fvalue(pv, v499),l3.value,0), "}", (function(){
4614                     var symbol = l133;
4615                     var value = symbol.value;
4616                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4617                     return value;
4618                 })()) : "");
4619             })();
4620         })();
4621     }));
4622     return l225;
4623 })();
4624 var l226 = {name: "COMPILE-LAMBDA-REST"};
4625 (function(){
4626     (l226).fvalue = (function(v513){
4627         ((v513)["fname"] = "COMPILE-LAMBDA-REST");
4628         return v513;
4629     })((function (values,v508){
4630         checkArgs(arguments, 2);
4631         var i;
4632         return (function(){
4633             return (function(v509,v510,v511){
4634                 return (v511 !== l3.value ? (function(v512){
4635                     return l134.fvalue(values, "var ", v512, "= ", l145.fvalue(pv, l3.value), ";", (function(){
4636                         var symbol = l133;
4637                         var value = symbol.value;
4638                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4639                         return value;
4640                     })(), "for (var i = arguments.length-1; i>=", l17.fvalue(pv, (function(){
4641                         var x1 = 1;
4642                         if (typeof x1 !== 'number') throw 'Not a number!';
4643                         var x2 = v509;
4644                         if (typeof x2 !== 'number') throw 'Not a number!';
4645                         var x3 = v510;
4646                         if (typeof x3 !== 'number') throw 'Not a number!';
4647                         return x1+x2+x3;
4648                     })()), "; i--)", (function(){
4649                         var symbol = l133;
4650                         var value = symbol.value;
4651                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4652                         return value;
4653                     })(), l143.fvalue(pv, v512, " = ", "{car: arguments[i], cdr: "), v512, "};", (function(){
4654                         var symbol = l133;
4655                         var value = symbol.value;
4656                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4657                         return value;
4658                     })());
4659                 })(l191.fvalue(pv, v511)) : "");
4660             })(l71.fvalue(pv, l216.fvalue(pv, v508)),l71.fvalue(pv, l218.fvalue(pv, v508)),l219.fvalue(pv, v508));
4661         })();
4662     }));
4663     return l226;
4664 })();
4665 var l227 = {name: "COMPILE-LAMBDA-PARSE-KEYWORDS"};
4666 (function(){
4667     (l227).fvalue = (function(v523){
4668         ((v523)["fname"] = "COMPILE-LAMBDA-PARSE-KEYWORDS");
4669         return v523;
4670     })((function (values,v514){
4671         checkArgs(arguments, 2);
4672         var i;
4673         return (function(){
4674             return (function(v515,v516,v517){
4675                 return l134.fvalue(values, "var i;", (function(){
4676                     var symbol = l133;
4677                     var value = symbol.value;
4678                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4679                     return value;
4680                 })(), l138.fvalue(pv, (function (values,v518){
4681                     checkArgs(arguments, 2);
4682                     var i;
4683                     return (function(v519){
4684                         return l134.fvalue(values, "var ", l191.fvalue(pv, v519), "; ", (function(){
4685                             var symbol = l133;
4686                             var value = symbol.value;
4687                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4688                             return value;
4689                         })());
4690                     })(l40.fvalue(pv, (function(){
4691                         var tmp = v518;
4692                         return tmp === l3.value? l3.value: tmp.car;
4693                     })()));
4694                 }), v517), (function(v521){
4695                     return l138.fvalue(pv, v521, v517);
4696                 })((function (values,v520){
4697                     checkArgs(arguments, 2);
4698                     var i;
4699                     return l134.fvalue(values, "for (i=", l17.fvalue(pv, (function(){
4700                         var x1 = 1;
4701                         if (typeof x1 !== 'number') throw 'Not a number!';
4702                         var x2 = v515;
4703                         if (typeof x2 !== 'number') throw 'Not a number!';
4704                         var x3 = v516;
4705                         if (typeof x3 !== 'number') throw 'Not a number!';
4706                         return x1+x2+x3;
4707                     })()), "; i<arguments.length; i+=2){", (function(){
4708                         var symbol = l133;
4709                         var value = symbol.value;
4710                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4711                         return value;
4712                     })(), l143.fvalue(pv, "if (arguments[i] === ", l145.fvalue(pv, l32.fvalue(pv, v520)), "){", (function(){
4713                         var symbol = l133;
4714                         var value = symbol.value;
4715                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4716                         return value;
4717                     })(), l143.fvalue(pv, l191.fvalue(pv, l33.fvalue(pv, (function(){
4718                         var tmp = v520;
4719                         return tmp === l3.value? l3.value: tmp.car;
4720                     })())), " = arguments[i+1];", (function(){
4721                         var symbol = l133;
4722                         var value = symbol.value;
4723                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4724                         return value;
4725                     })(), "break;", (function(){
4726                         var symbol = l133;
4727                         var value = symbol.value;
4728                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4729                         return value;
4730                     })()), "}", (function(){
4731                         var symbol = l133;
4732                         var value = symbol.value;
4733                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4734                         return value;
4735                     })()), "}", (function(){
4736                         var symbol = l133;
4737                         var value = symbol.value;
4738                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4739                         return value;
4740                     })(), "if (i == arguments.length){", (function(){
4741                         var symbol = l133;
4742                         var value = symbol.value;
4743                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4744                         return value;
4745                     })(), l143.fvalue(pv, l191.fvalue(pv, l33.fvalue(pv, (function(){
4746                         var tmp = v520;
4747                         return tmp === l3.value? l3.value: tmp.car;
4748                     })())), " = ", l145.fvalue(pv, l33.fvalue(pv, v520)), ";", (function(){
4749                         var symbol = l133;
4750                         var value = symbol.value;
4751                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4752                         return value;
4753                     })()), "}", (function(){
4754                         var symbol = l133;
4755                         var value = symbol.value;
4756                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4757                         return value;
4758                     })());
4759                 })), (l12.fvalue(pv, v517) !== l3.value ? "" : l134.fvalue(pv, "for (i=", l17.fvalue(pv, (function(){
4760                     var x1 = 1;
4761                     if (typeof x1 !== 'number') throw 'Not a number!';
4762                     var x2 = v515;
4763                     if (typeof x2 !== 'number') throw 'Not a number!';
4764                     var x3 = v516;
4765                     if (typeof x3 !== 'number') throw 'Not a number!';
4766                     return x1+x2+x3;
4767                 })()), "; i<arguments.length; i+=2){", (function(){
4768                     var symbol = l133;
4769                     var value = symbol.value;
4770                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4771                     return value;
4772                 })(), l143.fvalue(pv, "if (", l136.fvalue(pv, l73.fvalue(pv, (function (values,v522){
4773                     checkArgs(arguments, 2);
4774                     var i;
4775                     return l134.fvalue(values, "arguments[i] !== ", l145.fvalue(pv, l32.fvalue(pv, v522)));
4776                 }), v517), " && "), ")", (function(){
4777                     var symbol = l133;
4778                     var value = symbol.value;
4779                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4780                     return value;
4781                 })(), l143.fvalue(pv, "throw 'Unknown keyword argument ' + arguments[i].name;", (function(){
4782                     var symbol = l133;
4783                     var value = symbol.value;
4784                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4785                     return value;
4786                 })())), "}", (function(){
4787                     var symbol = l133;
4788                     var value = symbol.value;
4789                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4790                     return value;
4791                 })())));
4792             })(l71.fvalue(pv, l216.fvalue(pv, v514)),l71.fvalue(pv, l218.fvalue(pv, v514)),l220.fvalue(pv, v514));
4793         })();
4794     }));
4795     return l227;
4796 })();
4797 var l228 = {name: "COMPILE-LAMBDA"};
4798 var l229 = {name: "LS-COMPILE-BLOCK"};
4799 (function(){
4800     (l228).fvalue = (function(v536){
4801         ((v536)["fname"] = "COMPILE-LAMBDA");
4802         return v536;
4803     })((function (values,v524,v525){
4804         checkArgs(arguments, 3);
4805         var i;
4806         return (function(){
4807             return (function(v526,v527,v528,v529,v530){
4808                 ((((typeof((function(){
4809                     var tmp = v525;
4810                     return tmp === l3.value? l3.value: tmp.car;
4811                 })()) == "string")?l4.value: l3.value) !== l3.value ? l27.fvalue(pv, l12.fvalue(pv, (function(){
4812                     var tmp = v525;
4813                     return tmp === l3.value? l3.value: tmp.cdr;
4814                 })())) : l3.value) !== l3.value ? (function(){
4815                     (v530 = (function(){
4816                         var tmp = v525;
4817                         return tmp === l3.value? l3.value: tmp.car;
4818                     })());
4819                     return (v525 = (function(){
4820                         var tmp = v525;
4821                         return tmp === l3.value? l3.value: tmp.cdr;
4822                     })());
4823                 })() : l3.value);
4824                 return (function(v531,v532,v533){
4825                     try {
4826                         var tmp;
4827                         tmp = l188.value;
4828                         l188.value = v533;
4829                         v533 = tmp;
4830                         return l222.fvalue(values, v530, "(function (", l136.fvalue(pv, ({car: "values", cdr: l73.fvalue(pv, (function(){
4831                             var symbol = l191;
4832                             var func = symbol.fvalue;
4833                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4834                             return func;
4835                         })(), l64.fvalue(pv, v526, v527))}), ","), "){", (function(){
4836                             var symbol = l133;
4837                             var value = symbol.value;
4838                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4839                             return value;
4840                         })(), l143.fvalue(pv, l223.fvalue(pv, v531, v532, (function(v534){
4841                             return (v534 !== l3.value ? v534 : v528);
4842                         })(v529)), l225.fvalue(pv, v524), l226.fvalue(pv, v524), l227.fvalue(pv, v524), (function(v535){
4843                             try {
4844                                 var tmp;
4845                                 tmp = l172.value;
4846                                 l172.value = v535;
4847                                 v535 = tmp;
4848                                 return l229.fvalue(pv, v525, l4.value);
4849                             }
4850                             finally {
4851                                 l172.value = v535;
4852                             }
4853                         })(l4.value)), "})");
4854                     }
4855                     finally {
4856                         l188.value = v533;
4857                     }
4858                 })(l71.fvalue(pv, v526),l71.fvalue(pv, v527),l192.fvalue(pv, l64.fvalue(pv, l58.fvalue(pv, v529), v526, v527, v528)));
4859             })(l216.fvalue(pv, v524),l218.fvalue(pv, v524),l221.fvalue(pv, v524),l219.fvalue(pv, v524),l3.value);
4860         })();
4861     }));
4862     return l228;
4863 })();
4864 var l230 = {name: "SETQ-PAIR"};
4865 var l231 = {name: "SET"};
4866 (function(){
4867     (l230).fvalue = (function(v540){
4868         ((v540)["fname"] = "SETQ-PAIR");
4869         return v540;
4870     })((function (values,v537,v538){
4871         checkArgs(arguments, 3);
4872         var i;
4873         return (function(){
4874             return (function(v539){
4875                 return ((((l175.fvalue(pv, v539) === l105)?l4.value: l3.value) !== l3.value ? (l27.fvalue(pv, l88.fvalue(pv, l202, l177.fvalue(pv, v539))) !== l3.value ? l27.fvalue(pv, l88.fvalue(pv, l204, l177.fvalue(pv, v539))) : l3.value) : l3.value) !== l3.value ? l134.fvalue(values, l176.fvalue(pv, v539), " = ", l145.fvalue(pv, v538)) : l145.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l231), l44.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, v537))), l44.fvalue(pv, v538))));
4876             })(l187.fvalue(pv, v537, (function(){
4877                 var symbol = l188;
4878                 var value = symbol.value;
4879                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4880                 return value;
4881             })(), l105));
4882         })();
4883     }));
4884     return l230;
4885 })();
4886 var l232 = {name: "SETQ"};
4887 ((l206).value = ({car: l44.fvalue(pv, l232, (function (values){
4888     var v541= l3.value;
4889     for (var i = arguments.length-1; i>=1; i--)
4890         v541 = {car: arguments[i], cdr:
4891     v541};
4892     var i;
4893     return (function(){
4894         return (function(v542){
4895             (function(){
4896                 try {
4897                     return (function(){
4898                         while(l4.value !== l3.value){
4899                             (l12.fvalue(pv, v541) !== l3.value ? (function(){
4900                                 throw ({type: 'block', id: 193, values: l3.value, message: 'Return from unknown block NIL.'})
4901                             })() : (l12.fvalue(pv, (function(){
4902                                 var tmp = v541;
4903                                 return tmp === l3.value? l3.value: tmp.cdr;
4904                             })()) !== l3.value ? (function(){
4905                                 throw "Odd paris in SETQ";
4906                             })() : (function(){
4907                                 (v542 = l134.fvalue(pv, v542, l134.fvalue(pv, l230.fvalue(pv, (function(){
4908                                     var tmp = v541;
4909                                     return tmp === l3.value? l3.value: tmp.car;
4910                                 })(), l33.fvalue(pv, v541)), (l12.fvalue(pv, l35.fvalue(pv, v541)) !== l3.value ? "" : ", "))));
4911                                 return (v541 = l35.fvalue(pv, v541));
4912                             })()));
4913                         }return l3.value;
4914                     })();
4915                 }
4916                 catch (cf){
4917                     if (cf.type == 'block' && cf.id == 193)
4918                         return cf.values;
4919                     else
4920                         throw cf;
4921                 }
4922             })();
4923             return l134.fvalue(values, "(", v542, ")");
4924         })("");
4925     })();
4926 })), cdr: (function(){
4927     var symbol = l206;
4928     var value = symbol.value;
4929     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4930     return value;
4931 })()}));
4932 var l233 = {name: "JS-VREF"};
4933 ((l206).value = ({car: l44.fvalue(pv, l233, (function (values,v543){
4934     checkArgs(arguments, 2);
4935     var i;
4936     return (function(){
4937         return v543;
4938     })();
4939 })), cdr: (function(){
4940     var symbol = l206;
4941     var value = symbol.value;
4942     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4943     return value;
4944 })()}));
4945 var l234 = {name: "JS-VSET"};
4946 ((l206).value = ({car: l44.fvalue(pv, l234, (function (values,v544,v545){
4947     checkArgs(arguments, 3);
4948     var i;
4949     return (function(){
4950         return l134.fvalue(values, "(", v544, " = ", l145.fvalue(pv, v545), ")");
4951     })();
4952 })), cdr: (function(){
4953     var symbol = l206;
4954     var value = symbol.value;
4955     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4956     return value;
4957 })()}));
4958 (function(){
4959     (l148).fvalue = (function(v552){
4960         ((v552)["fname"] = "ESCAPE-STRING");
4961         return v552;
4962     })((function (values,v546){
4963         checkArgs(arguments, 2);
4964         var i;
4965         return (function(){
4966             return (function(v547,v548,v549){
4967                 (function(){
4968                     return (function(){
4969                         while((function(){
4970                             var x1 = v548;
4971                             if (typeof x1 !== 'number') throw 'Not a number!';
4972                             var x2 = v549;
4973                             if (typeof x2 !== 'number') throw 'Not a number!';
4974                             return (x1<x2?l4.value: l3.value);
4975                         })() !== l3.value){
4976                             (function(v550){
4977                                 ((function(v551){
4978                                     return (v551 !== l3.value ? v551 : l80.fvalue(pv, v550, 92));
4979                                 })(l80.fvalue(pv, v550, 34)) !== l3.value ? (v547 = l134.fvalue(pv, v547, "\\")) : l3.value);
4980                                 (l80.fvalue(pv, v550, 10) !== l3.value ? (function(){
4981                                     (v547 = l134.fvalue(pv, v547, "\\"));
4982                                     return (v550 = 110);
4983                                 })() : l3.value);
4984                                 return (v547 = l134.fvalue(pv, v547, l98.fvalue(pv, v550)));
4985                             })((function(){
4986                                 var string = v546;
4987                                 var index = v548;
4988                                 if (typeof string != 'string')
4989                                     throw 'The value ' + string + ' is not a type string.';
4990                                 if (typeof index != 'number')
4991                                     throw 'The value ' + index + ' is not a type number.';
4992                                 return string.charCodeAt(index);
4993                             })());
4994                             (v548 = (function(){
4995                                 var x1 = v548;
4996                                 if (typeof x1 !== 'number') throw 'Not a number!';
4997                                 var x2 = 1;
4998                                 if (typeof x2 !== 'number') throw 'Not a number!';
4999                                 return x1+x2;
5000                             })());
5001                         }return l3.value;
5002                     })();
5003                 })();
5004                 return v547;
5005             })("",0,l71.fvalue(pv, v546));
5006         })();
5007     }));
5008     return l148;
5009 })();
5010 var l235 = {name: "*LITERAL-SYMBOLS*"};
5011 (function(){
5012     (((l235.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l235).value = l3.value));
5013     return l235;
5014 })();
5015 var l236 = {name: "*LITERAL-COUNTER*"};
5016 (function(){
5017     (((l236.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l236).value = 0));
5018     return l236;
5019 })();
5020 var l237 = {name: "GENLIT"};
5021 (function(){
5022     (l237).fvalue = (function(v553){
5023         ((v553)["fname"] = "GENLIT");
5024         return v553;
5025     })((function (values){
5026         checkArgsAtMost(arguments, 1);
5027         var i;
5028         return (function(){
5029             return l134.fvalue(values, "l", l17.fvalue(pv, ((l236).value = (function(){
5030                 var x1 = (function(){
5031                     var symbol = l236;
5032                     var value = symbol.value;
5033                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5034                     return value;
5035                 })();
5036                 if (typeof x1 !== 'number') throw 'Not a number!';
5037                 var x2 = 1;
5038                 if (typeof x2 !== 'number') throw 'Not a number!';
5039                 return x1+x2;
5040             })())));
5041         })();
5042     }));
5043     return l237;
5044 })();
5045 var l238 = {name: "LITERAL"};
5046 (function(){
5047     (l238).fvalue = (function(v568){
5048         ((v568)["fname"] = "LITERAL");
5049         return v568;
5050     })((function (values,v554,v555){
5051         checkArgsAtLeast(arguments, 2);
5052         checkArgsAtMost(arguments, 3);
5053         switch(arguments.length-1){
5054         case 1:
5055         v555=l3.value;
5056         default: break;
5057         }
5058         var i;
5059         return (function(){
5060             return (l81.fvalue(pv, v554) !== l3.value ? l17.fvalue(values, v554) : (((typeof(v554) == "string")?l4.value: l3.value) !== l3.value ? l134.fvalue(values, "\"", l148.fvalue(pv, v554), "\"") : (((function(){
5061                 var tmp = v554;
5062                 return (typeof tmp == 'object' && 'name' in tmp);
5063             })()?l4.value: l3.value) !== l3.value ? (function(v556){
5064                 return (v556 !== l3.value ? v556 : (function(v558,v559){
5065                     ((l235).value = ({car: ({car: v554, cdr: v558}), cdr: (function(){
5066                         var symbol = l235;
5067                         var value = symbol.value;
5068                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5069                         return value;
5070                     })()}));
5071                     l194.fvalue(pv, l134.fvalue(pv, "var ", v558, " = ", v559));
5072                     return v558;
5073                 })(l237.fvalue(pv),(function(v557){
5074                     return (l12.fvalue(pv, v557) !== l3.value ? l134.fvalue(pv, "{name: \"", l148.fvalue(pv, (v554).name), "\"}") : l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l130), l44.fvalue(pv, (v554).name), l44.fvalue(pv, l114.fvalue(pv, v557)))));
5075                 })(l122.fvalue(pv, v554))));
5076             })((function(){
5077                 var tmp = l97.fvalue(pv, v554, (function(){
5078                     var symbol = l235;
5079                     var value = symbol.value;
5080                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5081                     return value;
5082                 })());
5083                 return tmp === l3.value? l3.value: tmp.cdr;
5084             })()) : (((function(){
5085                 var tmp = v554;
5086                 return (typeof tmp == 'object' && 'car' in tmp);
5087             })()?l4.value: l3.value) !== l3.value ? (function(){
5088                 var v560 = l87.fvalue(pv, v554);
5089                 var v561 = l86.fvalue(pv, v554);
5090                 var v562 = l134.fvalue(pv, "QIList(", l137.fvalue(pv, l73.fvalue(pv, (function (values,v563){
5091                     checkArgs(arguments, 2);
5092                     var i;
5093                     return l238.fvalue(values, v563, l4.value);
5094                 }), v560), ","), l238.fvalue(pv, (function(){
5095                     var tmp = v561;
5096                     return tmp === l3.value? l3.value: tmp.car;
5097                 })(), l4.value), ",", l238.fvalue(pv, (function(){
5098                     var tmp = v561;
5099                     return tmp === l3.value? l3.value: tmp.cdr;
5100                 })(), l4.value), ")");
5101                 return (v555 !== l3.value ? v562 : (function(v564){
5102                     l194.fvalue(pv, l134.fvalue(pv, "var ", v564, " = ", v562));
5103                     return v564;
5104                 })(l237.fvalue(pv)));
5105             })() : (((function(){
5106                 var x = v554;
5107                 return typeof x === 'object' && 'length' in x;
5108             })()?l4.value: l3.value) !== l3.value ? (function(v565){
5109                 return (function(v566){
5110                     return (v555 !== l3.value ? v566 : (function(v567){
5111                         l194.fvalue(pv, l134.fvalue(pv, "var ", v567, " = ", v566));
5112                         return v567;
5113                     })(l237.fvalue(pv)));
5114                 })(l134.fvalue(pv, "[", l136.fvalue(pv, l73.fvalue(pv, (function(){
5115                     var symbol = l238;
5116                     var func = symbol.fvalue;
5117                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5118                     return func;
5119                 })(), v565), ", "), "]"));
5120             })(l139.fvalue(pv, v554)) : l3.value)))));
5121         })();
5122     }));
5123     return l238;
5124 })();
5125 ((l206).value = ({car: l44.fvalue(pv, l167, (function (values,v569){
5126     checkArgs(arguments, 2);
5127     var i;
5128     return (function(){
5129         return l238.fvalue(values, v569);
5130     })();
5131 })), cdr: (function(){
5132     var symbol = l206;
5133     var value = symbol.value;
5134     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5135     return value;
5136 })()}));
5137 var l239 = {name: "%WHILE"};
5138 ((l206).value = ({car: l44.fvalue(pv, l239, (function (values,v571){
5139     checkArgsAtLeast(arguments, 2);
5140     var v570= l3.value;
5141     for (var i = arguments.length-1; i>=2; i--)
5142         v570 = {car: arguments[i], cdr:
5143     v570};
5144     var i;
5145     return (function(){
5146         return l134.fvalue(values, "(function(){", (function(){
5147             var symbol = l133;
5148             var value = symbol.value;
5149             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5150             return value;
5151         })(), l143.fvalue(pv, "while(", l145.fvalue(pv, v571), " !== ", l145.fvalue(pv, l3.value), "){", (function(){
5152             var symbol = l133;
5153             var value = symbol.value;
5154             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5155             return value;
5156         })(), l143.fvalue(pv, l229.fvalue(pv, v570)), "}", "return ", l145.fvalue(pv, l3.value), ";", (function(){
5157             var symbol = l133;
5158             var value = symbol.value;
5159             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5160             return value;
5161         })()), "})()");
5162     })();
5163 })), cdr: (function(){
5164     var symbol = l206;
5165     var value = symbol.value;
5166     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5167     return value;
5168 })()}));
5169 var l240 = {name: "SYMBOL-FUNCTION"};
5170 ((l206).value = ({car: l44.fvalue(pv, l104, (function (values,v572){
5171     checkArgs(arguments, 2);
5172     var i;
5173     return (function(){
5174         return ((l59.fvalue(pv, v572) !== l3.value ? (((function(){
5175             var tmp = v572;
5176             return tmp === l3.value? l3.value: tmp.car;
5177         })() === l5)?l4.value: l3.value) : l3.value) !== l3.value ? l228.fvalue(values, l33.fvalue(pv, v572), l35.fvalue(pv, v572)) : (((function(){
5178             var tmp = v572;
5179             return (typeof tmp == 'object' && 'name' in tmp);
5180         })()?l4.value: l3.value) !== l3.value ? (function(v573){
5181             return (v573 !== l3.value ? l176.fvalue(values, v573) : l145.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l240), l44.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, v572))))));
5182         })(l187.fvalue(pv, v572, (function(){
5183             var symbol = l188;
5184             var value = symbol.value;
5185             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5186             return value;
5187         })(), l104)) : l3.value));
5188     })();
5189 })), cdr: (function(){
5190     var symbol = l206;
5191     var value = symbol.value;
5192     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5193     return value;
5194 })()}));
5195 var l241 = {name: "MAKE-FUNCTION-BINDING"};
5196 (function(){
5197     (l241).fvalue = (function(v575){
5198         ((v575)["fname"] = "MAKE-FUNCTION-BINDING");
5199         return v575;
5200     })((function (values,v574){
5201         checkArgs(arguments, 2);
5202         var i;
5203         return (function(){
5204             return l173.fvalue(values, v574, l104, l190.fvalue(pv, v574));
5205         })();
5206     }));
5207     return l241;
5208 })();
5209 var l242 = {name: "COMPILE-FUNCTION-DEFINITION"};
5210 (function(){
5211     (l242).fvalue = (function(v577){
5212         ((v577)["fname"] = "COMPILE-FUNCTION-DEFINITION");
5213         return v577;
5214     })((function (values,v576){
5215         checkArgs(arguments, 2);
5216         var i;
5217         return (function(){
5218             return l228.fvalue(values, (function(){
5219                 var tmp = v576;
5220                 return tmp === l3.value? l3.value: tmp.car;
5221             })(), (function(){
5222                 var tmp = v576;
5223                 return tmp === l3.value? l3.value: tmp.cdr;
5224             })());
5225         })();
5226     }));
5227     return l242;
5228 })();
5229 var l243 = {name: "TRANSLATE-FUNCTION"};
5230 (function(){
5231     (l243).fvalue = (function(v580){
5232         ((v580)["fname"] = "TRANSLATE-FUNCTION");
5233         return v580;
5234     })((function (values,v578){
5235         checkArgs(arguments, 2);
5236         var i;
5237         return (function(){
5238             return (function(v579){
5239                 return l176.fvalue(values, v579);
5240             })(l187.fvalue(pv, v578, (function(){
5241                 var symbol = l188;
5242                 var value = symbol.value;
5243                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5244                 return value;
5245             })(), l104));
5246         })();
5247     }));
5248     return l243;
5249 })();
5250 var l244 = {name: "FLET"};
5251 ((l206).value = ({car: l44.fvalue(pv, l244, (function (values,v582){
5252     checkArgsAtLeast(arguments, 2);
5253     var v581= l3.value;
5254     for (var i = arguments.length-1; i>=2; i--)
5255         v581 = {car: arguments[i], cdr:
5256     v581};
5257     var i;
5258     return (function(){
5259         return (function(){
5260             try {
5261                 var v587 = l188.value;
5262                 var v583 = l73.fvalue(pv, (function(){
5263                     var symbol = l30;
5264                     var func = symbol.fvalue;
5265                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5266                     return func;
5267                 })(), v582);
5268                 var v584 = l73.fvalue(pv, (function(){
5269                     var symbol = l31;
5270                     var func = symbol.fvalue;
5271                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5272                     return func;
5273                 })(), v582);
5274                 var v585 = l73.fvalue(pv, (function(){
5275                     var symbol = l242;
5276                     var func = symbol.fvalue;
5277                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5278                     return func;
5279                 })(), v584);
5280                 ((l188).value = l186.fvalue(pv, l73.fvalue(pv, (function(){
5281                     var symbol = l241;
5282                     var func = symbol.fvalue;
5283                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5284                     return func;
5285                 })(), v583), (function(){
5286                     var symbol = l188;
5287                     var value = symbol.value;
5288                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5289                     return value;
5290                 })(), l104));
5291                 return l134.fvalue(values, "(function(", l136.fvalue(pv, l73.fvalue(pv, (function(){
5292                     var symbol = l243;
5293                     var func = symbol.fvalue;
5294                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5295                     return func;
5296                 })(), v583), ","), "){", (function(){
5297                     var symbol = l133;
5298                     var value = symbol.value;
5299                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5300                     return value;
5301                 })(), (function(v586){
5302                     return l143.fvalue(pv, v586);
5303                 })(l229.fvalue(pv, v581, l4.value)), "})(", l136.fvalue(pv, v585, ","), ")");
5304             }
5305             finally {
5306                 l188.value = v587;
5307             }
5308         })();
5309     })();
5310 })), cdr: (function(){
5311     var symbol = l206;
5312     var value = symbol.value;
5313     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5314     return value;
5315 })()}));
5316 var l245 = {name: "LABELS"};
5317 ((l206).value = ({car: l44.fvalue(pv, l245, (function (values,v589){
5318     checkArgsAtLeast(arguments, 2);
5319     var v588= l3.value;
5320     for (var i = arguments.length-1; i>=2; i--)
5321         v588 = {car: arguments[i], cdr:
5322     v588};
5323     var i;
5324     return (function(){
5325         return (function(){
5326             try {
5327                 var v592 = l188.value;
5328                 var v590 = l73.fvalue(pv, (function(){
5329                     var symbol = l30;
5330                     var func = symbol.fvalue;
5331                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5332                     return func;
5333                 })(), v589);
5334                 ((l188).value = l186.fvalue(pv, l73.fvalue(pv, (function(){
5335                     var symbol = l241;
5336                     var func = symbol.fvalue;
5337                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5338                     return func;
5339                 })(), v590), (function(){
5340                     var symbol = l188;
5341                     var value = symbol.value;
5342                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5343                     return value;
5344                 })(), l104));
5345                 return l134.fvalue(values, "(function(){", (function(){
5346                     var symbol = l133;
5347                     var value = symbol.value;
5348                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5349                     return value;
5350                 })(), l143.fvalue(pv, l138.fvalue(pv, (function (values,v591){
5351                     checkArgs(arguments, 2);
5352                     var i;
5353                     return l134.fvalue(values, "var ", l243.fvalue(pv, (function(){
5354                         var tmp = v591;
5355                         return tmp === l3.value? l3.value: tmp.car;
5356                     })()), " = ", l228.fvalue(pv, l33.fvalue(pv, v591), l35.fvalue(pv, v591)), ";", (function(){
5357                         var symbol = l133;
5358                         var value = symbol.value;
5359                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5360                         return value;
5361                     })());
5362                 }), v589), l229.fvalue(pv, v588, l4.value)), "})()");
5363             }
5364             finally {
5365                 l188.value = v592;
5366             }
5367         })();
5368     })();
5369 })), cdr: (function(){
5370     var symbol = l206;
5371     var value = symbol.value;
5372     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5373     return value;
5374 })()}));
5375 var l246 = {name: "*COMPILING-FILE*"};
5376 (function(){
5377     (((l246.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l246).value = l3.value));
5378     return l246;
5379 })();
5380 var l247 = {name: "EVAL-WHEN-COMPILE"};
5381 var l248 = {name: "PROGN"};
5382 var l249 = {name: "EVAL"};
5383 ((l206).value = ({car: l44.fvalue(pv, l247, (function (values){
5384     var v593= l3.value;
5385     for (var i = arguments.length-1; i>=1; i--)
5386         v593 = {car: arguments[i], cdr:
5387     v593};
5388     var i;
5389     return (function(){
5390         return ((function(){
5391             var symbol = l246;
5392             var value = symbol.value;
5393             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5394             return value;
5395         })() !== l3.value ? (function(){
5396             l249.fvalue(pv, ({car: l248, cdr: v593}));
5397             return l3.value;
5398         })() : l145.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l248), v593)));
5399     })();
5400 })), cdr: (function(){
5401     var symbol = l206;
5402     var value = symbol.value;
5403     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5404     return value;
5405 })()}));
5406 var l250 = {name: "DEFINE-TRANSFORMATION"};
5407 l250;
5408 ((l206).value = ({car: l44.fvalue(pv, l248, (function (values){
5409     var v594= l3.value;
5410     for (var i = arguments.length-1; i>=1; i--)
5411         v594 = {car: arguments[i], cdr:
5412     v594};
5413     var i;
5414     return (function(){
5415         return (l12.fvalue(pv, (function(){
5416             var tmp = v594;
5417             return tmp === l3.value? l3.value: tmp.cdr;
5418         })()) !== l3.value ? l145.fvalue(values, (function(){
5419             var tmp = v594;
5420             return tmp === l3.value? l3.value: tmp.car;
5421         })(), (function(){
5422             var symbol = l172;
5423             var value = symbol.value;
5424             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5425             return value;
5426         })()) : l134.fvalue(values, "(function(){", (function(){
5427             var symbol = l133;
5428             var value = symbol.value;
5429             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5430             return value;
5431         })(), l143.fvalue(pv, l229.fvalue(pv, v594, l4.value)), "})()"));
5432     })();
5433 })), cdr: (function(){
5434     var symbol = l206;
5435     var value = symbol.value;
5436     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5437     return value;
5438 })()}));
5439 var l251 = {name: "SPECIAL-VARIABLE-P"};
5440 (function(){
5441     (l251).fvalue = (function(v596){
5442         ((v596)["fname"] = "SPECIAL-VARIABLE-P");
5443         return v596;
5444     })((function (values,v595){
5445         checkArgs(arguments, 2);
5446         var i;
5447         return (function(){
5448             return (l200.fvalue(pv, v595, l105, l202) !== l3.value ? l4.value : l3.value);
5449         })();
5450     }));
5451     return l251;
5452 })();
5453 var l252 = {name: "LET-BINDING-WRAPPER"};
5454 (function(){
5455     (l252).fvalue = (function(v603){
5456         ((v603)["fname"] = "LET-BINDING-WRAPPER");
5457         return v603;
5458     })((function (values,v597,v598){
5459         checkArgs(arguments, 3);
5460         var i;
5461         return (function(){
5462             try {
5463                 (l12.fvalue(pv, v597) !== l3.value ? (function(){
5464                     var values = mv;
5465                     throw ({type: 'block', id: 211, values: v598, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
5466                 })() : l3.value);
5467                 return l134.fvalue(values, "try {", (function(){
5468                     var symbol = l133;
5469                     var value = symbol.value;
5470                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5471                     return value;
5472                 })(), l143.fvalue(pv, "var tmp;", (function(){
5473                     var symbol = l133;
5474                     var value = symbol.value;
5475                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5476                     return value;
5477                 })(), l138.fvalue(pv, (function (values,v599){
5478                     checkArgs(arguments, 2);
5479                     var i;
5480                     return (function(v600){
5481                         return l134.fvalue(values, "tmp = ", v600, ".value;", (function(){
5482                             var symbol = l133;
5483                             var value = symbol.value;
5484                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5485                             return value;
5486                         })(), v600, ".value = ", (function(){
5487                             var tmp = v599;
5488                             return tmp === l3.value? l3.value: tmp.cdr;
5489                         })(), ";", (function(){
5490                             var symbol = l133;
5491                             var value = symbol.value;
5492                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5493                             return value;
5494                         })(), (function(){
5495                             var tmp = v599;
5496                             return tmp === l3.value? l3.value: tmp.cdr;
5497                         })(), " = tmp;", (function(){
5498                             var symbol = l133;
5499                             var value = symbol.value;
5500                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5501                             return value;
5502                         })());
5503                     })(l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, (function(){
5504                         var tmp = v599;
5505                         return tmp === l3.value? l3.value: tmp.car;
5506                     })()))));
5507                 }), v597), v598, (function(){
5508                     var symbol = l133;
5509                     var value = symbol.value;
5510                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5511                     return value;
5512                 })()), "}", (function(){
5513                     var symbol = l133;
5514                     var value = symbol.value;
5515                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5516                     return value;
5517                 })(), "finally {", (function(){
5518                     var symbol = l133;
5519                     var value = symbol.value;
5520                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5521                     return value;
5522                 })(), l143.fvalue(pv, l138.fvalue(pv, (function (values,v601){
5523                     checkArgs(arguments, 2);
5524                     var i;
5525                     return (function(v602){
5526                         return l134.fvalue(values, v602, ".value", " = ", (function(){
5527                             var tmp = v601;
5528                             return tmp === l3.value? l3.value: tmp.cdr;
5529                         })(), ";", (function(){
5530                             var symbol = l133;
5531                             var value = symbol.value;
5532                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5533                             return value;
5534                         })());
5535                     })(l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, (function(){
5536                         var tmp = v601;
5537                         return tmp === l3.value? l3.value: tmp.car;
5538                     })()))));
5539                 }), v597)), "}", (function(){
5540                     var symbol = l133;
5541                     var value = symbol.value;
5542                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5543                     return value;
5544                 })());
5545             }
5546             catch (cf){
5547                 if (cf.type == 'block' && cf.id == 211)
5548                     return values.apply(this, forcemv(cf.values));
5549                 else
5550                     throw cf;
5551             }
5552         })();
5553     }));
5554     return l252;
5555 })();
5556 var l253 = {name: "LET"};
5557 ((l206).value = ({car: l44.fvalue(pv, l253, (function (values,v605){
5558     checkArgsAtLeast(arguments, 2);
5559     var v604= l3.value;
5560     for (var i = arguments.length-1; i>=2; i--)
5561         v604 = {car: arguments[i], cdr:
5562     v604};
5563     var i;
5564     return (function(){
5565         return (function(){
5566             try {
5567                 var v613 = l188.value;
5568                 var v606 = l73.fvalue(pv, (function(){
5569                     var symbol = l58;
5570                     var func = symbol.fvalue;
5571                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5572                     return func;
5573                 })(), v605);
5574                 var v607 = l73.fvalue(pv, (function(){
5575                     var symbol = l39;
5576                     var func = symbol.fvalue;
5577                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5578                     return func;
5579                 })(), v606);
5580                 var v608 = l73.fvalue(pv, (function(){
5581                     var symbol = l145;
5582                     var func = symbol.fvalue;
5583                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5584                     return func;
5585                 })(), l73.fvalue(pv, (function(){
5586                     var symbol = l40;
5587                     var func = symbol.fvalue;
5588                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5589                     return func;
5590                 })(), v606));
5591                 ((l188).value = l192.fvalue(pv, l90.fvalue(pv, (function(){
5592                     var symbol = l251;
5593                     var func = symbol.fvalue;
5594                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5595                     return func;
5596                 })(), v607)));
5597                 var v609 = l3.value;
5598                 return l134.fvalue(values, "(function(", l136.fvalue(pv, l73.fvalue(pv, (function (values,v610){
5599                     checkArgs(arguments, 2);
5600                     var i;
5601                     return (l251.fvalue(pv, v610) !== l3.value ? (function(v611){
5602                         (v609 = ({car: ({car: v610, cdr: v611}), cdr: v609}));
5603                         return v611;
5604                     })(l190.fvalue(pv, v610)) : l191.fvalue(values, v610));
5605                 }), v607), ","), "){", (function(){
5606                     var symbol = l133;
5607                     var value = symbol.value;
5608                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5609                     return value;
5610                 })(), (function(v612){
5611                     return l143.fvalue(pv, l252.fvalue(pv, v609, v612));
5612                 })(l229.fvalue(pv, v604, l4.value)), "})(", l136.fvalue(pv, v608, ","), ")");
5613             }
5614             finally {
5615                 l188.value = v613;
5616             }
5617         })();
5618     })();
5619 })), cdr: (function(){
5620     var symbol = l206;
5621     var value = symbol.value;
5622     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5623     return value;
5624 })()}));
5625 var l254 = {name: "LET*-INITIALIZE-VALUE"};
5626 (function(){
5627     (l254).fvalue = (function(v620){
5628         ((v620)["fname"] = "LET*-INITIALIZE-VALUE");
5629         return v620;
5630     })((function (values,v614){
5631         checkArgs(arguments, 2);
5632         var i;
5633         return (function(){
5634             return (function(v615,v616){
5635                 return (l251.fvalue(pv, v615) !== l3.value ? l134.fvalue(values, l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l232), l44.fvalue(pv, v615), l44.fvalue(pv, v616))), ";", (function(){
5636                     var symbol = l133;
5637                     var value = symbol.value;
5638                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5639                     return value;
5640                 })()) : (function(){
5641                     var v617 = l190.fvalue(pv, v615);
5642                     var v618 = l173.fvalue(pv, v615, l105, v617);
5643                     return (function(v619){
5644                         l183.fvalue(pv, v618, (function(){
5645                             var symbol = l188;
5646                             var value = symbol.value;
5647                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5648                             return value;
5649                         })(), l105);
5650                         return v619;
5651                     })(l134.fvalue(pv, "var ", v617, " = ", l145.fvalue(pv, v616), ";", (function(){
5652                         var symbol = l133;
5653                         var value = symbol.value;
5654                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5655                         return value;
5656                     })()));
5657                 })());
5658             })(l39.fvalue(pv, v614),l40.fvalue(pv, v614));
5659         })();
5660     }));
5661     return l254;
5662 })();
5663 var l255 = {name: "LET*-BINDING-WRAPPER"};
5664 (function(){
5665     (l255).fvalue = (function(v629){
5666         ((v629)["fname"] = "LET*-BINDING-WRAPPER");
5667         return v629;
5668     })((function (values,v621,v622){
5669         checkArgs(arguments, 3);
5670         var i;
5671         return (function(){
5672             try {
5673                 (l12.fvalue(pv, v621) !== l3.value ? (function(){
5674                     var values = mv;
5675                     throw ({type: 'block', id: 214, values: v622, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
5676                 })() : l3.value);
5677                 return (function(v624){
5678                     return l134.fvalue(values, "try {", (function(){
5679                         var symbol = l133;
5680                         var value = symbol.value;
5681                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5682                         return value;
5683                     })(), l143.fvalue(pv, l138.fvalue(pv, (function (values,v625){
5684                         checkArgs(arguments, 2);
5685                         var i;
5686                         return (function(v626){
5687                             return l134.fvalue(values, "var ", (function(){
5688                                 var tmp = v625;
5689                                 return tmp === l3.value? l3.value: tmp.cdr;
5690                             })(), " = ", v626, ".value;", (function(){
5691                                 var symbol = l133;
5692                                 var value = symbol.value;
5693                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5694                                 return value;
5695                             })());
5696                         })(l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, (function(){
5697                             var tmp = v625;
5698                             return tmp === l3.value? l3.value: tmp.car;
5699                         })()))));
5700                     }), v624), v622), "}", (function(){
5701                         var symbol = l133;
5702                         var value = symbol.value;
5703                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5704                         return value;
5705                     })(), "finally {", (function(){
5706                         var symbol = l133;
5707                         var value = symbol.value;
5708                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5709                         return value;
5710                     })(), l143.fvalue(pv, l138.fvalue(pv, (function (values,v627){
5711                         checkArgs(arguments, 2);
5712                         var i;
5713                         return (function(v628){
5714                             return l134.fvalue(values, v628, ".value", " = ", (function(){
5715                                 var tmp = v627;
5716                                 return tmp === l3.value? l3.value: tmp.cdr;
5717                             })(), ";", (function(){
5718                                 var symbol = l133;
5719                                 var value = symbol.value;
5720                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5721                                 return value;
5722                             })());
5723                         })(l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, (function(){
5724                             var tmp = v627;
5725                             return tmp === l3.value? l3.value: tmp.car;
5726                         })()))));
5727                     }), v624)), "}", (function(){
5728                         var symbol = l133;
5729                         var value = symbol.value;
5730                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5731                         return value;
5732                     })());
5733                 })(l73.fvalue(pv, (function (values,v623){
5734                     checkArgs(arguments, 2);
5735                     var i;
5736                     return ({car: v623, cdr: l190.fvalue(pv, v623)});
5737                 }), l91.fvalue(pv, (function(){
5738                     var symbol = l251;
5739                     var func = symbol.fvalue;
5740                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5741                     return func;
5742                 })(), v621)));
5743             }
5744             catch (cf){
5745                 if (cf.type == 'block' && cf.id == 214)
5746                     return values.apply(this, forcemv(cf.values));
5747                 else
5748                     throw cf;
5749             }
5750         })();
5751     }));
5752     return l255;
5753 })();
5754 var l256 = {name: "LET*"};
5755 ((l206).value = ({car: l44.fvalue(pv, l256, (function (values,v631){
5756     checkArgsAtLeast(arguments, 2);
5757     var v630= l3.value;
5758     for (var i = arguments.length-1; i>=2; i--)
5759         v630 = {car: arguments[i], cdr:
5760     v630};
5761     var i;
5762     return (function(){
5763         return (function(v632,v633){
5764             try {
5765                 var tmp;
5766                 tmp = l188.value;
5767                 l188.value = v633;
5768                 v633 = tmp;
5769                 return l134.fvalue(values, "(function(){", (function(){
5770                     var symbol = l133;
5771                     var value = symbol.value;
5772                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5773                     return value;
5774                 })(), l143.fvalue(pv, (function(v634,v635){
5775                     return l255.fvalue(pv, v634, v635);
5776                 })(l91.fvalue(pv, (function(){
5777                     var symbol = l251;
5778                     var func = symbol.fvalue;
5779                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5780                     return func;
5781                 })(), l73.fvalue(pv, (function(){
5782                     var symbol = l39;
5783                     var func = symbol.fvalue;
5784                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5785                     return func;
5786                 })(), v632)),l134.fvalue(pv, l138.fvalue(pv, (function(){
5787                     var symbol = l254;
5788                     var func = symbol.fvalue;
5789                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5790                     return func;
5791                 })(), v632), l229.fvalue(pv, v630, l4.value)))), "})()");
5792             }
5793             finally {
5794                 l188.value = v633;
5795             }
5796         })(l73.fvalue(pv, (function(){
5797             var symbol = l58;
5798             var func = symbol.fvalue;
5799             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5800             return func;
5801         })(), v631),l182.fvalue(pv, (function(){
5802             var symbol = l188;
5803             var value = symbol.value;
5804             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5805             return value;
5806         })()));
5807     })();
5808 })), cdr: (function(){
5809     var symbol = l206;
5810     var value = symbol.value;
5811     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5812     return value;
5813 })()}));
5814 var l257 = {name: "*BLOCK-COUNTER*"};
5815 (function(){
5816     (((l257.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l257).value = 0));
5817     return l257;
5818 })();
5819 var l258 = {name: "MULTIPLE-VALUE"};
5820 var l259 = {name: "USED"};
5821 ((l206).value = ({car: l44.fvalue(pv, l184, (function (values,v637){
5822     checkArgsAtLeast(arguments, 2);
5823     var v636= l3.value;
5824     for (var i = arguments.length-1; i>=2; i--)
5825         v636 = {car: arguments[i], cdr:
5826     v636};
5827     var i;
5828     return (function(){
5829         return (function(){
5830             var v638 = l17.fvalue(pv, ((l257).value = (function(){
5831                 var x1 = (function(){
5832                     var symbol = l257;
5833                     var value = symbol.value;
5834                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5835                     return value;
5836                 })();
5837                 if (typeof x1 !== 'number') throw 'Not a number!';
5838                 var x2 = 1;
5839                 if (typeof x2 !== 'number') throw 'Not a number!';
5840                 return x1+x2;
5841             })()));
5842             var v639 = l173.fvalue(pv, v637, l184, v638);
5843             ((function(){
5844                 var symbol = l172;
5845                 var value = symbol.value;
5846                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5847                 return value;
5848             })() !== l3.value ? l180.fvalue(pv, l258, v639) : l3.value);
5849             return (function(){
5850                 try {
5851                     var v641 = l188.value;
5852                     ((l188).value = l186.fvalue(pv, l44.fvalue(pv, v639), (function(){
5853                         var symbol = l188;
5854                         var value = symbol.value;
5855                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5856                         return value;
5857                     })(), l184));
5858                     var v640 = l229.fvalue(pv, v636, l4.value);
5859                     return (l88.fvalue(pv, l259, l177.fvalue(pv, v639)) !== l3.value ? l134.fvalue(values, "(function(){", (function(){
5860                         var symbol = l133;
5861                         var value = symbol.value;
5862                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5863                         return value;
5864                     })(), l143.fvalue(pv, "try {", (function(){
5865                         var symbol = l133;
5866                         var value = symbol.value;
5867                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5868                         return value;
5869                     })(), l143.fvalue(pv, v640), "}", (function(){
5870                         var symbol = l133;
5871                         var value = symbol.value;
5872                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5873                         return value;
5874                     })(), "catch (cf){", (function(){
5875                         var symbol = l133;
5876                         var value = symbol.value;
5877                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5878                         return value;
5879                     })(), "    if (cf.type == 'block' && cf.id == ", v638, ")", (function(){
5880                         var symbol = l133;
5881                         var value = symbol.value;
5882                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5883                         return value;
5884                     })(), ((function(){
5885                         var symbol = l172;
5886                         var value = symbol.value;
5887                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5888                         return value;
5889                     })() !== l3.value ? "        return values.apply(this, forcemv(cf.values));" : "        return cf.values;"), (function(){
5890                         var symbol = l133;
5891                         var value = symbol.value;
5892                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5893                         return value;
5894                     })(), "    else", (function(){
5895                         var symbol = l133;
5896                         var value = symbol.value;
5897                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5898                         return value;
5899                     })(), "        throw cf;", (function(){
5900                         var symbol = l133;
5901                         var value = symbol.value;
5902                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5903                         return value;
5904                     })(), "}", (function(){
5905                         var symbol = l133;
5906                         var value = symbol.value;
5907                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5908                         return value;
5909                     })()), "})()") : l134.fvalue(values, "(function(){", (function(){
5910                         var symbol = l133;
5911                         var value = symbol.value;
5912                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5913                         return value;
5914                     })(), l143.fvalue(pv, v640), "})()"));
5915                 }
5916                 finally {
5917                     l188.value = v641;
5918                 }
5919             })();
5920         })();
5921     })();
5922 })), cdr: (function(){
5923     var symbol = l206;
5924     var value = symbol.value;
5925     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5926     return value;
5927 })()}));
5928 var l260 = {name: "RETURN-FROM"};
5929 ((l206).value = ({car: l44.fvalue(pv, l260, (function (values,v642,v643){
5930     checkArgsAtLeast(arguments, 2);
5931     checkArgsAtMost(arguments, 3);
5932     switch(arguments.length-1){
5933     case 1:
5934     v643=l3.value;
5935     default: break;
5936     }
5937     var i;
5938     return (function(){
5939         return (function(){
5940             var v644 = l187.fvalue(pv, v642, (function(){
5941                 var symbol = l188;
5942                 var value = symbol.value;
5943                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5944                 return value;
5945             })(), l184);
5946             var v645 = l88.fvalue(pv, l258, l177.fvalue(pv, v644));
5947             (l12.fvalue(pv, v644) !== l3.value ? (function(){
5948                 throw l134.fvalue(pv, "Unknown block `", (v642).name, "'.");
5949             })() : l3.value);
5950             l180.fvalue(pv, l259, v644);
5951             return l134.fvalue(values, "(function(){", (function(){
5952                 var symbol = l133;
5953                 var value = symbol.value;
5954                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5955                 return value;
5956             })(), l143.fvalue(pv, (v645 !== l3.value ? l134.fvalue(pv, "var values = mv;", (function(){
5957                 var symbol = l133;
5958                 var value = symbol.value;
5959                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5960                 return value;
5961             })()) : ""), "throw ({", "type: 'block', ", "id: ", l176.fvalue(pv, v644), ", ", "values: ", l145.fvalue(pv, v643, v645), ", ", "message: 'Return from unknown block ", (v642).name, ".'", "})"), "})()");
5962         })();
5963     })();
5964 })), cdr: (function(){
5965     var symbol = l206;
5966     var value = symbol.value;
5967     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5968     return value;
5969 })()}));
5970 var l261 = {name: "CATCH"};
5971 ((l206).value = ({car: l44.fvalue(pv, l261, (function (values,v647){
5972     checkArgsAtLeast(arguments, 2);
5973     var v646= l3.value;
5974     for (var i = arguments.length-1; i>=2; i--)
5975         v646 = {car: arguments[i], cdr:
5976     v646};
5977     var i;
5978     return (function(){
5979         return l134.fvalue(values, "(function(){", (function(){
5980             var symbol = l133;
5981             var value = symbol.value;
5982             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5983             return value;
5984         })(), l143.fvalue(pv, "var id = ", l145.fvalue(pv, v647), ";", (function(){
5985             var symbol = l133;
5986             var value = symbol.value;
5987             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5988             return value;
5989         })(), "try {", (function(){
5990             var symbol = l133;
5991             var value = symbol.value;
5992             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5993             return value;
5994         })(), l143.fvalue(pv, l229.fvalue(pv, v646, l4.value)), (function(){
5995             var symbol = l133;
5996             var value = symbol.value;
5997             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5998             return value;
5999         })(), "}", (function(){
6000             var symbol = l133;
6001             var value = symbol.value;
6002             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6003             return value;
6004         })(), "catch (cf){", (function(){
6005             var symbol = l133;
6006             var value = symbol.value;
6007             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6008             return value;
6009         })(), "    if (cf.type == 'catch' && cf.id == id)", (function(){
6010             var symbol = l133;
6011             var value = symbol.value;
6012             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6013             return value;
6014         })(), ((function(){
6015             var symbol = l172;
6016             var value = symbol.value;
6017             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6018             return value;
6019         })() !== l3.value ? "        return values.apply(this, forcemv(cf.values));" : "        return pv.apply(this, forcemv(cf.values));"), (function(){
6020             var symbol = l133;
6021             var value = symbol.value;
6022             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6023             return value;
6024         })(), "    else", (function(){
6025             var symbol = l133;
6026             var value = symbol.value;
6027             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6028             return value;
6029         })(), "        throw cf;", (function(){
6030             var symbol = l133;
6031             var value = symbol.value;
6032             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6033             return value;
6034         })(), "}", (function(){
6035             var symbol = l133;
6036             var value = symbol.value;
6037             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6038             return value;
6039         })()), "})()");
6040     })();
6041 })), cdr: (function(){
6042     var symbol = l206;
6043     var value = symbol.value;
6044     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6045     return value;
6046 })()}));
6047 var l262 = {name: "THROW"};
6048 ((l206).value = ({car: l44.fvalue(pv, l262, (function (values,v648,v649){
6049     checkArgs(arguments, 3);
6050     var i;
6051     return (function(){
6052         return l134.fvalue(values, "(function(){", (function(){
6053             var symbol = l133;
6054             var value = symbol.value;
6055             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6056             return value;
6057         })(), l143.fvalue(pv, "var values = mv;", (function(){
6058             var symbol = l133;
6059             var value = symbol.value;
6060             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6061             return value;
6062         })(), "throw ({", "type: 'catch', ", "id: ", l145.fvalue(pv, v648), ", ", "values: ", l145.fvalue(pv, v649, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
6063     })();
6064 })), cdr: (function(){
6065     var symbol = l206;
6066     var value = symbol.value;
6067     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6068     return value;
6069 })()}));
6070 var l263 = {name: "*TAGBODY-COUNTER*"};
6071 (function(){
6072     (((l263.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l263).value = 0));
6073     return l263;
6074 })();
6075 var l264 = {name: "*GO-TAG-COUNTER*"};
6076 (function(){
6077     (((l264.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l264).value = 0));
6078     return l264;
6079 })();
6080 var l265 = {name: "GO-TAG-P"};
6081 (function(){
6082     (l265).fvalue = (function(v652){
6083         ((v652)["fname"] = "GO-TAG-P");
6084         return v652;
6085     })((function (values,v650){
6086         checkArgs(arguments, 2);
6087         var i;
6088         return (function(){
6089             return (function(v651){
6090                 return (v651 !== l3.value ? v651 : ((function(){
6091                     var tmp = v650;
6092                     return (typeof tmp == 'object' && 'name' in tmp);
6093                 })()?l4.value: l3.value));
6094             })(l81.fvalue(pv, v650));
6095         })();
6096     }));
6097     return l265;
6098 })();
6099 var l266 = {name: "DECLARE-TAGBODY-TAGS"};
6100 (function(){
6101     (l266).fvalue = (function(v658){
6102         ((v658)["fname"] = "DECLARE-TAGBODY-TAGS");
6103         return v658;
6104     })((function (values,v653,v654){
6105         checkArgs(arguments, 3);
6106         var i;
6107         return (function(){
6108             return (function(v657){
6109                 return l186.fvalue(values, v657, (function(){
6110                     var symbol = l188;
6111                     var value = symbol.value;
6112                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6113                     return value;
6114                 })(), l185);
6115             })(l73.fvalue(pv, (function (values,v655){
6116                 checkArgs(arguments, 2);
6117                 var i;
6118                 return (function(v656){
6119                     return l173.fvalue(values, v655, l185, l44.fvalue(pv, v653, v656));
6120                 })(l17.fvalue(pv, ((l264).value = (function(){
6121                     var x1 = (function(){
6122                         var symbol = l264;
6123                         var value = symbol.value;
6124                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6125                         return value;
6126                     })();
6127                     if (typeof x1 !== 'number') throw 'Not a number!';
6128                     var x2 = 1;
6129                     if (typeof x2 !== 'number') throw 'Not a number!';
6130                     return x1+x2;
6131                 })())));
6132             }), l91.fvalue(pv, (function(){
6133                 var symbol = l265;
6134                 var func = symbol.fvalue;
6135                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6136                 return func;
6137             })(), v654)));
6138         })();
6139     }));
6140     return l266;
6141 })();
6142 var l267 = {name: "TAGBODY"};
6143 ((l206).value = ({car: l44.fvalue(pv, l267, (function (values){
6144     var v659= l3.value;
6145     for (var i = arguments.length-1; i>=1; i--)
6146         v659 = {car: arguments[i], cdr:
6147     v659};
6148     var i;
6149     return (function(){
6150         try {
6151             (l95.fvalue(pv, (function(){
6152                 var symbol = l265;
6153                 var func = symbol.fvalue;
6154                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6155                 return func;
6156             })(), v659) !== l3.value ? l3.value : (function(){
6157                 var values = mv;
6158                 throw ({type: 'block', id: 222, values: l145.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l248), v659, l44.fvalue(pv, l3))), message: 'Return from unknown block TAGBODY.'})
6159             })());
6160             (l265.fvalue(pv, (function(){
6161                 var tmp = v659;
6162                 return tmp === l3.value? l3.value: tmp.car;
6163             })()) !== l3.value ? l3.value : (v659 = ({car: l16.fvalue(pv, "START"), cdr: v659})));
6164             return (function(v660){
6165                 return (function(v662,v661){
6166                     try {
6167                         var tmp;
6168                         tmp = l188.value;
6169                         l188.value = v662;
6170                         v662 = tmp;
6171                         (function(v663){
6172                             return (v661 = l40.fvalue(pv, l176.fvalue(pv, v663)));
6173                         })(l187.fvalue(pv, l39.fvalue(pv, v659), (function(){
6174                             var symbol = l188;
6175                             var value = symbol.value;
6176                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6177                             return value;
6178                         })(), l185));
6179                         return l134.fvalue(values, "(function(){", (function(){
6180                             var symbol = l133;
6181                             var value = symbol.value;
6182                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6183                             return value;
6184                         })(), l143.fvalue(pv, "var tagbody_", v660, " = ", v661, ";", (function(){
6185                             var symbol = l133;
6186                             var value = symbol.value;
6187                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6188                             return value;
6189                         })(), "tbloop:", (function(){
6190                             var symbol = l133;
6191                             var value = symbol.value;
6192                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6193                             return value;
6194                         })(), "while (true) {", (function(){
6195                             var symbol = l133;
6196                             var value = symbol.value;
6197                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6198                             return value;
6199                         })(), l143.fvalue(pv, "try {", (function(){
6200                             var symbol = l133;
6201                             var value = symbol.value;
6202                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6203                             return value;
6204                         })(), l143.fvalue(pv, (function(v664){
6205                             return l134.fvalue(pv, "switch(tagbody_", v660, "){", (function(){
6206                                 var symbol = l133;
6207                                 var value = symbol.value;
6208                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6209                                 return value;
6210                             })(), "case ", v661, ":", (function(){
6211                                 var symbol = l133;
6212                                 var value = symbol.value;
6213                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6214                                 return value;
6215                             })(), (function(){
6216                                 return (function(v665,v666){
6217                                     (function(){
6218                                         while(v665 !== l3.value){
6219                                             (v666 = (function(){
6220                                                 var tmp = v665;
6221                                                 return tmp === l3.value? l3.value: tmp.car;
6222                                             })());
6223                                             (function(){
6224                                                 (v664 = l134.fvalue(pv, v664, (l27.fvalue(pv, l265.fvalue(pv, v666)) !== l3.value ? l143.fvalue(pv, l145.fvalue(pv, v666), ";", (function(){
6225                                                     var symbol = l133;
6226                                                     var value = symbol.value;
6227                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6228                                                     return value;
6229                                                 })()) : (function(v667){
6230                                                     return l134.fvalue(pv, "case ", l40.fvalue(pv, l176.fvalue(pv, v667)), ":", (function(){
6231                                                         var symbol = l133;
6232                                                         var value = symbol.value;
6233                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6234                                                         return value;
6235                                                     })());
6236                                                 })(l187.fvalue(pv, v666, (function(){
6237                                                     var symbol = l188;
6238                                                     var value = symbol.value;
6239                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6240                                                     return value;
6241                                                 })(), l185)))));
6242                                                 return l3.value;
6243                                             })();
6244                                             (v665 = (function(){
6245                                                 var tmp = v665;
6246                                                 return tmp === l3.value? l3.value: tmp.cdr;
6247                                             })());
6248                                         }return l3.value;
6249                                     })();
6250                                     return v664;
6251                                 })((function(){
6252                                     var tmp = v659;
6253                                     return tmp === l3.value? l3.value: tmp.cdr;
6254                                 })(),l3.value);
6255                             })(), "default:", (function(){
6256                                 var symbol = l133;
6257                                 var value = symbol.value;
6258                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6259                                 return value;
6260                             })(), "    break tbloop;", (function(){
6261                                 var symbol = l133;
6262                                 var value = symbol.value;
6263                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6264                                 return value;
6265                             })(), "}", (function(){
6266                                 var symbol = l133;
6267                                 var value = symbol.value;
6268                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6269                                 return value;
6270                             })());
6271                         })("")), "}", (function(){
6272                             var symbol = l133;
6273                             var value = symbol.value;
6274                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6275                             return value;
6276                         })(), "catch (jump) {", (function(){
6277                             var symbol = l133;
6278                             var value = symbol.value;
6279                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6280                             return value;
6281                         })(), "    if (jump.type == 'tagbody' && jump.id == ", v660, ")", (function(){
6282                             var symbol = l133;
6283                             var value = symbol.value;
6284                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6285                             return value;
6286                         })(), "        tagbody_", v660, " = jump.label;", (function(){
6287                             var symbol = l133;
6288                             var value = symbol.value;
6289                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6290                             return value;
6291                         })(), "    else", (function(){
6292                             var symbol = l133;
6293                             var value = symbol.value;
6294                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6295                             return value;
6296                         })(), "        throw(jump);", (function(){
6297                             var symbol = l133;
6298                             var value = symbol.value;
6299                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6300                             return value;
6301                         })(), "}", (function(){
6302                             var symbol = l133;
6303                             var value = symbol.value;
6304                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6305                             return value;
6306                         })()), "}", (function(){
6307                             var symbol = l133;
6308                             var value = symbol.value;
6309                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6310                             return value;
6311                         })(), "return ", l145.fvalue(pv, l3.value), ";", (function(){
6312                             var symbol = l133;
6313                             var value = symbol.value;
6314                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6315                             return value;
6316                         })()), "})()");
6317                     }
6318                     finally {
6319                         l188.value = v662;
6320                     }
6321                 })(l266.fvalue(pv, v660, v659),l3.value);
6322             })(l17.fvalue(pv, (function(){
6323                 var symbol = l263;
6324                 var value = symbol.value;
6325                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6326                 return value;
6327             })()));
6328         }
6329         catch (cf){
6330             if (cf.type == 'block' && cf.id == 222)
6331                 return values.apply(this, forcemv(cf.values));
6332             else
6333                 throw cf;
6334         }
6335     })();
6336 })), cdr: (function(){
6337     var symbol = l206;
6338     var value = symbol.value;
6339     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6340     return value;
6341 })()}));
6342 var l268 = {name: "GO"};
6343 ((l206).value = ({car: l44.fvalue(pv, l268, (function (values,v668){
6344     checkArgs(arguments, 2);
6345     var i;
6346     return (function(){
6347         return (function(v669,v670){
6348             return (v669 !== l3.value ? l134.fvalue(values, "(function(){", (function(){
6349                 var symbol = l133;
6350                 var value = symbol.value;
6351                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6352                 return value;
6353             })(), l143.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l39.fvalue(pv, l176.fvalue(pv, v669)), ", ", "label: ", l40.fvalue(pv, l176.fvalue(pv, v669)), ", ", "message: 'Attempt to GO to non-existing tag ", v670, "'", "})", (function(){
6354                 var symbol = l133;
6355                 var value = symbol.value;
6356                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6357                 return value;
6358             })()), "})()") : (function(){
6359                 throw l134.fvalue(pv, "Unknown tag `", v670, "'.");
6360             })());
6361         })(l187.fvalue(pv, v668, (function(){
6362             var symbol = l188;
6363             var value = symbol.value;
6364             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6365             return value;
6366         })(), l185),(((function(){
6367             var tmp = v668;
6368             return (typeof tmp == 'object' && 'name' in tmp);
6369         })()?l4.value: l3.value) !== l3.value ? (v668).name : (l81.fvalue(pv, v668) !== l3.value ? l17.fvalue(pv, v668) : l3.value)));
6370     })();
6371 })), cdr: (function(){
6372     var symbol = l206;
6373     var value = symbol.value;
6374     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6375     return value;
6376 })()}));
6377 var l269 = {name: "UNWIND-PROTECT"};
6378 ((l206).value = ({car: l44.fvalue(pv, l269, (function (values,v672){
6379     checkArgsAtLeast(arguments, 2);
6380     var v671= l3.value;
6381     for (var i = arguments.length-1; i>=2; i--)
6382         v671 = {car: arguments[i], cdr:
6383     v671};
6384     var i;
6385     return (function(){
6386         return l134.fvalue(values, "(function(){", (function(){
6387             var symbol = l133;
6388             var value = symbol.value;
6389             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6390             return value;
6391         })(), l143.fvalue(pv, "var ret = ", l145.fvalue(pv, l3.value), ";", (function(){
6392             var symbol = l133;
6393             var value = symbol.value;
6394             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6395             return value;
6396         })(), "try {", (function(){
6397             var symbol = l133;
6398             var value = symbol.value;
6399             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6400             return value;
6401         })(), l143.fvalue(pv, "ret = ", l145.fvalue(pv, v672), ";", (function(){
6402             var symbol = l133;
6403             var value = symbol.value;
6404             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6405             return value;
6406         })()), "} finally {", (function(){
6407             var symbol = l133;
6408             var value = symbol.value;
6409             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6410             return value;
6411         })(), l143.fvalue(pv, l229.fvalue(pv, v671)), "}", (function(){
6412             var symbol = l133;
6413             var value = symbol.value;
6414             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6415             return value;
6416         })(), "return ret;", (function(){
6417             var symbol = l133;
6418             var value = symbol.value;
6419             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6420             return value;
6421         })()), "})()");
6422     })();
6423 })), cdr: (function(){
6424     var symbol = l206;
6425     var value = symbol.value;
6426     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6427     return value;
6428 })()}));
6429 var l270 = {name: "MULTIPLE-VALUE-CALL"};
6430 ((l206).value = ({car: l44.fvalue(pv, l270, (function (values,v674){
6431     checkArgsAtLeast(arguments, 2);
6432     var v673= l3.value;
6433     for (var i = arguments.length-1; i>=2; i--)
6434         v673 = {car: arguments[i], cdr:
6435     v673};
6436     var i;
6437     return (function(){
6438         return l134.fvalue(values, "(function(){", (function(){
6439             var symbol = l133;
6440             var value = symbol.value;
6441             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6442             return value;
6443         })(), l143.fvalue(pv, "var func = ", l145.fvalue(pv, v674), ";", (function(){
6444             var symbol = l133;
6445             var value = symbol.value;
6446             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6447             return value;
6448         })(), "var args = [", ((function(){
6449             var symbol = l172;
6450             var value = symbol.value;
6451             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6452             return value;
6453         })() !== l3.value ? "values" : "pv"), "];", (function(){
6454             var symbol = l133;
6455             var value = symbol.value;
6456             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6457             return value;
6458         })(), "return ", l134.fvalue(pv, "(function(){", (function(){
6459             var symbol = l133;
6460             var value = symbol.value;
6461             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6462             return value;
6463         })(), l143.fvalue(pv, "var values = mv;", (function(){
6464             var symbol = l133;
6465             var value = symbol.value;
6466             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6467             return value;
6468         })(), "var vs;", (function(){
6469             var symbol = l133;
6470             var value = symbol.value;
6471             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6472             return value;
6473         })(), l138.fvalue(pv, (function (values,v675){
6474             checkArgs(arguments, 2);
6475             var i;
6476             return l134.fvalue(values, "vs = ", l145.fvalue(pv, v675, l4.value), ";", (function(){
6477                 var symbol = l133;
6478                 var value = symbol.value;
6479                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6480                 return value;
6481             })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){
6482                 var symbol = l133;
6483                 var value = symbol.value;
6484                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6485                 return value;
6486             })(), l143.fvalue(pv, "args = args.concat(vs);", (function(){
6487                 var symbol = l133;
6488                 var value = symbol.value;
6489                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6490                 return value;
6491             })()), "else", (function(){
6492                 var symbol = l133;
6493                 var value = symbol.value;
6494                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6495                 return value;
6496             })(), l143.fvalue(pv, "args.push(vs);", (function(){
6497                 var symbol = l133;
6498                 var value = symbol.value;
6499                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6500                 return value;
6501             })()));
6502         }), v673), "return func.apply(window, args);", (function(){
6503             var symbol = l133;
6504             var value = symbol.value;
6505             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6506             return value;
6507         })()), "})()"), ";", (function(){
6508             var symbol = l133;
6509             var value = symbol.value;
6510             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6511             return value;
6512         })()), "})()");
6513     })();
6514 })), cdr: (function(){
6515     var symbol = l206;
6516     var value = symbol.value;
6517     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6518     return value;
6519 })()}));
6520 var l271 = {name: "MULTIPLE-VALUE-PROG1"};
6521 ((l206).value = ({car: l44.fvalue(pv, l271, (function (values,v677){
6522     checkArgsAtLeast(arguments, 2);
6523     var v676= l3.value;
6524     for (var i = arguments.length-1; i>=2; i--)
6525         v676 = {car: arguments[i], cdr:
6526     v676};
6527     var i;
6528     return (function(){
6529         return l134.fvalue(values, "(function(){", (function(){
6530             var symbol = l133;
6531             var value = symbol.value;
6532             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6533             return value;
6534         })(), l143.fvalue(pv, "var args = ", l145.fvalue(pv, v677, (function(){
6535             var symbol = l172;
6536             var value = symbol.value;
6537             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6538             return value;
6539         })()), ";", (function(){
6540             var symbol = l133;
6541             var value = symbol.value;
6542             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6543             return value;
6544         })(), l229.fvalue(pv, v676), "return args;", (function(){
6545             var symbol = l133;
6546             var value = symbol.value;
6547             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6548             return value;
6549         })()), "})()");
6550     })();
6551 })), cdr: (function(){
6552     var symbol = l206;
6553     var value = symbol.value;
6554     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6555     return value;
6556 })()}));
6557 var l272 = {name: "BACKQUOTE-EXPAND-1"};
6558 (function(){
6559     (l272).fvalue = (function(v680){
6560         ((v680)["fname"] = "BACKQUOTE-EXPAND-1");
6561         return v680;
6562     })((function (values,v678){
6563         checkArgs(arguments, 2);
6564         var i;
6565         return (function(){
6566             return (((function(){
6567                 var tmp = v678;
6568                 return (typeof tmp == 'object' && 'name' in tmp);
6569             })()?l4.value: l3.value) !== l3.value ? l44.fvalue(values, l167, v678) : (l45.fvalue(pv, v678) !== l3.value ? v678 : ((((function(){
6570                 var tmp = v678;
6571                 return tmp === l3.value? l3.value: tmp.car;
6572             })() === l170)?l4.value: l3.value) !== l3.value ? (function(){
6573                 var tmp = v678;
6574                 return tmp === l3.value? l3.value: tmp.car;
6575             })() : ((((function(){
6576                 var tmp = v678;
6577                 return tmp === l3.value? l3.value: tmp.car;
6578             })() === l168)?l4.value: l3.value) !== l3.value ? l272.fvalue(values, l272.fvalue(pv, l33.fvalue(pv, v678))) : ({car: l64, cdr: l73.fvalue(pv, (function (values,v679){
6579                 checkArgs(arguments, 2);
6580                 var i;
6581                 return ((l59.fvalue(pv, v679) !== l3.value ? (((function(){
6582                     var tmp = v679;
6583                     return tmp === l3.value? l3.value: tmp.car;
6584                 })() === l170)?l4.value: l3.value) : l3.value) !== l3.value ? l44.fvalue(values, l44, l33.fvalue(pv, v679)) : ((l59.fvalue(pv, v679) !== l3.value ? (((function(){
6585                     var tmp = v679;
6586                     return tmp === l3.value? l3.value: tmp.car;
6587                 })() === l169)?l4.value: l3.value) : l3.value) !== l3.value ? l33.fvalue(values, v679) : l44.fvalue(values, l44, l272.fvalue(pv, v679))));
6588             }), v678)})))));
6589         })();
6590     }));
6591     return l272;
6592 })();
6593 var l273 = {name: "BACKQUOTE-EXPAND"};
6594 (function(){
6595     (l273).fvalue = (function(v682){
6596         ((v682)["fname"] = "BACKQUOTE-EXPAND");
6597         return v682;
6598     })((function (values,v681){
6599         checkArgs(arguments, 2);
6600         var i;
6601         return (function(){
6602             return ((l59.fvalue(pv, v681) !== l3.value ? (((function(){
6603                 var tmp = v681;
6604                 return tmp === l3.value? l3.value: tmp.car;
6605             })() === l168)?l4.value: l3.value) : l3.value) !== l3.value ? l272.fvalue(values, l33.fvalue(pv, v681)) : v681);
6606         })();
6607     }));
6608     return l273;
6609 })();
6610 l168;
6611 ((l206).value = ({car: l44.fvalue(pv, l168, (function (values,v683){
6612     checkArgs(arguments, 2);
6613     var i;
6614     return (function(){
6615         return l145.fvalue(values, l272.fvalue(pv, v683));
6616     })();
6617 })), cdr: (function(){
6618     var symbol = l206;
6619     var value = symbol.value;
6620     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6621     return value;
6622 })()}));
6623 var l274 = {name: "*BUILTINS*"};
6624 (function(){
6625     (((l274.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l274).value = l3.value));
6626     return l274;
6627 })();
6628 var l275 = {name: "DEFINE-RAW-BUILTIN"};
6629 l275;
6630 var l276 = {name: "DEFINE-BUILTIN"};
6631 l276;
6632 var l277 = {name: "TYPE-CHECK"};
6633 l277;
6634 var l278 = {name: "VARIABLE-ARITY-CALL"};
6635 (function(){
6636     (l278).fvalue = (function(v692){
6637         ((v692)["fname"] = "VARIABLE-ARITY-CALL");
6638         return v692;
6639     })((function (values,v684,v685){
6640         checkArgs(arguments, 3);
6641         var i;
6642         return (function(){
6643             (((function(){
6644                 var tmp = v684;
6645                 return (typeof tmp == 'object' && 'car' in tmp);
6646             })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
6647                 throw "ARGS must be a non-empty list";
6648             })());
6649             return (function(v686,v687,v688){
6650                 (function(){
6651                     return (function(v689,v690){
6652                         (function(){
6653                             while(v689 !== l3.value){
6654                                 (v690 = (function(){
6655                                     var tmp = v689;
6656                                     return tmp === l3.value? l3.value: tmp.car;
6657                                 })());
6658                                 (function(){
6659                                     (function(v691){
6660                                         (v687 = ({car: v691, cdr: v687}));
6661                                         return (v688 = l134.fvalue(pv, v688, l134.fvalue(pv, "var ", v691, " = ", l145.fvalue(pv, v690), ";", (function(){
6662                                             var symbol = l133;
6663                                             var value = symbol.value;
6664                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6665                                             return value;
6666                                         })(), "if (typeof ", v691, " !== 'number') throw 'Not a number!';", (function(){
6667                                             var symbol = l133;
6668                                             var value = symbol.value;
6669                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6670                                             return value;
6671                                         })())));
6672                                     })(l134.fvalue(pv, "x", l17.fvalue(pv, (v686 = (function(){
6673                                         var x1 = v686;
6674                                         if (typeof x1 !== 'number') throw 'Not a number!';
6675                                         var x2 = 1;
6676                                         if (typeof x2 !== 'number') throw 'Not a number!';
6677                                         return x1+x2;
6678                                     })()))));
6679                                     return l3.value;
6680                                 })();
6681                                 (v689 = (function(){
6682                                     var tmp = v689;
6683                                     return tmp === l3.value? l3.value: tmp.cdr;
6684                                 })());
6685                             }return l3.value;
6686                         })();
6687                         return l3.value;
6688                     })(v684,l3.value);
6689                 })();
6690                 return l134.fvalue(values, "(function(){", (function(){
6691                     var symbol = l133;
6692                     var value = symbol.value;
6693                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6694                     return value;
6695                 })(), l143.fvalue(pv, v688, (v685)(pv, l66.fvalue(pv, v687))), "})()");
6696             })(0,l3,"");
6697         })();
6698     }));
6699     return l278;
6700 })();
6701 var l279 = {name: "VARIABLE-ARITY"};
6702 l279;
6703 var l280 = {name: "NUM-OP-NUM"};
6704 (function(){
6705     (l280).fvalue = (function(v696){
6706         ((v696)["fname"] = "NUM-OP-NUM");
6707         return v696;
6708     })((function (values,v693,v694,v695){
6709         checkArgs(arguments, 4);
6710         var i;
6711         return (function(){
6712             return l134.fvalue(values, "(function(){", (function(){
6713                 var symbol = l133;
6714                 var value = symbol.value;
6715                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6716                 return value;
6717             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v693, ";", (function(){
6718                 var symbol = l133;
6719                 var value = symbol.value;
6720                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6721                 return value;
6722             })()), l134.fvalue(pv, "var ", "y", " = ", v695, ";", (function(){
6723                 var symbol = l133;
6724                 var value = symbol.value;
6725                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6726                 return value;
6727             })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6728                 var symbol = l133;
6729                 var value = symbol.value;
6730                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6731                 return value;
6732             })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6733                 var symbol = l133;
6734                 var value = symbol.value;
6735                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6736                 return value;
6737             })())), l134.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
6738                 var symbol = l133;
6739                 var value = symbol.value;
6740                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6741                 return value;
6742             })(), l143.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
6743                 var symbol = l133;
6744                 var value = symbol.value;
6745                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6746                 return value;
6747             })())), l134.fvalue(pv, "return ", l134.fvalue(pv, "x", v694, "y"), ";", (function(){
6748                 var symbol = l133;
6749                 var value = symbol.value;
6750                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6751                 return value;
6752             })())), "})()");
6753         })();
6754     }));
6755     return l280;
6756 })();
6757 ((l274).value = ({car: l44.fvalue(pv, l61, (function (values){
6758     var v697= l3.value;
6759     for (var i = arguments.length-1; i>=1; i--)
6760         v697 = {car: arguments[i], cdr:
6761     v697};
6762     var i;
6763     return (function(){
6764         return (l12.fvalue(pv, v697) !== l3.value ? "0" : l278.fvalue(values, v697, (function (values,v698){
6765             checkArgs(arguments, 2);
6766             var i;
6767             return l134.fvalue(values, "return ", l136.fvalue(pv, v698, "+"), ";", (function(){
6768                 var symbol = l133;
6769                 var value = symbol.value;
6770                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6771                 return value;
6772             })());
6773         })));
6774     })();
6775 })), cdr: (function(){
6776     var symbol = l274;
6777     var value = symbol.value;
6778     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6779     return value;
6780 })()}));
6781 ((l274).value = ({car: l44.fvalue(pv, l62, (function (values,v700){
6782     checkArgsAtLeast(arguments, 2);
6783     var v699= l3.value;
6784     for (var i = arguments.length-1; i>=2; i--)
6785         v699 = {car: arguments[i], cdr:
6786     v699};
6787     var i;
6788     return (function(){
6789         return (function(v701){
6790             return l278.fvalue(values, v701, (function (values,v702){
6791                 checkArgs(arguments, 2);
6792                 var i;
6793                 return l134.fvalue(values, "return ", (l12.fvalue(pv, v699) !== l3.value ? l134.fvalue(pv, "-", (function(){
6794                     var tmp = v702;
6795                     return tmp === l3.value? l3.value: tmp.car;
6796                 })()) : l136.fvalue(pv, v702, "-")), ";", (function(){
6797                     var symbol = l133;
6798                     var value = symbol.value;
6799                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6800                     return value;
6801                 })());
6802             }));
6803         })(({car: v700, cdr: v699}));
6804     })();
6805 })), cdr: (function(){
6806     var symbol = l274;
6807     var value = symbol.value;
6808     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6809     return value;
6810 })()}));
6811 ((l274).value = ({car: l44.fvalue(pv, l20, (function (values){
6812     var v703= l3.value;
6813     for (var i = arguments.length-1; i>=1; i--)
6814         v703 = {car: arguments[i], cdr:
6815     v703};
6816     var i;
6817     return (function(){
6818         return (l12.fvalue(pv, v703) !== l3.value ? "1" : l278.fvalue(values, v703, (function (values,v704){
6819             checkArgs(arguments, 2);
6820             var i;
6821             return l134.fvalue(values, "return ", l136.fvalue(pv, v704, "*"), ";", (function(){
6822                 var symbol = l133;
6823                 var value = symbol.value;
6824                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6825                 return value;
6826             })());
6827         })));
6828     })();
6829 })), cdr: (function(){
6830     var symbol = l274;
6831     var value = symbol.value;
6832     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6833     return value;
6834 })()}));
6835 ((l274).value = ({car: l44.fvalue(pv, l21, (function (values,v706){
6836     checkArgsAtLeast(arguments, 2);
6837     var v705= l3.value;
6838     for (var i = arguments.length-1; i>=2; i--)
6839         v705 = {car: arguments[i], cdr:
6840     v705};
6841     var i;
6842     return (function(){
6843         return (function(v707){
6844             return l278.fvalue(values, v707, (function (values,v708){
6845                 checkArgs(arguments, 2);
6846                 var i;
6847                 return l134.fvalue(values, "return ", (l12.fvalue(pv, v705) !== l3.value ? l134.fvalue(pv, "1 /", (function(){
6848                     var tmp = v708;
6849                     return tmp === l3.value? l3.value: tmp.car;
6850                 })()) : l136.fvalue(pv, v708, "/")), ";", (function(){
6851                     var symbol = l133;
6852                     var value = symbol.value;
6853                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6854                     return value;
6855                 })());
6856             }));
6857         })(({car: v706, cdr: v705}));
6858     })();
6859 })), cdr: (function(){
6860     var symbol = l274;
6861     var value = symbol.value;
6862     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6863     return value;
6864 })()}));
6865 var l281 = {name: "MOD"};
6866 ((l274).value = ({car: l44.fvalue(pv, l281, (function (values,v709,v710){
6867     checkArgs(arguments, 3);
6868     var i;
6869     return (function(){
6870         return (function(v711,v712){
6871             return l280.fvalue(values, v711, "%", v712);
6872         })(l145.fvalue(pv, v709),l145.fvalue(pv, v710));
6873     })();
6874 })), cdr: (function(){
6875     var symbol = l274;
6876     var value = symbol.value;
6877     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6878     return value;
6879 })()}));
6880 var l282 = {name: "COMPARISON-CONJUNTION"};
6881 (function(){
6882     (l282).fvalue = (function(v715){
6883         ((v715)["fname"] = "COMPARISON-CONJUNTION");
6884         return v715;
6885     })((function (values,v713,v714){
6886         checkArgs(arguments, 3);
6887         var i;
6888         return (function(){
6889             return (l12.fvalue(pv, (function(){
6890                 var tmp = v713;
6891                 return tmp === l3.value? l3.value: tmp.cdr;
6892             })()) !== l3.value ? "true" : (l12.fvalue(pv, l35.fvalue(pv, v713)) !== l3.value ? l134.fvalue(values, (function(){
6893                 var tmp = v713;
6894                 return tmp === l3.value? l3.value: tmp.car;
6895             })(), v714, l33.fvalue(pv, v713)) : l134.fvalue(values, (function(){
6896                 var tmp = v713;
6897                 return tmp === l3.value? l3.value: tmp.car;
6898             })(), v714, l33.fvalue(pv, v713), " && ", l282.fvalue(pv, (function(){
6899                 var tmp = v713;
6900                 return tmp === l3.value? l3.value: tmp.cdr;
6901             })(), v714))));
6902         })();
6903     }));
6904     return l282;
6905 })();
6906 var l283 = {name: "DEFINE-BUILTIN-COMPARISON"};
6907 l283;
6908 var l284 = {name: ">"};
6909 ((l274).value = ({car: l44.fvalue(pv, l284, (function (values,v717){
6910     checkArgsAtLeast(arguments, 2);
6911     var v716= l3.value;
6912     for (var i = arguments.length-1; i>=2; i--)
6913         v716 = {car: arguments[i], cdr:
6914     v716};
6915     var i;
6916     return (function(){
6917         return (function(v718){
6918             return l278.fvalue(values, v718, (function (values,v719){
6919                 checkArgs(arguments, 2);
6920                 var i;
6921                 return l134.fvalue(values, "return ", l144.fvalue(pv, l282.fvalue(pv, v719, ">")), ";", (function(){
6922                     var symbol = l133;
6923                     var value = symbol.value;
6924                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6925                     return value;
6926                 })());
6927             }));
6928         })(({car: v717, cdr: v716}));
6929     })();
6930 })), cdr: (function(){
6931     var symbol = l274;
6932     var value = symbol.value;
6933     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6934     return value;
6935 })()}));
6936 var l285 = {name: "<"};
6937 ((l274).value = ({car: l44.fvalue(pv, l285, (function (values,v721){
6938     checkArgsAtLeast(arguments, 2);
6939     var v720= l3.value;
6940     for (var i = arguments.length-1; i>=2; i--)
6941         v720 = {car: arguments[i], cdr:
6942     v720};
6943     var i;
6944     return (function(){
6945         return (function(v722){
6946             return l278.fvalue(values, v722, (function (values,v723){
6947                 checkArgs(arguments, 2);
6948                 var i;
6949                 return l134.fvalue(values, "return ", l144.fvalue(pv, l282.fvalue(pv, v723, "<")), ";", (function(){
6950                     var symbol = l133;
6951                     var value = symbol.value;
6952                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6953                     return value;
6954                 })());
6955             }));
6956         })(({car: v721, cdr: v720}));
6957     })();
6958 })), cdr: (function(){
6959     var symbol = l274;
6960     var value = symbol.value;
6961     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6962     return value;
6963 })()}));
6964 var l286 = {name: ">="};
6965 ((l274).value = ({car: l44.fvalue(pv, l286, (function (values,v725){
6966     checkArgsAtLeast(arguments, 2);
6967     var v724= l3.value;
6968     for (var i = arguments.length-1; i>=2; i--)
6969         v724 = {car: arguments[i], cdr:
6970     v724};
6971     var i;
6972     return (function(){
6973         return (function(v726){
6974             return l278.fvalue(values, v726, (function (values,v727){
6975                 checkArgs(arguments, 2);
6976                 var i;
6977                 return l134.fvalue(values, "return ", l144.fvalue(pv, l282.fvalue(pv, v727, ">=")), ";", (function(){
6978                     var symbol = l133;
6979                     var value = symbol.value;
6980                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6981                     return value;
6982                 })());
6983             }));
6984         })(({car: v725, cdr: v724}));
6985     })();
6986 })), cdr: (function(){
6987     var symbol = l274;
6988     var value = symbol.value;
6989     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6990     return value;
6991 })()}));
6992 var l287 = {name: "<="};
6993 ((l274).value = ({car: l44.fvalue(pv, l287, (function (values,v729){
6994     checkArgsAtLeast(arguments, 2);
6995     var v728= l3.value;
6996     for (var i = arguments.length-1; i>=2; i--)
6997         v728 = {car: arguments[i], cdr:
6998     v728};
6999     var i;
7000     return (function(){
7001         return (function(v730){
7002             return l278.fvalue(values, v730, (function (values,v731){
7003                 checkArgs(arguments, 2);
7004                 var i;
7005                 return l134.fvalue(values, "return ", l144.fvalue(pv, l282.fvalue(pv, v731, "<=")), ";", (function(){
7006                     var symbol = l133;
7007                     var value = symbol.value;
7008                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7009                     return value;
7010                 })());
7011             }));
7012         })(({car: v729, cdr: v728}));
7013     })();
7014 })), cdr: (function(){
7015     var symbol = l274;
7016     var value = symbol.value;
7017     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7018     return value;
7019 })()}));
7020 ((l274).value = ({car: l44.fvalue(pv, l19, (function (values,v733){
7021     checkArgsAtLeast(arguments, 2);
7022     var v732= l3.value;
7023     for (var i = arguments.length-1; i>=2; i--)
7024         v732 = {car: arguments[i], cdr:
7025     v732};
7026     var i;
7027     return (function(){
7028         return (function(v734){
7029             return l278.fvalue(values, v734, (function (values,v735){
7030                 checkArgs(arguments, 2);
7031                 var i;
7032                 return l134.fvalue(values, "return ", l144.fvalue(pv, l282.fvalue(pv, v735, "==")), ";", (function(){
7033                     var symbol = l133;
7034                     var value = symbol.value;
7035                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7036                     return value;
7037                 })());
7038             }));
7039         })(({car: v733, cdr: v732}));
7040     })();
7041 })), cdr: (function(){
7042     var symbol = l274;
7043     var value = symbol.value;
7044     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7045     return value;
7046 })()}));
7047 var l288 = {name: "NUMBERP"};
7048 ((l274).value = ({car: l44.fvalue(pv, l288, (function (values,v736){
7049     checkArgs(arguments, 2);
7050     var i;
7051     return (function(){
7052         return (function(v737){
7053             return l144.fvalue(values, l134.fvalue(pv, "(typeof (", v737, ") == \"number\")"));
7054         })(l145.fvalue(pv, v736));
7055     })();
7056 })), cdr: (function(){
7057     var symbol = l274;
7058     var value = symbol.value;
7059     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7060     return value;
7061 })()}));
7062 var l289 = {name: "FLOOR"};
7063 ((l274).value = ({car: l44.fvalue(pv, l289, (function (values,v738){
7064     checkArgs(arguments, 2);
7065     var i;
7066     return (function(){
7067         return (function(v739){
7068             return l134.fvalue(values, "(function(){", (function(){
7069                 var symbol = l133;
7070                 var value = symbol.value;
7071                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7072                 return value;
7073             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v739, ";", (function(){
7074                 var symbol = l133;
7075                 var value = symbol.value;
7076                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7077                 return value;
7078             })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7079                 var symbol = l133;
7080                 var value = symbol.value;
7081                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7082                 return value;
7083             })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7084                 var symbol = l133;
7085                 var value = symbol.value;
7086                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7087                 return value;
7088             })())), l134.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){
7089                 var symbol = l133;
7090                 var value = symbol.value;
7091                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7092                 return value;
7093             })())), "})()");
7094         })(l145.fvalue(pv, v738));
7095     })();
7096 })), cdr: (function(){
7097     var symbol = l274;
7098     var value = symbol.value;
7099     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7100     return value;
7101 })()}));
7102 ((l274).value = ({car: l44.fvalue(pv, l28, (function (values,v740,v741){
7103     checkArgs(arguments, 3);
7104     var i;
7105     return (function(){
7106         return (function(v742,v743){
7107             return l134.fvalue(values, "({car: ", v742, ", cdr: ", v743, "})");
7108         })(l145.fvalue(pv, v740),l145.fvalue(pv, v741));
7109     })();
7110 })), cdr: (function(){
7111     var symbol = l274;
7112     var value = symbol.value;
7113     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7114     return value;
7115 })()}));
7116 ((l274).value = ({car: l44.fvalue(pv, l29, (function (values,v744){
7117     checkArgs(arguments, 2);
7118     var i;
7119     return (function(){
7120         return (function(v745){
7121             return l144.fvalue(values, l134.fvalue(pv, "(function(){", (function(){
7122                 var symbol = l133;
7123                 var value = symbol.value;
7124                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7125                 return value;
7126             })(), l143.fvalue(pv, "var tmp = ", v745, ";", (function(){
7127                 var symbol = l133;
7128                 var value = symbol.value;
7129                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7130                 return value;
7131             })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
7132                 var symbol = l133;
7133                 var value = symbol.value;
7134                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7135                 return value;
7136             })()), "})()"));
7137         })(l145.fvalue(pv, v744));
7138     })();
7139 })), cdr: (function(){
7140     var symbol = l274;
7141     var value = symbol.value;
7142     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7143     return value;
7144 })()}));
7145 ((l274).value = ({car: l44.fvalue(pv, l30, (function (values,v746){
7146     checkArgs(arguments, 2);
7147     var i;
7148     return (function(){
7149         return (function(v747){
7150             return l134.fvalue(values, "(function(){", (function(){
7151                 var symbol = l133;
7152                 var value = symbol.value;
7153                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7154                 return value;
7155             })(), l143.fvalue(pv, "var tmp = ", v747, ";", (function(){
7156                 var symbol = l133;
7157                 var value = symbol.value;
7158                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7159                 return value;
7160             })(), "return tmp === ", l145.fvalue(pv, l3.value), "? ", l145.fvalue(pv, l3.value), ": tmp.car;", (function(){
7161                 var symbol = l133;
7162                 var value = symbol.value;
7163                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7164                 return value;
7165             })()), "})()");
7166         })(l145.fvalue(pv, v746));
7167     })();
7168 })), cdr: (function(){
7169     var symbol = l274;
7170     var value = symbol.value;
7171     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7172     return value;
7173 })()}));
7174 ((l274).value = ({car: l44.fvalue(pv, l31, (function (values,v748){
7175     checkArgs(arguments, 2);
7176     var i;
7177     return (function(){
7178         return (function(v749){
7179             return l134.fvalue(values, "(function(){", (function(){
7180                 var symbol = l133;
7181                 var value = symbol.value;
7182                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7183                 return value;
7184             })(), l143.fvalue(pv, "var tmp = ", v749, ";", (function(){
7185                 var symbol = l133;
7186                 var value = symbol.value;
7187                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7188                 return value;
7189             })(), "return tmp === ", l145.fvalue(pv, l3.value), "? ", l145.fvalue(pv, l3.value), ": tmp.cdr;", (function(){
7190                 var symbol = l133;
7191                 var value = symbol.value;
7192                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7193                 return value;
7194             })()), "})()");
7195         })(l145.fvalue(pv, v748));
7196     })();
7197 })), cdr: (function(){
7198     var symbol = l274;
7199     var value = symbol.value;
7200     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7201     return value;
7202 })()}));
7203 var l290 = {name: "RPLACA"};
7204 ((l274).value = ({car: l44.fvalue(pv, l290, (function (values,v750,v751){
7205     checkArgs(arguments, 3);
7206     var i;
7207     return (function(){
7208         return (function(v752,v753){
7209             return l134.fvalue(values, "(function(){", (function(){
7210                 var symbol = l133;
7211                 var value = symbol.value;
7212                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7213                 return value;
7214             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v752, ";", (function(){
7215                 var symbol = l133;
7216                 var value = symbol.value;
7217                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7218                 return value;
7219             })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
7220                 var symbol = l133;
7221                 var value = symbol.value;
7222                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7223                 return value;
7224             })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
7225                 var symbol = l133;
7226                 var value = symbol.value;
7227                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7228                 return value;
7229             })())), l134.fvalue(pv, "return ", l134.fvalue(pv, "(x.car = ", v753, ", x)"), ";", (function(){
7230                 var symbol = l133;
7231                 var value = symbol.value;
7232                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7233                 return value;
7234             })())), "})()");
7235         })(l145.fvalue(pv, v750),l145.fvalue(pv, v751));
7236     })();
7237 })), cdr: (function(){
7238     var symbol = l274;
7239     var value = symbol.value;
7240     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7241     return value;
7242 })()}));
7243 var l291 = {name: "RPLACD"};
7244 ((l274).value = ({car: l44.fvalue(pv, l291, (function (values,v754,v755){
7245     checkArgs(arguments, 3);
7246     var i;
7247     return (function(){
7248         return (function(v756,v757){
7249             return l134.fvalue(values, "(function(){", (function(){
7250                 var symbol = l133;
7251                 var value = symbol.value;
7252                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7253                 return value;
7254             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v756, ";", (function(){
7255                 var symbol = l133;
7256                 var value = symbol.value;
7257                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7258                 return value;
7259             })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
7260                 var symbol = l133;
7261                 var value = symbol.value;
7262                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7263                 return value;
7264             })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
7265                 var symbol = l133;
7266                 var value = symbol.value;
7267                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7268                 return value;
7269             })())), l134.fvalue(pv, "return ", l134.fvalue(pv, "(x.cdr = ", v757, ", x)"), ";", (function(){
7270                 var symbol = l133;
7271                 var value = symbol.value;
7272                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7273                 return value;
7274             })())), "})()");
7275         })(l145.fvalue(pv, v754),l145.fvalue(pv, v755));
7276     })();
7277 })), cdr: (function(){
7278     var symbol = l274;
7279     var value = symbol.value;
7280     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7281     return value;
7282 })()}));
7283 var l292 = {name: "SYMBOLP"};
7284 ((l274).value = ({car: l44.fvalue(pv, l292, (function (values,v758){
7285     checkArgs(arguments, 2);
7286     var i;
7287     return (function(){
7288         return (function(v759){
7289             return l144.fvalue(values, l134.fvalue(pv, "(function(){", (function(){
7290                 var symbol = l133;
7291                 var value = symbol.value;
7292                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7293                 return value;
7294             })(), l143.fvalue(pv, "var tmp = ", v759, ";", (function(){
7295                 var symbol = l133;
7296                 var value = symbol.value;
7297                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7298                 return value;
7299             })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
7300                 var symbol = l133;
7301                 var value = symbol.value;
7302                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7303                 return value;
7304             })()), "})()"));
7305         })(l145.fvalue(pv, v758));
7306     })();
7307 })), cdr: (function(){
7308     var symbol = l274;
7309     var value = symbol.value;
7310     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7311     return value;
7312 })()}));
7313 var l293 = {name: "MAKE-SYMBOL"};
7314 ((l274).value = ({car: l44.fvalue(pv, l293, (function (values,v760){
7315     checkArgs(arguments, 2);
7316     var i;
7317     return (function(){
7318         return (function(v761){
7319             return l134.fvalue(values, "(function(){", (function(){
7320                 var symbol = l133;
7321                 var value = symbol.value;
7322                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7323                 return value;
7324             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "name", " = ", v761, ";", (function(){
7325                 var symbol = l133;
7326                 var value = symbol.value;
7327                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7328                 return value;
7329             })()), l134.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){
7330                 var symbol = l133;
7331                 var value = symbol.value;
7332                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7333                 return value;
7334             })(), l143.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
7335                 var symbol = l133;
7336                 var value = symbol.value;
7337                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7338                 return value;
7339             })())), l134.fvalue(pv, "return ", "({name: name})", ";", (function(){
7340                 var symbol = l133;
7341                 var value = symbol.value;
7342                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7343                 return value;
7344             })())), "})()");
7345         })(l145.fvalue(pv, v760));
7346     })();
7347 })), cdr: (function(){
7348     var symbol = l274;
7349     var value = symbol.value;
7350     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7351     return value;
7352 })()}));
7353 var l294 = {name: "SYMBOL-NAME"};
7354 ((l274).value = ({car: l44.fvalue(pv, l294, (function (values,v762){
7355     checkArgs(arguments, 2);
7356     var i;
7357     return (function(){
7358         return (function(v763){
7359             return l134.fvalue(values, "(", v763, ").name");
7360         })(l145.fvalue(pv, v762));
7361     })();
7362 })), cdr: (function(){
7363     var symbol = l274;
7364     var value = symbol.value;
7365     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7366     return value;
7367 })()}));
7368 ((l274).value = ({car: l44.fvalue(pv, l231, (function (values,v764,v765){
7369     checkArgs(arguments, 3);
7370     var i;
7371     return (function(){
7372         return (function(v766,v767){
7373             return l134.fvalue(values, "(", v766, ").value = ", v767);
7374         })(l145.fvalue(pv, v764),l145.fvalue(pv, v765));
7375     })();
7376 })), cdr: (function(){
7377     var symbol = l274;
7378     var value = symbol.value;
7379     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7380     return value;
7381 })()}));
7382 var l295 = {name: "FSET"};
7383 ((l274).value = ({car: l44.fvalue(pv, l295, (function (values,v768,v769){
7384     checkArgs(arguments, 3);
7385     var i;
7386     return (function(){
7387         return (function(v770,v771){
7388             return l134.fvalue(values, "(", v770, ").fvalue = ", v771);
7389         })(l145.fvalue(pv, v768),l145.fvalue(pv, v769));
7390     })();
7391 })), cdr: (function(){
7392     var symbol = l274;
7393     var value = symbol.value;
7394     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7395     return value;
7396 })()}));
7397 ((l274).value = ({car: l44.fvalue(pv, l18, (function (values,v772){
7398     checkArgs(arguments, 2);
7399     var i;
7400     return (function(){
7401         return (function(v773){
7402             return l144.fvalue(values, l134.fvalue(pv, "(", v773, ".value !== undefined)"));
7403         })(l145.fvalue(pv, v772));
7404     })();
7405 })), cdr: (function(){
7406     var symbol = l274;
7407     var value = symbol.value;
7408     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7409     return value;
7410 })()}));
7411 var l296 = {name: "SYMBOL-VALUE"};
7412 ((l274).value = ({car: l44.fvalue(pv, l296, (function (values,v774){
7413     checkArgs(arguments, 2);
7414     var i;
7415     return (function(){
7416         return (function(v775){
7417             return l134.fvalue(values, "(function(){", (function(){
7418                 var symbol = l133;
7419                 var value = symbol.value;
7420                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7421                 return value;
7422             })(), l143.fvalue(pv, "var symbol = ", v775, ";", (function(){
7423                 var symbol = l133;
7424                 var value = symbol.value;
7425                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7426                 return value;
7427             })(), "var value = symbol.value;", (function(){
7428                 var symbol = l133;
7429                 var value = symbol.value;
7430                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7431                 return value;
7432             })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
7433                 var symbol = l133;
7434                 var value = symbol.value;
7435                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7436                 return value;
7437             })(), "return value;", (function(){
7438                 var symbol = l133;
7439                 var value = symbol.value;
7440                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7441                 return value;
7442             })()), "})()");
7443         })(l145.fvalue(pv, v774));
7444     })();
7445 })), cdr: (function(){
7446     var symbol = l274;
7447     var value = symbol.value;
7448     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7449     return value;
7450 })()}));
7451 ((l274).value = ({car: l44.fvalue(pv, l240, (function (values,v776){
7452     checkArgs(arguments, 2);
7453     var i;
7454     return (function(){
7455         return (function(v777){
7456             return l134.fvalue(values, "(function(){", (function(){
7457                 var symbol = l133;
7458                 var value = symbol.value;
7459                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7460                 return value;
7461             })(), l143.fvalue(pv, "var symbol = ", v777, ";", (function(){
7462                 var symbol = l133;
7463                 var value = symbol.value;
7464                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7465                 return value;
7466             })(), "var func = symbol.fvalue;", (function(){
7467                 var symbol = l133;
7468                 var value = symbol.value;
7469                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7470                 return value;
7471             })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
7472                 var symbol = l133;
7473                 var value = symbol.value;
7474                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7475                 return value;
7476             })(), "return func;", (function(){
7477                 var symbol = l133;
7478                 var value = symbol.value;
7479                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7480                 return value;
7481             })()), "})()");
7482         })(l145.fvalue(pv, v776));
7483     })();
7484 })), cdr: (function(){
7485     var symbol = l274;
7486     var value = symbol.value;
7487     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7488     return value;
7489 })()}));
7490 var l297 = {name: "SYMBOL-PLIST"};
7491 ((l274).value = ({car: l44.fvalue(pv, l297, (function (values,v778){
7492     checkArgs(arguments, 2);
7493     var i;
7494     return (function(){
7495         return (function(v779){
7496             return l134.fvalue(values, "((", v779, ").plist || ", l145.fvalue(pv, l3.value), ")");
7497         })(l145.fvalue(pv, v778));
7498     })();
7499 })), cdr: (function(){
7500     var symbol = l274;
7501     var value = symbol.value;
7502     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7503     return value;
7504 })()}));
7505 var l298 = {name: "LAMBDA-CODE"};
7506 ((l274).value = ({car: l44.fvalue(pv, l298, (function (values,v780){
7507     checkArgs(arguments, 2);
7508     var i;
7509     return (function(){
7510         return (function(v781){
7511             return l134.fvalue(values, "(", v781, ").toString()");
7512         })(l145.fvalue(pv, v780));
7513     })();
7514 })), cdr: (function(){
7515     var symbol = l274;
7516     var value = symbol.value;
7517     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7518     return value;
7519 })()}));
7520 var l299 = {name: "EQ"};
7521 ((l274).value = ({car: l44.fvalue(pv, l299, (function (values,v782,v783){
7522     checkArgs(arguments, 3);
7523     var i;
7524     return (function(){
7525         return (function(v784,v785){
7526             return l144.fvalue(values, l134.fvalue(pv, "(", v784, " === ", v785, ")"));
7527         })(l145.fvalue(pv, v782),l145.fvalue(pv, v783));
7528     })();
7529 })), cdr: (function(){
7530     var symbol = l274;
7531     var value = symbol.value;
7532     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7533     return value;
7534 })()}));
7535 var l300 = {name: "EQUAL"};
7536 ((l274).value = ({car: l44.fvalue(pv, l300, (function (values,v786,v787){
7537     checkArgs(arguments, 3);
7538     var i;
7539     return (function(){
7540         return (function(v788,v789){
7541             return l144.fvalue(values, l134.fvalue(pv, "(", v788, " == ", v789, ")"));
7542         })(l145.fvalue(pv, v786),l145.fvalue(pv, v787));
7543     })();
7544 })), cdr: (function(){
7545     var symbol = l274;
7546     var value = symbol.value;
7547     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7548     return value;
7549 })()}));
7550 var l301 = {name: "CHAR-TO-STRING"};
7551 ((l274).value = ({car: l44.fvalue(pv, l301, (function (values,v790){
7552     checkArgs(arguments, 2);
7553     var i;
7554     return (function(){
7555         return (function(v791){
7556             return l134.fvalue(values, "(function(){", (function(){
7557                 var symbol = l133;
7558                 var value = symbol.value;
7559                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7560                 return value;
7561             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v791, ";", (function(){
7562                 var symbol = l133;
7563                 var value = symbol.value;
7564                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7565                 return value;
7566             })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7567                 var symbol = l133;
7568                 var value = symbol.value;
7569                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7570                 return value;
7571             })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7572                 var symbol = l133;
7573                 var value = symbol.value;
7574                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7575                 return value;
7576             })())), l134.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){
7577                 var symbol = l133;
7578                 var value = symbol.value;
7579                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7580                 return value;
7581             })())), "})()");
7582         })(l145.fvalue(pv, v790));
7583     })();
7584 })), cdr: (function(){
7585     var symbol = l274;
7586     var value = symbol.value;
7587     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7588     return value;
7589 })()}));
7590 var l302 = {name: "STRINGP"};
7591 ((l274).value = ({car: l44.fvalue(pv, l302, (function (values,v792){
7592     checkArgs(arguments, 2);
7593     var i;
7594     return (function(){
7595         return (function(v793){
7596             return l144.fvalue(values, l134.fvalue(pv, "(typeof(", v793, ") == \"string\")"));
7597         })(l145.fvalue(pv, v792));
7598     })();
7599 })), cdr: (function(){
7600     var symbol = l274;
7601     var value = symbol.value;
7602     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7603     return value;
7604 })()}));
7605 var l303 = {name: "STRING-UPCASE"};
7606 ((l274).value = ({car: l44.fvalue(pv, l303, (function (values,v794){
7607     checkArgs(arguments, 2);
7608     var i;
7609     return (function(){
7610         return (function(v795){
7611             return l134.fvalue(values, "(function(){", (function(){
7612                 var symbol = l133;
7613                 var value = symbol.value;
7614                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7615                 return value;
7616             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v795, ";", (function(){
7617                 var symbol = l133;
7618                 var value = symbol.value;
7619                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7620                 return value;
7621             })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7622                 var symbol = l133;
7623                 var value = symbol.value;
7624                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7625                 return value;
7626             })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7627                 var symbol = l133;
7628                 var value = symbol.value;
7629                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7630                 return value;
7631             })())), l134.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){
7632                 var symbol = l133;
7633                 var value = symbol.value;
7634                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7635                 return value;
7636             })())), "})()");
7637         })(l145.fvalue(pv, v794));
7638     })();
7639 })), cdr: (function(){
7640     var symbol = l274;
7641     var value = symbol.value;
7642     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7643     return value;
7644 })()}));
7645 var l304 = {name: "STRING-LENGTH"};
7646 ((l274).value = ({car: l44.fvalue(pv, l304, (function (values,v796){
7647     checkArgs(arguments, 2);
7648     var i;
7649     return (function(){
7650         return (function(v797){
7651             return l134.fvalue(values, "(function(){", (function(){
7652                 var symbol = l133;
7653                 var value = symbol.value;
7654                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7655                 return value;
7656             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v797, ";", (function(){
7657                 var symbol = l133;
7658                 var value = symbol.value;
7659                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7660                 return value;
7661             })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7662                 var symbol = l133;
7663                 var value = symbol.value;
7664                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7665                 return value;
7666             })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7667                 var symbol = l133;
7668                 var value = symbol.value;
7669                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7670                 return value;
7671             })())), l134.fvalue(pv, "return ", "x.length", ";", (function(){
7672                 var symbol = l133;
7673                 var value = symbol.value;
7674                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7675                 return value;
7676             })())), "})()");
7677         })(l145.fvalue(pv, v796));
7678     })();
7679 })), cdr: (function(){
7680     var symbol = l274;
7681     var value = symbol.value;
7682     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7683     return value;
7684 })()}));
7685 var l305 = {name: "SLICE"};
7686 ((l274).value = ({car: l44.fvalue(pv, l305, (function (values,v798,v799,v800){
7687     checkArgsAtLeast(arguments, 3);
7688     checkArgsAtMost(arguments, 4);
7689     switch(arguments.length-1){
7690     case 2:
7691     v800=l3.value;
7692     default: break;
7693     }
7694     var i;
7695     return (function(){
7696         return l134.fvalue(values, "(function(){", (function(){
7697             var symbol = l133;
7698             var value = symbol.value;
7699             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7700             return value;
7701         })(), l143.fvalue(pv, "var str = ", l145.fvalue(pv, v798), ";", (function(){
7702             var symbol = l133;
7703             var value = symbol.value;
7704             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7705             return value;
7706         })(), "var a = ", l145.fvalue(pv, v799), ";", (function(){
7707             var symbol = l133;
7708             var value = symbol.value;
7709             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7710             return value;
7711         })(), "var b;", (function(){
7712             var symbol = l133;
7713             var value = symbol.value;
7714             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7715             return value;
7716         })(), (v800 !== l3.value ? l134.fvalue(pv, "b = ", l145.fvalue(pv, v800), ";", (function(){
7717             var symbol = l133;
7718             var value = symbol.value;
7719             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7720             return value;
7721         })()) : ""), "return str.slice(a,b);", (function(){
7722             var symbol = l133;
7723             var value = symbol.value;
7724             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7725             return value;
7726         })()), "})()");
7727     })();
7728 })), cdr: (function(){
7729     var symbol = l274;
7730     var value = symbol.value;
7731     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7732     return value;
7733 })()}));
7734 var l306 = {name: "CHAR"};
7735 ((l274).value = ({car: l44.fvalue(pv, l306, (function (values,v801,v802){
7736     checkArgs(arguments, 3);
7737     var i;
7738     return (function(){
7739         return (function(v803,v804){
7740             return l134.fvalue(values, "(function(){", (function(){
7741                 var symbol = l133;
7742                 var value = symbol.value;
7743                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7744                 return value;
7745             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "string", " = ", v803, ";", (function(){
7746                 var symbol = l133;
7747                 var value = symbol.value;
7748                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7749                 return value;
7750             })()), l134.fvalue(pv, "var ", "index", " = ", v804, ";", (function(){
7751                 var symbol = l133;
7752                 var value = symbol.value;
7753                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7754                 return value;
7755             })()), l134.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7756                 var symbol = l133;
7757                 var value = symbol.value;
7758                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7759                 return value;
7760             })(), l143.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7761                 var symbol = l133;
7762                 var value = symbol.value;
7763                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7764                 return value;
7765             })())), l134.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){
7766                 var symbol = l133;
7767                 var value = symbol.value;
7768                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7769                 return value;
7770             })(), l143.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
7771                 var symbol = l133;
7772                 var value = symbol.value;
7773                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7774                 return value;
7775             })())), l134.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){
7776                 var symbol = l133;
7777                 var value = symbol.value;
7778                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7779                 return value;
7780             })())), "})()");
7781         })(l145.fvalue(pv, v801),l145.fvalue(pv, v802));
7782     })();
7783 })), cdr: (function(){
7784     var symbol = l274;
7785     var value = symbol.value;
7786     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7787     return value;
7788 })()}));
7789 ((l274).value = ({car: l44.fvalue(pv, l72, (function (values,v805,v806){
7790     checkArgs(arguments, 3);
7791     var i;
7792     return (function(){
7793         return (function(v807,v808){
7794             return l134.fvalue(values, "(function(){", (function(){
7795                 var symbol = l133;
7796                 var value = symbol.value;
7797                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7798                 return value;
7799             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "string1", " = ", v807, ";", (function(){
7800                 var symbol = l133;
7801                 var value = symbol.value;
7802                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7803                 return value;
7804             })()), l134.fvalue(pv, "var ", "string2", " = ", v808, ";", (function(){
7805                 var symbol = l133;
7806                 var value = symbol.value;
7807                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7808                 return value;
7809             })()), l134.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){
7810                 var symbol = l133;
7811                 var value = symbol.value;
7812                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7813                 return value;
7814             })(), l143.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
7815                 var symbol = l133;
7816                 var value = symbol.value;
7817                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7818                 return value;
7819             })())), l134.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){
7820                 var symbol = l133;
7821                 var value = symbol.value;
7822                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7823                 return value;
7824             })(), l143.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
7825                 var symbol = l133;
7826                 var value = symbol.value;
7827                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7828                 return value;
7829             })())), l134.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){
7830                 var symbol = l133;
7831                 var value = symbol.value;
7832                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7833                 return value;
7834             })())), "})()");
7835         })(l145.fvalue(pv, v805),l145.fvalue(pv, v806));
7836     })();
7837 })), cdr: (function(){
7838     var symbol = l274;
7839     var value = symbol.value;
7840     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7841     return value;
7842 })()}));
7843 var l307 = {name: "FUNCALL"};
7844 ((l274).value = ({car: l44.fvalue(pv, l307, (function (values,v810){
7845     checkArgsAtLeast(arguments, 2);
7846     var v809= l3.value;
7847     for (var i = arguments.length-1; i>=2; i--)
7848         v809 = {car: arguments[i], cdr:
7849     v809};
7850     var i;
7851     return (function(){
7852         return l134.fvalue(values, "(", l145.fvalue(pv, v810), ")(", l136.fvalue(pv, ({car: ((function(){
7853             var symbol = l172;
7854             var value = symbol.value;
7855             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7856             return value;
7857         })() !== l3.value ? "values" : "pv"), cdr: l73.fvalue(pv, (function(){
7858             var symbol = l145;
7859             var func = symbol.fvalue;
7860             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7861             return func;
7862         })(), v809)}), ", "), ")");
7863     })();
7864 })), cdr: (function(){
7865     var symbol = l274;
7866     var value = symbol.value;
7867     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7868     return value;
7869 })()}));
7870 var l308 = {name: "APPLY"};
7871 ((l274).value = ({car: l44.fvalue(pv, l308, (function (values,v812){
7872     checkArgsAtLeast(arguments, 2);
7873     var v811= l3.value;
7874     for (var i = arguments.length-1; i>=2; i--)
7875         v811 = {car: arguments[i], cdr:
7876     v811};
7877     var i;
7878     return (function(){
7879         return (l12.fvalue(pv, v811) !== l3.value ? l134.fvalue(values, "(", l145.fvalue(pv, v812), ")()") : (function(v813,v814){
7880             return l134.fvalue(values, "(function(){", (function(){
7881                 var symbol = l133;
7882                 var value = symbol.value;
7883                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7884                 return value;
7885             })(), l143.fvalue(pv, "var f = ", l145.fvalue(pv, v812), ";", (function(){
7886                 var symbol = l133;
7887                 var value = symbol.value;
7888                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7889                 return value;
7890             })(), "var args = [", l136.fvalue(pv, ({car: ((function(){
7891                 var symbol = l172;
7892                 var value = symbol.value;
7893                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7894                 return value;
7895             })() !== l3.value ? "values" : "pv"), cdr: l73.fvalue(pv, (function(){
7896                 var symbol = l145;
7897                 var func = symbol.fvalue;
7898                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7899                 return func;
7900             })(), v813)}), ", "), "];", (function(){
7901                 var symbol = l133;
7902                 var value = symbol.value;
7903                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7904                 return value;
7905             })(), "var tail = (", l145.fvalue(pv, v814), ");", (function(){
7906                 var symbol = l133;
7907                 var value = symbol.value;
7908                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7909                 return value;
7910             })(), "while (tail != ", l145.fvalue(pv, l3.value), "){", (function(){
7911                 var symbol = l133;
7912                 var value = symbol.value;
7913                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7914                 return value;
7915             })(), "    args.push(tail.car);", (function(){
7916                 var symbol = l133;
7917                 var value = symbol.value;
7918                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7919                 return value;
7920             })(), "    tail = tail.cdr;", (function(){
7921                 var symbol = l133;
7922                 var value = symbol.value;
7923                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7924                 return value;
7925             })(), "}", (function(){
7926                 var symbol = l133;
7927                 var value = symbol.value;
7928                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7929                 return value;
7930             })(), "return f.apply(this, args);", (function(){
7931                 var symbol = l133;
7932                 var value = symbol.value;
7933                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7934                 return value;
7935             })()), "})()");
7936         })(l87.fvalue(pv, v811),(function(){
7937             var tmp = l86.fvalue(pv, v811);
7938             return tmp === l3.value? l3.value: tmp.car;
7939         })()));
7940     })();
7941 })), cdr: (function(){
7942     var symbol = l274;
7943     var value = symbol.value;
7944     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7945     return value;
7946 })()}));
7947 var l309 = {name: "JS-EVAL"};
7948 ((l274).value = ({car: l44.fvalue(pv, l309, (function (values,v815){
7949     checkArgs(arguments, 2);
7950     var i;
7951     return (function(){
7952         return (function(v816){
7953             return l134.fvalue(values, "(function(){", (function(){
7954                 var symbol = l133;
7955                 var value = symbol.value;
7956                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7957                 return value;
7958             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "string", " = ", v816, ";", (function(){
7959                 var symbol = l133;
7960                 var value = symbol.value;
7961                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7962                 return value;
7963             })()), l134.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7964                 var symbol = l133;
7965                 var value = symbol.value;
7966                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7967                 return value;
7968             })(), l143.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7969                 var symbol = l133;
7970                 var value = symbol.value;
7971                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7972                 return value;
7973             })())), l134.fvalue(pv, "return ", ((function(){
7974                 var symbol = l172;
7975                 var value = symbol.value;
7976                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7977                 return value;
7978             })() !== l3.value ? l134.fvalue(pv, "(function(){", (function(){
7979                 var symbol = l133;
7980                 var value = symbol.value;
7981                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7982                 return value;
7983             })(), l143.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){
7984                 var symbol = l133;
7985                 var value = symbol.value;
7986                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7987                 return value;
7988             })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){
7989                 var symbol = l133;
7990                 var value = symbol.value;
7991                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7992                 return value;
7993             })(), l143.fvalue(pv, "v = [v];", (function(){
7994                 var symbol = l133;
7995                 var value = symbol.value;
7996                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7997                 return value;
7998             })(), "v['multiple-value'] = true;", (function(){
7999                 var symbol = l133;
8000                 var value = symbol.value;
8001                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8002                 return value;
8003             })()), "}", (function(){
8004                 var symbol = l133;
8005                 var value = symbol.value;
8006                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8007                 return value;
8008             })(), "return values.apply(this, v);", (function(){
8009                 var symbol = l133;
8010                 var value = symbol.value;
8011                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8012                 return value;
8013             })()), "})()") : "eval.apply(window, [string])"), ";", (function(){
8014                 var symbol = l133;
8015                 var value = symbol.value;
8016                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8017                 return value;
8018             })())), "})()");
8019         })(l145.fvalue(pv, v815));
8020     })();
8021 })), cdr: (function(){
8022     var symbol = l274;
8023     var value = symbol.value;
8024     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8025     return value;
8026 })()}));
8027 var l310 = {name: "ERROR"};
8028 ((l274).value = ({car: l44.fvalue(pv, l310, (function (values,v817){
8029     checkArgs(arguments, 2);
8030     var i;
8031     return (function(){
8032         return (function(v818){
8033             return l134.fvalue(values, "(function(){", (function(){
8034                 var symbol = l133;
8035                 var value = symbol.value;
8036                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8037                 return value;
8038             })(), l143.fvalue(pv, "throw ", v818, ";", (function(){
8039                 var symbol = l133;
8040                 var value = symbol.value;
8041                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8042                 return value;
8043             })()), "})()");
8044         })(l145.fvalue(pv, v817));
8045     })();
8046 })), cdr: (function(){
8047     var symbol = l274;
8048     var value = symbol.value;
8049     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8050     return value;
8051 })()}));
8052 var l311 = {name: "NEW"};
8053 ((l274).value = ({car: l44.fvalue(pv, l311, (function (values){
8054     checkArgsAtMost(arguments, 1);
8055     var i;
8056     return (function(){
8057         return (function(){
8058             return "{}";
8059         })();
8060     })();
8061 })), cdr: (function(){
8062     var symbol = l274;
8063     var value = symbol.value;
8064     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8065     return value;
8066 })()}));
8067 var l312 = {name: "OBJECTP"};
8068 ((l274).value = ({car: l44.fvalue(pv, l312, (function (values,v819){
8069     checkArgs(arguments, 2);
8070     var i;
8071     return (function(){
8072         return (function(v820){
8073             return l144.fvalue(values, l134.fvalue(pv, "(typeof (", v820, ") === 'object')"));
8074         })(l145.fvalue(pv, v819));
8075     })();
8076 })), cdr: (function(){
8077     var symbol = l274;
8078     var value = symbol.value;
8079     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8080     return value;
8081 })()}));
8082 var l313 = {name: "OGET"};
8083 ((l274).value = ({car: l44.fvalue(pv, l313, (function (values,v821,v822){
8084     checkArgs(arguments, 3);
8085     var i;
8086     return (function(){
8087         return (function(v823,v824){
8088             return l134.fvalue(values, "(function(){", (function(){
8089                 var symbol = l133;
8090                 var value = symbol.value;
8091                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8092                 return value;
8093             })(), l143.fvalue(pv, "var tmp = ", "(", v823, ")[", v824, "];", (function(){
8094                 var symbol = l133;
8095                 var value = symbol.value;
8096                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8097                 return value;
8098             })(), "return tmp == undefined? ", l145.fvalue(pv, l3.value), ": tmp ;", (function(){
8099                 var symbol = l133;
8100                 var value = symbol.value;
8101                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8102                 return value;
8103             })()), "})()");
8104         })(l145.fvalue(pv, v821),l145.fvalue(pv, v822));
8105     })();
8106 })), cdr: (function(){
8107     var symbol = l274;
8108     var value = symbol.value;
8109     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8110     return value;
8111 })()}));
8112 var l314 = {name: "OSET"};
8113 ((l274).value = ({car: l44.fvalue(pv, l314, (function (values,v825,v826,v827){
8114     checkArgs(arguments, 4);
8115     var i;
8116     return (function(){
8117         return (function(v828,v829,v830){
8118             return l134.fvalue(values, "((", v828, ")[", v829, "] = ", v830, ")");
8119         })(l145.fvalue(pv, v825),l145.fvalue(pv, v826),l145.fvalue(pv, v827));
8120     })();
8121 })), cdr: (function(){
8122     var symbol = l274;
8123     var value = symbol.value;
8124     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8125     return value;
8126 })()}));
8127 var l315 = {name: "IN"};
8128 ((l274).value = ({car: l44.fvalue(pv, l315, (function (values,v831,v832){
8129     checkArgs(arguments, 3);
8130     var i;
8131     return (function(){
8132         return (function(v833,v834){
8133             return l144.fvalue(values, l134.fvalue(pv, "((", v833, ") in (", v834, "))"));
8134         })(l145.fvalue(pv, v831),l145.fvalue(pv, v832));
8135     })();
8136 })), cdr: (function(){
8137     var symbol = l274;
8138     var value = symbol.value;
8139     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8140     return value;
8141 })()}));
8142 var l316 = {name: "FUNCTIONP"};
8143 ((l274).value = ({car: l44.fvalue(pv, l316, (function (values,v835){
8144     checkArgs(arguments, 2);
8145     var i;
8146     return (function(){
8147         return (function(v836){
8148             return l144.fvalue(values, l134.fvalue(pv, "(typeof ", v836, " == 'function')"));
8149         })(l145.fvalue(pv, v835));
8150     })();
8151 })), cdr: (function(){
8152     var symbol = l274;
8153     var value = symbol.value;
8154     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8155     return value;
8156 })()}));
8157 var l317 = {name: "WRITE-STRING"};
8158 ((l274).value = ({car: l44.fvalue(pv, l317, (function (values,v837){
8159     checkArgs(arguments, 2);
8160     var i;
8161     return (function(){
8162         return (function(v838){
8163             return l134.fvalue(values, "(function(){", (function(){
8164                 var symbol = l133;
8165                 var value = symbol.value;
8166                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8167                 return value;
8168             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v838, ";", (function(){
8169                 var symbol = l133;
8170                 var value = symbol.value;
8171                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8172                 return value;
8173             })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
8174                 var symbol = l133;
8175                 var value = symbol.value;
8176                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8177                 return value;
8178             })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
8179                 var symbol = l133;
8180                 var value = symbol.value;
8181                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8182                 return value;
8183             })())), l134.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){
8184                 var symbol = l133;
8185                 var value = symbol.value;
8186                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8187                 return value;
8188             })())), "})()");
8189         })(l145.fvalue(pv, v837));
8190     })();
8191 })), cdr: (function(){
8192     var symbol = l274;
8193     var value = symbol.value;
8194     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8195     return value;
8196 })()}));
8197 var l318 = {name: "MAKE-ARRAY"};
8198 ((l274).value = ({car: l44.fvalue(pv, l318, (function (values,v839){
8199     checkArgs(arguments, 2);
8200     var i;
8201     return (function(){
8202         return (function(v840){
8203             return l134.fvalue(values, "(function(){", (function(){
8204                 var symbol = l133;
8205                 var value = symbol.value;
8206                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8207                 return value;
8208             })(), l143.fvalue(pv, "var r = [];", (function(){
8209                 var symbol = l133;
8210                 var value = symbol.value;
8211                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8212                 return value;
8213             })(), "for (var i = 0; i < ", v840, "; i++)", (function(){
8214                 var symbol = l133;
8215                 var value = symbol.value;
8216                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8217                 return value;
8218             })(), l143.fvalue(pv, "r.push(", l145.fvalue(pv, l3.value), ");", (function(){
8219                 var symbol = l133;
8220                 var value = symbol.value;
8221                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8222                 return value;
8223             })()), "return r;", (function(){
8224                 var symbol = l133;
8225                 var value = symbol.value;
8226                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8227                 return value;
8228             })()), "})()");
8229         })(l145.fvalue(pv, v839));
8230     })();
8231 })), cdr: (function(){
8232     var symbol = l274;
8233     var value = symbol.value;
8234     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8235     return value;
8236 })()}));
8237 var l319 = {name: "ARRAYP"};
8238 ((l274).value = ({car: l44.fvalue(pv, l319, (function (values,v841){
8239     checkArgs(arguments, 2);
8240     var i;
8241     return (function(){
8242         return (function(v842){
8243             return l144.fvalue(values, l134.fvalue(pv, "(function(){", (function(){
8244                 var symbol = l133;
8245                 var value = symbol.value;
8246                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8247                 return value;
8248             })(), l143.fvalue(pv, "var x = ", v842, ";", (function(){
8249                 var symbol = l133;
8250                 var value = symbol.value;
8251                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8252                 return value;
8253             })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
8254         })(l145.fvalue(pv, v841));
8255     })();
8256 })), cdr: (function(){
8257     var symbol = l274;
8258     var value = symbol.value;
8259     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8260     return value;
8261 })()}));
8262 var l320 = {name: "AREF"};
8263 ((l274).value = ({car: l44.fvalue(pv, l320, (function (values,v843,v844){
8264     checkArgs(arguments, 3);
8265     var i;
8266     return (function(){
8267         return (function(v845,v846){
8268             return l134.fvalue(values, "(function(){", (function(){
8269                 var symbol = l133;
8270                 var value = symbol.value;
8271                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8272                 return value;
8273             })(), l143.fvalue(pv, "var x = ", "(", v845, ")[", v846, "];", (function(){
8274                 var symbol = l133;
8275                 var value = symbol.value;
8276                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8277                 return value;
8278             })(), "if (x === undefined) throw 'Out of range';", (function(){
8279                 var symbol = l133;
8280                 var value = symbol.value;
8281                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8282                 return value;
8283             })(), "return x;", (function(){
8284                 var symbol = l133;
8285                 var value = symbol.value;
8286                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8287                 return value;
8288             })()), "})()");
8289         })(l145.fvalue(pv, v843),l145.fvalue(pv, v844));
8290     })();
8291 })), cdr: (function(){
8292     var symbol = l274;
8293     var value = symbol.value;
8294     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8295     return value;
8296 })()}));
8297 var l321 = {name: "ASET"};
8298 ((l274).value = ({car: l44.fvalue(pv, l321, (function (values,v847,v848,v849){
8299     checkArgs(arguments, 4);
8300     var i;
8301     return (function(){
8302         return (function(v850,v851,v852){
8303             return l134.fvalue(values, "(function(){", (function(){
8304                 var symbol = l133;
8305                 var value = symbol.value;
8306                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8307                 return value;
8308             })(), l143.fvalue(pv, "var x = ", v850, ";", (function(){
8309                 var symbol = l133;
8310                 var value = symbol.value;
8311                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8312                 return value;
8313             })(), "var i = ", v851, ";", (function(){
8314                 var symbol = l133;
8315                 var value = symbol.value;
8316                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8317                 return value;
8318             })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
8319                 var symbol = l133;
8320                 var value = symbol.value;
8321                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8322                 return value;
8323             })(), "return x[i] = ", v852, ";", (function(){
8324                 var symbol = l133;
8325                 var value = symbol.value;
8326                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8327                 return value;
8328             })()), "})()");
8329         })(l145.fvalue(pv, v847),l145.fvalue(pv, v848),l145.fvalue(pv, v849));
8330     })();
8331 })), cdr: (function(){
8332     var symbol = l274;
8333     var value = symbol.value;
8334     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8335     return value;
8336 })()}));
8337 var l322 = {name: "GET-UNIX-TIME"};
8338 ((l274).value = ({car: l44.fvalue(pv, l322, (function (values){
8339     checkArgsAtMost(arguments, 1);
8340     var i;
8341     return (function(){
8342         return (function(){
8343             return l134.fvalue(values, "(Math.round(new Date() / 1000))");
8344         })();
8345     })();
8346 })), cdr: (function(){
8347     var symbol = l274;
8348     var value = symbol.value;
8349     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8350     return value;
8351 })()}));
8352 var l323 = {name: "VALUES-ARRAY"};
8353 ((l274).value = ({car: l44.fvalue(pv, l323, (function (values,v853){
8354     checkArgs(arguments, 2);
8355     var i;
8356     return (function(){
8357         return (function(v854){
8358             return ((function(){
8359                 var symbol = l172;
8360                 var value = symbol.value;
8361                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8362                 return value;
8363             })() !== l3.value ? l134.fvalue(values, "values.apply(this, ", v854, ")") : l134.fvalue(values, "pv.apply(this, ", v854, ")"));
8364         })(l145.fvalue(pv, v853));
8365     })();
8366 })), cdr: (function(){
8367     var symbol = l274;
8368     var value = symbol.value;
8369     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8370     return value;
8371 })()}));
8372 ((l274).value = ({car: l44.fvalue(pv, l142, (function (values){
8373     var v855= l3.value;
8374     for (var i = arguments.length-1; i>=1; i--)
8375         v855 = {car: arguments[i], cdr:
8376     v855};
8377     var i;
8378     return (function(){
8379         return ((function(){
8380             var symbol = l172;
8381             var value = symbol.value;
8382             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8383             return value;
8384         })() !== l3.value ? l134.fvalue(values, "values(", l136.fvalue(pv, l73.fvalue(pv, (function(){
8385             var symbol = l145;
8386             var func = symbol.fvalue;
8387             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8388             return func;
8389         })(), v855), ", "), ")") : l134.fvalue(values, "pv(", l136.fvalue(pv, l73.fvalue(pv, (function(){
8390             var symbol = l145;
8391             var func = symbol.fvalue;
8392             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8393             return func;
8394         })(), v855), ", "), ")"));
8395     })();
8396 })), cdr: (function(){
8397     var symbol = l274;
8398     var value = symbol.value;
8399     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8400     return value;
8401 })()}));
8402 (function(){
8403     (l198).fvalue = (function(v858){
8404         ((v858)["fname"] = "MACRO");
8405         return v858;
8406     })((function (values,v856){
8407         checkArgs(arguments, 2);
8408         var i;
8409         return (function(){
8410             return (((function(){
8411                 var tmp = v856;
8412                 return (typeof tmp == 'object' && 'name' in tmp);
8413             })()?l4.value: l3.value) !== l3.value ? (function(v857){
8414                 return (((l175.fvalue(pv, v857) === l198)?l4.value: l3.value) !== l3.value ? v857 : l3.value);
8415             })(l187.fvalue(pv, v856, (function(){
8416                 var symbol = l188;
8417                 var value = symbol.value;
8418                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8419                 return value;
8420             })(), l104)) : l3.value);
8421         })();
8422     }));
8423     return l198;
8424 })();
8425 var l324 = {name: "LS-MACROEXPAND-1"};
8426 (function(){
8427     (l324).fvalue = (function(v863){
8428         ((v863)["fname"] = "LS-MACROEXPAND-1");
8429         return v863;
8430     })((function (values,v859){
8431         checkArgs(arguments, 2);
8432         var i;
8433         return (function(){
8434             return (function(v860){
8435                 return (v860 !== l3.value ? (function(v861){
8436                     (l59.fvalue(pv, v861) !== l3.value ? (function(v862){
8437                         l178.fvalue(pv, v860, v862);
8438                         return (v861 = v862);
8439                     })(l249.fvalue(pv, v861)) : l3.value);
8440                     return (function(){
8441                         var f = v861;
8442                         var args = [values];
8443                         var tail = ((function(){
8444                             var tmp = v859;
8445                             return tmp === l3.value? l3.value: tmp.cdr;
8446                         })());
8447                         while (tail != l3.value){
8448                             args.push(tail.car);
8449                             tail = tail.cdr;
8450                         }
8451                         return f.apply(this, args);
8452                     })();
8453                 })(l176.fvalue(pv, v860)) : v859);
8454             })(l198.fvalue(pv, (function(){
8455                 var tmp = v859;
8456                 return tmp === l3.value? l3.value: tmp.car;
8457             })()));
8458         })();
8459     }));
8460     return l324;
8461 })();
8462 var l325 = {name: "COMPILE-FUNCALL"};
8463 var l326 = {name: "G902"};
8464 (function(){
8465     (l325).fvalue = (function(v868){
8466         ((v868)["fname"] = "COMPILE-FUNCALL");
8467         return v868;
8468     })((function (values,v864,v865){
8469         checkArgs(arguments, 3);
8470         var i;
8471         return (function(){
8472             return (function(){
8473                 var v866 = ((function(){
8474                     var symbol = l172;
8475                     var value = symbol.value;
8476                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8477                     return value;
8478                 })() !== l3.value ? "values" : "pv");
8479                 var v867 = l134.fvalue(pv, "(", l136.fvalue(pv, ({car: v866, cdr: l73.fvalue(pv, (function(){
8480                     var symbol = l145;
8481                     var func = symbol.fvalue;
8482                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8483                     return func;
8484                 })(), v865)}), ", "), ")");
8485                 return (l243.fvalue(pv, v864) !== l3.value ? l134.fvalue(values, l243.fvalue(pv, v864), v867) : ((((function(){
8486                     var tmp = v864;
8487                     return (typeof tmp == 'object' && 'name' in tmp);
8488                 })()?l4.value: l3.value) !== l3.value ? (((l122.fvalue(pv, v864) === l113.fvalue(pv, "COMMON-LISP"))?l4.value: l3.value) !== l3.value ? (function(){
8489                     var symbol = l326;
8490                     var value = symbol.value;
8491                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8492                     return value;
8493                 })() : l3.value) : l3.value) !== l3.value ? l134.fvalue(values, l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, v864))), ".fvalue", v867) : l134.fvalue(values, l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l104), l44.fvalue(pv, v864))), v867)));
8494             })();
8495         })();
8496     }));
8497     return l325;
8498 })();
8499 (function(){
8500     (l229).fvalue = (function(v871){
8501         ((v871)["fname"] = "LS-COMPILE-BLOCK");
8502         return v871;
8503     })((function (values,v869,v870){
8504         checkArgsAtLeast(arguments, 2);
8505         checkArgsAtMost(arguments, 3);
8506         switch(arguments.length-1){
8507         case 1:
8508         v870=l3.value;
8509         default: break;
8510         }
8511         var i;
8512         return (function(){
8513             return (v870 !== l3.value ? l134.fvalue(values, l229.fvalue(pv, l87.fvalue(pv, v869)), "return ", l145.fvalue(pv, (function(){
8514                 var tmp = l86.fvalue(pv, v869);
8515                 return tmp === l3.value? l3.value: tmp.car;
8516             })(), (function(){
8517                 var symbol = l172;
8518                 var value = symbol.value;
8519                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8520                 return value;
8521             })()), ";") : l137.fvalue(values, l90.fvalue(pv, (function(){
8522                 var symbol = l195;
8523                 var func = symbol.fvalue;
8524                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8525                 return func;
8526             })(), l73.fvalue(pv, (function(){
8527                 var symbol = l145;
8528                 var func = symbol.fvalue;
8529                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8530                 return func;
8531             })(), v869)), l134.fvalue(pv, ";", (function(){
8532                 var symbol = l133;
8533                 var value = symbol.value;
8534                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8535                 return value;
8536             })())));
8537         })();
8538     }));
8539     return l229;
8540 })();
8541 (function(){
8542     (l145).fvalue = (function(v881){
8543         ((v881)["fname"] = "LS-COMPILE");
8544         return v881;
8545     })((function (values,v872,v873){
8546         checkArgsAtLeast(arguments, 2);
8547         checkArgsAtMost(arguments, 3);
8548         switch(arguments.length-1){
8549         case 1:
8550         v873=l3.value;
8551         default: break;
8552         }
8553         var i;
8554         return (function(){
8555             return (function(v874){
8556                 try {
8557                     var tmp;
8558                     tmp = l172.value;
8559                     l172.value = v874;
8560                     v874 = tmp;
8561                     return (((function(){
8562                         var tmp = v872;
8563                         return (typeof tmp == 'object' && 'name' in tmp);
8564                     })()?l4.value: l3.value) !== l3.value ? (function(v875){
8565                         return ((v875 !== l3.value ? l27.fvalue(pv, l88.fvalue(pv, l202, l177.fvalue(pv, v875))) : l3.value) !== l3.value ? l176.fvalue(values, v875) : ((function(v876){
8566                             return (v876 !== l3.value ? v876 : l88.fvalue(pv, l204, l177.fvalue(pv, v875)));
8567                         })(l121.fvalue(pv, v872)) !== l3.value ? l134.fvalue(values, l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, v872))), ".value") : l145.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l296), l44.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, v872)))))));
8568                     })(l187.fvalue(pv, v872, (function(){
8569                         var symbol = l188;
8570                         var value = symbol.value;
8571                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8572                         return value;
8573                     })(), l105)) : (l81.fvalue(pv, v872) !== l3.value ? l17.fvalue(values, v872) : (((typeof(v872) == "string")?l4.value: l3.value) !== l3.value ? l134.fvalue(values, "\"", l148.fvalue(pv, v872), "\"") : (((function(){
8574                         var x = v872;
8575                         return typeof x === 'object' && 'length' in x;
8576                     })()?l4.value: l3.value) !== l3.value ? l238.fvalue(values, v872) : (l59.fvalue(pv, v872) !== l3.value ? (function(v877,v878){
8577                         return (l97.fvalue(pv, v877, (function(){
8578                             var symbol = l206;
8579                             var value = symbol.value;
8580                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8581                             return value;
8582                         })()) !== l3.value ? (function(v879){
8583                             return (function(){
8584                                 var f = v879;
8585                                 var args = [values];
8586                                 var tail = (v878);
8587                                 while (tail != l3.value){
8588                                     args.push(tail.car);
8589                                     tail = tail.cdr;
8590                                 }
8591                                 return f.apply(this, args);
8592                             })();
8593                         })(l40.fvalue(pv, l97.fvalue(pv, v877, (function(){
8594                             var symbol = l206;
8595                             var value = symbol.value;
8596                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8597                             return value;
8598                         })()))) : ((l97.fvalue(pv, v877, (function(){
8599                             var symbol = l274;
8600                             var value = symbol.value;
8601                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8602                             return value;
8603                         })()) !== l3.value ? l27.fvalue(pv, l200.fvalue(pv, v877, l104, l203)) : l3.value) !== l3.value ? (function(v880){
8604                             return (function(){
8605                                 var f = v880;
8606                                 var args = [values];
8607                                 var tail = (v878);
8608                                 while (tail != l3.value){
8609                                     args.push(tail.car);
8610                                     tail = tail.cdr;
8611                                 }
8612                                 return f.apply(this, args);
8613                             })();
8614                         })(l40.fvalue(pv, l97.fvalue(pv, v877, (function(){
8615                             var symbol = l274;
8616                             var value = symbol.value;
8617                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8618                             return value;
8619                         })()))) : (l198.fvalue(pv, v877) !== l3.value ? l145.fvalue(values, l324.fvalue(pv, v872), v873) : l325.fvalue(values, v877, v878))));
8620                     })((function(){
8621                         var tmp = v872;
8622                         return tmp === l3.value? l3.value: tmp.car;
8623                     })(),(function(){
8624                         var tmp = v872;
8625                         return tmp === l3.value? l3.value: tmp.cdr;
8626                     })()) : (function(){
8627                         throw "How should I compile this?";
8628                     })())))));
8629                 }
8630                 finally {
8631                     l172.value = v874;
8632                 }
8633             })(v873);
8634         })();
8635     }));
8636     return l145;
8637 })();
8638 var l327 = {name: "LS-COMPILE-TOPLEVEL"};
8639 (function(){
8640     (l327).fvalue = (function(v888){
8641         ((v888)["fname"] = "LS-COMPILE-TOPLEVEL");
8642         return v888;
8643     })((function (values,v882,v883){
8644         checkArgsAtLeast(arguments, 2);
8645         checkArgsAtMost(arguments, 3);
8646         switch(arguments.length-1){
8647         case 1:
8648         v883=l3.value;
8649         default: break;
8650         }
8651         var i;
8652         return (function(){
8653             return (function(v884){
8654                 try {
8655                     var tmp;
8656                     tmp = l193.value;
8657                     l193.value = v884;
8658                     v884 = tmp;
8659                     return ((((function(){
8660                         var tmp = v882;
8661                         return (typeof tmp == 'object' && 'car' in tmp);
8662                     })()?l4.value: l3.value) !== l3.value ? (((function(){
8663                         var tmp = v882;
8664                         return tmp === l3.value? l3.value: tmp.car;
8665                     })() === l248)?l4.value: l3.value) : l3.value) !== l3.value ? (function(v886){
8666                         return l136.fvalue(values, l90.fvalue(pv, (function(){
8667                             var symbol = l195;
8668                             var func = symbol.fvalue;
8669                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8670                             return func;
8671                         })(), v886));
8672                     })(l73.fvalue(pv, (function (values,v885){
8673                         checkArgs(arguments, 2);
8674                         var i;
8675                         return l327.fvalue(values, v885, l4.value);
8676                     }), (function(){
8677                         var tmp = v882;
8678                         return tmp === l3.value? l3.value: tmp.cdr;
8679                     })())) : (function(v887){
8680                         return l134.fvalue(values, l137.fvalue(pv, l196.fvalue(pv), l134.fvalue(pv, ";", (function(){
8681                             var symbol = l133;
8682                             var value = symbol.value;
8683                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8684                             return value;
8685                         })())), (v887 !== l3.value ? l134.fvalue(pv, v887, ";", (function(){
8686                             var symbol = l133;
8687                             var value = symbol.value;
8688                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8689                             return value;
8690                         })()) : ""));
8691                     })(l145.fvalue(pv, v882, v883)));
8692                 }
8693                 finally {
8694                     l193.value = v884;
8695                 }
8696             })(l3.value);
8697         })();
8698     }));
8699     return l327;
8700 })();
8701 (function(){
8702     (l249).fvalue = (function(v890){
8703         ((v890)["fname"] = "EVAL");
8704         return v890;
8705     })((function (values,v889){
8706         checkArgs(arguments, 2);
8707         var i;
8708         return (function(){
8709             return (function(){
8710                 var string = l327.fvalue(pv, v889, l4.value);
8711                 if (typeof string != 'string')
8712                     throw 'The value ' + string + ' is not a type string.';
8713                 return (function(){
8714                     var v = eval.apply(window, [string]);
8715                     if (typeof v !== 'object' || !('multiple-value' in v)){
8716                         v = [v];
8717                         v['multiple-value'] = true;
8718                     }
8719                     return values.apply(this, v);
8720                 })();
8721             })();
8722         })();
8723     }));
8724     return l249;
8725 })();
8726 var l328 = {name: "&BODY"};
8727 var l329 = QIList(l211,l212,l210,l328,l20,l15,l123,l61,l62,l21,l22,l23,l285,l287,l19,l19,l284,l286,l54,l64,l308,l320,l319,l97,l45,l184,l18,l18,l87,l32,l38,l36,l33,l30,l30,l52,l261,l34,l37,l35,l31,l31,l306,l79,l80,l78,l51,l28,l29,l76,l77,l47,l2,l9,l11,l1,l8,l93,l92,l101,l68,l69,l103,l49,l50,l53,l299,l26,l300,l310,l249,l96,l131,l100,l113,l126,l39,l244,l42,l295,l307,l104,l316,l16,l132,l268,l75,l208,l124,l46,l81,l81,l130,l121,l245,l5,l86,l71,l253,l256,l109,l44,l59,l318,l110,l293,l73,l88,l83,l281,l106,l270,l107,l271,l3,l27,l85,l84,l12,l288,l55,l114,l116,l112,l165,l82,l147,l150,l205,l56,l57,l248,l67,l48,l167,l89,l90,l91,l13,l260,l65,l66,l290,l291,l40,l231,l232,l95,l303,l98,l99,l302,l94,l240,l294,l122,l297,l296,l292,l4,l267,l41,l262,l25,l7,l269,l142,l141,l105,l149,l6,l102,l317,l24,l3);
8728 l131.fvalue(values, l329);
8729 ((l123).value = (function(){
8730     var symbol = l119;
8731     var value = symbol.value;
8732     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8733     return value;
8734 })());
8735 (function(){
8736     var string = "var lisp";
8737     if (typeof string != 'string')
8738         throw 'The value ' + string + ' is not a type string.';
8739     return (function(){
8740         var v = eval.apply(window, [string]);
8741         if (typeof v !== 'object' || !('multiple-value' in v)){
8742             v = [v];
8743             v['multiple-value'] = true;
8744         }
8745         return values.apply(this, v);
8746     })();
8747 })();
8748 (lisp = {});
8749 (lisp.read = (function(){
8750     var symbol = l171;
8751     var func = symbol.fvalue;
8752     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8753     return func;
8754 })());
8755 (lisp.print = (function(){
8756     var symbol = l147;
8757     var func = symbol.fvalue;
8758     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8759     return func;
8760 })());
8761 (lisp.eval = (function(){
8762     var symbol = l249;
8763     var func = symbol.fvalue;
8764     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8765     return func;
8766 })());
8767 (lisp.compile = (function (values,v891){
8768     checkArgs(arguments, 2);
8769     var i;
8770     return l327.fvalue(values, v891, l4.value);
8771 }));
8772 (lisp.evalString = (function (values,v892){
8773     checkArgs(arguments, 2);
8774     var i;
8775     return l249.fvalue(values, l171.fvalue(pv, v892));
8776 }));
8777 (lisp.compileString = (function (values,v893){
8778     checkArgs(arguments, 2);
8779     var i;
8780     return l327.fvalue(values, l171.fvalue(pv, v893), l4.value);
8781 }));
8782 var l330 = QIList(QIList(l328,"l328"),QIList(l327,"l327"),QIList(l326,"l326"),QIList(l325,"l325"),QIList(l324,"l324"),QIList(l323,"l323"),QIList(l322,"l322"),QIList(l321,"l321"),QIList(l320,"l320"),QIList(l319,"l319"),QIList(l318,"l318"),QIList(l317,"l317"),QIList(l316,"l316"),QIList(l315,"l315"),QIList(l314,"l314"),QIList(l313,"l313"),QIList(l312,"l312"),QIList(l311,"l311"),QIList(l310,"l310"),QIList(l309,"l309"),QIList(l308,"l308"),QIList(l307,"l307"),QIList(l306,"l306"),QIList(l305,"l305"),QIList(l304,"l304"),QIList(l303,"l303"),QIList(l302,"l302"),QIList(l301,"l301"),QIList(l300,"l300"),QIList(l299,"l299"),QIList(l298,"l298"),QIList(l297,"l297"),QIList(l296,"l296"),QIList(l295,"l295"),QIList(l294,"l294"),QIList(l293,"l293"),QIList(l292,"l292"),QIList(l291,"l291"),QIList(l290,"l290"),QIList(l289,"l289"),QIList(l288,"l288"),QIList(l287,"l287"),QIList(l286,"l286"),QIList(l285,"l285"),QIList(l284,"l284"),QIList(l283,"l283"),QIList(l282,"l282"),QIList(l281,"l281"),QIList(l280,"l280"),QIList(l279,"l279"),QIList(l278,"l278"),QIList(l277,"l277"),QIList(l276,"l276"),QIList(l275,"l275"),QIList(l274,"l274"),QIList(l273,"l273"),QIList(l272,"l272"),QIList(l271,"l271"),QIList(l270,"l270"),QIList(l269,"l269"),QIList(l268,"l268"),QIList(l267,"l267"),QIList(l266,"l266"),QIList(l265,"l265"),QIList(l264,"l264"),QIList(l263,"l263"),QIList(l262,"l262"),QIList(l261,"l261"),QIList(l260,"l260"),QIList(l259,"l259"),QIList(l258,"l258"),QIList(l257,"l257"),QIList(l256,"l256"),QIList(l255,"l255"),QIList(l254,"l254"),QIList(l253,"l253"),QIList(l252,"l252"),QIList(l251,"l251"),QIList(l250,"l250"),QIList(l249,"l249"),QIList(l248,"l248"),QIList(l247,"l247"),QIList(l246,"l246"),QIList(l245,"l245"),QIList(l244,"l244"),QIList(l243,"l243"),QIList(l242,"l242"),QIList(l241,"l241"),QIList(l240,"l240"),QIList(l239,"l239"),QIList(l238,"l238"),QIList(l237,"l237"),QIList(l236,"l236"),QIList(l235,"l235"),QIList(l234,"l234"),QIList(l233,"l233"),QIList(l232,"l232"),QIList(l231,"l231"),QIList(l230,"l230"),QIList(l229,"l229"),QIList(l228,"l228"),QIList(l227,"l227"),QIList(l226,"l226"),QIList(l225,"l225"),QIList(l224,"l224"),QIList(l223,"l223"),QIList(l222,"l222"),QIList(l221,"l221"),QIList(l220,"l220"),QIList(l219,"l219"),QIList(l218,"l218"),QIList(l217,"l217"),QIList(l216,"l216"),QIList(l215,"l215"),QIList(l214,"l214"),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"),l3);
8783 var l331 = {name: "OP"};
8784 var l332 = {name: "SYM"};
8785 var l333 = {name: "X"};
8786 var l334 = {name: "ARGS"};
8787 var l335 = {name: "BODY"};
8788 var l336 = {name: "DECLS"};
8789 var l337 = {name: "DECL"};
8790 var l338 = {name: "NAME"};
8791 var l339 = {name: "ARG"};
8792 var l340 = {name: "FORM"};
8793 var l341 = {name: "PACKAGE-DESIGNATOR"};
8794 var l342 = {name: "VALUE-FROM"};
8795 var l343 = {name: "VARIABLES"};
8796 var l344 = {name: "VARLIST"};
8797 var l345 = {name: "ENDLIST"};
8798 var l346 = {name: "V"};
8799 var l347 = {name: "PAIRS"};
8800 var l348 = {name: "ASSIGNMENTS"};
8801 var l349 = {name: "VALUE"};
8802 var l350 = {name: "FORM1"};
8803 var l351 = {name: "RESULT"};
8804 var l352 = {name: "FORMS"};
8805 var l353 = {name: "G"};
8806 var l354 = {name: "CLAUSULES"};
8807 var l355 = {name: "!FORM"};
8808 var l356 = {name: "CLAUSULE"};
8809 var l357 = {name: "ITER"};
8810 var l358 = {name: "G!TO"};
8811 var l359 = {name: "VAR"};
8812 var l360 = {name: "TO"};
8813 var l361 = {name: "G!LIST"};
8814 var l362 = {name: "PLACE"};
8815 var l363 = {name: "DELTA"};
8816 var l364 = {name: "CONDITION"};
8817 var l365 = {name: "DOCSTRING"};
8818 var l366 = QIList(QIList(QIList(l274,l105,l3,QIList(l202,l3),l3),QIList(l264,l105,l3,QIList(l202,l3),l3),QIList(l263,l105,l3,QIList(l202,l3),l3),QIList(l257,l105,l3,QIList(l202,l3),l3),QIList(l246,l105,l3,QIList(l202,l3),l3),QIList(l236,l105,l3,QIList(l202,l3),l3),QIList(l235,l105,l3,QIList(l202,l3),l3),QIList(l209,l105,l3,QIList(l202,l3),l3),QIList(l206,l105,l3,QIList(l202,l3),l3),QIList(l193,l105,l3,QIList(l202,l3),l3),QIList(l189,l105,l3,QIList(l202,l3),l3),QIList(l188,l105,l3,QIList(l202,l3),l3),QIList(l172,l105,l3,QIList(l202,l3),l3),QIList(l166,l105,l3,QIList(l202,l3),l3),QIList(l133,l105,l3,QIList(l202,l3),l3),QIList(l123,l105,l3,QIList(l202,l3),l3),QIList(l120,l105,l3,QIList(l202,l3),l3),QIList(l119,l105,l3,QIList(l202,l3),l3),QIList(l118,l105,l3,QIList(l202,l3),l3),QIList(l108,l105,l3,QIList(l202,l3),l3),QIList(l15,l105,l3,QIList(l202,l3),l3),QIList(l4,l105,l3,QIList(l202,l204,l3),l3),QIList(l3,l105,l3,QIList(l202,l204,l3),l3),l3),QIList(QIList(l283,l198,QIList(l104,QIList(l5,QIList(l331,l332,l3),QIList(l168,QIList(l275,QIList(l170,l331,l3),QIList(l333,l211,l334,l3),QIList(l253,QIList(QIList(l334,QIList(l28,l333,l334,l3),l3),l3),QIList(l279,l334,QIList(l144,QIList(l282,l334,QIList(l170,l332,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l279,l198,QIList(l104,QIList(l5,QIList(l334,l211,l335,l3),QIList(l7,QIList(l292,l334,l3),QIList(l310,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l3),l3),QIList(l168,QIList(l278,QIList(l170,l334,l3),QIList(l5,QIList(QIList(l170,l334,l3),l3),QIList(l134,"return ",QIList(l169,l335,l3),";",l133,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l277,l198,QIList(l104,QIList(l5,QIList(l336,l211,l335,l3),QIList(l168,QIList(l146,QIList(l169,QIList(l73,QIList(l5,QIList(l337,l3),QIList(l168,QIList(l134,"var ",QIList(l170,QIList(l39,l337,l3),l3)," = ",QIList(l170,QIList(l41,l337,l3),l3),";",l133,l3),l3),l3),l336,l3),l3),QIList(l169,QIList(l73,QIList(l5,QIList(l337,l3),QIList(l168,QIList(l134,"if (typeof ",QIList(l170,QIList(l39,l337,l3),l3)," != '",QIList(l170,QIList(l40,l337,l3),l3),"')",l133,QIList(l143,"throw 'The value ' + ",QIList(l170,QIList(l39,l337,l3),l3)," + ' is not a type ",QIList(l170,QIList(l40,l337,l3),l3),".';",l133,l3),l3),l3),l3),l336,l3),l3),QIList(l134,"return ",QIList(l248,QIList(l169,l335,l3),l3),";",l133,l3),l3),l3),l3),l3),l3,l3),QIList(l276,l198,QIList(l104,QIList(l5,QIList(l338,l334,l211,l335,l3),QIList(l168,QIList(l248,QIList(l275,QIList(l170,l338,l3),QIList(l170,l334,l3),QIList(l253,QIList(l170,QIList(l73,QIList(l5,QIList(l339,l3),QIList(l168,QIList(QIList(l170,l339,l3),QIList(l145,QIList(l170,l339,l3),l3),l3),l3),l3),l334,l3),l3),QIList(l169,l335,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l275,l198,QIList(l104,QIList(l5,QIList(l338,l334,l211,l335,l3),QIList(l168,QIList(l48,QIList(l44,QIList(l167,QIList(l170,l338,l3),l3),QIList(l5,QIList(l170,l334,l3),QIList(l184,QIList(l170,l338,l3),QIList(l169,l335,l3),l3),l3),l3),l274,l3),l3),l3),l3),l3,l3),QIList(l168,l198,QIList(l104,QIList(l5,QIList(l340,l3),QIList(l272,l340,l3),l3),l3),l3,l3),QIList(l250,l198,QIList(l104,QIList(l5,QIList(l338,l334,l340,l3),QIList(l168,QIList(l207,QIList(l170,l338,l3),QIList(l170,l334,l3),QIList(l145,QIList(l170,l340,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l207,l198,QIList(l104,QIList(l5,QIList(l338,l334,l211,l335,l3),QIList(l168,QIList(l48,QIList(l44,QIList(l167,QIList(l170,l338,l3),l3),QIList(l5,QIList(l170,l334,l3),QIList(l184,QIList(l170,l338,l3),QIList(l169,l335,l3),l3),l3),l3),l206,l3),l3),l3),l3),l3,l3),QIList(l146,l198,QIList(l104,QIList(l5,QIList(l211,l335,l3),QIList(l168,QIList(l134,"(function(){",l133,QIList(l143,QIList(l169,l335,l3),l3),"})()",l3),l3),l3),l3),l3,l3),QIList(l135,l198,QIList(l104,QIList(l5,QIList(l105,l211,l340,l3),QIList(l168,QIList(l232,QIList(l170,l105,l3),QIList(l134,QIList(l170,l105,l3),QIList(l248,QIList(l169,l340,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l124,l198,QIList(l104,QIList(l5,QIList(l341,l3),QIList(l168,QIList(l247,QIList(l232,l123,QIList(l111,QIList(l170,l341,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l107,l198,QIList(l104,QIList(l5,QIList(l342,l3),QIList(l168,QIList(l270,QIList(l104,l44,l3),QIList(l170,l342,l3),l3),l3),l3),l3),l3,l3),QIList(l106,l198,QIList(l104,QIList(l5,QIList(l343,l342,l211,l335,l3),QIList(l168,QIList(l270,QIList(l5,QIList(l210,QIList(l169,l343,l3),l211,QIList(l170,QIList(l16,l3),l3),l3),QIList(l169,l335,l3),l3),QIList(l170,l342,l3),l3),l3),l3),l3),l3,l3),QIList(l69,l198,QIList(l104,QIList(l5,QIList(l344,l345,l211,l335,l3),QIList(l168,QIList(l184,l3,QIList(l256,QIList(l170,QIList(l73,QIList(l5,QIList(l333,l3),QIList(l44,QIList(l39,l333,l3),QIList(l40,l333,l3),l3),l3),l344,l3),l3),QIList(l14,l4,QIList(l6,QIList(l170,QIList(l30,l345,l3),l3),QIList(l13,QIList(l248,QIList(l170,QIList(l31,l345,l3),l3),l3),l3),l3),QIList(l267,QIList(l169,l335,l3),l3),QIList(l232,QIList(l169,QIList(l308,QIList(l104,l64,l3),QIList(l73,QIList(l5,QIList(l346,l3),QIList(l54,QIList(l29,QIList(l35,l346,l3),l3),QIList(l44,QIList(l39,l346,l3),QIList(l41,l346,l3),l3),l3),l3),l344,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l68,l198,QIList(l104,QIList(l5,QIList(l344,l345,l211,l335,l3),QIList(l168,QIList(l184,l3,QIList(l253,QIList(l170,QIList(l73,QIList(l5,QIList(l333,l3),QIList(l44,QIList(l39,l333,l3),QIList(l40,l333,l3),l3),l3),l344,l3),l3),QIList(l14,l4,QIList(l6,QIList(l170,QIList(l30,l345,l3),l3),QIList(l13,QIList(l248,QIList(l170,QIList(l31,l345,l3),l3),l3),l3),l3),QIList(l267,QIList(l169,l335,l3),l3),QIList(l67,QIList(l169,QIList(l308,QIList(l104,l64,l3),QIList(l73,QIList(l5,QIList(l346,l3),QIList(l54,QIList(l29,QIList(l35,l346,l3),l3),QIList(l44,QIList(l39,l346,l3),QIList(l41,l346,l3),l3),l3),l3),l344,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l67,l198,QIList(l104,QIList(l5,QIList(l211,l347,l3),QIList(l253,QIList(QIList(l348,QIList(l167,l3,l3),l3),l3),QIList(l14,l4,QIList(l51,QIList(QIList(l12,l347,l3),QIList(l13,l3),l3),QIList(QIList(l12,QIList(l31,l347,l3),l3),QIList(l310,"Odd paris in PSETQ",l3),l3),QIList(l4,QIList(l253,QIList(QIList(l105,QIList(l30,l347,l3),l3),QIList(l349,QIList(l33,l347,l3),l3),l3),QIList(l48,QIList(l168,QIList(QIList(l170,l105,l3),QIList(l170,QIList(l16,l3),l3),QIList(l170,l349,l3),l3),l3),l348,l3),QIList(l232,l347,QIList(l35,l347,l3),l3),l3),l3),l3),l3),QIList(l232,l348,QIList(l66,l348,l3),l3),QIList(l168,QIList(l253,QIList(l170,QIList(l73,QIList(l104,l31,l3),l348,l3),l3),QIList(l232,QIList(l169,QIList(l60,QIList(l104,l64,l3),QIList(l73,QIList(l104,l87,l3),l348,l3),QIList(l167,l3,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l57,l198,QIList(l104,QIList(l5,QIList(l350,l351,l211,l335,l3),QIList(l168,QIList(l56,QIList(l248,QIList(l170,l350,l3),QIList(l170,l351,l3),l3),QIList(l169,l335,l3),l3),l3),l3),l3),l3,l3),QIList(l56,l198,QIList(l104,QIList(l5,QIList(l340,l211,l335,l3),QIList(l253,QIList(QIList(l349,QIList(l16,l3),l3),l3),QIList(l168,QIList(l253,QIList(QIList(QIList(l170,l349,l3),QIList(l170,l340,l3),l3),l3),QIList(l169,l335,l3),QIList(l170,l349,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l55,l198,QIList(l104,QIList(l5,QIList(l211,l352,l3),QIList(l51,QIList(QIList(l12,l352,l3),l3,l3),QIList(QIList(l12,QIList(l31,l352,l3),l3),QIList(l30,l352,l3),l3),QIList(l4,QIList(l253,QIList(QIList(l353,QIList(l16,l3),l3),l3),QIList(l168,QIList(l253,QIList(QIList(QIList(l170,l353,l3),QIList(l170,QIList(l30,l352,l3),l3),l3),l3),QIList(l208,QIList(l170,l353,l3),QIList(l170,l353,l3),QIList(l55,QIList(l169,QIList(l31,l352,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l54,l198,QIList(l104,QIList(l5,QIList(l211,l352,l3),QIList(l51,QIList(QIList(l12,l352,l3),l4,l3),QIList(QIList(l12,QIList(l31,l352,l3),l3),QIList(l30,l352,l3),l3),QIList(l4,QIList(l168,QIList(l208,QIList(l170,QIList(l30,l352,l3),l3),QIList(l54,QIList(l169,QIList(l31,l352,l3),l3),l3),l3,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l53,l198,QIList(l104,QIList(l5,QIList(l340,l211,l354,l3),QIList(l168,QIList(l52,QIList(l170,l340,l3),QIList(l169,QIList(l64,l354,QIList(l168,QIList(QIList(l4,QIList(l310,"ECASE expression failed.",l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l52,l198,QIList(l104,QIList(l5,QIList(l340,l211,l354,l3),QIList(l253,QIList(QIList(l355,QIList(l16,l3),l3),l3),QIList(l168,QIList(l253,QIList(QIList(QIList(l170,l355,l3),QIList(l170,l340,l3),l3),l3),QIList(l51,QIList(l169,QIList(l73,QIList(l5,QIList(l356,l3),QIList(l208,QIList(l299,QIList(l30,l356,l3),l4,l3),l356,QIList(l168,QIList(QIList(l26,QIList(l170,l355,l3),QIList(l167,QIList(l170,QIList(l30,l356,l3),l3),l3),l3),QIList(l169,QIList(l31,l356,l3),l3),l3),l3),l3),l3),l354,l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l51,l198,QIList(l104,QIList(l5,QIList(l211,l354,l3),QIList(l208,QIList(l12,l354,l3),l3,QIList(l208,QIList(l299,QIList(l32,l354,l3),l4,l3),QIList(l168,QIList(l248,QIList(l169,QIList(l34,l354,l3),l3),l3),l3),QIList(l168,QIList(l208,QIList(l170,QIList(l32,l354,l3),l3),QIList(l248,QIList(l169,QIList(l34,l354,l3),l3),l3),QIList(l51,QIList(l169,QIList(l31,l354,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l50,l198,QIList(l104,QIList(l5,QIList(l357,l211,l335,l3),QIList(l253,QIList(QIList(l358,QIList(l16,l3),l3),QIList(l359,QIList(l39,l357,l3),l3),QIList(l360,QIList(l40,l357,l3),l3),QIList(l351,QIList(l41,l357,l3),l3),l3),QIList(l168,QIList(l184,l3,QIList(l253,QIList(QIList(QIList(l170,l359,l3),0,l3),QIList(QIList(l170,l358,l3),QIList(l170,l360,l3),l3),l3),QIList(l239,QIList(l285,QIList(l170,l359,l3),QIList(l170,l358,l3),l3),QIList(l267,QIList(l169,l335,l3),l3),QIList(l46,QIList(l170,l359,l3),l3),l3),QIList(l170,l351,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l49,l198,QIList(l104,QIList(l5,QIList(l357,l211,l335,l3),QIList(l253,QIList(QIList(l359,QIList(l39,l357,l3),l3),QIList(l361,QIList(l16,l3),l3),l3),QIList(l168,QIList(l184,l3,QIList(l253,QIList(QIList(QIList(l170,l361,l3),QIList(l170,QIList(l40,l357,l3),l3),l3),QIList(QIList(l170,l359,l3),l3,l3),l3),QIList(l239,QIList(l170,l361,l3),QIList(l232,QIList(l170,l359,l3),QIList(l30,QIList(l170,l361,l3),l3),l3),QIList(l267,QIList(l169,l335,l3),l3),QIList(l232,QIList(l170,l361,l3),QIList(l31,QIList(l170,l361,l3),l3),l3),l3),QIList(l170,QIList(l41,l357,l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l48,l198,QIList(l104,QIList(l5,QIList(l333,l362,l3),QIList(l168,QIList(l232,QIList(l170,l362,l3),QIList(l28,QIList(l170,l333,l3),QIList(l170,l362,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l47,l198,QIList(l104,QIList(l5,QIList(l333,l210,QIList(l363,1,l3),l3),QIList(l168,QIList(l232,QIList(l170,l333,l3),QIList(l62,QIList(l170,l333,l3),QIList(l170,l363,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l46,l198,QIList(l104,QIList(l5,QIList(l333,l210,QIList(l363,1,l3),l3),QIList(l168,QIList(l232,QIList(l170,l333,l3),QIList(l61,QIList(l170,l333,l3),QIList(l170,l363,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l14,l198,QIList(l104,QIList(l5,QIList(l364,l211,l335,l3),QIList(l168,QIList(l184,l3,QIList(l239,QIList(l170,l364,l3),QIList(l169,l335,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l13,l198,QIList(l104,QIList(l5,QIList(l210,l349,l3),QIList(l168,QIList(l260,l3,QIList(l170,l349,l3),l3),l3),l3),l3),l3,l3),QIList(l11,l198,QIList(l104,QIList(l5,QIList(l338,l334,l211,l335,l3),QIList(l168,QIList(l248,QIList(l295,QIList(l167,QIList(l170,l338,l3),l3),QIList(l10,QIList(l170,QIList(l294,l338,l3),l3),QIList(l170,l334,l3),QIList(l169,QIList(l208,QIList(l54,QIList(l302,QIList(l30,l335,l3),l3),QIList(l27,QIList(l12,QIList(l31,l335,l3),l3),l3),l3),QIList(l168,QIList(QIList(l170,QIList(l30,l335,l3),l3),QIList(l184,QIList(l170,l338,l3),QIList(l169,QIList(l31,l335,l3),l3),l3),l3),l3),QIList(l168,QIList(QIList(l184,QIList(l170,l338,l3),QIList(l169,l335,l3),l3),l3),l3),l3),l3),l3),l3),QIList(l167,QIList(l170,l338,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l10,l198,QIList(l104,QIList(l5,QIList(l338,l334,l211,l335,l3),QIList(l253,QIList(QIList(l333,QIList(l16,"FN",l3),l3),l3),QIList(l168,QIList(l253,QIList(QIList(QIList(l170,l333,l3),QIList(l5,QIList(l170,l334,l3),QIList(l169,l335,l3),l3),l3),l3),QIList(l314,QIList(l170,l333,l3),"fname",QIList(l170,l338,l3),l3),QIList(l170,l333,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l9,l198,QIList(l104,QIList(l5,QIList(l338,l349,l210,l365,l3),QIList(l168,QIList(l248,QIList(l232,QIList(l170,l338,l3),QIList(l170,l349,l3),l3),QIList(l169,QIList(l6,QIList(l302,l365,l3),QIList(l168,QIList(QIList(l314,QIList(l167,QIList(l170,l338,l3),l3),"vardoc",QIList(l170,l365,l3),l3),l3),l3),l3),l3),QIList(l167,QIList(l170,l338,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l8,l198,QIList(l104,QIList(l5,QIList(l338,l349,l210,l365,l3),QIList(l168,QIList(l248,QIList(l2,QIList(l202,QIList(l170,l338,l3),l3),l3),QIList(l7,QIList(l18,QIList(l167,QIList(l170,l338,l3),l3),l3),QIList(l232,QIList(l170,l338,l3),QIList(l170,l349,l3),l3),l3),QIList(l169,QIList(l6,QIList(l302,l365,l3),QIList(l168,QIList(QIList(l314,QIList(l167,QIList(l170,l338,l3),l3),"vardoc",QIList(l170,l365,l3),l3),l3),l3),l3),l3),QIList(l167,QIList(l170,l338,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l7,l198,QIList(l104,QIList(l5,QIList(l364,l211,l335,l3),QIList(l168,QIList(l208,QIList(l170,l364,l3),l3,QIList(l248,QIList(l169,l335,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l6,l198,QIList(l104,QIList(l5,QIList(l364,l211,l335,l3),QIList(l168,QIList(l208,QIList(l170,l364,l3),QIList(l248,QIList(l169,l335,l3),l3),l3,l3),l3),l3),l3),l3,l3),QIList(l5,l198,QIList(l104,QIList(l5,QIList(l334,l211,l335,l3),QIList(l168,QIList(l104,QIList(l5,QIList(l170,l334,l3),QIList(l169,l335,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l2,l198,QIList(l104,QIList(l5,QIList(l211,l336,l3),QIList(l168,QIList(l247,QIList(l169,QIList(l73,QIList(l5,QIList(l337,l3),QIList(l168,QIList(l201,QIList(l167,QIList(l170,l337,l3),l3),l3),l3),l3),l336,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l1,l198,QIList(l104,QIList(l5,QIList(l338,l334,l211,l335,l3),QIList(l168,QIList(l247,QIList(l197,QIList(l167,QIList(l170,l338,l3),l3),QIList(l167,QIList(l104,QIList(l5,QIList(l170,QIList(l73,QIList(l104,QIList(l5,QIList(l333,l3),QIList(l208,QIList(l299,l333,QIList(l167,l328,l3),l3),QIList(l167,l211,l3),l333,l3),l3),l3),l334,l3),l3),QIList(l169,l335,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),l3),l3,l3,l3);
8819 (function(){
8820     l125.fvalue(pv, l328);
8821     l125.fvalue(pv, l327);
8822     l125.fvalue(pv, l326);
8823     l125.fvalue(pv, l325);
8824     l125.fvalue(pv, l324);
8825     l125.fvalue(pv, l323);
8826     l125.fvalue(pv, l322);
8827     l125.fvalue(pv, l321);
8828     l125.fvalue(pv, l320);
8829     l125.fvalue(pv, l319);
8830     l125.fvalue(pv, l318);
8831     l125.fvalue(pv, l317);
8832     l125.fvalue(pv, l316);
8833     l125.fvalue(pv, l315);
8834     l125.fvalue(pv, l314);
8835     l125.fvalue(pv, l313);
8836     l125.fvalue(pv, l312);
8837     l125.fvalue(pv, l311);
8838     l125.fvalue(pv, l310);
8839     l125.fvalue(pv, l309);
8840     l125.fvalue(pv, l308);
8841     l125.fvalue(pv, l307);
8842     l125.fvalue(pv, l306);
8843     l125.fvalue(pv, l305);
8844     l125.fvalue(pv, l304);
8845     l125.fvalue(pv, l303);
8846     l125.fvalue(pv, l302);
8847     l125.fvalue(pv, l301);
8848     l125.fvalue(pv, l300);
8849     l125.fvalue(pv, l299);
8850     l125.fvalue(pv, l298);
8851     l125.fvalue(pv, l297);
8852     l125.fvalue(pv, l296);
8853     l125.fvalue(pv, l295);
8854     l125.fvalue(pv, l294);
8855     l125.fvalue(pv, l293);
8856     l125.fvalue(pv, l292);
8857     l125.fvalue(pv, l291);
8858     l125.fvalue(pv, l290);
8859     l125.fvalue(pv, l289);
8860     l125.fvalue(pv, l288);
8861     l125.fvalue(pv, l287);
8862     l125.fvalue(pv, l286);
8863     l125.fvalue(pv, l285);
8864     l125.fvalue(pv, l284);
8865     l125.fvalue(pv, l283);
8866     l125.fvalue(pv, l282);
8867     l125.fvalue(pv, l281);
8868     l125.fvalue(pv, l280);
8869     l125.fvalue(pv, l279);
8870     l125.fvalue(pv, l278);
8871     l125.fvalue(pv, l277);
8872     l125.fvalue(pv, l276);
8873     l125.fvalue(pv, l275);
8874     l125.fvalue(pv, l274);
8875     l125.fvalue(pv, l273);
8876     l125.fvalue(pv, l272);
8877     l125.fvalue(pv, l271);
8878     l125.fvalue(pv, l270);
8879     l125.fvalue(pv, l269);
8880     l125.fvalue(pv, l268);
8881     l125.fvalue(pv, l267);
8882     l125.fvalue(pv, l266);
8883     l125.fvalue(pv, l265);
8884     l125.fvalue(pv, l264);
8885     l125.fvalue(pv, l263);
8886     l125.fvalue(pv, l262);
8887     l125.fvalue(pv, l261);
8888     l125.fvalue(pv, l260);
8889     l125.fvalue(pv, l259);
8890     l125.fvalue(pv, l258);
8891     l125.fvalue(pv, l257);
8892     l125.fvalue(pv, l256);
8893     l125.fvalue(pv, l255);
8894     l125.fvalue(pv, l254);
8895     l125.fvalue(pv, l253);
8896     l125.fvalue(pv, l252);
8897     l125.fvalue(pv, l251);
8898     l125.fvalue(pv, l250);
8899     l125.fvalue(pv, l249);
8900     l125.fvalue(pv, l248);
8901     l125.fvalue(pv, l247);
8902     l125.fvalue(pv, l246);
8903     l125.fvalue(pv, l245);
8904     l125.fvalue(pv, l244);
8905     l125.fvalue(pv, l243);
8906     l125.fvalue(pv, l242);
8907     l125.fvalue(pv, l241);
8908     l125.fvalue(pv, l240);
8909     l125.fvalue(pv, l239);
8910     l125.fvalue(pv, l238);
8911     l125.fvalue(pv, l237);
8912     l125.fvalue(pv, l236);
8913     l125.fvalue(pv, l235);
8914     l125.fvalue(pv, l234);
8915     l125.fvalue(pv, l233);
8916     l125.fvalue(pv, l232);
8917     l125.fvalue(pv, l231);
8918     l125.fvalue(pv, l230);
8919     l125.fvalue(pv, l229);
8920     l125.fvalue(pv, l228);
8921     l125.fvalue(pv, l227);
8922     l125.fvalue(pv, l226);
8923     l125.fvalue(pv, l225);
8924     l125.fvalue(pv, l224);
8925     l125.fvalue(pv, l223);
8926     l125.fvalue(pv, l222);
8927     l125.fvalue(pv, l221);
8928     l125.fvalue(pv, l220);
8929     l125.fvalue(pv, l219);
8930     l125.fvalue(pv, l218);
8931     l125.fvalue(pv, l217);
8932     l125.fvalue(pv, l216);
8933     l125.fvalue(pv, l215);
8934     l125.fvalue(pv, l214);
8935     l125.fvalue(pv, l212);
8936     l125.fvalue(pv, l211);
8937     l125.fvalue(pv, l210);
8938     l125.fvalue(pv, l209);
8939     l125.fvalue(pv, l208);
8940     l125.fvalue(pv, l207);
8941     l125.fvalue(pv, l206);
8942     l125.fvalue(pv, l205);
8943     l125.fvalue(pv, l204);
8944     l125.fvalue(pv, l203);
8945     l125.fvalue(pv, l202);
8946     l125.fvalue(pv, l201);
8947     l125.fvalue(pv, l200);
8948     l125.fvalue(pv, l199);
8949     l125.fvalue(pv, l198);
8950     l125.fvalue(pv, l197);
8951     l125.fvalue(pv, l196);
8952     l125.fvalue(pv, l195);
8953     l125.fvalue(pv, l194);
8954     l125.fvalue(pv, l193);
8955     l125.fvalue(pv, l192);
8956     l125.fvalue(pv, l191);
8957     l125.fvalue(pv, l190);
8958     l125.fvalue(pv, l189);
8959     l125.fvalue(pv, l188);
8960     l125.fvalue(pv, l187);
8961     l125.fvalue(pv, l186);
8962     l125.fvalue(pv, l185);
8963     l125.fvalue(pv, l184);
8964     l125.fvalue(pv, l183);
8965     l125.fvalue(pv, l182);
8966     l125.fvalue(pv, l181);
8967     l125.fvalue(pv, l180);
8968     l125.fvalue(pv, l179);
8969     l125.fvalue(pv, l178);
8970     l125.fvalue(pv, l177);
8971     l125.fvalue(pv, l176);
8972     l125.fvalue(pv, l175);
8973     l125.fvalue(pv, l174);
8974     l125.fvalue(pv, l173);
8975     l125.fvalue(pv, l172);
8976     l125.fvalue(pv, l171);
8977     l125.fvalue(pv, l170);
8978     l125.fvalue(pv, l169);
8979     l125.fvalue(pv, l168);
8980     l125.fvalue(pv, l167);
8981     l125.fvalue(pv, l166);
8982     l125.fvalue(pv, l165);
8983     l125.fvalue(pv, l164);
8984     l125.fvalue(pv, l163);
8985     l125.fvalue(pv, l162);
8986     l125.fvalue(pv, l161);
8987     l125.fvalue(pv, l160);
8988     l125.fvalue(pv, l159);
8989     l125.fvalue(pv, l158);
8990     l125.fvalue(pv, l157);
8991     l125.fvalue(pv, l156);
8992     l125.fvalue(pv, l155);
8993     l125.fvalue(pv, l154);
8994     l125.fvalue(pv, l153);
8995     l125.fvalue(pv, l152);
8996     l125.fvalue(pv, l151);
8997     l125.fvalue(pv, l150);
8998     l125.fvalue(pv, l149);
8999     l125.fvalue(pv, l148);
9000     l125.fvalue(pv, l147);
9001     l125.fvalue(pv, l146);
9002     l125.fvalue(pv, l145);
9003     l125.fvalue(pv, l144);
9004     l125.fvalue(pv, l143);
9005     l125.fvalue(pv, l142);
9006     l125.fvalue(pv, l141);
9007     l125.fvalue(pv, l140);
9008     l125.fvalue(pv, l139);
9009     l125.fvalue(pv, l138);
9010     l125.fvalue(pv, l137);
9011     l125.fvalue(pv, l136);
9012     l125.fvalue(pv, l135);
9013     l125.fvalue(pv, l134);
9014     l125.fvalue(pv, l133);
9015     l125.fvalue(pv, l132);
9016     l125.fvalue(pv, l131);
9017     l125.fvalue(pv, l130);
9018     l125.fvalue(pv, l129);
9019     l125.fvalue(pv, l128);
9020     l125.fvalue(pv, l127);
9021     l125.fvalue(pv, l126);
9022     l125.fvalue(pv, l125);
9023     l125.fvalue(pv, l124);
9024     l125.fvalue(pv, l123);
9025     l125.fvalue(pv, l122);
9026     l125.fvalue(pv, l121);
9027     l125.fvalue(pv, l120);
9028     l125.fvalue(pv, l119);
9029     l125.fvalue(pv, l118);
9030     l125.fvalue(pv, l117);
9031     l125.fvalue(pv, l116);
9032     l125.fvalue(pv, l115);
9033     l125.fvalue(pv, l114);
9034     l125.fvalue(pv, l113);
9035     l125.fvalue(pv, l112);
9036     l125.fvalue(pv, l111);
9037     l125.fvalue(pv, l110);
9038     l125.fvalue(pv, l109);
9039     l125.fvalue(pv, l108);
9040     l125.fvalue(pv, l107);
9041     l125.fvalue(pv, l106);
9042     l125.fvalue(pv, l105);
9043     l125.fvalue(pv, l104);
9044     l125.fvalue(pv, l103);
9045     l125.fvalue(pv, l102);
9046     l125.fvalue(pv, l101);
9047     l125.fvalue(pv, l100);
9048     l125.fvalue(pv, l99);
9049     l125.fvalue(pv, l98);
9050     l125.fvalue(pv, l97);
9051     l125.fvalue(pv, l96);
9052     l125.fvalue(pv, l95);
9053     l125.fvalue(pv, l94);
9054     l125.fvalue(pv, l93);
9055     l125.fvalue(pv, l92);
9056     l125.fvalue(pv, l91);
9057     l125.fvalue(pv, l90);
9058     l125.fvalue(pv, l89);
9059     l125.fvalue(pv, l88);
9060     l125.fvalue(pv, l87);
9061     l125.fvalue(pv, l86);
9062     l125.fvalue(pv, l85);
9063     l125.fvalue(pv, l84);
9064     l125.fvalue(pv, l83);
9065     l125.fvalue(pv, l82);
9066     l125.fvalue(pv, l81);
9067     l125.fvalue(pv, l80);
9068     l125.fvalue(pv, l79);
9069     l125.fvalue(pv, l78);
9070     l125.fvalue(pv, l77);
9071     l125.fvalue(pv, l76);
9072     l125.fvalue(pv, l75);
9073     l125.fvalue(pv, l74);
9074     l125.fvalue(pv, l73);
9075     l125.fvalue(pv, l72);
9076     l125.fvalue(pv, l71);
9077     l125.fvalue(pv, l70);
9078     l125.fvalue(pv, l69);
9079     l125.fvalue(pv, l68);
9080     l125.fvalue(pv, l67);
9081     l125.fvalue(pv, l66);
9082     l125.fvalue(pv, l65);
9083     l125.fvalue(pv, l64);
9084     l125.fvalue(pv, l63);
9085     l125.fvalue(pv, l62);
9086     l125.fvalue(pv, l61);
9087     l125.fvalue(pv, l60);
9088     l125.fvalue(pv, l59);
9089     l125.fvalue(pv, l58);
9090     l125.fvalue(pv, l57);
9091     l125.fvalue(pv, l56);
9092     l125.fvalue(pv, l55);
9093     l125.fvalue(pv, l54);
9094     l125.fvalue(pv, l53);
9095     l125.fvalue(pv, l52);
9096     l125.fvalue(pv, l51);
9097     l125.fvalue(pv, l50);
9098     l125.fvalue(pv, l49);
9099     l125.fvalue(pv, l48);
9100     l125.fvalue(pv, l47);
9101     l125.fvalue(pv, l46);
9102     l125.fvalue(pv, l45);
9103     l125.fvalue(pv, l44);
9104     l125.fvalue(pv, l43);
9105     l125.fvalue(pv, l42);
9106     l125.fvalue(pv, l41);
9107     l125.fvalue(pv, l40);
9108     l125.fvalue(pv, l39);
9109     l125.fvalue(pv, l38);
9110     l125.fvalue(pv, l37);
9111     l125.fvalue(pv, l36);
9112     l125.fvalue(pv, l35);
9113     l125.fvalue(pv, l34);
9114     l125.fvalue(pv, l33);
9115     l125.fvalue(pv, l32);
9116     l125.fvalue(pv, l31);
9117     l125.fvalue(pv, l30);
9118     l125.fvalue(pv, l29);
9119     l125.fvalue(pv, l28);
9120     l125.fvalue(pv, l27);
9121     l125.fvalue(pv, l26);
9122     l125.fvalue(pv, l25);
9123     l125.fvalue(pv, l24);
9124     l125.fvalue(pv, l23);
9125     l125.fvalue(pv, l22);
9126     l125.fvalue(pv, l21);
9127     l125.fvalue(pv, l20);
9128     l125.fvalue(pv, l19);
9129     l125.fvalue(pv, l18);
9130     l125.fvalue(pv, l17);
9131     l125.fvalue(pv, l16);
9132     l125.fvalue(pv, l15);
9133     l125.fvalue(pv, l14);
9134     l125.fvalue(pv, l13);
9135     l125.fvalue(pv, l12);
9136     l125.fvalue(pv, l11);
9137     l125.fvalue(pv, l10);
9138     l125.fvalue(pv, l9);
9139     l125.fvalue(pv, l8);
9140     l125.fvalue(pv, l7);
9141     l125.fvalue(pv, l6);
9142     l125.fvalue(pv, l5);
9143     l125.fvalue(pv, l4);
9144     l125.fvalue(pv, l3);
9145     l125.fvalue(pv, l2);
9146     l125.fvalue(pv, l1);
9147     ((l235).value = l330);
9148     ((l188).value = l366);
9149     ((l189).value = 893);
9150     ((l15).value = 226);
9151     return ((l257).value = 296);
9152 })();
9153 ((l236).value = 366);