ecmalisp.js

   1 var nil;
   2
   3 function pv (x) { return x==undefined? nil: x; }
   4
   5 function mv(){
   6     var r = [];
   7     r['multiple-value'] = true;
   8     for (var i=0; i<arguments.length; i++)
   9         r.push(arguments[i]);
  10     return r;
  11 }
  12
  13 function forcemv (x) {
  14     return typeof x == 'object' && 'multiple-value' in x? x: mv(x);
  15 }
  16
  17 // NOTE: Define VALUES to be MV for toplevel forms. It is because
  18 // `eval' compiles the forms and execute the Javascript code at
  19 // toplevel with `js-eval', so it is necessary to return multiple
  20 // values from the eval function.
  21 var values = mv;
  22
  23 function checkArgsAtLeast(args, n){
  24     if (args.length < n) throw 'too few arguments';
  25 }
  26
  27 function checkArgsAtMost(args, n){
  28     if (args.length > n) throw 'too many arguments';
  29 }
  30
  31 function checkArgs(args, n){
  32     checkArgsAtLeast(args, n);
  33     checkArgsAtMost(args, n);
  34 }
  35
  36 // Improper list constructor (like LIST*)
  37 function QIList(){
  38     if (arguments.length == 1)
  39         return arguments[0];
  40     else {
  41         var i = arguments.length-1;
  42         var r = arguments[i--];
  43         for (; i>=0; i--){
  44             r = {car: arguments[i], cdr: r};
  45         }
  46         return r;
  47     }
  48 }
  49 var l1 = {name: "DEFMACRO"};
  50 l1;
  51 var l2 = {name: "DECLAIM"};
  52 l2;
  53 var l3 = {name: "DEFCONSTANT"};
  54 l3;
  55 var l4 = {name: "T"};
  56 (function(){
  57     ((l4).value = l4);
  58     return l4;
  59 })();
  60 var l5 = {name: "NIL"};
  61 (function(){
  62     ((l5).value = l5);
  63     return l5;
  64 })();
  65 (nil = l5.value);
  66 var l6 = {name: "LAMBDA"};
  67 l6;
  68 var l7 = {name: "WHEN"};
  69 l7;
  70 var l8 = {name: "UNLESS"};
  71 l8;
  72 var l9 = {name: "DEFVAR"};
  73 l9;
  74 var l10 = {name: "DEFPARAMETER"};
  75 l10;
  76 var l11 = {name: "NAMED-LAMBDA"};
  77 l11;
  78 var l12 = {name: "DEFUN"};
  79 l12;
  80 var l13 = {name: "NULL"};
  81 (function(){
  82     (l13).fvalue = (function(v2){
  83         ((v2)["fname"] = "NULL");
  84         return v2;
  85     })((function (values,v1){
  86         checkArgs(arguments, 2);
  87         var i;
  88         return (function(){
  89             return ((v1 === l5.value)?l4.value: l5.value);
  90         })();
  91     }));
  92     return l13;
  93 })();
  94 var l14 = {name: "RETURN"};
  95 l14;
  96 var l15 = {name: "WHILE"};
  97 l15;
  98 var l16 = {name: "*GENSYM-COUNTER*"};
  99 (function(){
 100     (((l16.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l16).value = 0));
 101     return l16;
 102 })();
 103 var l17 = {name: "GENSYM"};
 104 var l18 = {name: "INTEGER-TO-STRING"};
 105 (function(){
 106     (l17).fvalue = (function(v4){
 107         ((v4)["fname"] = "GENSYM");
 108         return v4;
 109     })((function (values,v3){
 110         checkArgsAtMost(arguments, 2);
 111         switch(arguments.length-1){
 112         case 0:
 113         v3="G";
 114         default: break;
 115         }
 116         var i;
 117         return (function(){
 118             ((l16).value = (function(){
 119                 var x1 = (function(){
 120                     var symbol = l16;
 121                     var value = symbol.value;
 122                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 123                     return value;
 124                 })();
 125                 if (typeof x1 !== 'number') throw 'Not a number!';
 126                 return x1+1;
 127             })());
 128             return (function(){
 129                 var name = (function(){
 130                     var string1 = v3;
 131                     var string2 = l18.fvalue(pv, (function(){
 132                         var symbol = l16;
 133                         var value = symbol.value;
 134                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 135                         return value;
 136                     })());
 137                     if (typeof string1 != 'string')
 138                         throw 'The value ' + string1 + ' is not a type string.';
 139                     if (typeof string2 != 'string')
 140                         throw 'The value ' + string2 + ' is not a type string.';
 141                     return string1.concat(string2);
 142                 })();
 143                 if (typeof name != 'string')
 144                     throw 'The value ' + name + ' is not a type string.';
 145                 return ({name: name});
 146             })();
 147         })();
 148     }));
 149     return l17;
 150 })();
 151 var l19 = {name: "BOUNDP"};
 152 (function(){
 153     (l19).fvalue = (function(v6){
 154         ((v6)["fname"] = "BOUNDP");
 155         return v6;
 156     })((function (values,v5){
 157         checkArgs(arguments, 2);
 158         var i;
 159         return (function(){
 160             return ((v5.value !== undefined)?l4.value: l5.value);
 161         })();
 162     }));
 163     return l19;
 164 })();
 165 var l20 = {name: "="};
 166 (function(){
 167     (l20).fvalue = (function(v9){
 168         ((v9)["fname"] = "=");
 169         return v9;
 170     })((function (values,v7,v8){
 171         checkArgs(arguments, 3);
 172         var i;
 173         return (function(){
 174             return (function(){
 175                 var x1 = v7;
 176                 if (typeof x1 !== 'number') throw 'Not a number!';
 177                 var x2 = v8;
 178                 if (typeof x2 !== 'number') throw 'Not a number!';
 179                 return (x1==x2?l4.value: l5.value);
 180             })();
 181         })();
 182     }));
 183     return l20;
 184 })();
 185 var l21 = {name: "*"};
 186 (function(){
 187     (l21).fvalue = (function(v12){
 188         ((v12)["fname"] = "*");
 189         return v12;
 190     })((function (values,v10,v11){
 191         checkArgs(arguments, 3);
 192         var i;
 193         return (function(){
 194             return (function(){
 195                 var x1 = v10;
 196                 if (typeof x1 !== 'number') throw 'Not a number!';
 197                 var x2 = v11;
 198                 if (typeof x2 !== 'number') throw 'Not a number!';
 199                 return x1*x2;
 200             })();
 201         })();
 202     }));
 203     return l21;
 204 })();
 205 var l22 = {name: "/"};
 206 (function(){
 207     (l22).fvalue = (function(v15){
 208         ((v15)["fname"] = "/");
 209         return v15;
 210     })((function (values,v13,v14){
 211         checkArgs(arguments, 3);
 212         var i;
 213         return (function(){
 214             return (function(){
 215                 var x1 = v13;
 216                 if (typeof x1 !== 'number') throw 'Not a number!';
 217                 var x2 = v14;
 218                 if (typeof x2 !== 'number') throw 'Not a number!';
 219                 return x1/x2;
 220             })();
 221         })();
 222     }));
 223     return l22;
 224 })();
 225 var l23 = {name: "1+"};
 226 (function(){
 227     (l23).fvalue = (function(v17){
 228         ((v17)["fname"] = "1+");
 229         return v17;
 230     })((function (values,v16){
 231         checkArgs(arguments, 2);
 232         var i;
 233         return (function(){
 234             return (function(){
 235                 var x1 = v16;
 236                 if (typeof x1 !== 'number') throw 'Not a number!';
 237                 return x1+1;
 238             })();
 239         })();
 240     }));
 241     return l23;
 242 })();
 243 var l24 = {name: "1-"};
 244 (function(){
 245     (l24).fvalue = (function(v19){
 246         ((v19)["fname"] = "1-");
 247         return v19;
 248     })((function (values,v18){
 249         checkArgs(arguments, 2);
 250         var i;
 251         return (function(){
 252             return (function(){
 253                 var x1 = v18;
 254                 if (typeof x1 !== 'number') throw 'Not a number!';
 255                 return x1-1;
 256             })();
 257         })();
 258     }));
 259     return l24;
 260 })();
 261 var l25 = {name: "ZEROP"};
 262 (function(){
 263     (l25).fvalue = (function(v21){
 264         ((v21)["fname"] = "ZEROP");
 265         return v21;
 266     })((function (values,v20){
 267         checkArgs(arguments, 2);
 268         var i;
 269         return (function(){
 270             return (function(){
 271                 var x1 = v20;
 272                 if (typeof x1 !== 'number') throw 'Not a number!';
 273                 return (x1==0?l4.value: l5.value);
 274             })();
 275         })();
 276     }));
 277     return l25;
 278 })();
 279 var l26 = {name: "TRUNCATE"};
 280 (function(){
 281     (l26).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 l26;
 303 })();
 304 var l27 = {name: "EQL"};
 305 (function(){
 306     (l27).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: l5.value);
 314         })();
 315     }));
 316     return l27;
 317 })();
 318 var l28 = {name: "NOT"};
 319 (function(){
 320     (l28).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 !== l5.value ? l5.value : l4.value);
 328         })();
 329     }));
 330     return l28;
 331 })();
 332 var l29 = {name: "CONS"};
 333 (function(){
 334     (l29).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 l29;
 345 })();
 346 var l30 = {name: "CONSP"};
 347 (function(){
 348     (l30).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: l5.value);
 359         })();
 360     }));
 361     return l30;
 362 })();
 363 var l31 = {name: "CAR"};
 364 (function(){
 365     (l31).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 === l5.value? l5.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 l31;
 383 })();
 384 var l32 = {name: "CDR"};
 385 (function(){
 386     (l32).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 === l5.value? l5.value: tmp.cdr;
 396             })();
 397         })();
 398     }));
 399     return l32;
 400 })();
 401 var l33 = {name: "CAAR"};
 402 (function(){
 403     (l33).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 === l5.value? l5.value: tmp.car;
 414                 })();
 415                 return tmp === l5.value? l5.value: tmp.car;
 416             })();
 417         })();
 418     }));
 419     return l33;
 420 })();
 421 var l34 = {name: "CADR"};
 422 (function(){
 423     (l34).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 === l5.value? l5.value: tmp.cdr;
 434                 })();
 435                 return tmp === l5.value? l5.value: tmp.car;
 436             })();
 437         })();
 438     }));
 439     return l34;
 440 })();
 441 var l35 = {name: "CDAR"};
 442 (function(){
 443     (l35).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 === l5.value? l5.value: tmp.car;
 454                 })();
 455                 return tmp === l5.value? l5.value: tmp.cdr;
 456             })();
 457         })();
 458     }));
 459     return l35;
 460 })();
 461 var l36 = {name: "CDDR"};
 462 (function(){
 463     (l36).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 === l5.value? l5.value: tmp.cdr;
 474                 })();
 475                 return tmp === l5.value? l5.value: tmp.cdr;
 476             })();
 477         })();
 478     }));
 479     return l36;
 480 })();
 481 var l37 = {name: "CADDR"};
 482 (function(){
 483     (l37).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 === l5.value? l5.value: tmp.cdr;
 495                     })();
 496                     return tmp === l5.value? l5.value: tmp.cdr;
 497                 })();
 498                 return tmp === l5.value? l5.value: tmp.car;
 499             })();
 500         })();
 501     }));
 502     return l37;
 503 })();
 504 var l38 = {name: "CDDDR"};
 505 (function(){
 506     (l38).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 === l5.value? l5.value: tmp.cdr;
 518                     })();
 519                     return tmp === l5.value? l5.value: tmp.cdr;
 520                 })();
 521                 return tmp === l5.value? l5.value: tmp.cdr;
 522             })();
 523         })();
 524     }));
 525     return l38;
 526 })();
 527 var l39 = {name: "CADDDR"};
 528 (function(){
 529     (l39).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 === l5.value? l5.value: tmp.cdr;
 542                         })();
 543                         return tmp === l5.value? l5.value: tmp.cdr;
 544                     })();
 545                     return tmp === l5.value? l5.value: tmp.cdr;
 546                 })();
 547                 return tmp === l5.value? l5.value: tmp.car;
 548             })();
 549         })();
 550     }));
 551     return l39;
 552 })();
 553 var l40 = {name: "FIRST"};
 554 (function(){
 555     (l40).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 === l5.value? l5.value: tmp.car;
 565             })();
 566         })();
 567     }));
 568     return l40;
 569 })();
 570 var l41 = {name: "SECOND"};
 571 (function(){
 572     (l41).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 l34.fvalue(values, v55);
 580         })();
 581     }));
 582     return l41;
 583 })();
 584 var l42 = {name: "THIRD"};
 585 (function(){
 586     (l42).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 l37.fvalue(values, v57);
 594         })();
 595     }));
 596     return l42;
 597 })();
 598 var l43 = {name: "FOURTH"};
 599 (function(){
 600     (l43).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 l39.fvalue(values, v59);
 608         })();
 609     }));
 610     return l43;
 611 })();
 612 var l44 = {name: "REST"};
 613 (function(){
 614     (l44).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 === l5.value? l5.value: tmp.cdr;
 624             })();
 625         })();
 626     }));
 627     return l44;
 628 })();
 629 var l45 = {name: "LIST"};
 630 (function(){
 631     (l45).fvalue = (function(v64){
 632         ((v64)["fname"] = "LIST");
 633         return v64;
 634     })((function (values){
 635         var v63= l5.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 l45;
 645 })();
 646 var l46 = {name: "ATOM"};
 647 (function(){
 648     (l46).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 l28.fvalue(values, ((function(){
 656                 var tmp = v65;
 657                 return (typeof tmp == 'object' && 'car' in tmp);
 658             })()?l4.value: l5.value));
 659         })();
 660     }));
 661     return l46;
 662 })();
 663 var l47 = {name: "INCF"};
 664 l47;
 665 var l48 = {name: "DECF"};
 666 l48;
 667 var l49 = {name: "PUSH"};
 668 l49;
 669 var l50 = {name: "DOLIST"};
 670 l50;
 671 var l51 = {name: "DOTIMES"};
 672 l51;
 673 var l52 = {name: "COND"};
 674 l52;
 675 var l53 = {name: "CASE"};
 676 l53;
 677 var l54 = {name: "ECASE"};
 678 l54;
 679 var l55 = {name: "AND"};
 680 l55;
 681 var l56 = {name: "OR"};
 682 l56;
 683 var l57 = {name: "PROG1"};
 684 l57;
 685 var l58 = {name: "PROG2"};
 686 l58;
 687 var l59 = {name: "ENSURE-LIST"};
 688 var l60 = {name: "LISTP"};
 689 (function(){
 690     (l59).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 (l60.fvalue(pv, v67) !== l5.value ? v67 : l45.fvalue(values, v67));
 698         })();
 699     }));
 700     return l59;
 701 })();
 702 var l61 = {name: "!REDUCE"};
 703 (function(){
 704     (l61).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 (l13.fvalue(pv, v70) !== l5.value ? v71 : l61.fvalue(values, v69, (function(){
 712                 var tmp = v70;
 713                 return tmp === l5.value? l5.value: tmp.cdr;
 714             })(), (v69)(pv, v71, (function(){
 715                 var tmp = v70;
 716                 return tmp === l5.value? l5.value: tmp.car;
 717             })())));
 718         })();
 719     }));
 720     return l61;
 721 })();
 722 var l62 = {name: "+"};
 723 (function(){
 724     (l62).fvalue = (function(v77){
 725         ((v77)["fname"] = "+");
 726         return v77;
 727     })((function (values){
 728         var v73= l5.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 !== l5.value){
 739                                 (v76 = (function(){
 740                                     var tmp = v75;
 741                                     return tmp === l5.value? l5.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 l5.value;
 752                                 })();
 753                                 (v75 = (function(){
 754                                     var tmp = v75;
 755                                     return tmp === l5.value? l5.value: tmp.cdr;
 756                                 })());
 757                             }return l5.value;
 758                         })();
 759                         return v74;
 760                     })(v73,l5.value);
 761                 })();
 762             })(0);
 763         })();
 764     }));
 765     return l62;
 766 })();
 767 var l63 = {name: "-"};
 768 (function(){
 769     (l63).fvalue = (function(v83){
 770         ((v83)["fname"] = "-");
 771         return v83;
 772     })((function (values,v79){
 773         checkArgsAtLeast(arguments, 2);
 774         var v78= l5.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 (l13.fvalue(pv, v78) !== l5.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 !== l5.value){
 789                                 (v82 = (function(){
 790                                     var tmp = v81;
 791                                     return tmp === l5.value? l5.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 l5.value;
 802                                 })();
 803                                 (v81 = (function(){
 804                                     var tmp = v81;
 805                                     return tmp === l5.value? l5.value: tmp.cdr;
 806                                 })());
 807                             }return l5.value;
 808                         })();
 809                         return v80;
 810                     })(v78,l5.value);
 811                 })();
 812             })(v79));
 813         })();
 814     }));
 815     return l63;
 816 })();
 817 var l64 = {name: "APPEND-TWO"};
 818 var l65 = {name: "APPEND"};
 819 (function(){
 820     (l64).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 (l13.fvalue(pv, v84) !== l5.value ? v85 : ({car: (function(){
 828                 var tmp = v84;
 829                 return tmp === l5.value? l5.value: tmp.car;
 830             })(), cdr: l65.fvalue(pv, (function(){
 831                 var tmp = v84;
 832                 return tmp === l5.value? l5.value: tmp.cdr;
 833             })(), v85)}));
 834         })();
 835     }));
 836     return l64;
 837 })();
 838 (function(){
 839     (l65).fvalue = (function(v88){
 840         ((v88)["fname"] = "APPEND");
 841         return v88;
 842     })((function (values){
 843         var v87= l5.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 l61.fvalue(values, (function(){
 850                 var symbol = l64;
 851                 var func = symbol.fvalue;
 852                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
 853                 return func;
 854             })(), v87, l5);
 855         })();
 856     }));
 857     return l65;
 858 })();
 859 var l66 = {name: "REVAPPEND"};
 860 (function(){
 861     (l66).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 !== l5.value){
 871                         (v90 = ({car: (function(){
 872                             var tmp = v89;
 873                             return tmp === l5.value? l5.value: tmp.car;
 874                         })(), cdr: v90}));
 875                         (v89 = (function(){
 876                             var tmp = v89;
 877                             return tmp === l5.value? l5.value: tmp.cdr;
 878                         })());
 879                     }return l5.value;
 880                 })();
 881             })();
 882             return v90;
 883         })();
 884     }));
 885     return l66;
 886 })();
 887 var l67 = {name: "REVERSE"};
 888 (function(){
 889     (l67).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 l66.fvalue(values, v92, l5);
 897         })();
 898     }));
 899     return l67;
 900 })();
 901 var l68 = {name: "PSETQ"};
 902 l68;
 903 var l69 = {name: "DO"};
 904 l69;
 905 var l70 = {name: "DO*"};
 906 l70;
 907 var l71 = {name: "LIST-LENGTH"};
 908 (function(){
 909     (l71).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(l28.fvalue(pv, l13.fvalue(pv, v94)) !== l5.value){
 920                             (v95 = (function(){
 921                                 var x1 = v95;
 922                                 if (typeof x1 !== 'number') throw 'Not a number!';
 923                                 return x1+1;
 924                             })());
 925                             (v94 = (function(){
 926                                 var tmp = v94;
 927                                 return tmp === l5.value? l5.value: tmp.cdr;
 928                             })());
 929                         }return l5.value;
 930                     })();
 931                 })();
 932                 return v95;
 933             })(0);
 934         })();
 935     }));
 936     return l71;
 937 })();
 938 var l72 = {name: "LENGTH"};
 939 (function(){
 940     (l72).fvalue = (function(v98){
 941         ((v98)["fname"] = "LENGTH");
 942         return v98;
 943     })((function (values,v97){
 944         checkArgs(arguments, 2);
 945         var i;
 946         return (function(){
 947             return (((typeof(v97) == "string")?l4.value: l5.value) !== l5.value ? (function(){
 948                 var x = v97;
 949                 if (typeof x != 'string')
 950                     throw 'The value ' + x + ' is not a type string.';
 951                 return x.length;
 952             })() : (((function(){
 953                 var x = v97;
 954                 return typeof x === 'object' && 'length' in x;
 955             })()?l4.value: l5.value) !== l5.value ? (function(){
 956                 var tmp = (v97)["length"];
 957                 return tmp == undefined? l5.value: tmp ;
 958             })() : (l60.fvalue(pv, v97) !== l5.value ? l71.fvalue(values, v97) : l5.value)));
 959         })();
 960     }));
 961     return l72;
 962 })();
 963 var l73 = {name: "CONCAT-TWO"};
 964 (function(){
 965     (l73).fvalue = (function(v101){
 966         ((v101)["fname"] = "CONCAT-TWO");
 967         return v101;
 968     })((function (values,v99,v100){
 969         checkArgs(arguments, 3);
 970         var i;
 971         return (function(){
 972             return (function(){
 973                 var string1 = v99;
 974                 var string2 = v100;
 975                 if (typeof string1 != 'string')
 976                     throw 'The value ' + string1 + ' is not a type string.';
 977                 if (typeof string2 != 'string')
 978                     throw 'The value ' + string2 + ' is not a type string.';
 979                 return string1.concat(string2);
 980             })();
 981         })();
 982     }));
 983     return l73;
 984 })();
 985 var l74 = {name: "WITH-COLLECT"};
 986 l74;
 987 var l75 = {name: "MAP1"};
 988 var l76 = {name: "SENTINEL"};
 989 (function(){
 990     (l75).fvalue = (function(v108){
 991         ((v108)["fname"] = "MAP1");
 992         return v108;
 993     })((function (values,v102,v103){
 994         checkArgs(arguments, 3);
 995         var i;
 996         return (function(){
 997             return (function(){
 998                 var v104 = ({car: l76, cdr: l5.value});
 999                 var v105 = v104;
1000                 (function(v107){
1001                     return (function(){
1002                         return (function(){
1003                             while(v103 !== l5.value){
1004                                 v107(pv, (v102)(pv, (function(){
1005                                     var tmp = v103;
1006                                     return tmp === l5.value? l5.value: tmp.car;
1007                                 })()));
1008                                 (v103 = (function(){
1009                                     var tmp = v103;
1010                                     return tmp === l5.value? l5.value: tmp.cdr;
1011                                 })());
1012                             }return l5.value;
1013                         })();
1014                     })();
1015                 })((function (values,v106){
1016                     checkArgs(arguments, 2);
1017                     var i;
1018                     (function(){
1019                         var x = v105;
1020                         if (typeof x != 'object')
1021                             throw 'The value ' + x + ' is not a type object.';
1022                         return (x.cdr = ({car: v106, cdr: l5.value}), x);
1023                     })();
1024                     (v105 = (function(){
1025                         var tmp = v105;
1026                         return tmp === l5.value? l5.value: tmp.cdr;
1027                     })());
1028                     return v106;
1029                 }));
1030                 return (function(){
1031                     var tmp = v104;
1032                     return tmp === l5.value? l5.value: tmp.cdr;
1033                 })();
1034             })();
1035         })();
1036     }));
1037     return l75;
1038 })();
1039 var l77 = {name: "LOOP"};
1040 l77;
1041 var l78 = {name: "MAPCAR"};
1042 (function(){
1043     (l78).fvalue = (function(v120){
1044         ((v120)["fname"] = "MAPCAR");
1045         return v120;
1046     })((function (values,v110,v111){
1047         checkArgsAtLeast(arguments, 3);
1048         var v109= l5.value;
1049         for (var i = arguments.length-1; i>=3; i--)
1050             v109 = {car: arguments[i], cdr:
1051         v109};
1052         var i;
1053         return (function(){
1054             return (function(v112){
1055                 return (function(){
1056                     var v113 = ({car: l76, cdr: l5.value});
1057                     var v114 = v113;
1058                     (function(v116){
1059                         return (function(){
1060                             try {
1061                                 return (function(){
1062                                     return (function(){
1063                                         while(l4.value !== l5.value){
1064                                             (function(v117){
1065                                                 (function(){
1066                                                     return (function(v118){
1067                                                         return (function(){
1068                                                             try {
1069                                                                 return (function(){
1070                                                                     while(l4.value !== l5.value){
1071                                                                         (l13.fvalue(pv, v118) !== l5.value ? (function(){
1072                                                                             throw ({type: 'block', id: 52, values: l5.value, message: 'Return from unknown block NIL.'})
1073                                                                         })() : l5.value);
1074                                                                         (function(){
1075                                                                             (l13.fvalue(pv, (function(){
1076                                                                                 var tmp = v118;
1077                                                                                 return tmp === l5.value? l5.value: tmp.car;
1078                                                                             })()) !== l5.value ? (function(){
1079                                                                                 throw ({type: 'block', id: 49, values: l5.value, message: 'Return from unknown block LOOP.'})
1080                                                                             })() : l5.value);
1081                                                                             (function(){
1082                                                                                 var x = v118;
1083                                                                                 if (typeof x != 'object')
1084                                                                                     throw 'The value ' + x + ' is not a type object.';
1085                                                                                 return (x.car = l35.fvalue(pv, v118), x);
1086                                                                             })();
1087                                                                             return l5.value;
1088                                                                         })();
1089                                                                         (function(v119){
1090                                                                             return (v118 = v119);
1091                                                                         })((function(){
1092                                                                             var tmp = v118;
1093                                                                             return tmp === l5.value? l5.value: tmp.cdr;
1094                                                                         })());
1095                                                                     }return l5.value;
1096                                                                 })();
1097                                                             }
1098                                                             catch (cf){
1099                                                                 if (cf.type == 'block' && cf.id == 52)
1100                                                                     return cf.values;
1101                                                                 else
1102                                                                     throw cf;
1103                                                             }
1104                                                         })();
1105                                                     })(v112);
1106                                                 })();
1107                                                 return v116(pv, (function(){
1108                                                     var f = v110;
1109                                                     var args = [pv];
1110                                                     var tail = (v117);
1111                                                     while (tail != l5.value){
1112                                                         args.push(tail.car);
1113                                                         tail = tail.cdr;
1114                                                     }
1115                                                     return f.apply(this, args);
1116                                                 })());
1117                                             })(l75.fvalue(pv, (function(){
1118                                                 var symbol = l31;
1119                                                 var func = symbol.fvalue;
1120                                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1121                                                 return func;
1122                                             })(), v112));
1123                                         }return l5.value;
1124                                     })();
1125                                 })();
1126                             }
1127                             catch (cf){
1128                                 if (cf.type == 'block' && cf.id == 49)
1129                                     return cf.values;
1130                                 else
1131                                     throw cf;
1132                             }
1133                         })();
1134                     })((function (values,v115){
1135                         checkArgs(arguments, 2);
1136                         var i;
1137                         (function(){
1138                             var x = v114;
1139                             if (typeof x != 'object')
1140                                 throw 'The value ' + x + ' is not a type object.';
1141                             return (x.cdr = ({car: v115, cdr: l5.value}), x);
1142                         })();
1143                         (v114 = (function(){
1144                             var tmp = v114;
1145                             return tmp === l5.value? l5.value: tmp.cdr;
1146                         })());
1147                         return v115;
1148                     }));
1149                     return (function(){
1150                         var tmp = v113;
1151                         return tmp === l5.value? l5.value: tmp.cdr;
1152                     })();
1153                 })();
1154             })(({car: v111, cdr: v109}));
1155         })();
1156     }));
1157     return l78;
1158 })();
1159 var l79 = {name: "IDENTITY"};
1160 (function(){
1161     (l79).fvalue = (function(v122){
1162         ((v122)["fname"] = "IDENTITY");
1163         return v122;
1164     })((function (values,v121){
1165         checkArgs(arguments, 2);
1166         var i;
1167         return (function(){
1168             return v121;
1169         })();
1170     }));
1171     return l79;
1172 })();
1173 var l80 = {name: "CONSTANTLY"};
1174 (function(){
1175     (l80).fvalue = (function(v125){
1176         ((v125)["fname"] = "CONSTANTLY");
1177         return v125;
1178     })((function (values,v123){
1179         checkArgs(arguments, 2);
1180         var i;
1181         return (function(){
1182             return (function (values){
1183                 var v124= l5.value;
1184                 for (var i = arguments.length-1; i>=1; i--)
1185                     v124 = {car: arguments[i], cdr:
1186                 v124};
1187                 var i;
1188                 return v123;
1189             });
1190         })();
1191     }));
1192     return l80;
1193 })();
1194 var l81 = {name: "COPY-LIST"};
1195 (function(){
1196     (l81).fvalue = (function(v127){
1197         ((v127)["fname"] = "COPY-LIST");
1198         return v127;
1199     })((function (values,v126){
1200         checkArgs(arguments, 2);
1201         var i;
1202         return (function(){
1203             return l78.fvalue(values, (function(){
1204                 var symbol = l79;
1205                 var func = symbol.fvalue;
1206                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1207                 return func;
1208             })(), v126);
1209         })();
1210     }));
1211     return l81;
1212 })();
1213 var l82 = {name: "CODE-CHAR"};
1214 (function(){
1215     (l82).fvalue = (function(v129){
1216         ((v129)["fname"] = "CODE-CHAR");
1217         return v129;
1218     })((function (values,v128){
1219         checkArgs(arguments, 2);
1220         var i;
1221         return (function(){
1222             return v128;
1223         })();
1224     }));
1225     return l82;
1226 })();
1227 var l83 = {name: "CHAR-CODE"};
1228 (function(){
1229     (l83).fvalue = (function(v131){
1230         ((v131)["fname"] = "CHAR-CODE");
1231         return v131;
1232     })((function (values,v130){
1233         checkArgs(arguments, 2);
1234         var i;
1235         return (function(){
1236             return v130;
1237         })();
1238     }));
1239     return l83;
1240 })();
1241 var l84 = {name: "CHAR="};
1242 (function(){
1243     (l84).fvalue = (function(v134){
1244         ((v134)["fname"] = "CHAR=");
1245         return v134;
1246     })((function (values,v132,v133){
1247         checkArgs(arguments, 3);
1248         var i;
1249         return (function(){
1250             return (function(){
1251                 var x1 = v132;
1252                 if (typeof x1 !== 'number') throw 'Not a number!';
1253                 var x2 = v133;
1254                 if (typeof x2 !== 'number') throw 'Not a number!';
1255                 return (x1==x2?l4.value: l5.value);
1256             })();
1257         })();
1258     }));
1259     return l84;
1260 })();
1261 var l85 = {name: "INTEGERP"};
1262 (function(){
1263     (l85).fvalue = (function(v136){
1264         ((v136)["fname"] = "INTEGERP");
1265         return v136;
1266     })((function (values,v135){
1267         checkArgs(arguments, 2);
1268         var i;
1269         return (function(){
1270             return (((typeof (v135) == "number")?l4.value: l5.value) !== l5.value ? (function(){
1271                 var x1 = (function(){
1272                     var x = v135;
1273                     if (typeof x != 'number')
1274                         throw 'The value ' + x + ' is not a type number.';
1275                     return Math.floor(x);
1276                 })();
1277                 if (typeof x1 !== 'number') throw 'Not a number!';
1278                 var x2 = v135;
1279                 if (typeof x2 !== 'number') throw 'Not a number!';
1280                 return (x1==x2?l4.value: l5.value);
1281             })() : l5.value);
1282         })();
1283     }));
1284     return l85;
1285 })();
1286 var l86 = {name: "PLUSP"};
1287 (function(){
1288     (l86).fvalue = (function(v138){
1289         ((v138)["fname"] = "PLUSP");
1290         return v138;
1291     })((function (values,v137){
1292         checkArgs(arguments, 2);
1293         var i;
1294         return (function(){
1295             return (function(){
1296                 var x1 = v137;
1297                 if (typeof x1 !== 'number') throw 'Not a number!';
1298                 return (0<x1?l4.value: l5.value);
1299             })();
1300         })();
1301     }));
1302     return l86;
1303 })();
1304 var l87 = {name: "MINUSP"};
1305 (function(){
1306     (l87).fvalue = (function(v140){
1307         ((v140)["fname"] = "MINUSP");
1308         return v140;
1309     })((function (values,v139){
1310         checkArgs(arguments, 2);
1311         var i;
1312         return (function(){
1313             return (function(){
1314                 var x1 = v139;
1315                 if (typeof x1 !== 'number') throw 'Not a number!';
1316                 return (x1<0?l4.value: l5.value);
1317             })();
1318         })();
1319     }));
1320     return l87;
1321 })();
1322 (function(){
1323     (l60).fvalue = (function(v143){
1324         ((v143)["fname"] = "LISTP");
1325         return v143;
1326     })((function (values,v141){
1327         checkArgs(arguments, 2);
1328         var i;
1329         return (function(){
1330             return (function(v142){
1331                 return (v142 !== l5.value ? v142 : l13.fvalue(values, v141));
1332             })(((function(){
1333                 var tmp = v141;
1334                 return (typeof tmp == 'object' && 'car' in tmp);
1335             })()?l4.value: l5.value));
1336         })();
1337     }));
1338     return l60;
1339 })();
1340 var l88 = {name: "NTHCDR"};
1341 (function(){
1342     (l88).fvalue = (function(v146){
1343         ((v146)["fname"] = "NTHCDR");
1344         return v146;
1345     })((function (values,v144,v145){
1346         checkArgs(arguments, 3);
1347         var i;
1348         return (function(){
1349             (function(){
1350                 return (function(){
1351                     while((l86.fvalue(pv, v144) !== l5.value ? v145 : l5.value) !== l5.value){
1352                         (v144 = l24.fvalue(pv, v144));
1353                         (v145 = (function(){
1354                             var tmp = v145;
1355                             return tmp === l5.value? l5.value: tmp.cdr;
1356                         })());
1357                     }return l5.value;
1358                 })();
1359             })();
1360             return v145;
1361         })();
1362     }));
1363     return l88;
1364 })();
1365 var l89 = {name: "NTH"};
1366 (function(){
1367     (l89).fvalue = (function(v149){
1368         ((v149)["fname"] = "NTH");
1369         return v149;
1370     })((function (values,v147,v148){
1371         checkArgs(arguments, 3);
1372         var i;
1373         return (function(){
1374             return (function(){
1375                 var tmp = l88.fvalue(pv, v147, v148);
1376                 return tmp === l5.value? l5.value: tmp.car;
1377             })();
1378         })();
1379     }));
1380     return l89;
1381 })();
1382 var l90 = {name: "LAST"};
1383 (function(){
1384     (l90).fvalue = (function(v151){
1385         ((v151)["fname"] = "LAST");
1386         return v151;
1387     })((function (values,v150){
1388         checkArgs(arguments, 2);
1389         var i;
1390         return (function(){
1391             (function(){
1392                 return (function(){
1393                     while(((function(){
1394                         var tmp = (function(){
1395                             var tmp = v150;
1396                             return tmp === l5.value? l5.value: tmp.cdr;
1397                         })();
1398                         return (typeof tmp == 'object' && 'car' in tmp);
1399                     })()?l4.value: l5.value) !== l5.value){
1400                         (v150 = (function(){
1401                             var tmp = v150;
1402                             return tmp === l5.value? l5.value: tmp.cdr;
1403                         })());
1404                     }return l5.value;
1405                 })();
1406             })();
1407             return v150;
1408         })();
1409     }));
1410     return l90;
1411 })();
1412 var l91 = {name: "BUTLAST"};
1413 (function(){
1414     (l91).fvalue = (function(v153){
1415         ((v153)["fname"] = "BUTLAST");
1416         return v153;
1417     })((function (values,v152){
1418         checkArgs(arguments, 2);
1419         var i;
1420         return (function(){
1421             return (((function(){
1422                 var tmp = (function(){
1423                     var tmp = v152;
1424                     return tmp === l5.value? l5.value: tmp.cdr;
1425                 })();
1426                 return (typeof tmp == 'object' && 'car' in tmp);
1427             })()?l4.value: l5.value) !== l5.value ? ({car: (function(){
1428                 var tmp = v152;
1429                 return tmp === l5.value? l5.value: tmp.car;
1430             })(), cdr: l91.fvalue(pv, (function(){
1431                 var tmp = v152;
1432                 return tmp === l5.value? l5.value: tmp.cdr;
1433             })())}) : l5.value);
1434         })();
1435     }));
1436     return l91;
1437 })();
1438 var l92 = {name: "MEMBER"};
1439 (function(){
1440     (l92).fvalue = (function(v156){
1441         ((v156)["fname"] = "MEMBER");
1442         return v156;
1443     })((function (values,v154,v155){
1444         checkArgs(arguments, 3);
1445         var i;
1446         return (function(){
1447             return (function(){
1448                 try {
1449                     return (function(){
1450                         while(v155 !== l5.value){
1451                             (l27.fvalue(pv, v154, (function(){
1452                                 var tmp = v155;
1453                                 return tmp === l5.value? l5.value: tmp.car;
1454                             })()) !== l5.value ? (function(){
1455                                 var values = mv;
1456                                 throw ({type: 'block', id: 70, values: v155, message: 'Return from unknown block NIL.'})
1457                             })() : l5.value);
1458                             (v155 = (function(){
1459                                 var tmp = v155;
1460                                 return tmp === l5.value? l5.value: tmp.cdr;
1461                             })());
1462                         }return l5.value;
1463                     })();
1464                 }
1465                 catch (cf){
1466                     if (cf.type == 'block' && cf.id == 70)
1467                         return values.apply(this, forcemv(cf.values));
1468                     else
1469                         throw cf;
1470                 }
1471             })();
1472         })();
1473     }));
1474     return l92;
1475 })();
1476 var l93 = {name: "REMOVE"};
1477 (function(){
1478     (l93).fvalue = (function(v159){
1479         ((v159)["fname"] = "REMOVE");
1480         return v159;
1481     })((function (values,v157,v158){
1482         checkArgs(arguments, 3);
1483         var i;
1484         return (function(){
1485             return (l13.fvalue(pv, v158) !== l5.value ? l5.value : (l27.fvalue(pv, v157, (function(){
1486                 var tmp = v158;
1487                 return tmp === l5.value? l5.value: tmp.car;
1488             })()) !== l5.value ? l93.fvalue(values, v157, (function(){
1489                 var tmp = v158;
1490                 return tmp === l5.value? l5.value: tmp.cdr;
1491             })()) : ({car: (function(){
1492                 var tmp = v158;
1493                 return tmp === l5.value? l5.value: tmp.car;
1494             })(), cdr: l93.fvalue(pv, v157, (function(){
1495                 var tmp = v158;
1496                 return tmp === l5.value? l5.value: tmp.cdr;
1497             })())})));
1498         })();
1499     }));
1500     return l93;
1501 })();
1502 var l94 = {name: "REMOVE-IF"};
1503 (function(){
1504     (l94).fvalue = (function(v162){
1505         ((v162)["fname"] = "REMOVE-IF");
1506         return v162;
1507     })((function (values,v160,v161){
1508         checkArgs(arguments, 3);
1509         var i;
1510         return (function(){
1511             return (l13.fvalue(pv, v161) !== l5.value ? l5.value : ((v160)(pv, (function(){
1512                 var tmp = v161;
1513                 return tmp === l5.value? l5.value: tmp.car;
1514             })()) !== l5.value ? l94.fvalue(values, v160, (function(){
1515                 var tmp = v161;
1516                 return tmp === l5.value? l5.value: tmp.cdr;
1517             })()) : ({car: (function(){
1518                 var tmp = v161;
1519                 return tmp === l5.value? l5.value: tmp.car;
1520             })(), cdr: l94.fvalue(pv, v160, (function(){
1521                 var tmp = v161;
1522                 return tmp === l5.value? l5.value: tmp.cdr;
1523             })())})));
1524         })();
1525     }));
1526     return l94;
1527 })();
1528 var l95 = {name: "REMOVE-IF-NOT"};
1529 (function(){
1530     (l95).fvalue = (function(v165){
1531         ((v165)["fname"] = "REMOVE-IF-NOT");
1532         return v165;
1533     })((function (values,v163,v164){
1534         checkArgs(arguments, 3);
1535         var i;
1536         return (function(){
1537             return (l13.fvalue(pv, v164) !== l5.value ? l5.value : ((v163)(pv, (function(){
1538                 var tmp = v164;
1539                 return tmp === l5.value? l5.value: tmp.car;
1540             })()) !== l5.value ? ({car: (function(){
1541                 var tmp = v164;
1542                 return tmp === l5.value? l5.value: tmp.car;
1543             })(), cdr: l95.fvalue(pv, v163, (function(){
1544                 var tmp = v164;
1545                 return tmp === l5.value? l5.value: tmp.cdr;
1546             })())}) : l95.fvalue(values, v163, (function(){
1547                 var tmp = v164;
1548                 return tmp === l5.value? l5.value: tmp.cdr;
1549             })())));
1550         })();
1551     }));
1552     return l95;
1553 })();
1554 var l96 = {name: "DIGIT-CHAR-P"};
1555 (function(){
1556     (l96).fvalue = (function(v167){
1557         ((v167)["fname"] = "DIGIT-CHAR-P");
1558         return v167;
1559     })((function (values,v166){
1560         checkArgs(arguments, 2);
1561         var i;
1562         return (function(){
1563             return (((function(){
1564                 var x1 = v166;
1565                 if (typeof x1 !== 'number') throw 'Not a number!';
1566                 return (48<=x1?l4.value: l5.value);
1567             })() !== l5.value ? (function(){
1568                 var x1 = v166;
1569                 if (typeof x1 !== 'number') throw 'Not a number!';
1570                 return (x1<=57?l4.value: l5.value);
1571             })() : l5.value) !== l5.value ? (function(){
1572                 var x1 = v166;
1573                 if (typeof x1 !== 'number') throw 'Not a number!';
1574                 return x1-48;
1575             })() : l5.value);
1576         })();
1577     }));
1578     return l96;
1579 })();
1580 var l97 = {name: "DIGIT-CHAR"};
1581 (function(){
1582     (l97).fvalue = (function(v169){
1583         ((v169)["fname"] = "DIGIT-CHAR");
1584         return v169;
1585     })((function (values,v168){
1586         checkArgs(arguments, 2);
1587         var i;
1588         return (function(){
1589             return ((function(){
1590                 var x1 = v168;
1591                 if (typeof x1 !== 'number') throw 'Not a number!';
1592                 return (0<=x1 && x1<=9?l4.value: l5.value);
1593             })() !== l5.value ? (function(){
1594                 var string = "0123456789";
1595                 var index = v168;
1596                 if (typeof string != 'string')
1597                     throw 'The value ' + string + ' is not a type string.';
1598                 if (typeof index != 'number')
1599                     throw 'The value ' + index + ' is not a type number.';
1600                 return string.charCodeAt(index);
1601             })() : l5.value);
1602         })();
1603     }));
1604     return l97;
1605 })();
1606 var l98 = {name: "SUBSEQ"};
1607 (function(){
1608     (l98).fvalue = (function(v173){
1609         ((v173)["fname"] = "SUBSEQ");
1610         return v173;
1611     })((function (values,v170,v171,v172){
1612         checkArgsAtLeast(arguments, 3);
1613         checkArgsAtMost(arguments, 4);
1614         switch(arguments.length-1){
1615         case 2:
1616         v172=l5.value;
1617         default: break;
1618         }
1619         var i;
1620         return (function(){
1621             return (((typeof(v170) == "string")?l4.value: l5.value) !== l5.value ? (v172 !== l5.value ? (function(){
1622                 var str = v170;
1623                 var a = v171;
1624                 var b;
1625                 b = v172;
1626                 return str.slice(a,b);
1627             })() : (function(){
1628                 var str = v170;
1629                 var a = v171;
1630                 var b;
1631                 return str.slice(a,b);
1632             })()) : (function(){
1633                 throw "Unsupported argument.";
1634             })());
1635         })();
1636     }));
1637     return l98;
1638 })();
1639 var l99 = {name: "SOME"};
1640 (function(){
1641     (l99).fvalue = (function(v180){
1642         ((v180)["fname"] = "SOME");
1643         return v180;
1644     })((function (values,v174,v175){
1645         checkArgs(arguments, 3);
1646         var i;
1647         return (function(){
1648             try {
1649                 return (((typeof(v175) == "string")?l4.value: l5.value) !== l5.value ? (function(v176,v177){
1650                     (function(){
1651                         return (function(){
1652                             while((function(){
1653                                 var x1 = v176;
1654                                 if (typeof x1 !== 'number') throw 'Not a number!';
1655                                 var x2 = v177;
1656                                 if (typeof x2 !== 'number') throw 'Not a number!';
1657                                 return (x1<x2?l4.value: l5.value);
1658                             })() !== l5.value){
1659                                 ((v174)(pv, (function(){
1660                                     var string = v175;
1661                                     var index = v176;
1662                                     if (typeof string != 'string')
1663                                         throw 'The value ' + string + ' is not a type string.';
1664                                     if (typeof index != 'number')
1665                                         throw 'The value ' + index + ' is not a type number.';
1666                                     return string.charCodeAt(index);
1667                                 })()) !== l5.value ? (function(){
1668                                     var values = mv;
1669                                     throw ({type: 'block', id: 77, values: l4.value, message: 'Return from unknown block SOME.'})
1670                                 })() : l5.value);
1671                                 (v176 = (function(){
1672                                     var x1 = v176;
1673                                     if (typeof x1 !== 'number') throw 'Not a number!';
1674                                     return x1+1;
1675                                 })());
1676                             }return l5.value;
1677                         })();
1678                     })();
1679                     return l5.value;
1680                 })(0,l72.fvalue(pv, v175)) : (l60.fvalue(pv, v175) !== l5.value ? (function(){
1681                     try {
1682                         return (function(v178,v179){
1683                             (function(){
1684                                 while(v178 !== l5.value){
1685                                     (v179 = (function(){
1686                                         var tmp = v178;
1687                                         return tmp === l5.value? l5.value: tmp.car;
1688                                     })());
1689                                     (function(){
1690                                         ((v174)(pv, v179) !== l5.value ? (function(){
1691                                             var values = mv;
1692                                             throw ({type: 'block', id: 79, values: l4.value, message: 'Return from unknown block NIL.'})
1693                                         })() : l5.value);
1694                                         return l5.value;
1695                                     })();
1696                                     (v178 = (function(){
1697                                         var tmp = v178;
1698                                         return tmp === l5.value? l5.value: tmp.cdr;
1699                                     })());
1700                                 }return l5.value;
1701                             })();
1702                             return l5.value;
1703                         })(v175,l5.value);
1704                     }
1705                     catch (cf){
1706                         if (cf.type == 'block' && cf.id == 79)
1707                             return values.apply(this, forcemv(cf.values));
1708                         else
1709                             throw cf;
1710                     }
1711                 })() : (function(){
1712                     throw "Unknown sequence.";
1713                 })()));
1714             }
1715             catch (cf){
1716                 if (cf.type == 'block' && cf.id == 77)
1717                     return values.apply(this, forcemv(cf.values));
1718                 else
1719                     throw cf;
1720             }
1721         })();
1722     }));
1723     return l99;
1724 })();
1725 var l100 = {name: "EVERY"};
1726 (function(){
1727     (l100).fvalue = (function(v187){
1728         ((v187)["fname"] = "EVERY");
1729         return v187;
1730     })((function (values,v181,v182){
1731         checkArgs(arguments, 3);
1732         var i;
1733         return (function(){
1734             try {
1735                 return (((typeof(v182) == "string")?l4.value: l5.value) !== l5.value ? (function(v183,v184){
1736                     (function(){
1737                         return (function(){
1738                             while((function(){
1739                                 var x1 = v183;
1740                                 if (typeof x1 !== 'number') throw 'Not a number!';
1741                                 var x2 = v184;
1742                                 if (typeof x2 !== 'number') throw 'Not a number!';
1743                                 return (x1<x2?l4.value: l5.value);
1744                             })() !== l5.value){
1745                                 ((v181)(pv, (function(){
1746                                     var string = v182;
1747                                     var index = v183;
1748                                     if (typeof string != 'string')
1749                                         throw 'The value ' + string + ' is not a type string.';
1750                                     if (typeof index != 'number')
1751                                         throw 'The value ' + index + ' is not a type number.';
1752                                     return string.charCodeAt(index);
1753                                 })()) !== l5.value ? l5.value : (function(){
1754                                     var values = mv;
1755                                     throw ({type: 'block', id: 80, values: l5.value, message: 'Return from unknown block EVERY.'})
1756                                 })());
1757                                 (v183 = (function(){
1758                                     var x1 = v183;
1759                                     if (typeof x1 !== 'number') throw 'Not a number!';
1760                                     return x1+1;
1761                                 })());
1762                             }return l5.value;
1763                         })();
1764                     })();
1765                     return l4.value;
1766                 })(0,l72.fvalue(pv, v182)) : (l60.fvalue(pv, v182) !== l5.value ? (function(){
1767                     try {
1768                         return (function(v185,v186){
1769                             (function(){
1770                                 while(v185 !== l5.value){
1771                                     (v186 = (function(){
1772                                         var tmp = v185;
1773                                         return tmp === l5.value? l5.value: tmp.car;
1774                                     })());
1775                                     (function(){
1776                                         ((v181)(pv, v186) !== l5.value ? l5.value : (function(){
1777                                             var values = mv;
1778                                             throw ({type: 'block', id: 82, values: l5.value, message: 'Return from unknown block NIL.'})
1779                                         })());
1780                                         return l5.value;
1781                                     })();
1782                                     (v185 = (function(){
1783                                         var tmp = v185;
1784                                         return tmp === l5.value? l5.value: tmp.cdr;
1785                                     })());
1786                                 }return l5.value;
1787                             })();
1788                             return l4.value;
1789                         })(v182,l5.value);
1790                     }
1791                     catch (cf){
1792                         if (cf.type == 'block' && cf.id == 82)
1793                             return values.apply(this, forcemv(cf.values));
1794                         else
1795                             throw cf;
1796                     }
1797                 })() : (function(){
1798                     throw "Unknown sequence.";
1799                 })()));
1800             }
1801             catch (cf){
1802                 if (cf.type == 'block' && cf.id == 80)
1803                     return values.apply(this, forcemv(cf.values));
1804                 else
1805                     throw cf;
1806             }
1807         })();
1808     }));
1809     return l100;
1810 })();
1811 var l101 = {name: "ASSOC"};
1812 (function(){
1813     (l101).fvalue = (function(v190){
1814         ((v190)["fname"] = "ASSOC");
1815         return v190;
1816     })((function (values,v188,v189){
1817         checkArgs(arguments, 3);
1818         var i;
1819         return (function(){
1820             (function(){
1821                 try {
1822                     return (function(){
1823                         while(v189 !== l5.value){
1824                             (l27.fvalue(pv, v188, l33.fvalue(pv, v189)) !== l5.value ? (function(){
1825                                 throw ({type: 'block', id: 84, values: l5.value, message: 'Return from unknown block NIL.'})
1826                             })() : (v189 = (function(){
1827                                 var tmp = v189;
1828                                 return tmp === l5.value? l5.value: tmp.cdr;
1829                             })()));
1830                         }return l5.value;
1831                     })();
1832                 }
1833                 catch (cf){
1834                     if (cf.type == 'block' && cf.id == 84)
1835                         return cf.values;
1836                     else
1837                         throw cf;
1838                 }
1839             })();
1840             return (function(){
1841                 var tmp = v189;
1842                 return tmp === l5.value? l5.value: tmp.car;
1843             })();
1844         })();
1845     }));
1846     return l101;
1847 })();
1848 var l102 = {name: "STRING"};
1849 (function(){
1850     (l102).fvalue = (function(v192){
1851         ((v192)["fname"] = "STRING");
1852         return v192;
1853     })((function (values,v191){
1854         checkArgs(arguments, 2);
1855         var i;
1856         return (function(){
1857             return (((typeof(v191) == "string")?l4.value: l5.value) !== l5.value ? v191 : (((function(){
1858                 var tmp = v191;
1859                 return (typeof tmp == 'object' && 'name' in tmp);
1860             })()?l4.value: l5.value) !== l5.value ? (v191).name : (function(){
1861                 var x = v191;
1862                 if (typeof x != 'number')
1863                     throw 'The value ' + x + ' is not a type number.';
1864                 return String.fromCharCode(x);
1865             })()));
1866         })();
1867     }));
1868     return l102;
1869 })();
1870 var l103 = {name: "STRING="};
1871 (function(){
1872     (l103).fvalue = (function(v195){
1873         ((v195)["fname"] = "STRING=");
1874         return v195;
1875     })((function (values,v193,v194){
1876         checkArgs(arguments, 3);
1877         var i;
1878         return (function(){
1879             return ((v193 == v194)?l4.value: l5.value);
1880         })();
1881     }));
1882     return l103;
1883 })();
1884 var l104 = {name: "FDEFINITION"};
1885 (function(){
1886     (l104).fvalue = (function(v197){
1887         ((v197)["fname"] = "FDEFINITION");
1888         return v197;
1889     })((function (values,v196){
1890         checkArgs(arguments, 2);
1891         var i;
1892         return (function(){
1893             return (((typeof v196 == 'function')?l4.value: l5.value) !== l5.value ? v196 : (((function(){
1894                 var tmp = v196;
1895                 return (typeof tmp == 'object' && 'name' in tmp);
1896             })()?l4.value: l5.value) !== l5.value ? (function(){
1897                 var symbol = v196;
1898                 var func = symbol.fvalue;
1899                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1900                 return func;
1901             })() : (function(){
1902                 throw "Invalid function";
1903             })()));
1904         })();
1905     }));
1906     return l104;
1907 })();
1908 var l105 = {name: "DISASSEMBLE"};
1909 var l106 = {name: "WRITE-LINE"};
1910 (function(){
1911     (l105).fvalue = (function(v199){
1912         ((v199)["fname"] = "DISASSEMBLE");
1913         return v199;
1914     })((function (values,v198){
1915         checkArgs(arguments, 2);
1916         var i;
1917         return (function(){
1918             l106.fvalue(pv, (l104.fvalue(pv, v198)).toString());
1919             return l5.value;
1920         })();
1921     }));
1922     return l105;
1923 })();
1924 var l107 = {name: "DOCUMENTATION"};
1925 var l108 = {name: "FUNCTION"};
1926 var l109 = {name: "VARIABLE"};
1927 (function(){
1928     (l107).fvalue = (function(v204){
1929         ((v204)["fname"] = "DOCUMENTATION");
1930         return v204;
1931     })((function(){
1932         var func = (function (values,v200,v201){
1933             checkArgs(arguments, 3);
1934             var i;
1935             return (function(){
1936                 return (function(v202){
1937                     return (l27.fvalue(pv, v202, l108) !== l5.value ? (function(v203){
1938                         return (function(){
1939                             var tmp = (v203)["docstring"];
1940                             return tmp == undefined? l5.value: tmp ;
1941                         })();
1942                     })(l104.fvalue(pv, v200)) : (l27.fvalue(pv, v202, l109) !== l5.value ? (function(){
1943                         (((function(){
1944                             var tmp = v200;
1945                             return (typeof tmp == 'object' && 'name' in tmp);
1946                         })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
1947                             throw "Wrong argument type! it should be a symbol";
1948                         })());
1949                         return (function(){
1950                             var tmp = (v200)["vardoc"];
1951                             return tmp == undefined? l5.value: tmp ;
1952                         })();
1953                     })() : (function(){
1954                         throw "ECASE expression failed.";
1955                     })()));
1956                 })(v201);
1957             })();
1958         });
1959         func.docstring = 'Return the documentation of X. TYPE must be the symbol VARIABLE or FUNCTION.';
1960         return func;
1961     })());
1962     return l107;
1963 })();
1964 var l110 = {name: "MULTIPLE-VALUE-BIND"};
1965 l110;
1966 var l111 = {name: "MULTIPLE-VALUE-LIST"};
1967 l111;
1968 var l112 = {name: "*PACKAGE-LIST*"};
1969 (function(){
1970     (((l112.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l112).value = l5.value));
1971     return l112;
1972 })();
1973 var l113 = {name: "LIST-ALL-PACKAGES"};
1974 (function(){
1975     (l113).fvalue = (function(v205){
1976         ((v205)["fname"] = "LIST-ALL-PACKAGES");
1977         return v205;
1978     })((function (values){
1979         checkArgsAtMost(arguments, 1);
1980         var i;
1981         return (function(){
1982             return (function(){
1983                 var symbol = l112;
1984                 var value = symbol.value;
1985                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1986                 return value;
1987             })();
1988         })();
1989     }));
1990     return l113;
1991 })();
1992 var l114 = {name: "MAKE-PACKAGE"};
1993 var l115 = {name: "FIND-PACKAGE-OR-FAIL"};
1994 (function(){
1995     (l114).fvalue = (function(v210){
1996         ((v210)["fname"] = "MAKE-PACKAGE");
1997         return v210;
1998     })((function (values,v206,v207){
1999         checkArgsAtLeast(arguments, 2);
2000         checkArgsAtMost(arguments, 3);
2001         switch(arguments.length-1){
2002         case 1:
2003         v207=l5.value;
2004         default: break;
2005         }
2006         var i;
2007         return (function(){
2008             return (function(v208,v209){
2009                 ((v208)["packageName"] = v206);
2010                 ((v208)["symbols"] = {});
2011                 ((v208)["exports"] = {});
2012                 ((v208)["use"] = v209);
2013                 ((l112).value = ({car: v208, cdr: (function(){
2014                     var symbol = l112;
2015                     var value = symbol.value;
2016                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2017                     return value;
2018                 })()}));
2019                 return v208;
2020             })({},l78.fvalue(pv, (function(){
2021                 var symbol = l115;
2022                 var func = symbol.fvalue;
2023                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2024                 return func;
2025             })(), v207));
2026         })();
2027     }));
2028     return l114;
2029 })();
2030 var l116 = {name: "PACKAGEP"};
2031 (function(){
2032     (l116).fvalue = (function(v212){
2033         ((v212)["fname"] = "PACKAGEP");
2034         return v212;
2035     })((function (values,v211){
2036         checkArgs(arguments, 2);
2037         var i;
2038         return (function(){
2039             return (((typeof (v211) === 'object')?l4.value: l5.value) !== l5.value ? ((("symbols") in (v211))?l4.value: l5.value) : l5.value);
2040         })();
2041     }));
2042     return l116;
2043 })();
2044 var l117 = {name: "FIND-PACKAGE"};
2045 var l118 = {name: "PACKAGE-NAME"};
2046 (function(){
2047     (l117).fvalue = (function(v217){
2048         ((v217)["fname"] = "FIND-PACKAGE");
2049         return v217;
2050     })((function (values,v213){
2051         checkArgs(arguments, 2);
2052         var i;
2053         return (function(){
2054             try {
2055                 (l116.fvalue(pv, v213) !== l5.value ? (function(){
2056                     var values = mv;
2057                     throw ({type: 'block', id: 93, values: v213, message: 'Return from unknown block FIND-PACKAGE.'})
2058                 })() : l5.value);
2059                 return (function(v214){
2060                     return (function(){
2061                         try {
2062                             return (function(v215,v216){
2063                                 (function(){
2064                                     while(v215 !== l5.value){
2065                                         (v216 = (function(){
2066                                             var tmp = v215;
2067                                             return tmp === l5.value? l5.value: tmp.car;
2068                                         })());
2069                                         (function(){
2070                                             (l103.fvalue(pv, l118.fvalue(pv, v216), v214) !== l5.value ? (function(){
2071                                                 var values = mv;
2072                                                 throw ({type: 'block', id: 94, values: v216, message: 'Return from unknown block NIL.'})
2073                                             })() : l5.value);
2074                                             return l5.value;
2075                                         })();
2076                                         (v215 = (function(){
2077                                             var tmp = v215;
2078                                             return tmp === l5.value? l5.value: tmp.cdr;
2079                                         })());
2080                                     }return l5.value;
2081                                 })();
2082                                 return l5.value;
2083                             })((function(){
2084                                 var symbol = l112;
2085                                 var value = symbol.value;
2086                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2087                                 return value;
2088                             })(),l5.value);
2089                         }
2090                         catch (cf){
2091                             if (cf.type == 'block' && cf.id == 94)
2092                                 return values.apply(this, forcemv(cf.values));
2093                             else
2094                                 throw cf;
2095                         }
2096                     })();
2097                 })(l102.fvalue(pv, v213));
2098             }
2099             catch (cf){
2100                 if (cf.type == 'block' && cf.id == 93)
2101                     return values.apply(this, forcemv(cf.values));
2102                 else
2103                     throw cf;
2104             }
2105         })();
2106     }));
2107     return l117;
2108 })();
2109 (function(){
2110     (l115).fvalue = (function(v220){
2111         ((v220)["fname"] = "FIND-PACKAGE-OR-FAIL");
2112         return v220;
2113     })((function (values,v218){
2114         checkArgs(arguments, 2);
2115         var i;
2116         return (function(){
2117             return (function(v219){
2118                 return (v219 !== l5.value ? v219 : (function(){
2119                     throw "Package unknown.";
2120                 })());
2121             })(l117.fvalue(pv, v218));
2122         })();
2123     }));
2124     return l115;
2125 })();
2126 (function(){
2127     (l118).fvalue = (function(v223){
2128         ((v223)["fname"] = "PACKAGE-NAME");
2129         return v223;
2130     })((function (values,v221){
2131         checkArgs(arguments, 2);
2132         var i;
2133         return (function(){
2134             return (function(v222){
2135                 return (function(){
2136                     var tmp = (v222)["packageName"];
2137                     return tmp == undefined? l5.value: tmp ;
2138                 })();
2139             })(l115.fvalue(pv, v221));
2140         })();
2141     }));
2142     return l118;
2143 })();
2144 var l119 = {name: "%PACKAGE-SYMBOLS"};
2145 (function(){
2146     (l119).fvalue = (function(v226){
2147         ((v226)["fname"] = "%PACKAGE-SYMBOLS");
2148         return v226;
2149     })((function (values,v224){
2150         checkArgs(arguments, 2);
2151         var i;
2152         return (function(){
2153             return (function(v225){
2154                 return (function(){
2155                     var tmp = (v225)["symbols"];
2156                     return tmp == undefined? l5.value: tmp ;
2157                 })();
2158             })(l115.fvalue(pv, v224));
2159         })();
2160     }));
2161     return l119;
2162 })();
2163 var l120 = {name: "PACKAGE-USE-LIST"};
2164 (function(){
2165     (l120).fvalue = (function(v229){
2166         ((v229)["fname"] = "PACKAGE-USE-LIST");
2167         return v229;
2168     })((function (values,v227){
2169         checkArgs(arguments, 2);
2170         var i;
2171         return (function(){
2172             return (function(v228){
2173                 return (function(){
2174                     var tmp = (v228)["use"];
2175                     return tmp == undefined? l5.value: tmp ;
2176                 })();
2177             })(l115.fvalue(pv, v227));
2178         })();
2179     }));
2180     return l120;
2181 })();
2182 var l121 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
2183 (function(){
2184     (l121).fvalue = (function(v232){
2185         ((v232)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
2186         return v232;
2187     })((function (values,v230){
2188         checkArgs(arguments, 2);
2189         var i;
2190         return (function(){
2191             return (function(v231){
2192                 return (function(){
2193                     var tmp = (v231)["exports"];
2194                     return tmp == undefined? l5.value: tmp ;
2195                 })();
2196             })(l115.fvalue(pv, v230));
2197         })();
2198     }));
2199     return l121;
2200 })();
2201 var l122 = {name: "*COMMON-LISP-PACKAGE*"};
2202 (function(){
2203     (((l122.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l122).value = l114.fvalue(pv, "CL")));
2204     return l122;
2205 })();
2206 var l123 = {name: "*USER-PACKAGE*"};
2207 (function(){
2208     (((l123.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l123).value = l114.fvalue(pv, "CL-USER", l45.fvalue(pv, (function(){
2209         var symbol = l122;
2210         var value = symbol.value;
2211         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2212         return value;
2213     })()))));
2214     return l123;
2215 })();
2216 var l124 = {name: "*KEYWORD-PACKAGE*"};
2217 (function(){
2218     (((l124.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l124).value = l114.fvalue(pv, "KEYWORD")));
2219     return l124;
2220 })();
2221 var l125 = {name: "KEYWORDP"};
2222 var l126 = {name: "SYMBOL-PACKAGE"};
2223 (function(){
2224     (l125).fvalue = (function(v234){
2225         ((v234)["fname"] = "KEYWORDP");
2226         return v234;
2227     })((function (values,v233){
2228         checkArgs(arguments, 2);
2229         var i;
2230         return (function(){
2231             return (((function(){
2232                 var tmp = v233;
2233                 return (typeof tmp == 'object' && 'name' in tmp);
2234             })()?l4.value: l5.value) !== l5.value ? ((l126.fvalue(pv, v233) === (function(){
2235                 var symbol = l124;
2236                 var value = symbol.value;
2237                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2238                 return value;
2239             })())?l4.value: l5.value) : l5.value);
2240         })();
2241     }));
2242     return l125;
2243 })();
2244 var l127 = {name: "*PACKAGE*"};
2245 (function(){
2246     (((l127.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l127).value = (function(){
2247         var symbol = l122;
2248         var value = symbol.value;
2249         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2250         return value;
2251     })()));
2252     return l127;
2253 })();
2254 var l128 = {name: "IN-PACKAGE"};
2255 l128;
2256 var l129 = {name: "%INTERN-SYMBOL"};
2257 (function(){
2258     (l129).fvalue = (function(v238){
2259         ((v238)["fname"] = "%INTERN-SYMBOL");
2260         return v238;
2261     })((function (values,v235){
2262         checkArgs(arguments, 2);
2263         var i;
2264         return (function(){
2265             return (function(){
2266                 var v236 = (((("package") in (v235))?l4.value: l5.value) !== l5.value ? l115.fvalue(pv, (function(){
2267                     var tmp = (v235)["package"];
2268                     return tmp == undefined? l5.value: tmp ;
2269                 })()) : (function(){
2270                     var symbol = l122;
2271                     var value = symbol.value;
2272                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2273                     return value;
2274                 })());
2275                 var v237 = l119.fvalue(pv, v236);
2276                 ((v235)["package"] = v236);
2277                 (((v236 === (function(){
2278                     var symbol = l124;
2279                     var value = symbol.value;
2280                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2281                     return value;
2282                 })())?l4.value: l5.value) !== l5.value ? ((v235)["value"] = v235) : l5.value);
2283                 return ((v237)[(v235).name] = v235);
2284             })();
2285         })();
2286     }));
2287     return l129;
2288 })();
2289 var l130 = {name: "FIND-SYMBOL"};
2290 var l131 = {name: "EXTERNAL", 'package': 'KEYWORD'};
2291 var l132 = {name: "INTERNAL", 'package': 'KEYWORD'};
2292 var l133 = {name: "INHERIT", 'package': 'KEYWORD'};
2293 (function(){
2294     (l130).fvalue = (function(v247){
2295         ((v247)["fname"] = "FIND-SYMBOL");
2296         return v247;
2297     })((function (values,v239,v240){
2298         checkArgsAtLeast(arguments, 2);
2299         checkArgsAtMost(arguments, 3);
2300         switch(arguments.length-1){
2301         case 1:
2302         v240=(function(){
2303             var symbol = l127;
2304             var value = symbol.value;
2305             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2306             return value;
2307         })();
2308         default: break;
2309         }
2310         var i;
2311         return (function(){
2312             return (function(){
2313                 var v241 = l115.fvalue(pv, v240);
2314                 var v242 = l121.fvalue(pv, v241);
2315                 var v243 = l119.fvalue(pv, v241);
2316                 return ((((v239) in (v242))?l4.value: l5.value) !== l5.value ? values((function(){
2317                     var tmp = (v242)[v239];
2318                     return tmp == undefined? l5.value: tmp ;
2319                 })(), l131.value) : ((((v239) in (v243))?l4.value: l5.value) !== l5.value ? values((function(){
2320                     var tmp = (v243)[v239];
2321                     return tmp == undefined? l5.value: tmp ;
2322                 })(), l132.value) : (function(){
2323                     try {
2324                         return (function(v244,v245){
2325                             (function(){
2326                                 while(v244 !== l5.value){
2327                                     (v245 = (function(){
2328                                         var tmp = v244;
2329                                         return tmp === l5.value? l5.value: tmp.car;
2330                                     })());
2331                                     (function(){
2332                                         (function(v246){
2333                                             return ((((v239) in (v246))?l4.value: l5.value) !== l5.value ? (function(){
2334                                                 var values = mv;
2335                                                 throw ({type: 'block', id: 103, values: values((function(){
2336                                                     var tmp = (v246)[v239];
2337                                                     return tmp == undefined? l5.value: tmp ;
2338                                                 })(), l133.value), message: 'Return from unknown block NIL.'})
2339                                             })() : l5.value);
2340                                         })(l121.fvalue(pv, v245));
2341                                         return l5.value;
2342                                     })();
2343                                     (v244 = (function(){
2344                                         var tmp = v244;
2345                                         return tmp === l5.value? l5.value: tmp.cdr;
2346                                     })());
2347                                 }return l5.value;
2348                             })();
2349                             return values(l5.value, l5.value);
2350                         })(l120.fvalue(pv, v241),l5.value);
2351                     }
2352                     catch (cf){
2353                         if (cf.type == 'block' && cf.id == 103)
2354                             return values.apply(this, forcemv(cf.values));
2355                         else
2356                             throw cf;
2357                     }
2358                 })()));
2359             })();
2360         })();
2361     }));
2362     return l130;
2363 })();
2364 var l134 = {name: "INTERN"};
2365 var l135 = {name: "EXPORT"};
2366 (function(){
2367     (l134).fvalue = (function(v256){
2368         ((v256)["fname"] = "INTERN");
2369         return v256;
2370     })((function (values,v248,v249){
2371         checkArgsAtLeast(arguments, 2);
2372         checkArgsAtMost(arguments, 3);
2373         switch(arguments.length-1){
2374         case 1:
2375         v249=(function(){
2376             var symbol = l127;
2377             var value = symbol.value;
2378             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2379             return value;
2380         })();
2381         default: break;
2382         }
2383         var i;
2384         return (function(){
2385             return (function(v250){
2386                 return (function(){
2387                     var func = (function (values,v252,v253){
2388                         switch(arguments.length-1){
2389                         case 0:
2390                         v252=l5.value;
2391                         case 1:
2392                         v253=l5.value;
2393                         default: break;
2394                         }
2395                         var v251= l5.value;
2396                         for (var i = arguments.length-1; i>=3; i--)
2397                             v251 = {car: arguments[i], cdr:
2398                         v251};
2399                         var i;
2400                         return (v253 !== l5.value ? values(v252, v253) : (function(v254){
2401                             (function(){
2402                                 var tmp = (v254)[v248];
2403                                 return tmp == undefined? l5.value: tmp ;
2404                             })();
2405                             return (function(v255){
2406                                 ((v255)["package"] = v250);
2407                                 (((v250 === (function(){
2408                                     var symbol = l124;
2409                                     var value = symbol.value;
2410                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2411                                     return value;
2412                                 })())?l4.value: l5.value) !== l5.value ? (function(){
2413                                     ((v255)["value"] = v255);
2414                                     return l135.fvalue(pv, l45.fvalue(pv, v255), v250);
2415                                 })() : l5.value);
2416                                 ((v254)[v248] = v255);
2417                                 return values(v255, l5.value);
2418                             })((function(){
2419                                 var name = v248;
2420                                 if (typeof name != 'string')
2421                                     throw 'The value ' + name + ' is not a type string.';
2422                                 return ({name: name});
2423                             })());
2424                         })(l119.fvalue(pv, v250)));
2425                     });
2426                     var args = [values];
2427                     return (function(){
2428                         var values = mv;
2429                         var vs;
2430                         vs = l130.fvalue(values, v248, v250);
2431                         if (typeof vs === 'object' && 'multiple-value' in vs)
2432                             args = args.concat(vs);
2433                         else
2434                             args.push(vs);
2435                         return func.apply(window, args);
2436                     })();
2437                 })();
2438             })(l115.fvalue(pv, v249));
2439         })();
2440     }));
2441     return l134;
2442 })();
2443 (function(){
2444     (l126).fvalue = (function(v258){
2445         ((v258)["fname"] = "SYMBOL-PACKAGE");
2446         return v258;
2447     })((function (values,v257){
2448         checkArgs(arguments, 2);
2449         var i;
2450         return (function(){
2451             (((function(){
2452                 var tmp = v257;
2453                 return (typeof tmp == 'object' && 'name' in tmp);
2454             })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
2455                 throw "it is not a symbol";
2456             })());
2457             return (function(){
2458                 var tmp = (v257)["package"];
2459                 return tmp == undefined? l5.value: tmp ;
2460             })();
2461         })();
2462     }));
2463     return l126;
2464 })();
2465 (function(){
2466     (l135).fvalue = (function(v264){
2467         ((v264)["fname"] = "EXPORT");
2468         return v264;
2469     })((function (values,v259,v260){
2470         checkArgsAtLeast(arguments, 2);
2471         checkArgsAtMost(arguments, 3);
2472         switch(arguments.length-1){
2473         case 1:
2474         v260=(function(){
2475             var symbol = l127;
2476             var value = symbol.value;
2477             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2478             return value;
2479         })();
2480         default: break;
2481         }
2482         var i;
2483         return (function(){
2484             return (function(v261){
2485                 return (function(){
2486                     return (function(v262,v263){
2487                         (function(){
2488                             while(v262 !== l5.value){
2489                                 (v263 = (function(){
2490                                     var tmp = v262;
2491                                     return tmp === l5.value? l5.value: tmp.car;
2492                                 })());
2493                                 (function(){
2494                                     ((v261)[(v263).name] = v263);
2495                                     return l5.value;
2496                                 })();
2497                                 (v262 = (function(){
2498                                     var tmp = v262;
2499                                     return tmp === l5.value? l5.value: tmp.cdr;
2500                                 })());
2501                             }return l5.value;
2502                         })();
2503                         return l4.value;
2504                     })(v259,l5.value);
2505                 })();
2506             })(l121.fvalue(pv, v260));
2507         })();
2508     }));
2509     return l135;
2510 })();
2511 var l136 = {name: "GET-UNIVERSAL-TIME"};
2512 (function(){
2513     (l136).fvalue = (function(v265){
2514         ((v265)["fname"] = "GET-UNIVERSAL-TIME");
2515         return v265;
2516     })((function (values){
2517         checkArgsAtMost(arguments, 1);
2518         var i;
2519         return (function(){
2520             return (function(){
2521                 var x1 = (Math.round(new Date() / 1000));
2522                 if (typeof x1 !== 'number') throw 'Not a number!';
2523                 return x1+2208988800;
2524             })();
2525         })();
2526     }));
2527     return l136;
2528 })();
2529 var l137 = {name: "*NEWLINE*"};
2530 (function(){
2531     (((l137.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l137).value = l102.fvalue(pv, l82.fvalue(pv, 10))));
2532     return l137;
2533 })();
2534 var l138 = {name: "CONCAT"};
2535 (function(){
2536     (l138).fvalue = (function(v267){
2537         ((v267)["fname"] = "CONCAT");
2538         return v267;
2539     })((function (values){
2540         var v266= l5.value;
2541         for (var i = arguments.length-1; i>=1; i--)
2542             v266 = {car: arguments[i], cdr:
2543         v266};
2544         var i;
2545         return (function(){
2546             return l61.fvalue(values, (function(){
2547                 var symbol = l73;
2548                 var func = symbol.fvalue;
2549                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2550                 return func;
2551             })(), v266, "");
2552         })();
2553     }));
2554     return l138;
2555 })();
2556 var l139 = {name: "CONCATF"};
2557 l139;
2558 var l140 = {name: "JOIN"};
2559 (function(){
2560     (l140).fvalue = (function(v270){
2561         ((v270)["fname"] = "JOIN");
2562         return v270;
2563     })((function (values,v268,v269){
2564         checkArgsAtLeast(arguments, 2);
2565         checkArgsAtMost(arguments, 3);
2566         switch(arguments.length-1){
2567         case 1:
2568         v269="";
2569         default: break;
2570         }
2571         var i;
2572         return (function(){
2573             return (l13.fvalue(pv, v268) !== l5.value ? "" : (l13.fvalue(pv, (function(){
2574                 var tmp = v268;
2575                 return tmp === l5.value? l5.value: tmp.cdr;
2576             })()) !== l5.value ? (function(){
2577                 var tmp = v268;
2578                 return tmp === l5.value? l5.value: tmp.car;
2579             })() : l138.fvalue(values, (function(){
2580                 var tmp = v268;
2581                 return tmp === l5.value? l5.value: tmp.car;
2582             })(), v269, l140.fvalue(pv, (function(){
2583                 var tmp = v268;
2584                 return tmp === l5.value? l5.value: tmp.cdr;
2585             })(), v269))));
2586         })();
2587     }));
2588     return l140;
2589 })();
2590 var l141 = {name: "JOIN-TRAILING"};
2591 (function(){
2592     (l141).fvalue = (function(v273){
2593         ((v273)["fname"] = "JOIN-TRAILING");
2594         return v273;
2595     })((function (values,v271,v272){
2596         checkArgsAtLeast(arguments, 2);
2597         checkArgsAtMost(arguments, 3);
2598         switch(arguments.length-1){
2599         case 1:
2600         v272="";
2601         default: break;
2602         }
2603         var i;
2604         return (function(){
2605             return (l13.fvalue(pv, v271) !== l5.value ? "" : l138.fvalue(values, (function(){
2606                 var tmp = v271;
2607                 return tmp === l5.value? l5.value: tmp.car;
2608             })(), v272, l141.fvalue(pv, (function(){
2609                 var tmp = v271;
2610                 return tmp === l5.value? l5.value: tmp.cdr;
2611             })(), v272)));
2612         })();
2613     }));
2614     return l141;
2615 })();
2616 var l142 = {name: "MAPCONCAT"};
2617 (function(){
2618     (l142).fvalue = (function(v276){
2619         ((v276)["fname"] = "MAPCONCAT");
2620         return v276;
2621     })((function (values,v274,v275){
2622         checkArgs(arguments, 3);
2623         var i;
2624         return (function(){
2625             return l140.fvalue(values, l78.fvalue(pv, v274, v275));
2626         })();
2627     }));
2628     return l142;
2629 })();
2630 var l143 = {name: "VECTOR-TO-LIST"};
2631 (function(){
2632     (l143).fvalue = (function(v282){
2633         ((v282)["fname"] = "VECTOR-TO-LIST");
2634         return v282;
2635     })((function (values,v277){
2636         checkArgs(arguments, 2);
2637         var i;
2638         return (function(){
2639             return (function(v278,v279){
2640                 return (function(){
2641                     return (function(v280,v281){
2642                         (function(){
2643                             while((function(){
2644                                 var x1 = v280;
2645                                 if (typeof x1 !== 'number') throw 'Not a number!';
2646                                 var x2 = v281;
2647                                 if (typeof x2 !== 'number') throw 'Not a number!';
2648                                 return (x1<x2?l4.value: l5.value);
2649                             })() !== l5.value){
2650                                 (function(){
2651                                     (v278 = ({car: (function(){
2652                                         var x = (v277)[v280];
2653                                         if (x === undefined) throw 'Out of range';
2654                                         return x;
2655                                     })(), cdr: v278}));
2656                                     return l5.value;
2657                                 })();
2658                                 (v280 = (function(){
2659                                     var x1 = v280;
2660                                     if (typeof x1 !== 'number') throw 'Not a number!';
2661                                     return x1+1;
2662                                 })());
2663                             }return l5.value;
2664                         })();
2665                         return l67.fvalue(values, v278);
2666                     })(0,v279);
2667                 })();
2668             })(l5.value,l72.fvalue(pv, v277));
2669         })();
2670     }));
2671     return l143;
2672 })();
2673 var l144 = {name: "LIST-TO-VECTOR"};
2674 (function(){
2675     (l144).fvalue = (function(v288){
2676         ((v288)["fname"] = "LIST-TO-VECTOR");
2677         return v288;
2678     })((function (values,v283){
2679         checkArgs(arguments, 2);
2680         var i;
2681         return (function(){
2682             return (function(v284,v285){
2683                 return (function(){
2684                     return (function(v286,v287){
2685                         (function(){
2686                             while(v286 !== l5.value){
2687                                 (v287 = (function(){
2688                                     var tmp = v286;
2689                                     return tmp === l5.value? l5.value: tmp.car;
2690                                 })());
2691                                 (function(){
2692                                     (function(){
2693                                         var x = v284;
2694                                         var i = v285;
2695                                         if (i < 0 || i >= x.length) throw 'Out of range';
2696                                         return x[i] = v287;
2697                                     })();
2698                                     (v285 = (function(){
2699                                         var x1 = v285;
2700                                         if (typeof x1 !== 'number') throw 'Not a number!';
2701                                         return x1+1;
2702                                     })());
2703                                     return l5.value;
2704                                 })();
2705                                 (v286 = (function(){
2706                                     var tmp = v286;
2707                                     return tmp === l5.value? l5.value: tmp.cdr;
2708                                 })());
2709                             }return l5.value;
2710                         })();
2711                         return v284;
2712                     })(v283,l5.value);
2713                 })();
2714             })((function(){
2715                 var r = [];
2716                 for (var i = 0; i < l72.fvalue(pv, v283); i++)
2717                     r.push(l5.value);
2718                 return r;
2719             })(),0);
2720         })();
2721     }));
2722     return l144;
2723 })();
2724 var l145 = {name: "VALUES-LIST"};
2725 (function(){
2726     (l145).fvalue = (function(v290){
2727         ((v290)["fname"] = "VALUES-LIST");
2728         return v290;
2729     })((function (values,v289){
2730         checkArgs(arguments, 2);
2731         var i;
2732         return (function(){
2733             return values.apply(this, l144.fvalue(pv, v289));
2734         })();
2735     }));
2736     return l145;
2737 })();
2738 var l146 = {name: "VALUES"};
2739 (function(){
2740     (l146).fvalue = (function(v292){
2741         ((v292)["fname"] = "VALUES");
2742         return v292;
2743     })((function (values){
2744         var v291= l5.value;
2745         for (var i = arguments.length-1; i>=1; i--)
2746             v291 = {car: arguments[i], cdr:
2747         v291};
2748         var i;
2749         return (function(){
2750             return l145.fvalue(values, v291);
2751         })();
2752     }));
2753     return l146;
2754 })();
2755 (function(){
2756     (l18).fvalue = (function(v296){
2757         ((v296)["fname"] = "INTEGER-TO-STRING");
2758         return v296;
2759     })((function (values,v293){
2760         checkArgs(arguments, 2);
2761         var i;
2762         return (function(){
2763             return (l25.fvalue(pv, v293) !== l5.value ? "0" : (l87.fvalue(pv, v293) !== l5.value ? l138.fvalue(values, "-", l18.fvalue(pv, (function(){
2764                 var x1 = v293;
2765                 if (typeof x1 !== 'number') throw 'Not a number!';
2766                 return 0-x1;
2767             })())) : (function(v294){
2768                 (function(){
2769                     return (function(){
2770                         while(l28.fvalue(pv, l25.fvalue(pv, v293)) !== l5.value){
2771                             (v294 = ({car: (function(){
2772                                 var x = v293;
2773                                 var y = 10;
2774                                 if (typeof x != 'number')
2775                                     throw 'The value ' + x + ' is not a type number.';
2776                                 if (typeof y != 'number')
2777                                     throw 'The value ' + y + ' is not a type number.';
2778                                 return x%y;
2779                             })(), cdr: v294}));
2780                             (v293 = l26.fvalue(pv, v293, 10));
2781                         }return l5.value;
2782                     })();
2783                 })();
2784                 return l142.fvalue(values, (function (values,v295){
2785                     checkArgs(arguments, 2);
2786                     var i;
2787                     return l102.fvalue(values, l97.fvalue(pv, v295));
2788                 }), v294);
2789             })(l5.value)));
2790         })();
2791     }));
2792     return l18;
2793 })();
2794 var l147 = {name: "PRIN1-TO-STRING"};
2795 var l148 = {name: "ESCAPE-STRING"};
2796 (function(){
2797     (l147).fvalue = (function(v305){
2798         ((v305)["fname"] = "PRIN1-TO-STRING");
2799         return v305;
2800     })((function (values,v297){
2801         checkArgs(arguments, 2);
2802         var i;
2803         return (function(){
2804             return (((function(){
2805                 var tmp = v297;
2806                 return (typeof tmp == 'object' && 'name' in tmp);
2807             })()?l4.value: l5.value) !== l5.value ? (function(){
2808                 var func = (function (values,v299,v300){
2809                     switch(arguments.length-1){
2810                     case 0:
2811                     v299=l5.value;
2812                     case 1:
2813                     v300=l5.value;
2814                     default: break;
2815                     }
2816                     var v298= l5.value;
2817                     for (var i = arguments.length-1; i>=3; i--)
2818                         v298 = {car: arguments[i], cdr:
2819                     v298};
2820                     var i;
2821                     return ((v300 !== l5.value ? ((v299 === v297)?l4.value: l5.value) : l5.value) !== l5.value ? (v297).name : (function(v301,v302){
2822                         return l138.fvalue(values, (l13.fvalue(pv, v301) !== l5.value ? "#" : (((v301 === l117.fvalue(pv, "KEYWORD"))?l4.value: l5.value) !== l5.value ? "" : l118.fvalue(pv, v301))), ":", v302);
2823                     })(l126.fvalue(pv, v297),(v297).name));
2824                 });
2825                 var args = [values];
2826                 return (function(){
2827                     var values = mv;
2828                     var vs;
2829                     vs = l130.fvalue(values, (v297).name, (function(){
2830                         var symbol = l127;
2831                         var value = symbol.value;
2832                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2833                         return value;
2834                     })());
2835                     if (typeof vs === 'object' && 'multiple-value' in vs)
2836                         args = args.concat(vs);
2837                     else
2838                         args.push(vs);
2839                     return func.apply(window, args);
2840                 })();
2841             })() : (l85.fvalue(pv, v297) !== l5.value ? l18.fvalue(values, v297) : (((typeof(v297) == "string")?l4.value: l5.value) !== l5.value ? l138.fvalue(values, "\"", l148.fvalue(pv, v297), "\"") : (((typeof v297 == 'function')?l4.value: l5.value) !== l5.value ? (function(v303){
2842                 return (v303 !== l5.value ? l138.fvalue(values, "#<FUNCTION ", v303, ">") : l138.fvalue(values, "#<FUNCTION>"));
2843             })((function(){
2844                 var tmp = (v297)["fname"];
2845                 return tmp == undefined? l5.value: tmp ;
2846             })()) : (l60.fvalue(pv, v297) !== l5.value ? l138.fvalue(values, "(", l141.fvalue(pv, l78.fvalue(pv, (function(){
2847                 var symbol = l147;
2848                 var func = symbol.fvalue;
2849                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2850                 return func;
2851             })(), l91.fvalue(pv, v297)), " "), (function(v304){
2852                 return (l13.fvalue(pv, (function(){
2853                     var tmp = v304;
2854                     return tmp === l5.value? l5.value: tmp.cdr;
2855                 })()) !== l5.value ? l147.fvalue(pv, (function(){
2856                     var tmp = v304;
2857                     return tmp === l5.value? l5.value: tmp.car;
2858                 })()) : l138.fvalue(pv, l147.fvalue(pv, (function(){
2859                     var tmp = v304;
2860                     return tmp === l5.value? l5.value: tmp.car;
2861                 })()), " . ", l147.fvalue(pv, (function(){
2862                     var tmp = v304;
2863                     return tmp === l5.value? l5.value: tmp.cdr;
2864                 })())));
2865             })(l90.fvalue(pv, v297)), ")") : (((function(){
2866                 var x = v297;
2867                 return typeof x === 'object' && 'length' in x;
2868             })()?l4.value: l5.value) !== l5.value ? l138.fvalue(values, "#", l147.fvalue(pv, l143.fvalue(pv, v297))) : (l116.fvalue(pv, v297) !== l5.value ? l138.fvalue(values, "#<PACKAGE ", l118.fvalue(pv, v297), ">") : l5.value)))))));
2869         })();
2870     }));
2871     return l147;
2872 })();
2873 (function(){
2874     (l106).fvalue = (function(v307){
2875         ((v307)["fname"] = "WRITE-LINE");
2876         return v307;
2877     })((function (values,v306){
2878         checkArgs(arguments, 2);
2879         var i;
2880         return (function(){
2881             (function(){
2882                 var x = v306;
2883                 if (typeof x != 'string')
2884                     throw 'The value ' + x + ' is not a type string.';
2885                 return lisp.write(x);
2886             })();
2887             (function(){
2888                 var x = (function(){
2889                     var symbol = l137;
2890                     var value = symbol.value;
2891                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2892                     return value;
2893                 })();
2894                 if (typeof x != 'string')
2895                     throw 'The value ' + x + ' is not a type string.';
2896                 return lisp.write(x);
2897             })();
2898             return v306;
2899         })();
2900     }));
2901     return l106;
2902 })();
2903 var l149 = {name: "WARN"};
2904 (function(){
2905     (l149).fvalue = (function(v309){
2906         ((v309)["fname"] = "WARN");
2907         return v309;
2908     })((function (values,v308){
2909         checkArgs(arguments, 2);
2910         var i;
2911         return (function(){
2912             (function(){
2913                 var x = "WARNING: ";
2914                 if (typeof x != 'string')
2915                     throw 'The value ' + x + ' is not a type string.';
2916                 return lisp.write(x);
2917             })();
2918             return l106.fvalue(values, v308);
2919         })();
2920     }));
2921     return l149;
2922 })();
2923 var l150 = {name: "PRINT"};
2924 (function(){
2925     (l150).fvalue = (function(v311){
2926         ((v311)["fname"] = "PRINT");
2927         return v311;
2928     })((function (values,v310){
2929         checkArgs(arguments, 2);
2930         var i;
2931         return (function(){
2932             l106.fvalue(pv, l147.fvalue(pv, v310));
2933             return v310;
2934         })();
2935     }));
2936     return l150;
2937 })();
2938 var l151 = {name: "MAKE-STRING-STREAM"};
2939 (function(){
2940     (l151).fvalue = (function(v313){
2941         ((v313)["fname"] = "MAKE-STRING-STREAM");
2942         return v313;
2943     })((function (values,v312){
2944         checkArgs(arguments, 2);
2945         var i;
2946         return (function(){
2947             return ({car: v312, cdr: 0});
2948         })();
2949     }));
2950     return l151;
2951 })();
2952 var l152 = {name: "%PEEK-CHAR"};
2953 (function(){
2954     (l152).fvalue = (function(v315){
2955         ((v315)["fname"] = "%PEEK-CHAR");
2956         return v315;
2957     })((function (values,v314){
2958         checkArgs(arguments, 2);
2959         var i;
2960         return (function(){
2961             return ((function(){
2962                 var x1 = (function(){
2963                     var tmp = v314;
2964                     return tmp === l5.value? l5.value: tmp.cdr;
2965                 })();
2966                 if (typeof x1 !== 'number') throw 'Not a number!';
2967                 var x2 = l72.fvalue(pv, (function(){
2968                     var tmp = v314;
2969                     return tmp === l5.value? l5.value: tmp.car;
2970                 })());
2971                 if (typeof x2 !== 'number') throw 'Not a number!';
2972                 return (x1<x2?l4.value: l5.value);
2973             })() !== l5.value ? (function(){
2974                 var string = (function(){
2975                     var tmp = v314;
2976                     return tmp === l5.value? l5.value: tmp.car;
2977                 })();
2978                 var index = (function(){
2979                     var tmp = v314;
2980                     return tmp === l5.value? l5.value: tmp.cdr;
2981                 })();
2982                 if (typeof string != 'string')
2983                     throw 'The value ' + string + ' is not a type string.';
2984                 if (typeof index != 'number')
2985                     throw 'The value ' + index + ' is not a type number.';
2986                 return string.charCodeAt(index);
2987             })() : l5.value);
2988         })();
2989     }));
2990     return l152;
2991 })();
2992 var l153 = {name: "%READ-CHAR"};
2993 (function(){
2994     (l153).fvalue = (function(v318){
2995         ((v318)["fname"] = "%READ-CHAR");
2996         return v318;
2997     })((function (values,v316){
2998         checkArgs(arguments, 2);
2999         var i;
3000         return (function(){
3001             return ((function(){
3002                 var x1 = (function(){
3003                     var tmp = v316;
3004                     return tmp === l5.value? l5.value: tmp.cdr;
3005                 })();
3006                 if (typeof x1 !== 'number') throw 'Not a number!';
3007                 var x2 = l72.fvalue(pv, (function(){
3008                     var tmp = v316;
3009                     return tmp === l5.value? l5.value: tmp.car;
3010                 })());
3011                 if (typeof x2 !== 'number') throw 'Not a number!';
3012                 return (x1<x2?l4.value: l5.value);
3013             })() !== l5.value ? (function(v317){
3014                 (function(){
3015                     var x = v316;
3016                     if (typeof x != 'object')
3017                         throw 'The value ' + x + ' is not a type object.';
3018                     return (x.cdr = l23.fvalue(pv, (function(){
3019                         var tmp = v316;
3020                         return tmp === l5.value? l5.value: tmp.cdr;
3021                     })()), x);
3022                 })();
3023                 return v317;
3024             })((function(){
3025                 var string = (function(){
3026                     var tmp = v316;
3027                     return tmp === l5.value? l5.value: tmp.car;
3028                 })();
3029                 var index = (function(){
3030                     var tmp = v316;
3031                     return tmp === l5.value? l5.value: tmp.cdr;
3032                 })();
3033                 if (typeof string != 'string')
3034                     throw 'The value ' + string + ' is not a type string.';
3035                 if (typeof index != 'number')
3036                     throw 'The value ' + index + ' is not a type number.';
3037                 return string.charCodeAt(index);
3038             })()) : l5.value);
3039         })();
3040     }));
3041     return l153;
3042 })();
3043 var l154 = {name: "WHITESPACEP"};
3044 (function(){
3045     (l154).fvalue = (function(v322){
3046         ((v322)["fname"] = "WHITESPACEP");
3047         return v322;
3048     })((function (values,v319){
3049         checkArgs(arguments, 2);
3050         var i;
3051         return (function(){
3052             return (function(v320){
3053                 return (v320 !== l5.value ? v320 : (function(v321){
3054                     return (v321 !== l5.value ? v321 : l84.fvalue(values, v319, 9));
3055                 })(l84.fvalue(pv, v319, 10)));
3056             })(l84.fvalue(pv, v319, 32));
3057         })();
3058     }));
3059     return l154;
3060 })();
3061 var l155 = {name: "SKIP-WHITESPACES"};
3062 (function(){
3063     (l155).fvalue = (function(v325){
3064         ((v325)["fname"] = "SKIP-WHITESPACES");
3065         return v325;
3066     })((function (values,v323){
3067         checkArgs(arguments, 2);
3068         var i;
3069         return (function(){
3070             return (function(v324){
3071                 (v324 = l152.fvalue(pv, v323));
3072                 return (function(){
3073                     return (function(){
3074                         while((v324 !== l5.value ? l154.fvalue(pv, v324) : l5.value) !== l5.value){
3075                             l153.fvalue(pv, v323);
3076                             (v324 = l152.fvalue(pv, v323));
3077                         }return l5.value;
3078                     })();
3079                 })();
3080             })(l5.value);
3081         })();
3082     }));
3083     return l155;
3084 })();
3085 var l156 = {name: "TERMINALP"};
3086 (function(){
3087     (l156).fvalue = (function(v330){
3088         ((v330)["fname"] = "TERMINALP");
3089         return v330;
3090     })((function (values,v326){
3091         checkArgs(arguments, 2);
3092         var i;
3093         return (function(){
3094             return (function(v327){
3095                 return (v327 !== l5.value ? v327 : (function(v328){
3096                     return (v328 !== l5.value ? v328 : (function(v329){
3097                         return (v329 !== l5.value ? v329 : l84.fvalue(values, 40, v326));
3098                     })(l84.fvalue(pv, 41, v326)));
3099                 })(l154.fvalue(pv, v326)));
3100             })(l13.fvalue(pv, v326));
3101         })();
3102     }));
3103     return l156;
3104 })();
3105 var l157 = {name: "READ-UNTIL"};
3106 (function(){
3107     (l157).fvalue = (function(v335){
3108         ((v335)["fname"] = "READ-UNTIL");
3109         return v335;
3110     })((function (values,v331,v332){
3111         checkArgs(arguments, 3);
3112         var i;
3113         return (function(){
3114             return (function(v333,v334){
3115                 (v334 = l152.fvalue(pv, v331));
3116                 (function(){
3117                     return (function(){
3118                         while((v334 !== l5.value ? l28.fvalue(pv, (v332)(pv, v334)) : l5.value) !== l5.value){
3119                             (v333 = l138.fvalue(pv, v333, l102.fvalue(pv, v334)));
3120                             l153.fvalue(pv, v331);
3121                             (v334 = l152.fvalue(pv, v331));
3122                         }return l5.value;
3123                     })();
3124                 })();
3125                 return v333;
3126             })("",l5.value);
3127         })();
3128     }));
3129     return l157;
3130 })();
3131 var l158 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
3132 (function(){
3133     (l158).fvalue = (function(v339){
3134         ((v339)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
3135         return v339;
3136     })((function (values,v336){
3137         checkArgs(arguments, 2);
3138         var i;
3139         return (function(){
3140             return (function(v337){
3141                 l155.fvalue(pv, v336);
3142                 (v337 = l152.fvalue(pv, v336));
3143                 return (function(){
3144                     return (function(){
3145                         while((v337 !== l5.value ? l84.fvalue(pv, v337, 59) : l5.value) !== l5.value){
3146                             l157.fvalue(pv, v336, (function (values,v338){
3147                                 checkArgs(arguments, 2);
3148                                 var i;
3149                                 return l84.fvalue(values, v338, 10);
3150                             }));
3151                             l155.fvalue(pv, v336);
3152                             (v337 = l152.fvalue(pv, v336));
3153                         }return l5.value;
3154                     })();
3155                 })();
3156             })(l5.value);
3157         })();
3158     }));
3159     return l158;
3160 })();
3161 var l159 = {name: "%READ-LIST"};
3162 var l160 = {name: "LS-READ"};
3163 (function(){
3164     (l159).fvalue = (function(v343){
3165         ((v343)["fname"] = "%READ-LIST");
3166         return v343;
3167     })((function (values,v340){
3168         checkArgs(arguments, 2);
3169         var i;
3170         return (function(){
3171             l158.fvalue(pv, v340);
3172             return (function(v341){
3173                 return (l13.fvalue(pv, v341) !== l5.value ? (function(){
3174                     throw "Unspected EOF";
3175                 })() : (l84.fvalue(pv, v341, 41) !== l5.value ? (function(){
3176                     l153.fvalue(pv, v340);
3177                     return l5.value;
3178                 })() : (l84.fvalue(pv, v341, 46) !== l5.value ? (function(){
3179                     l153.fvalue(pv, v340);
3180                     return (function(v342){
3181                         l158.fvalue(pv, v340);
3182                         (l84.fvalue(pv, l153.fvalue(pv, v340), 41) !== l5.value ? l5.value : (function(){
3183                             throw "')' was expected.";
3184                         })());
3185                         return v342;
3186                     })(l160.fvalue(pv, v340));
3187                 })() : ({car: l160.fvalue(pv, v340), cdr: l159.fvalue(pv, v340)}))));
3188             })(l152.fvalue(pv, v340));
3189         })();
3190     }));
3191     return l159;
3192 })();
3193 var l161 = {name: "READ-STRING"};
3194 (function(){
3195     (l161).fvalue = (function(v347){
3196         ((v347)["fname"] = "READ-STRING");
3197         return v347;
3198     })((function (values,v344){
3199         checkArgs(arguments, 2);
3200         var i;
3201         return (function(){
3202             return (function(v345,v346){
3203                 (v346 = l153.fvalue(pv, v344));
3204                 (function(){
3205                     return (function(){
3206                         while(l28.fvalue(pv, l27.fvalue(pv, v346, 34)) !== l5.value){
3207                             (l13.fvalue(pv, v346) !== l5.value ? (function(){
3208                                 throw "Unexpected EOF";
3209                             })() : l5.value);
3210                             (l27.fvalue(pv, v346, 92) !== l5.value ? (v346 = l153.fvalue(pv, v344)) : l5.value);
3211                             (v345 = l138.fvalue(pv, v345, l102.fvalue(pv, v346)));
3212                             (v346 = l153.fvalue(pv, v344));
3213                         }return l5.value;
3214                     })();
3215                 })();
3216                 return v345;
3217             })("",l5.value);
3218         })();
3219     }));
3220     return l161;
3221 })();
3222 var l162 = {name: "READ-SHARP"};
3223 (function(){
3224     (l162).fvalue = (function(v352){
3225         ((v352)["fname"] = "READ-SHARP");
3226         return v352;
3227     })((function (values,v348){
3228         checkArgs(arguments, 2);
3229         var i;
3230         return (function(){
3231             l153.fvalue(pv, v348);
3232             return (function(v349){
3233                 return (l27.fvalue(pv, v349, 39) !== l5.value ? l45.fvalue(values, l108, l160.fvalue(pv, v348)) : (l27.fvalue(pv, v349, 40) !== l5.value ? l144.fvalue(values, l159.fvalue(pv, v348)) : (l27.fvalue(pv, v349, 58) !== l5.value ? (function(){
3234                     var name = (function(){
3235                         var x = l157.fvalue(pv, v348, (function(){
3236                             var symbol = l156;
3237                             var func = symbol.fvalue;
3238                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3239                             return func;
3240                         })());
3241                         if (typeof x != 'string')
3242                             throw 'The value ' + x + ' is not a type string.';
3243                         return x.toUpperCase();
3244                     })();
3245                     if (typeof name != 'string')
3246                         throw 'The value ' + name + ' is not a type string.';
3247                     return ({name: name});
3248                 })() : (l27.fvalue(pv, v349, 92) !== l5.value ? (function(v350){
3249                     return (l103.fvalue(pv, v350, "space") !== l5.value ? l83.fvalue(values, 32) : (l103.fvalue(pv, v350, "tab") !== l5.value ? l83.fvalue(values, 9) : (l103.fvalue(pv, v350, "newline") !== l5.value ? l83.fvalue(values, 10) : l83.fvalue(values, (function(){
3250                         var string = v350;
3251                         var index = 0;
3252                         if (typeof string != 'string')
3253                             throw 'The value ' + string + ' is not a type string.';
3254                         if (typeof index != 'number')
3255                             throw 'The value ' + index + ' is not a type number.';
3256                         return string.charCodeAt(index);
3257                     })()))));
3258                 })(l138.fvalue(pv, l102.fvalue(pv, l153.fvalue(pv, v348)), l157.fvalue(pv, v348, (function(){
3259                     var symbol = l156;
3260                     var func = symbol.fvalue;
3261                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3262                     return func;
3263                 })()))) : (l27.fvalue(pv, v349, 43) !== l5.value ? (function(v351){
3264                     return (l103.fvalue(pv, v351, "common-lisp") !== l5.value ? (function(){
3265                         l160.fvalue(pv, v348);
3266                         return l160.fvalue(values, v348);
3267                     })() : (l103.fvalue(pv, v351, "ecmalisp") !== l5.value ? l160.fvalue(values, v348) : (function(){
3268                         throw "Unknown reader form.";
3269                     })()));
3270                 })(l157.fvalue(pv, v348, (function(){
3271                     var symbol = l156;
3272                     var func = symbol.fvalue;
3273                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3274                     return func;
3275                 })())) : (function(){
3276                     throw "ECASE expression failed.";
3277                 })())))));
3278             })(l153.fvalue(pv, v348));
3279         })();
3280     }));
3281     return l162;
3282 })();
3283 var l163 = {name: "READ-SYMBOL"};
3284 (function(){
3285     (l163).fvalue = (function(v360){
3286         ((v360)["fname"] = "READ-SYMBOL");
3287         return v360;
3288     })((function (values,v353){
3289         checkArgs(arguments, 2);
3290         var i;
3291         return (function(){
3292             return (function(v354,v355,v356,v357,v358){
3293                 (v358 = 0);
3294                 (function(){
3295                     return (function(){
3296                         while(((function(){
3297                             var x1 = v358;
3298                             if (typeof x1 !== 'number') throw 'Not a number!';
3299                             var x2 = v354;
3300                             if (typeof x2 !== 'number') throw 'Not a number!';
3301                             return (x1<x2?l4.value: l5.value);
3302                         })() !== l5.value ? l28.fvalue(pv, l84.fvalue(pv, (function(){
3303                             var string = v353;
3304                             var index = v358;
3305                             if (typeof string != 'string')
3306                                 throw 'The value ' + string + ' is not a type string.';
3307                             if (typeof index != 'number')
3308                                 throw 'The value ' + index + ' is not a type number.';
3309                             return string.charCodeAt(index);
3310                         })(), 58)) : l5.value) !== l5.value){
3311                             (v358 = (function(){
3312                                 var x1 = v358;
3313                                 if (typeof x1 !== 'number') throw 'Not a number!';
3314                                 return x1+1;
3315                             })());
3316                         }return l5.value;
3317                     })();
3318                 })();
3319                 ((function(){
3320                     var x1 = v358;
3321                     if (typeof x1 !== 'number') throw 'Not a number!';
3322                     var x2 = v354;
3323                     if (typeof x2 !== 'number') throw 'Not a number!';
3324                     return (x1==x2?l4.value: l5.value);
3325                 })() !== l5.value ? (function(){
3326                     (v356 = v353);
3327                     (v355 = (function(){
3328                         var symbol = l127;
3329                         var value = symbol.value;
3330                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3331                         return value;
3332                     })());
3333                     return (v357 = l4.value);
3334                 })() : (function(){
3335                     (l25.fvalue(pv, v358) !== l5.value ? (v355 = "KEYWORD") : (v355 = (function(){
3336                         var x = l98.fvalue(pv, v353, 0, v358);
3337                         if (typeof x != 'string')
3338                             throw 'The value ' + x + ' is not a type string.';
3339                         return x.toUpperCase();
3340                     })()));
3341                     (v358 = (function(){
3342                         var x1 = v358;
3343                         if (typeof x1 !== 'number') throw 'Not a number!';
3344                         return x1+1;
3345                     })());
3346                     (l84.fvalue(pv, (function(){
3347                         var string = v353;
3348                         var index = v358;
3349                         if (typeof string != 'string')
3350                             throw 'The value ' + string + ' is not a type string.';
3351                         if (typeof index != 'number')
3352                             throw 'The value ' + index + ' is not a type number.';
3353                         return string.charCodeAt(index);
3354                     })(), 58) !== l5.value ? (function(){
3355                         (v357 = l4.value);
3356                         return (v358 = (function(){
3357                             var x1 = v358;
3358                             if (typeof x1 !== 'number') throw 'Not a number!';
3359                             return x1+1;
3360                         })());
3361                     })() : l5.value);
3362                     return (v356 = l98.fvalue(pv, v353, v358));
3363                 })());
3364                 (v356 = (function(){
3365                     var x = v356;
3366                     if (typeof x != 'string')
3367                         throw 'The value ' + x + ' is not a type string.';
3368                     return x.toUpperCase();
3369                 })());
3370                 (v355 = l117.fvalue(pv, v355));
3371                 return ((function(v359){
3372                     return (v359 !== l5.value ? v359 : ((v355 === l117.fvalue(pv, "KEYWORD"))?l4.value: l5.value));
3373                 })(v357) !== l5.value ? l134.fvalue(values, v356, v355) : l130.fvalue(values, v356, v355));
3374             })(l72.fvalue(pv, v353),l5.value,l5.value,l5.value,l5.value);
3375         })();
3376     }));
3377     return l163;
3378 })();
3379 var l164 = {name: "!PARSE-INTEGER"};
3380 (function(){
3381     (l164).fvalue = (function(v371){
3382         ((v371)["fname"] = "!PARSE-INTEGER");
3383         return v371;
3384     })((function (values,v361,v362){
3385         checkArgs(arguments, 3);
3386         var i;
3387         return (function(){
3388             return (function(){
3389                 try {
3390                     return (function(v363,v364,v365,v366){
3391                         (l25.fvalue(pv, v365) !== l5.value ? (function(){
3392                             var values = mv;
3393                             throw ({type: 'block', id: 143, values: values(l5.value, 0), message: 'Return from unknown block NIL.'})
3394                         })() : l5.value);
3395                         (function(v367){
3396                             return (l27.fvalue(pv, v367, 43) !== l5.value ? (v364 = (function(){
3397                                 var x1 = v364;
3398                                 if (typeof x1 !== 'number') throw 'Not a number!';
3399                                 return x1+1;
3400                             })()) : (l27.fvalue(pv, v367, 45) !== l5.value ? (function(){
3401                                 (v366 = -1);
3402                                 return (v364 = (function(){
3403                                     var x1 = v364;
3404                                     if (typeof x1 !== 'number') throw 'Not a number!';
3405                                     return x1+1;
3406                                 })());
3407                             })() : l5.value));
3408                         })((function(){
3409                             var string = v361;
3410                             var index = 0;
3411                             if (typeof string != 'string')
3412                                 throw 'The value ' + string + ' is not a type string.';
3413                             if (typeof index != 'number')
3414                                 throw 'The value ' + index + ' is not a type number.';
3415                             return string.charCodeAt(index);
3416                         })());
3417                         (((function(){
3418                             var x1 = v364;
3419                             if (typeof x1 !== 'number') throw 'Not a number!';
3420                             var x2 = v365;
3421                             if (typeof x2 !== 'number') throw 'Not a number!';
3422                             return (x1<x2?l4.value: l5.value);
3423                         })() !== l5.value ? (v363 = l96.fvalue(pv, (function(){
3424                             var string = v361;
3425                             var index = v364;
3426                             if (typeof string != 'string')
3427                                 throw 'The value ' + string + ' is not a type string.';
3428                             if (typeof index != 'number')
3429                                 throw 'The value ' + index + ' is not a type number.';
3430                             return string.charCodeAt(index);
3431                         })())) : l5.value) !== l5.value ? l5.value : (function(){
3432                             var values = mv;
3433                             throw ({type: 'block', id: 143, values: values(l5.value, v364), message: 'Return from unknown block NIL.'})
3434                         })());
3435                         (v364 = (function(){
3436                             var x1 = v364;
3437                             if (typeof x1 !== 'number') throw 'Not a number!';
3438                             return x1+1;
3439                         })());
3440                         (function(){
3441                             try {
3442                                 return (function(){
3443                                     while((function(){
3444                                         var x1 = v364;
3445                                         if (typeof x1 !== 'number') throw 'Not a number!';
3446                                         var x2 = v365;
3447                                         if (typeof x2 !== 'number') throw 'Not a number!';
3448                                         return (x1<x2?l4.value: l5.value);
3449                                     })() !== l5.value){
3450                                         (function(v368){
3451                                             (v368 !== l5.value ? l5.value : (function(){
3452                                                 throw ({type: 'block', id: 144, values: l5.value, message: 'Return from unknown block NIL.'})
3453                                             })());
3454                                             (v363 = (function(){
3455                                                 var x1 = (function(){
3456                                                     var x1 = v363;
3457                                                     if (typeof x1 !== 'number') throw 'Not a number!';
3458                                                     return x1*10;
3459                                                 })();
3460                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3461                                                 var x2 = v368;
3462                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3463                                                 return x1+x2;
3464                                             })());
3465                                             return (v364 = (function(){
3466                                                 var x1 = v364;
3467                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3468                                                 return x1+1;
3469                                             })());
3470                                         })(l96.fvalue(pv, (function(){
3471                                             var string = v361;
3472                                             var index = v364;
3473                                             if (typeof string != 'string')
3474                                                 throw 'The value ' + string + ' is not a type string.';
3475                                             if (typeof index != 'number')
3476                                                 throw 'The value ' + index + ' is not a type number.';
3477                                             return string.charCodeAt(index);
3478                                         })()));
3479                                     }return l5.value;
3480                                 })();
3481                             }
3482                             catch (cf){
3483                                 if (cf.type == 'block' && cf.id == 144)
3484                                     return cf.values;
3485                                 else
3486                                     throw cf;
3487                             }
3488                         })();
3489                         return ((function(v369){
3490                             return (v369 !== l5.value ? v369 : (function(v370){
3491                                 return (v370 !== l5.value ? v370 : l84.fvalue(pv, (function(){
3492                                     var string = v361;
3493                                     var index = v364;
3494                                     if (typeof string != 'string')
3495                                         throw 'The value ' + string + ' is not a type string.';
3496                                     if (typeof index != 'number')
3497                                         throw 'The value ' + index + ' is not a type number.';
3498                                     return string.charCodeAt(index);
3499                                 })(), 32));
3500                             })((function(){
3501                                 var x1 = v364;
3502                                 if (typeof x1 !== 'number') throw 'Not a number!';
3503                                 var x2 = v365;
3504                                 if (typeof x2 !== 'number') throw 'Not a number!';
3505                                 return (x1==x2?l4.value: l5.value);
3506                             })()));
3507                         })(v362) !== l5.value ? values((function(){
3508                             var x1 = v366;
3509                             if (typeof x1 !== 'number') throw 'Not a number!';
3510                             var x2 = v363;
3511                             if (typeof x2 !== 'number') throw 'Not a number!';
3512                             return x1*x2;
3513                         })(), v364) : values(l5.value, v364));
3514                     })(0,0,l72.fvalue(pv, v361),1);
3515                 }
3516                 catch (cf){
3517                     if (cf.type == 'block' && cf.id == 143)
3518                         return values.apply(this, forcemv(cf.values));
3519                     else
3520                         throw cf;
3521                 }
3522             })();
3523         })();
3524     }));
3525     return l164;
3526 })();
3527 var l165 = {name: "PARSE-INTEGER"};
3528 (function(){
3529     (l165).fvalue = (function(v373){
3530         ((v373)["fname"] = "PARSE-INTEGER");
3531         return v373;
3532     })((function (values,v372){
3533         checkArgs(arguments, 2);
3534         var i;
3535         return (function(){
3536             return l164.fvalue(values, v372, l5.value);
3537         })();
3538     }));
3539     return l165;
3540 })();
3541 var l166 = {name: "*EOF*"};
3542 (function(){
3543     (((l166.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l166).value = l17.fvalue(pv)));
3544     return l166;
3545 })();
3546 var l167 = {name: "QUOTE"};
3547 var l168 = {name: "BACKQUOTE"};
3548 var l169 = {name: "UNQUOTE-SPLICING"};
3549 var l170 = {name: "UNQUOTE"};
3550 (function(){
3551     (l160).fvalue = (function(v379){
3552         ((v379)["fname"] = "LS-READ");
3553         return v379;
3554     })((function (values,v374){
3555         checkArgs(arguments, 2);
3556         var i;
3557         return (function(){
3558             l158.fvalue(pv, v374);
3559             return (function(v375){
3560                 return ((function(v376){
3561                     return (v376 !== l5.value ? v376 : l84.fvalue(pv, v375, 41));
3562                 })(l13.fvalue(pv, v375)) !== l5.value ? (function(){
3563                     var symbol = l166;
3564                     var value = symbol.value;
3565                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3566                     return value;
3567                 })() : (l84.fvalue(pv, v375, 40) !== l5.value ? (function(){
3568                     l153.fvalue(pv, v374);
3569                     return l159.fvalue(values, v374);
3570                 })() : (l84.fvalue(pv, v375, 39) !== l5.value ? (function(){
3571                     l153.fvalue(pv, v374);
3572                     return l45.fvalue(values, l167, l160.fvalue(pv, v374));
3573                 })() : (l84.fvalue(pv, v375, 96) !== l5.value ? (function(){
3574                     l153.fvalue(pv, v374);
3575                     return l45.fvalue(values, l168, l160.fvalue(pv, v374));
3576                 })() : (l84.fvalue(pv, v375, 34) !== l5.value ? (function(){
3577                     l153.fvalue(pv, v374);
3578                     return l161.fvalue(values, v374);
3579                 })() : (l84.fvalue(pv, v375, 44) !== l5.value ? (function(){
3580                     l153.fvalue(pv, v374);
3581                     return (l27.fvalue(pv, l152.fvalue(pv, v374), 64) !== l5.value ? (function(){
3582                         l153.fvalue(pv, v374);
3583                         return l45.fvalue(values, l169, l160.fvalue(pv, v374));
3584                     })() : l45.fvalue(values, l170, l160.fvalue(pv, v374)));
3585                 })() : (l84.fvalue(pv, v375, 35) !== l5.value ? l162.fvalue(values, v374) : (function(v377){
3586                     return (function(v378){
3587                         return (v378 !== l5.value ? v378 : l163.fvalue(values, v377));
3588                     })(pv(l164.fvalue(pv, v377, l5.value)));
3589                 })(l157.fvalue(pv, v374, (function(){
3590                     var symbol = l156;
3591                     var func = symbol.fvalue;
3592                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3593                     return func;
3594                 })())))))))));
3595             })(l152.fvalue(pv, v374));
3596         })();
3597     }));
3598     return l160;
3599 })();
3600 var l171 = {name: "LS-READ-FROM-STRING"};
3601 (function(){
3602     (l171).fvalue = (function(v381){
3603         ((v381)["fname"] = "LS-READ-FROM-STRING");
3604         return v381;
3605     })((function (values,v380){
3606         checkArgs(arguments, 2);
3607         var i;
3608         return (function(){
3609             return l160.fvalue(values, l151.fvalue(pv, v380));
3610         })();
3611     }));
3612     return l171;
3613 })();
3614 var l172 = {name: "CODE"};
3615 (function(){
3616     (l172).fvalue = (function(v384){
3617         ((v384)["fname"] = "CODE");
3618         return v384;
3619     })((function (values){
3620         var v382= l5.value;
3621         for (var i = arguments.length-1; i>=1; i--)
3622             v382 = {car: arguments[i], cdr:
3623         v382};
3624         var i;
3625         return (function(){
3626             return l142.fvalue(values, (function (values,v383){
3627                 checkArgs(arguments, 2);
3628                 var i;
3629                 return (l13.fvalue(pv, v383) !== l5.value ? "" : (l85.fvalue(pv, v383) !== l5.value ? l18.fvalue(values, v383) : (((typeof(v383) == "string")?l4.value: l5.value) !== l5.value ? v383 : (function(){
3630                     throw "Unknown argument.";
3631                 })())));
3632             }), v382);
3633         })();
3634     }));
3635     return l172;
3636 })();
3637 var l173 = {name: "JS!BOOL"};
3638 var l174 = {name: "LS-COMPILE"};
3639 (function(){
3640     (l173).fvalue = (function(v386){
3641         ((v386)["fname"] = "JS!BOOL");
3642         return v386;
3643     })((function (values,v385){
3644         checkArgs(arguments, 2);
3645         var i;
3646         return (function(){
3647             return l172.fvalue(values, "(", v385, "?", l174.fvalue(pv, l4.value), ": ", l174.fvalue(pv, l5.value), ")");
3648         })();
3649     }));
3650     return l173;
3651 })();
3652 var l175 = {name: "JS!SELFCALL"};
3653 l175;
3654 var l176 = {name: "INDENT"};
3655 (function(){
3656     (l176).fvalue = (function(v393){
3657         ((v393)["fname"] = "INDENT");
3658         return v393;
3659     })((function (values){
3660         var v387= l5.value;
3661         for (var i = arguments.length-1; i>=1; i--)
3662             v387 = {car: arguments[i], cdr:
3663         v387};
3664         var i;
3665         return (function(){
3666             return (function(v388){
3667                 return (function(v389,v390,v391){
3668                     (l86.fvalue(pv, l72.fvalue(pv, v388)) !== l5.value ? (v389 = l138.fvalue(pv, v389, "    ")) : l5.value);
3669                     (function(){
3670                         return (function(){
3671                             while((function(){
3672                                 var x1 = v390;
3673                                 if (typeof x1 !== 'number') throw 'Not a number!';
3674                                 var x2 = v391;
3675                                 if (typeof x2 !== 'number') throw 'Not a number!';
3676                                 return (x1<x2?l4.value: l5.value);
3677                             })() !== l5.value){
3678                                 (function(v392){
3679                                     return (v389 = l138.fvalue(pv, v389, v392));
3680                                 })(((l84.fvalue(pv, (function(){
3681                                     var string = v388;
3682                                     var index = v390;
3683                                     if (typeof string != 'string')
3684                                         throw 'The value ' + string + ' is not a type string.';
3685                                     if (typeof index != 'number')
3686                                         throw 'The value ' + index + ' is not a type number.';
3687                                     return string.charCodeAt(index);
3688                                 })(), 10) !== l5.value ? ((function(){
3689                                     var x1 = v390;
3690                                     if (typeof x1 !== 'number') throw 'Not a number!';
3691                                     var x2 = l24.fvalue(pv, v391);
3692                                     if (typeof x2 !== 'number') throw 'Not a number!';
3693                                     return (x1<x2?l4.value: l5.value);
3694                                 })() !== l5.value ? l28.fvalue(pv, l84.fvalue(pv, (function(){
3695                                     var string = v388;
3696                                     var index = l23.fvalue(pv, v390);
3697                                     if (typeof string != 'string')
3698                                         throw 'The value ' + string + ' is not a type string.';
3699                                     if (typeof index != 'number')
3700                                         throw 'The value ' + index + ' is not a type number.';
3701                                     return string.charCodeAt(index);
3702                                 })(), 10)) : l5.value) : l5.value) !== l5.value ? l138.fvalue(pv, l102.fvalue(pv, 10), "    ") : l102.fvalue(pv, (function(){
3703                                     var string = v388;
3704                                     var index = v390;
3705                                     if (typeof string != 'string')
3706                                         throw 'The value ' + string + ' is not a type string.';
3707                                     if (typeof index != 'number')
3708                                         throw 'The value ' + index + ' is not a type number.';
3709                                     return string.charCodeAt(index);
3710                                 })())));
3711                                 (v390 = (function(){
3712                                     var x1 = v390;
3713                                     if (typeof x1 !== 'number') throw 'Not a number!';
3714                                     return x1+1;
3715                                 })());
3716                             }return l5.value;
3717                         })();
3718                     })();
3719                     return v389;
3720                 })("",0,l72.fvalue(pv, v388));
3721             })((function(){
3722                 var f = (function(){
3723                     var symbol = l172;
3724                     var func = symbol.fvalue;
3725                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3726                     return func;
3727                 })();
3728                 var args = [pv];
3729                 var tail = (v387);
3730                 while (tail != l5.value){
3731                     args.push(tail.car);
3732                     tail = tail.cdr;
3733                 }
3734                 return f.apply(this, args);
3735             })());
3736         })();
3737     }));
3738     return l176;
3739 })();
3740 var l177 = {name: "*MULTIPLE-VALUE-P*"};
3741 (function(){
3742     (((l177.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l177).value = l5.value));
3743     return l177;
3744 })();
3745 var l178 = {name: "MAKE-BINDING"};
3746 (function(){
3747     (l178).fvalue = (function(v398){
3748         ((v398)["fname"] = "MAKE-BINDING");
3749         return v398;
3750     })((function (values,v394,v395,v396,v397){
3751         checkArgsAtLeast(arguments, 4);
3752         checkArgsAtMost(arguments, 5);
3753         switch(arguments.length-1){
3754         case 3:
3755         v397=l5.value;
3756         default: break;
3757         }
3758         var i;
3759         return (function(){
3760             return l45.fvalue(values, v394, v395, v396, v397);
3761         })();
3762     }));
3763     return l178;
3764 })();
3765 var l179 = {name: "BINDING-NAME"};
3766 (function(){
3767     (l179).fvalue = (function(v400){
3768         ((v400)["fname"] = "BINDING-NAME");
3769         return v400;
3770     })((function (values,v399){
3771         checkArgs(arguments, 2);
3772         var i;
3773         return (function(){
3774             return l40.fvalue(values, v399);
3775         })();
3776     }));
3777     return l179;
3778 })();
3779 var l180 = {name: "BINDING-TYPE"};
3780 (function(){
3781     (l180).fvalue = (function(v402){
3782         ((v402)["fname"] = "BINDING-TYPE");
3783         return v402;
3784     })((function (values,v401){
3785         checkArgs(arguments, 2);
3786         var i;
3787         return (function(){
3788             return l41.fvalue(values, v401);
3789         })();
3790     }));
3791     return l180;
3792 })();
3793 var l181 = {name: "BINDING-VALUE"};
3794 (function(){
3795     (l181).fvalue = (function(v404){
3796         ((v404)["fname"] = "BINDING-VALUE");
3797         return v404;
3798     })((function (values,v403){
3799         checkArgs(arguments, 2);
3800         var i;
3801         return (function(){
3802             return l42.fvalue(values, v403);
3803         })();
3804     }));
3805     return l181;
3806 })();
3807 var l182 = {name: "BINDING-DECLARATIONS"};
3808 (function(){
3809     (l182).fvalue = (function(v406){
3810         ((v406)["fname"] = "BINDING-DECLARATIONS");
3811         return v406;
3812     })((function (values,v405){
3813         checkArgs(arguments, 2);
3814         var i;
3815         return (function(){
3816             return l43.fvalue(values, v405);
3817         })();
3818     }));
3819     return l182;
3820 })();
3821 var l183 = {name: "SET-BINDING-VALUE"};
3822 (function(){
3823     (l183).fvalue = (function(v409){
3824         ((v409)["fname"] = "SET-BINDING-VALUE");
3825         return v409;
3826     })((function (values,v407,v408){
3827         checkArgs(arguments, 3);
3828         var i;
3829         return (function(){
3830             return (function(){
3831                 var x = l36.fvalue(pv, v407);
3832                 if (typeof x != 'object')
3833                     throw 'The value ' + x + ' is not a type object.';
3834                 return (x.car = v408, x);
3835             })();
3836         })();
3837     }));
3838     return l183;
3839 })();
3840 var l184 = {name: "SET-BINDING-DECLARATIONS"};
3841 (function(){
3842     (l184).fvalue = (function(v412){
3843         ((v412)["fname"] = "SET-BINDING-DECLARATIONS");
3844         return v412;
3845     })((function (values,v410,v411){
3846         checkArgs(arguments, 3);
3847         var i;
3848         return (function(){
3849             return (function(){
3850                 var x = l38.fvalue(pv, v410);
3851                 if (typeof x != 'object')
3852                     throw 'The value ' + x + ' is not a type object.';
3853                 return (x.car = v411, x);
3854             })();
3855         })();
3856     }));
3857     return l184;
3858 })();
3859 var l185 = {name: "PUSH-BINDING-DECLARATION"};
3860 (function(){
3861     (l185).fvalue = (function(v415){
3862         ((v415)["fname"] = "PUSH-BINDING-DECLARATION");
3863         return v415;
3864     })((function (values,v413,v414){
3865         checkArgs(arguments, 3);
3866         var i;
3867         return (function(){
3868             return l184.fvalue(values, v414, ({car: v413, cdr: l182.fvalue(pv, v414)}));
3869         })();
3870     }));
3871     return l185;
3872 })();
3873 var l186 = {name: "MAKE-LEXENV"};
3874 (function(){
3875     (l186).fvalue = (function(v416){
3876         ((v416)["fname"] = "MAKE-LEXENV");
3877         return v416;
3878     })((function (values){
3879         checkArgsAtMost(arguments, 1);
3880         var i;
3881         return (function(){
3882             return l45.fvalue(values, l5.value, l5.value, l5.value, l5.value);
3883         })();
3884     }));
3885     return l186;
3886 })();
3887 var l187 = {name: "COPY-LEXENV"};
3888 (function(){
3889     (l187).fvalue = (function(v418){
3890         ((v418)["fname"] = "COPY-LEXENV");
3891         return v418;
3892     })((function (values,v417){
3893         checkArgs(arguments, 2);
3894         var i;
3895         return (function(){
3896             return l81.fvalue(values, v417);
3897         })();
3898     }));
3899     return l187;
3900 })();
3901 var l188 = {name: "PUSH-TO-LEXENV"};
3902 var l189 = {name: "BLOCK"};
3903 var l190 = {name: "GOTAG"};
3904 (function(){
3905     (l188).fvalue = (function(v423){
3906         ((v423)["fname"] = "PUSH-TO-LEXENV");
3907         return v423;
3908     })((function (values,v419,v420,v421){
3909         checkArgs(arguments, 4);
3910         var i;
3911         return (function(){
3912             return (function(v422){
3913                 return (l27.fvalue(pv, v422, l109) !== l5.value ? (function(){
3914                     var x = v420;
3915                     if (typeof x != 'object')
3916                         throw 'The value ' + x + ' is not a type object.';
3917                     return (x.car = ({car: v419, cdr: (function(){
3918                         var tmp = v420;
3919                         return tmp === l5.value? l5.value: tmp.car;
3920                     })()}), x);
3921                 })() : (l27.fvalue(pv, v422, l108) !== l5.value ? (function(){
3922                     var x = (function(){
3923                         var tmp = v420;
3924                         return tmp === l5.value? l5.value: tmp.cdr;
3925                     })();
3926                     if (typeof x != 'object')
3927                         throw 'The value ' + x + ' is not a type object.';
3928                     return (x.car = ({car: v419, cdr: l34.fvalue(pv, v420)}), x);
3929                 })() : (l27.fvalue(pv, v422, l189) !== l5.value ? (function(){
3930                     var x = l36.fvalue(pv, v420);
3931                     if (typeof x != 'object')
3932                         throw 'The value ' + x + ' is not a type object.';
3933                     return (x.car = ({car: v419, cdr: l37.fvalue(pv, v420)}), x);
3934                 })() : (l27.fvalue(pv, v422, l190) !== l5.value ? (function(){
3935                     var x = l38.fvalue(pv, v420);
3936                     if (typeof x != 'object')
3937                         throw 'The value ' + x + ' is not a type object.';
3938                     return (x.car = ({car: v419, cdr: l39.fvalue(pv, v420)}), x);
3939                 })() : (function(){
3940                     throw "ECASE expression failed.";
3941                 })()))));
3942             })(v421);
3943         })();
3944     }));
3945     return l188;
3946 })();
3947 var l191 = {name: "EXTEND-LEXENV"};
3948 (function(){
3949     (l191).fvalue = (function(v430){
3950         ((v430)["fname"] = "EXTEND-LEXENV");
3951         return v430;
3952     })((function (values,v424,v425,v426){
3953         checkArgs(arguments, 4);
3954         var i;
3955         return (function(){
3956             return (function(v427){
3957                 return (function(){
3958                     return (function(v428,v429){
3959                         (function(){
3960                             while(v428 !== l5.value){
3961                                 (v429 = (function(){
3962                                     var tmp = v428;
3963                                     return tmp === l5.value? l5.value: tmp.car;
3964                                 })());
3965                                 (function(){
3966                                     l188.fvalue(pv, v429, v427, v426);
3967                                     return l5.value;
3968                                 })();
3969                                 (v428 = (function(){
3970                                     var tmp = v428;
3971                                     return tmp === l5.value? l5.value: tmp.cdr;
3972                                 })());
3973                             }return l5.value;
3974                         })();
3975                         return v427;
3976                     })(l67.fvalue(pv, v424),l5.value);
3977                 })();
3978             })(l187.fvalue(pv, v425));
3979         })();
3980     }));
3981     return l191;
3982 })();
3983 var l192 = {name: "LOOKUP-IN-LEXENV"};
3984 (function(){
3985     (l192).fvalue = (function(v435){
3986         ((v435)["fname"] = "LOOKUP-IN-LEXENV");
3987         return v435;
3988     })((function (values,v431,v432,v433){
3989         checkArgs(arguments, 4);
3990         var i;
3991         return (function(){
3992             return l101.fvalue(values, v431, (function(v434){
3993                 return (l27.fvalue(pv, v434, l109) !== l5.value ? l40.fvalue(pv, v432) : (l27.fvalue(pv, v434, l108) !== l5.value ? l41.fvalue(pv, v432) : (l27.fvalue(pv, v434, l189) !== l5.value ? l42.fvalue(pv, v432) : (l27.fvalue(pv, v434, l190) !== l5.value ? l43.fvalue(pv, v432) : (function(){
3994                     throw "ECASE expression failed.";
3995                 })()))));
3996             })(v433));
3997         })();
3998     }));
3999     return l192;
4000 })();
4001 var l193 = {name: "*ENVIRONMENT*"};
4002 (function(){
4003     (((l193.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l193).value = l186.fvalue(pv)));
4004     return l193;
4005 })();
4006 var l194 = {name: "*VARIABLE-COUNTER*"};
4007 (function(){
4008     (((l194.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l194).value = 0));
4009     return l194;
4010 })();
4011 var l195 = {name: "GVARNAME"};
4012 (function(){
4013     (l195).fvalue = (function(v437){
4014         ((v437)["fname"] = "GVARNAME");
4015         return v437;
4016     })((function (values,v436){
4017         checkArgs(arguments, 2);
4018         var i;
4019         return (function(){
4020             return l172.fvalue(values, "v", ((l194).value = (function(){
4021                 var x1 = (function(){
4022                     var symbol = l194;
4023                     var value = symbol.value;
4024                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4025                     return value;
4026                 })();
4027                 if (typeof x1 !== 'number') throw 'Not a number!';
4028                 return x1+1;
4029             })()));
4030         })();
4031     }));
4032     return l195;
4033 })();
4034 var l196 = {name: "TRANSLATE-VARIABLE"};
4035 (function(){
4036     (l196).fvalue = (function(v439){
4037         ((v439)["fname"] = "TRANSLATE-VARIABLE");
4038         return v439;
4039     })((function (values,v438){
4040         checkArgs(arguments, 2);
4041         var i;
4042         return (function(){
4043             return l181.fvalue(values, l192.fvalue(pv, v438, (function(){
4044                 var symbol = l193;
4045                 var value = symbol.value;
4046                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4047                 return value;
4048             })(), l109));
4049         })();
4050     }));
4051     return l196;
4052 })();
4053 var l197 = {name: "EXTEND-LOCAL-ENV"};
4054 (function(){
4055     (l197).fvalue = (function(v445){
4056         ((v445)["fname"] = "EXTEND-LOCAL-ENV");
4057         return v445;
4058     })((function (values,v440){
4059         checkArgs(arguments, 2);
4060         var i;
4061         return (function(){
4062             return (function(v441){
4063                 return (function(){
4064                     return (function(v442,v443){
4065                         (function(){
4066                             while(v442 !== l5.value){
4067                                 (v443 = (function(){
4068                                     var tmp = v442;
4069                                     return tmp === l5.value? l5.value: tmp.car;
4070                                 })());
4071                                 (function(){
4072                                     (function(v444){
4073                                         return l188.fvalue(pv, v444, v441, l109);
4074                                     })(l178.fvalue(pv, v443, l109, l195.fvalue(pv, v443)));
4075                                     return l5.value;
4076                                 })();
4077                                 (v442 = (function(){
4078                                     var tmp = v442;
4079                                     return tmp === l5.value? l5.value: tmp.cdr;
4080                                 })());
4081                             }return l5.value;
4082                         })();
4083                         return v441;
4084                     })(v440,l5.value);
4085                 })();
4086             })(l187.fvalue(pv, (function(){
4087                 var symbol = l193;
4088                 var value = symbol.value;
4089                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4090                 return value;
4091             })()));
4092         })();
4093     }));
4094     return l197;
4095 })();
4096 var l198 = {name: "*TOPLEVEL-COMPILATIONS*"};
4097 (function(){
4098     (((l198.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l198).value = l5.value));
4099     return l198;
4100 })();
4101 var l199 = {name: "TOPLEVEL-COMPILATION"};
4102 (function(){
4103     (l199).fvalue = (function(v447){
4104         ((v447)["fname"] = "TOPLEVEL-COMPILATION");
4105         return v447;
4106     })((function (values,v446){
4107         checkArgs(arguments, 2);
4108         var i;
4109         return (function(){
4110             return ((l198).value = ({car: v446, cdr: (function(){
4111                 var symbol = l198;
4112                 var value = symbol.value;
4113                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4114                 return value;
4115             })()}));
4116         })();
4117     }));
4118     return l199;
4119 })();
4120 var l200 = {name: "NULL-OR-EMPTY-P"};
4121 (function(){
4122     (l200).fvalue = (function(v449){
4123         ((v449)["fname"] = "NULL-OR-EMPTY-P");
4124         return v449;
4125     })((function (values,v448){
4126         checkArgs(arguments, 2);
4127         var i;
4128         return (function(){
4129             return l25.fvalue(values, l72.fvalue(pv, v448));
4130         })();
4131     }));
4132     return l200;
4133 })();
4134 var l201 = {name: "GET-TOPLEVEL-COMPILATIONS"};
4135 (function(){
4136     (l201).fvalue = (function(v450){
4137         ((v450)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
4138         return v450;
4139     })((function (values){
4140         checkArgsAtMost(arguments, 1);
4141         var i;
4142         return (function(){
4143             return l67.fvalue(values, l94.fvalue(pv, (function(){
4144                 var symbol = l200;
4145                 var func = symbol.fvalue;
4146                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4147                 return func;
4148             })(), (function(){
4149                 var symbol = l198;
4150                 var value = symbol.value;
4151                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4152                 return value;
4153             })()));
4154         })();
4155     }));
4156     return l201;
4157 })();
4158 var l202 = {name: "%COMPILE-DEFMACRO"};
4159 var l203 = {name: "MACRO"};
4160 (function(){
4161     (l202).fvalue = (function(v453){
4162         ((v453)["fname"] = "%COMPILE-DEFMACRO");
4163         return v453;
4164     })((function (values,v451,v452){
4165         checkArgs(arguments, 3);
4166         var i;
4167         return (function(){
4168             l199.fvalue(pv, l174.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l167), l45.fvalue(pv, v451))));
4169             l188.fvalue(pv, l178.fvalue(pv, v451, l203, v452), (function(){
4170                 var symbol = l193;
4171                 var value = symbol.value;
4172                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4173                 return value;
4174             })(), l108);
4175             return v451;
4176         })();
4177     }));
4178     return l202;
4179 })();
4180 var l204 = {name: "GLOBAL-BINDING"};
4181 (function(){
4182     (l204).fvalue = (function(v459){
4183         ((v459)["fname"] = "GLOBAL-BINDING");
4184         return v459;
4185     })((function (values,v454,v455,v456){
4186         checkArgs(arguments, 4);
4187         var i;
4188         return (function(){
4189             return (function(v457){
4190                 return (v457 !== l5.value ? v457 : (function(v458){
4191                     l188.fvalue(pv, v458, (function(){
4192                         var symbol = l193;
4193                         var value = symbol.value;
4194                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4195                         return value;
4196                     })(), v456);
4197                     return v458;
4198                 })(l178.fvalue(pv, v454, v455, l5.value)));
4199             })(l192.fvalue(pv, v454, (function(){
4200                 var symbol = l193;
4201                 var value = symbol.value;
4202                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4203                 return value;
4204             })(), v456));
4205         })();
4206     }));
4207     return l204;
4208 })();
4209 var l205 = {name: "CLAIMP"};
4210 (function(){
4211     (l205).fvalue = (function(v464){
4212         ((v464)["fname"] = "CLAIMP");
4213         return v464;
4214     })((function (values,v460,v461,v462){
4215         checkArgs(arguments, 4);
4216         var i;
4217         return (function(){
4218             return (function(v463){
4219                 return (v463 !== l5.value ? l92.fvalue(values, v462, l182.fvalue(pv, v463)) : l5.value);
4220             })(l192.fvalue(pv, v460, (function(){
4221                 var symbol = l193;
4222                 var value = symbol.value;
4223                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4224                 return value;
4225             })(), v461));
4226         })();
4227     }));
4228     return l205;
4229 })();
4230 var l206 = {name: "!PROCLAIM"};
4231 var l207 = {name: "SPECIAL"};
4232 var l208 = {name: "NOTINLINE"};
4233 var l209 = {name: "CONSTANT"};
4234 (function(){
4235     (l206).fvalue = (function(v476){
4236         ((v476)["fname"] = "!PROCLAIM");
4237         return v476;
4238     })((function (values,v465){
4239         checkArgs(arguments, 2);
4240         var i;
4241         return (function(){
4242             return (function(v466){
4243                 return (l27.fvalue(pv, v466, l207) !== l5.value ? (function(){
4244                     return (function(v467,v468){
4245                         (function(){
4246                             while(v467 !== l5.value){
4247                                 (v468 = (function(){
4248                                     var tmp = v467;
4249                                     return tmp === l5.value? l5.value: tmp.car;
4250                                 })());
4251                                 (function(){
4252                                     (function(v469){
4253                                         return l185.fvalue(pv, l207, v469);
4254                                     })(l204.fvalue(pv, v468, l109, l109));
4255                                     return l5.value;
4256                                 })();
4257                                 (v467 = (function(){
4258                                     var tmp = v467;
4259                                     return tmp === l5.value? l5.value: tmp.cdr;
4260                                 })());
4261                             }return l5.value;
4262                         })();
4263                         return l5.value;
4264                     })((function(){
4265                         var tmp = v465;
4266                         return tmp === l5.value? l5.value: tmp.cdr;
4267                     })(),l5.value);
4268                 })() : (l27.fvalue(pv, v466, l208) !== l5.value ? (function(){
4269                     return (function(v470,v471){
4270                         (function(){
4271                             while(v470 !== l5.value){
4272                                 (v471 = (function(){
4273                                     var tmp = v470;
4274                                     return tmp === l5.value? l5.value: tmp.car;
4275                                 })());
4276                                 (function(){
4277                                     (function(v472){
4278                                         return l185.fvalue(pv, l208, v472);
4279                                     })(l204.fvalue(pv, v471, l108, l108));
4280                                     return l5.value;
4281                                 })();
4282                                 (v470 = (function(){
4283                                     var tmp = v470;
4284                                     return tmp === l5.value? l5.value: tmp.cdr;
4285                                 })());
4286                             }return l5.value;
4287                         })();
4288                         return l5.value;
4289                     })((function(){
4290                         var tmp = v465;
4291                         return tmp === l5.value? l5.value: tmp.cdr;
4292                     })(),l5.value);
4293                 })() : (l27.fvalue(pv, v466, l209) !== l5.value ? (function(){
4294                     return (function(v473,v474){
4295                         (function(){
4296                             while(v473 !== l5.value){
4297                                 (v474 = (function(){
4298                                     var tmp = v473;
4299                                     return tmp === l5.value? l5.value: tmp.car;
4300                                 })());
4301                                 (function(){
4302                                     (function(v475){
4303                                         return l185.fvalue(pv, l209, v475);
4304                                     })(l204.fvalue(pv, v474, l109, l109));
4305                                     return l5.value;
4306                                 })();
4307                                 (v473 = (function(){
4308                                     var tmp = v473;
4309                                     return tmp === l5.value? l5.value: tmp.cdr;
4310                                 })());
4311                             }return l5.value;
4312                         })();
4313                         return l5.value;
4314                     })((function(){
4315                         var tmp = v465;
4316                         return tmp === l5.value? l5.value: tmp.cdr;
4317                     })(),l5.value);
4318                 })() : l5.value)));
4319             })((function(){
4320                 var tmp = v465;
4321                 return tmp === l5.value? l5.value: tmp.car;
4322             })());
4323         })();
4324     }));
4325     return l206;
4326 })();
4327 var l210 = {name: "PROCLAIM"};
4328 (l210).fvalue = (function(){
4329     var symbol = l206;
4330     var func = symbol.fvalue;
4331     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4332     return func;
4333 })();
4334 var l211 = {name: "*COMPILATIONS*"};
4335 (function(){
4336     (((l211.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l211).value = l5.value));
4337     return l211;
4338 })();
4339 var l212 = {name: "DEFINE-COMPILATION"};
4340 l212;
4341 var l213 = {name: "IF"};
4342 ((l211).value = ({car: l45.fvalue(pv, l213, (function (values,v477,v478,v479){
4343     checkArgs(arguments, 4);
4344     var i;
4345     return (function(){
4346         return l172.fvalue(values, "(", l174.fvalue(pv, v477), " !== ", l174.fvalue(pv, l5.value), " ? ", l174.fvalue(pv, v478, (function(){
4347             var symbol = l177;
4348             var value = symbol.value;
4349             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4350             return value;
4351         })()), " : ", l174.fvalue(pv, v479, (function(){
4352             var symbol = l177;
4353             var value = symbol.value;
4354             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4355             return value;
4356         })()), ")");
4357     })();
4358 })), cdr: (function(){
4359     var symbol = l211;
4360     var value = symbol.value;
4361     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4362     return value;
4363 })()}));
4364 var l214 = {name: "*LAMBDA-LIST-KEYWORDS*"};
4365 var l215 = {name: "&OPTIONAL"};
4366 var l216 = {name: "&REST"};
4367 var l217 = {name: "&KEY"};
4368 var l218 = QIList(l215,l216,l217,l5);
4369 (function(){
4370     (((l214.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l214).value = l218));
4371     return l214;
4372 })();
4373 var l219 = {name: "LIST-UNTIL-KEYWORD"};
4374 (function(){
4375     (l219).fvalue = (function(v482){
4376         ((v482)["fname"] = "LIST-UNTIL-KEYWORD");
4377         return v482;
4378     })((function (values,v480){
4379         checkArgs(arguments, 2);
4380         var i;
4381         return (function(){
4382             return ((function(v481){
4383                 return (v481 !== l5.value ? v481 : l92.fvalue(pv, (function(){
4384                     var tmp = v480;
4385                     return tmp === l5.value? l5.value: tmp.car;
4386                 })(), (function(){
4387                     var symbol = l214;
4388                     var value = symbol.value;
4389                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4390                     return value;
4391                 })()));
4392             })(l13.fvalue(pv, v480)) !== l5.value ? l5.value : ({car: (function(){
4393                 var tmp = v480;
4394                 return tmp === l5.value? l5.value: tmp.car;
4395             })(), cdr: l219.fvalue(pv, (function(){
4396                 var tmp = v480;
4397                 return tmp === l5.value? l5.value: tmp.cdr;
4398             })())}));
4399         })();
4400     }));
4401     return l219;
4402 })();
4403 var l220 = {name: "LAMBDA-LIST-SECTION"};
4404 (function(){
4405     (l220).fvalue = (function(v485){
4406         ((v485)["fname"] = "LAMBDA-LIST-SECTION");
4407         return v485;
4408     })((function (values,v483,v484){
4409         checkArgs(arguments, 3);
4410         var i;
4411         return (function(){
4412             return l219.fvalue(values, (function(){
4413                 var tmp = l92.fvalue(pv, v483, v484);
4414                 return tmp === l5.value? l5.value: tmp.cdr;
4415             })());
4416         })();
4417     }));
4418     return l220;
4419 })();
4420 var l221 = {name: "LAMBDA-LIST-REQUIRED-ARGUMENTS"};
4421 (function(){
4422     (l221).fvalue = (function(v487){
4423         ((v487)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
4424         return v487;
4425     })((function (values,v486){
4426         checkArgs(arguments, 2);
4427         var i;
4428         return (function(){
4429             return l219.fvalue(values, v486);
4430         })();
4431     }));
4432     return l221;
4433 })();
4434 var l222 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"};
4435 (function(){
4436     (l222).fvalue = (function(v489){
4437         ((v489)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
4438         return v489;
4439     })((function (values,v488){
4440         checkArgs(arguments, 2);
4441         var i;
4442         return (function(){
4443             return l78.fvalue(values, (function(){
4444                 var symbol = l59;
4445                 var func = symbol.fvalue;
4446                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4447                 return func;
4448             })(), l220.fvalue(pv, l215, v488));
4449         })();
4450     }));
4451     return l222;
4452 })();
4453 var l223 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS"};
4454 (function(){
4455     (l223).fvalue = (function(v491){
4456         ((v491)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
4457         return v491;
4458     })((function (values,v490){
4459         checkArgs(arguments, 2);
4460         var i;
4461         return (function(){
4462             return l78.fvalue(values, (function(){
4463                 var symbol = l31;
4464                 var func = symbol.fvalue;
4465                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4466                 return func;
4467             })(), l222.fvalue(pv, v490));
4468         })();
4469     }));
4470     return l223;
4471 })();
4472 var l224 = {name: "LAMBDA-LIST-REST-ARGUMENT"};
4473 (function(){
4474     (l224).fvalue = (function(v494){
4475         ((v494)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
4476         return v494;
4477     })((function (values,v492){
4478         checkArgs(arguments, 2);
4479         var i;
4480         return (function(){
4481             return (function(v493){
4482                 ((function(){
4483                     var tmp = v493;
4484                     return tmp === l5.value? l5.value: tmp.cdr;
4485                 })() !== l5.value ? (function(){
4486                     throw "Bad lambda-list";
4487                 })() : l5.value);
4488                 return (function(){
4489                     var tmp = v493;
4490                     return tmp === l5.value? l5.value: tmp.car;
4491                 })();
4492             })(l220.fvalue(pv, l216, v492));
4493         })();
4494     }));
4495     return l224;
4496 })();
4497 var l225 = {name: "LAMBDA-LIST-KEYWORD-ARGUMENTS-CANONICAL"};
4498 (function(){
4499     (l225).fvalue = (function(v502){
4500         ((v502)["fname"] = "LAMBDA-LIST-KEYWORD-ARGUMENTS-CANONICAL");
4501         return v502;
4502     })((function (values,v495){
4503         checkArgs(arguments, 2);
4504         var i;
4505         return (function(){
4506             return (function(v501){
4507                 return l78.fvalue(values, v501, l220.fvalue(pv, l217, v495));
4508             })((function (values,v496){
4509                 checkArgs(arguments, 2);
4510                 var i;
4511                 return (function(){
4512                     var v497 = l59.fvalue(pv, v496);
4513                     var v498 = l34.fvalue(pv, v497);
4514                     var v499 = l5.value;
4515                     var v500 = l5.value;
4516                     (l60.fvalue(pv, (function(){
4517                         var tmp = v497;
4518                         return tmp === l5.value? l5.value: tmp.car;
4519                     })()) !== l5.value ? (v499 = l34.fvalue(pv, (function(){
4520                         var tmp = v497;
4521                         return tmp === l5.value? l5.value: tmp.car;
4522                     })()), v500 = (function(){
4523                         var tmp = (function(){
4524                             var tmp = v497;
4525                             return tmp === l5.value? l5.value: tmp.car;
4526                         })();
4527                         return tmp === l5.value? l5.value: tmp.car;
4528                     })()) : (v499 = (function(){
4529                         var tmp = v497;
4530                         return tmp === l5.value? l5.value: tmp.car;
4531                     })(), v500 = l134.fvalue(pv, ((function(){
4532                         var tmp = v497;
4533                         return tmp === l5.value? l5.value: tmp.car;
4534                     })()).name, "KEYWORD")));
4535                     return l65.fvalue(pv, l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, v500), l45.fvalue(pv, v499))), l45.fvalue(pv, v498));
4536                 })();
4537             }));
4538         })();
4539     }));
4540     return l225;
4541 })();
4542 var l226 = {name: "LAMBDA-LIST-KEYWORD-ARGUMENTS"};
4543 (function(){
4544     (l226).fvalue = (function(v505){
4545         ((v505)["fname"] = "LAMBDA-LIST-KEYWORD-ARGUMENTS");
4546         return v505;
4547     })((function (values,v503){
4548         checkArgs(arguments, 2);
4549         var i;
4550         return (function(){
4551             return l78.fvalue(values, (function (values,v504){
4552                 checkArgs(arguments, 2);
4553                 var i;
4554                 return l41.fvalue(values, l40.fvalue(pv, v504));
4555             }), l225.fvalue(pv, v503));
4556         })();
4557     }));
4558     return l226;
4559 })();
4560 var l227 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
4561 (function(){
4562     (l227).fvalue = (function(v508){
4563         ((v508)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
4564         return v508;
4565     })((function (values,v507){
4566         checkArgsAtLeast(arguments, 2);
4567         var v506= l5.value;
4568         for (var i = arguments.length-1; i>=2; i--)
4569             v506 = {car: arguments[i], cdr:
4570         v506};
4571         var i;
4572         return (function(){
4573             return (v507 !== l5.value ? l172.fvalue(values, "(function(){", (function(){
4574                 var symbol = l137;
4575                 var value = symbol.value;
4576                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4577                 return value;
4578             })(), l176.fvalue(pv, "var func = ", l140.fvalue(pv, v506), ";", (function(){
4579                 var symbol = l137;
4580                 var value = symbol.value;
4581                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4582                 return value;
4583             })(), "func.docstring = '", v507, "';", (function(){
4584                 var symbol = l137;
4585                 var value = symbol.value;
4586                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4587                 return value;
4588             })(), "return func;", (function(){
4589                 var symbol = l137;
4590                 var value = symbol.value;
4591                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4592                 return value;
4593             })()), "})()") : (function(){
4594                 var f = (function(){
4595                     var symbol = l172;
4596                     var func = symbol.fvalue;
4597                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4598                     return func;
4599                 })();
4600                 var args = [values];
4601                 var tail = (v506);
4602                 while (tail != l5.value){
4603                     args.push(tail.car);
4604                     tail = tail.cdr;
4605                 }
4606                 return f.apply(this, args);
4607             })());
4608         })();
4609     }));
4610     return l227;
4611 })();
4612 var l228 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"};
4613 var l229 = {name: "N/A"};
4614 (function(){
4615     (l228).fvalue = (function(v514){
4616         ((v514)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT");
4617         return v514;
4618     })((function (values,v509,v510,v511){
4619         checkArgs(arguments, 4);
4620         var i;
4621         return (function(){
4622             return (function(v512,v513){
4623                 return (function(){
4624                     try {
4625                         (((function(){
4626                             var x1 = v512;
4627                             if (typeof x1 !== 'number') throw 'Not a number!';
4628                             return (1<x1?l4.value: l5.value);
4629                         })() !== l5.value ? l27.fvalue(pv, v512, v513) : l5.value) !== l5.value ? (function(){
4630                             var values = mv;
4631                             throw ({type: 'block', id: 191, values: l172.fvalue(values, "checkArgs(arguments, ", v512, ");", (function(){
4632                                 var symbol = l137;
4633                                 var value = symbol.value;
4634                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4635                                 return value;
4636                             })()), message: 'Return from unknown block NIL.'})
4637                         })() : l5.value);
4638                         return l172.fvalue(values, ((function(){
4639                             var x1 = v512;
4640                             if (typeof x1 !== 'number') throw 'Not a number!';
4641                             return (1<x1?l4.value: l5.value);
4642                         })() !== l5.value ? l172.fvalue(pv, "checkArgsAtLeast(arguments, ", v512, ");", (function(){
4643                             var symbol = l137;
4644                             var value = symbol.value;
4645                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4646                             return value;
4647                         })()) : l5.value), (((typeof (v513) == "number")?l4.value: l5.value) !== l5.value ? l172.fvalue(pv, "checkArgsAtMost(arguments, ", v513, ");", (function(){
4648                             var symbol = l137;
4649                             var value = symbol.value;
4650                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4651                             return value;
4652                         })()) : l5.value));
4653                     }
4654                     catch (cf){
4655                         if (cf.type == 'block' && cf.id == 191)
4656                             return values.apply(this, forcemv(cf.values));
4657                         else
4658                             throw cf;
4659                     }
4660                 })();
4661             })(l23.fvalue(pv, v509),(v511 !== l5.value ? l229 : (function(){
4662                 var x1 = v509;
4663                 if (typeof x1 !== 'number') throw 'Not a number!';
4664                 var x2 = v510;
4665                 if (typeof x2 !== 'number') throw 'Not a number!';
4666                 return 1+x1+x2;
4667             })()));
4668         })();
4669     }));
4670     return l228;
4671 })();
4672 var l230 = {name: "COMPILE-LAMBDA-OPTIONAL"};
4673 (function(){
4674     (l230).fvalue = (function(v523){
4675         ((v523)["fname"] = "COMPILE-LAMBDA-OPTIONAL");
4676         return v523;
4677     })((function (values,v515){
4678         checkArgs(arguments, 2);
4679         var i;
4680         return (function(){
4681             return (function(){
4682                 var v516 = l223.fvalue(pv, v515);
4683                 var v517 = l72.fvalue(pv, l221.fvalue(pv, v515));
4684                 var v518 = l72.fvalue(pv, v516);
4685                 return (v516 !== l5.value ? l172.fvalue(values, "switch(arguments.length-1){", (function(){
4686                     var symbol = l137;
4687                     var value = symbol.value;
4688                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4689                     return value;
4690                 })(), (function(v519,v520,v521){
4691                     return (function(){
4692                         (function(){
4693                             return (function(){
4694                                 while((function(){
4695                                     var x1 = v521;
4696                                     if (typeof x1 !== 'number') throw 'Not a number!';
4697                                     var x2 = v518;
4698                                     if (typeof x2 !== 'number') throw 'Not a number!';
4699                                     return (x1<x2?l4.value: l5.value);
4700                                 })() !== l5.value){
4701                                     (function(v522){
4702                                         (v520 = ({car: l172.fvalue(pv, "case ", (function(){
4703                                             var x1 = v521;
4704                                             if (typeof x1 !== 'number') throw 'Not a number!';
4705                                             var x2 = v517;
4706                                             if (typeof x2 !== 'number') throw 'Not a number!';
4707                                             return x1+x2;
4708                                         })(), ":", (function(){
4709                                             var symbol = l137;
4710                                             var value = symbol.value;
4711                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4712                                             return value;
4713                                         })(), l196.fvalue(pv, (function(){
4714                                             var tmp = v522;
4715                                             return tmp === l5.value? l5.value: tmp.car;
4716                                         })()), "=", l174.fvalue(pv, l34.fvalue(pv, v522)), ";", (function(){
4717                                             var symbol = l137;
4718                                             var value = symbol.value;
4719                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4720                                             return value;
4721                                         })()), cdr: v520}));
4722                                         return (v521 = (function(){
4723                                             var x1 = v521;
4724                                             if (typeof x1 !== 'number') throw 'Not a number!';
4725                                             return x1+1;
4726                                         })());
4727                                     })(l89.fvalue(pv, v521, v519));
4728                                 }return l5.value;
4729                             })();
4730                         })();
4731                         (v520 = ({car: l172.fvalue(pv, "default: break;", (function(){
4732                             var symbol = l137;
4733                             var value = symbol.value;
4734                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4735                             return value;
4736                         })()), cdr: v520}));
4737                         return l140.fvalue(pv, l67.fvalue(pv, v520));
4738                     })();
4739                 })(l222.fvalue(pv, v515),l5.value,0), "}", (function(){
4740                     var symbol = l137;
4741                     var value = symbol.value;
4742                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4743                     return value;
4744                 })()) : l5.value);
4745             })();
4746         })();
4747     }));
4748     return l230;
4749 })();
4750 var l231 = {name: "COMPILE-LAMBDA-REST"};
4751 (function(){
4752     (l231).fvalue = (function(v529){
4753         ((v529)["fname"] = "COMPILE-LAMBDA-REST");
4754         return v529;
4755     })((function (values,v524){
4756         checkArgs(arguments, 2);
4757         var i;
4758         return (function(){
4759             return (function(v525,v526,v527){
4760                 return (v527 !== l5.value ? (function(v528){
4761                     return l172.fvalue(values, "var ", v528, "= ", l174.fvalue(pv, l5.value), ";", (function(){
4762                         var symbol = l137;
4763                         var value = symbol.value;
4764                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4765                         return value;
4766                     })(), "for (var i = arguments.length-1; i>=", (function(){
4767                         var x1 = v525;
4768                         if (typeof x1 !== 'number') throw 'Not a number!';
4769                         var x2 = v526;
4770                         if (typeof x2 !== 'number') throw 'Not a number!';
4771                         return 1+x1+x2;
4772                     })(), "; i--)", (function(){
4773                         var symbol = l137;
4774                         var value = symbol.value;
4775                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4776                         return value;
4777                     })(), l176.fvalue(pv, v528, " = {car: arguments[i], cdr: "), v528, "};", (function(){
4778                         var symbol = l137;
4779                         var value = symbol.value;
4780                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4781                         return value;
4782                     })());
4783                 })(l196.fvalue(pv, v527)) : l5.value);
4784             })(l72.fvalue(pv, l221.fvalue(pv, v524)),l72.fvalue(pv, l223.fvalue(pv, v524)),l224.fvalue(pv, v524));
4785         })();
4786     }));
4787     return l231;
4788 })();
4789 var l232 = {name: "COMPILE-LAMBDA-PARSE-KEYWORDS"};
4790 (function(){
4791     (l232).fvalue = (function(v539){
4792         ((v539)["fname"] = "COMPILE-LAMBDA-PARSE-KEYWORDS");
4793         return v539;
4794     })((function (values,v530){
4795         checkArgs(arguments, 2);
4796         var i;
4797         return (function(){
4798             return (function(v531,v532,v533){
4799                 return l172.fvalue(values, "var i;", (function(){
4800                     var symbol = l137;
4801                     var value = symbol.value;
4802                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4803                     return value;
4804                 })(), l142.fvalue(pv, (function (values,v534){
4805                     checkArgs(arguments, 2);
4806                     var i;
4807                     return (function(v535){
4808                         return l172.fvalue(values, "var ", l196.fvalue(pv, v535), "; ", (function(){
4809                             var symbol = l137;
4810                             var value = symbol.value;
4811                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4812                             return value;
4813                         })());
4814                     })(l41.fvalue(pv, (function(){
4815                         var tmp = v534;
4816                         return tmp === l5.value? l5.value: tmp.car;
4817                     })()));
4818                 }), v533), (function(v537){
4819                     return l142.fvalue(pv, v537, v533);
4820                 })((function (values,v536){
4821                     checkArgs(arguments, 2);
4822                     var i;
4823                     return l172.fvalue(values, "for (i=", (function(){
4824                         var x1 = v531;
4825                         if (typeof x1 !== 'number') throw 'Not a number!';
4826                         var x2 = v532;
4827                         if (typeof x2 !== 'number') throw 'Not a number!';
4828                         return 1+x1+x2;
4829                     })(), "; i<arguments.length; i+=2){", (function(){
4830                         var symbol = l137;
4831                         var value = symbol.value;
4832                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4833                         return value;
4834                     })(), l176.fvalue(pv, "if (arguments[i] === ", l174.fvalue(pv, l33.fvalue(pv, v536)), "){", (function(){
4835                         var symbol = l137;
4836                         var value = symbol.value;
4837                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4838                         return value;
4839                     })(), l176.fvalue(pv, l196.fvalue(pv, l34.fvalue(pv, (function(){
4840                         var tmp = v536;
4841                         return tmp === l5.value? l5.value: tmp.car;
4842                     })())), " = arguments[i+1];", (function(){
4843                         var symbol = l137;
4844                         var value = symbol.value;
4845                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4846                         return value;
4847                     })(), "break;", (function(){
4848                         var symbol = l137;
4849                         var value = symbol.value;
4850                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4851                         return value;
4852                     })()), "}", (function(){
4853                         var symbol = l137;
4854                         var value = symbol.value;
4855                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4856                         return value;
4857                     })()), "}", (function(){
4858                         var symbol = l137;
4859                         var value = symbol.value;
4860                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4861                         return value;
4862                     })(), "if (i == arguments.length){", (function(){
4863                         var symbol = l137;
4864                         var value = symbol.value;
4865                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4866                         return value;
4867                     })(), l176.fvalue(pv, l196.fvalue(pv, l34.fvalue(pv, (function(){
4868                         var tmp = v536;
4869                         return tmp === l5.value? l5.value: tmp.car;
4870                     })())), " = ", l174.fvalue(pv, l34.fvalue(pv, v536)), ";", (function(){
4871                         var symbol = l137;
4872                         var value = symbol.value;
4873                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4874                         return value;
4875                     })()), "}", (function(){
4876                         var symbol = l137;
4877                         var value = symbol.value;
4878                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4879                         return value;
4880                     })());
4881                 })), (v533 !== l5.value ? l172.fvalue(pv, "for (i=", (function(){
4882                     var x1 = v531;
4883                     if (typeof x1 !== 'number') throw 'Not a number!';
4884                     var x2 = v532;
4885                     if (typeof x2 !== 'number') throw 'Not a number!';
4886                     return 1+x1+x2;
4887                 })(), "; i<arguments.length; i+=2){", (function(){
4888                     var symbol = l137;
4889                     var value = symbol.value;
4890                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4891                     return value;
4892                 })(), l176.fvalue(pv, "if (", l140.fvalue(pv, l78.fvalue(pv, (function (values,v538){
4893                     checkArgs(arguments, 2);
4894                     var i;
4895                     return l138.fvalue(values, "arguments[i] !== ", l174.fvalue(pv, l33.fvalue(pv, v538)));
4896                 }), v533), " && "), ")", (function(){
4897                     var symbol = l137;
4898                     var value = symbol.value;
4899                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4900                     return value;
4901                 })(), l176.fvalue(pv, "throw 'Unknown keyword argument ' + arguments[i].name;", (function(){
4902                     var symbol = l137;
4903                     var value = symbol.value;
4904                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4905                     return value;
4906                 })())), "}", (function(){
4907                     var symbol = l137;
4908                     var value = symbol.value;
4909                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4910                     return value;
4911                 })()) : l5.value));
4912             })(l72.fvalue(pv, l221.fvalue(pv, v530)),l72.fvalue(pv, l223.fvalue(pv, v530)),l225.fvalue(pv, v530));
4913         })();
4914     }));
4915     return l232;
4916 })();
4917 var l233 = {name: "COMPILE-LAMBDA"};
4918 var l234 = {name: "LS-COMPILE-BLOCK"};
4919 (function(){
4920     (l233).fvalue = (function(v552){
4921         ((v552)["fname"] = "COMPILE-LAMBDA");
4922         return v552;
4923     })((function (values,v540,v541){
4924         checkArgs(arguments, 3);
4925         var i;
4926         return (function(){
4927             return (function(v542,v543,v544,v545,v546){
4928                 ((((typeof((function(){
4929                     var tmp = v541;
4930                     return tmp === l5.value? l5.value: tmp.car;
4931                 })()) == "string")?l4.value: l5.value) !== l5.value ? l28.fvalue(pv, l13.fvalue(pv, (function(){
4932                     var tmp = v541;
4933                     return tmp === l5.value? l5.value: tmp.cdr;
4934                 })())) : l5.value) !== l5.value ? (function(){
4935                     (v546 = (function(){
4936                         var tmp = v541;
4937                         return tmp === l5.value? l5.value: tmp.car;
4938                     })());
4939                     return (v541 = (function(){
4940                         var tmp = v541;
4941                         return tmp === l5.value? l5.value: tmp.cdr;
4942                     })());
4943                 })() : l5.value);
4944                 return (function(v547,v548,v549){
4945                     try {
4946                         var tmp;
4947                         tmp = l193.value;
4948                         l193.value = v549;
4949                         v549 = tmp;
4950                         return l227.fvalue(values, v546, "(function (", l140.fvalue(pv, ({car: "values", cdr: l78.fvalue(pv, (function(){
4951                             var symbol = l196;
4952                             var func = symbol.fvalue;
4953                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4954                             return func;
4955                         })(), l65.fvalue(pv, v542, v543))}), ","), "){", (function(){
4956                             var symbol = l137;
4957                             var value = symbol.value;
4958                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4959                             return value;
4960                         })(), l176.fvalue(pv, l228.fvalue(pv, v547, v548, (function(v550){
4961                             return (v550 !== l5.value ? v550 : v544);
4962                         })(v545)), l230.fvalue(pv, v540), l231.fvalue(pv, v540), l232.fvalue(pv, v540), (function(v551){
4963                             try {
4964                                 var tmp;
4965                                 tmp = l177.value;
4966                                 l177.value = v551;
4967                                 v551 = tmp;
4968                                 return l234.fvalue(pv, v541, l4.value);
4969                             }
4970                             finally {
4971                                 l177.value = v551;
4972                             }
4973                         })(l4.value)), "})");
4974                     }
4975                     finally {
4976                         l193.value = v549;
4977                     }
4978                 })(l72.fvalue(pv, v542),l72.fvalue(pv, v543),l197.fvalue(pv, l65.fvalue(pv, l59.fvalue(pv, v545), v542, v543, v544)));
4979             })(l221.fvalue(pv, v540),l223.fvalue(pv, v540),l226.fvalue(pv, v540),l224.fvalue(pv, v540),l5.value);
4980         })();
4981     }));
4982     return l233;
4983 })();
4984 var l235 = {name: "SETQ-PAIR"};
4985 var l236 = {name: "SET"};
4986 (function(){
4987     (l235).fvalue = (function(v556){
4988         ((v556)["fname"] = "SETQ-PAIR");
4989         return v556;
4990     })((function (values,v553,v554){
4991         checkArgs(arguments, 3);
4992         var i;
4993         return (function(){
4994             return (function(v555){
4995                 return ((((l180.fvalue(pv, v555) === l109)?l4.value: l5.value) !== l5.value ? (l28.fvalue(pv, l92.fvalue(pv, l207, l182.fvalue(pv, v555))) !== l5.value ? l28.fvalue(pv, l92.fvalue(pv, l209, l182.fvalue(pv, v555))) : l5.value) : l5.value) !== l5.value ? l172.fvalue(values, l181.fvalue(pv, v555), " = ", l174.fvalue(pv, v554)) : l174.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l236), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l167), l45.fvalue(pv, v553))), l45.fvalue(pv, v554))));
4996             })(l192.fvalue(pv, v553, (function(){
4997                 var symbol = l193;
4998                 var value = symbol.value;
4999                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5000                 return value;
5001             })(), l109));
5002         })();
5003     }));
5004     return l235;
5005 })();
5006 var l237 = {name: "SETQ"};
5007 ((l211).value = ({car: l45.fvalue(pv, l237, (function (values){
5008     var v557= l5.value;
5009     for (var i = arguments.length-1; i>=1; i--)
5010         v557 = {car: arguments[i], cdr:
5011     v557};
5012     var i;
5013     return (function(){
5014         return (function(v558){
5015             (function(){
5016                 try {
5017                     return (function(){
5018                         while(l4.value !== l5.value){
5019                             (l13.fvalue(pv, v557) !== l5.value ? (function(){
5020                                 throw ({type: 'block', id: 199, values: l5.value, message: 'Return from unknown block NIL.'})
5021                             })() : (l13.fvalue(pv, (function(){
5022                                 var tmp = v557;
5023                                 return tmp === l5.value? l5.value: tmp.cdr;
5024                             })()) !== l5.value ? (function(){
5025                                 throw "Odd paris in SETQ";
5026                             })() : (function(){
5027                                 (v558 = l138.fvalue(pv, v558, l138.fvalue(pv, l235.fvalue(pv, (function(){
5028                                     var tmp = v557;
5029                                     return tmp === l5.value? l5.value: tmp.car;
5030                                 })(), l34.fvalue(pv, v557)), (l13.fvalue(pv, l36.fvalue(pv, v557)) !== l5.value ? "" : ", "))));
5031                                 return (v557 = l36.fvalue(pv, v557));
5032                             })()));
5033                         }return l5.value;
5034                     })();
5035                 }
5036                 catch (cf){
5037                     if (cf.type == 'block' && cf.id == 199)
5038                         return cf.values;
5039                     else
5040                         throw cf;
5041                 }
5042             })();
5043             return l172.fvalue(values, "(", v558, ")");
5044         })("");
5045     })();
5046 })), cdr: (function(){
5047     var symbol = l211;
5048     var value = symbol.value;
5049     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5050     return value;
5051 })()}));
5052 var l238 = {name: "JS-VREF"};
5053 ((l211).value = ({car: l45.fvalue(pv, l238, (function (values,v559){
5054     checkArgs(arguments, 2);
5055     var i;
5056     return (function(){
5057         return v559;
5058     })();
5059 })), cdr: (function(){
5060     var symbol = l211;
5061     var value = symbol.value;
5062     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5063     return value;
5064 })()}));
5065 var l239 = {name: "JS-VSET"};
5066 ((l211).value = ({car: l45.fvalue(pv, l239, (function (values,v560,v561){
5067     checkArgs(arguments, 3);
5068     var i;
5069     return (function(){
5070         return l172.fvalue(values, "(", v560, " = ", l174.fvalue(pv, v561), ")");
5071     })();
5072 })), cdr: (function(){
5073     var symbol = l211;
5074     var value = symbol.value;
5075     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5076     return value;
5077 })()}));
5078 (function(){
5079     (l148).fvalue = (function(v568){
5080         ((v568)["fname"] = "ESCAPE-STRING");
5081         return v568;
5082     })((function (values,v562){
5083         checkArgs(arguments, 2);
5084         var i;
5085         return (function(){
5086             return (function(v563,v564,v565){
5087                 (function(){
5088                     return (function(){
5089                         while((function(){
5090                             var x1 = v564;
5091                             if (typeof x1 !== 'number') throw 'Not a number!';
5092                             var x2 = v565;
5093                             if (typeof x2 !== 'number') throw 'Not a number!';
5094                             return (x1<x2?l4.value: l5.value);
5095                         })() !== l5.value){
5096                             (function(v566){
5097                                 ((function(v567){
5098                                     return (v567 !== l5.value ? v567 : l84.fvalue(pv, v566, 92));
5099                                 })(l84.fvalue(pv, v566, 34)) !== l5.value ? (v563 = l138.fvalue(pv, v563, "\\")) : l5.value);
5100                                 (l84.fvalue(pv, v566, 10) !== l5.value ? (function(){
5101                                     (v563 = l138.fvalue(pv, v563, "\\"));
5102                                     return (v566 = 110);
5103                                 })() : l5.value);
5104                                 return (v563 = l138.fvalue(pv, v563, l102.fvalue(pv, v566)));
5105                             })((function(){
5106                                 var string = v562;
5107                                 var index = v564;
5108                                 if (typeof string != 'string')
5109                                     throw 'The value ' + string + ' is not a type string.';
5110                                 if (typeof index != 'number')
5111                                     throw 'The value ' + index + ' is not a type number.';
5112                                 return string.charCodeAt(index);
5113                             })());
5114                             (v564 = (function(){
5115                                 var x1 = v564;
5116                                 if (typeof x1 !== 'number') throw 'Not a number!';
5117                                 return x1+1;
5118                             })());
5119                         }return l5.value;
5120                     })();
5121                 })();
5122                 return v563;
5123             })("",0,l72.fvalue(pv, v562));
5124         })();
5125     }));
5126     return l148;
5127 })();
5128 var l240 = {name: "*LITERAL-SYMBOLS*"};
5129 (function(){
5130     (((l240.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l240).value = l5.value));
5131     return l240;
5132 })();
5133 var l241 = {name: "*LITERAL-COUNTER*"};
5134 (function(){
5135     (((l241.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l241).value = 0));
5136     return l241;
5137 })();
5138 var l242 = {name: "GENLIT"};
5139 (function(){
5140     (l242).fvalue = (function(v569){
5141         ((v569)["fname"] = "GENLIT");
5142         return v569;
5143     })((function (values){
5144         checkArgsAtMost(arguments, 1);
5145         var i;
5146         return (function(){
5147             return l172.fvalue(values, "l", ((l241).value = (function(){
5148                 var x1 = (function(){
5149                     var symbol = l241;
5150                     var value = symbol.value;
5151                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5152                     return value;
5153                 })();
5154                 if (typeof x1 !== 'number') throw 'Not a number!';
5155                 return x1+1;
5156             })()));
5157         })();
5158     }));
5159     return l242;
5160 })();
5161 var l243 = {name: "LITERAL"};
5162 (function(){
5163     (l243).fvalue = (function(v584){
5164         ((v584)["fname"] = "LITERAL");
5165         return v584;
5166     })((function (values,v570,v571){
5167         checkArgsAtLeast(arguments, 2);
5168         checkArgsAtMost(arguments, 3);
5169         switch(arguments.length-1){
5170         case 1:
5171         v571=l5.value;
5172         default: break;
5173         }
5174         var i;
5175         return (function(){
5176             return (l85.fvalue(pv, v570) !== l5.value ? l18.fvalue(values, v570) : (((typeof(v570) == "string")?l4.value: l5.value) !== l5.value ? l172.fvalue(values, "\"", l148.fvalue(pv, v570), "\"") : (((function(){
5177                 var tmp = v570;
5178                 return (typeof tmp == 'object' && 'name' in tmp);
5179             })()?l4.value: l5.value) !== l5.value ? (function(v572){
5180                 return (v572 !== l5.value ? v572 : (function(v574,v575){
5181                     ((l240).value = ({car: ({car: v570, cdr: v574}), cdr: (function(){
5182                         var symbol = l240;
5183                         var value = symbol.value;
5184                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5185                         return value;
5186                     })()}));
5187                     l199.fvalue(pv, l172.fvalue(pv, "var ", v574, " = ", v575));
5188                     return v574;
5189                 })(l242.fvalue(pv),(function(v573){
5190                     return (l13.fvalue(pv, v573) !== l5.value ? l172.fvalue(pv, "{name: \"", l148.fvalue(pv, (v570).name), "\"}") : l174.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l134), l45.fvalue(pv, (v570).name), l45.fvalue(pv, l118.fvalue(pv, v573)))));
5191                 })(l126.fvalue(pv, v570))));
5192             })((function(){
5193                 var tmp = l101.fvalue(pv, v570, (function(){
5194                     var symbol = l240;
5195                     var value = symbol.value;
5196                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5197                     return value;
5198                 })());
5199                 return tmp === l5.value? l5.value: tmp.cdr;
5200             })()) : (((function(){
5201                 var tmp = v570;
5202                 return (typeof tmp == 'object' && 'car' in tmp);
5203             })()?l4.value: l5.value) !== l5.value ? (function(){
5204                 var v576 = l91.fvalue(pv, v570);
5205                 var v577 = l90.fvalue(pv, v570);
5206                 var v578 = l172.fvalue(pv, "QIList(", l141.fvalue(pv, l78.fvalue(pv, (function (values,v579){
5207                     checkArgs(arguments, 2);
5208                     var i;
5209                     return l243.fvalue(values, v579, l4.value);
5210                 }), v576), ","), l243.fvalue(pv, (function(){
5211                     var tmp = v577;
5212                     return tmp === l5.value? l5.value: tmp.car;
5213                 })(), l4.value), ",", l243.fvalue(pv, (function(){
5214                     var tmp = v577;
5215                     return tmp === l5.value? l5.value: tmp.cdr;
5216                 })(), l4.value), ")");
5217                 return (v571 !== l5.value ? v578 : (function(v580){
5218                     l199.fvalue(pv, l172.fvalue(pv, "var ", v580, " = ", v578));
5219                     return v580;
5220                 })(l242.fvalue(pv)));
5221             })() : (((function(){
5222                 var x = v570;
5223                 return typeof x === 'object' && 'length' in x;
5224             })()?l4.value: l5.value) !== l5.value ? (function(v581){
5225                 return (function(v582){
5226                     return (v571 !== l5.value ? v582 : (function(v583){
5227                         l199.fvalue(pv, l172.fvalue(pv, "var ", v583, " = ", v582));
5228                         return v583;
5229                     })(l242.fvalue(pv)));
5230                 })(l138.fvalue(pv, "[", l140.fvalue(pv, l78.fvalue(pv, (function(){
5231                     var symbol = l243;
5232                     var func = symbol.fvalue;
5233                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5234                     return func;
5235                 })(), v581), ", "), "]"));
5236             })(l143.fvalue(pv, v570)) : l5.value)))));
5237         })();
5238     }));
5239     return l243;
5240 })();
5241 ((l211).value = ({car: l45.fvalue(pv, l167, (function (values,v585){
5242     checkArgs(arguments, 2);
5243     var i;
5244     return (function(){
5245         return l243.fvalue(values, v585);
5246     })();
5247 })), cdr: (function(){
5248     var symbol = l211;
5249     var value = symbol.value;
5250     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5251     return value;
5252 })()}));
5253 var l244 = {name: "%WHILE"};
5254 ((l211).value = ({car: l45.fvalue(pv, l244, (function (values,v587){
5255     checkArgsAtLeast(arguments, 2);
5256     var v586= l5.value;
5257     for (var i = arguments.length-1; i>=2; i--)
5258         v586 = {car: arguments[i], cdr:
5259     v586};
5260     var i;
5261     return (function(){
5262         return l172.fvalue(values, "(function(){", (function(){
5263             var symbol = l137;
5264             var value = symbol.value;
5265             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5266             return value;
5267         })(), l176.fvalue(pv, "while(", l174.fvalue(pv, v587), " !== ", l174.fvalue(pv, l5.value), "){", (function(){
5268             var symbol = l137;
5269             var value = symbol.value;
5270             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5271             return value;
5272         })(), l176.fvalue(pv, l234.fvalue(pv, v586)), "}", "return ", l174.fvalue(pv, l5.value), ";", (function(){
5273             var symbol = l137;
5274             var value = symbol.value;
5275             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5276             return value;
5277         })()), "})()");
5278     })();
5279 })), cdr: (function(){
5280     var symbol = l211;
5281     var value = symbol.value;
5282     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5283     return value;
5284 })()}));
5285 var l245 = {name: "SYMBOL-FUNCTION"};
5286 ((l211).value = ({car: l45.fvalue(pv, l108, (function (values,v588){
5287     checkArgs(arguments, 2);
5288     var i;
5289     return (function(){
5290         return ((l60.fvalue(pv, v588) !== l5.value ? (((function(){
5291             var tmp = v588;
5292             return tmp === l5.value? l5.value: tmp.car;
5293         })() === l6)?l4.value: l5.value) : l5.value) !== l5.value ? l233.fvalue(values, l34.fvalue(pv, v588), l36.fvalue(pv, v588)) : (((function(){
5294             var tmp = v588;
5295             return (typeof tmp == 'object' && 'name' in tmp);
5296         })()?l4.value: l5.value) !== l5.value ? (function(v589){
5297             return (v589 !== l5.value ? l181.fvalue(values, v589) : l174.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l245), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l167), l45.fvalue(pv, v588))))));
5298         })(l192.fvalue(pv, v588, (function(){
5299             var symbol = l193;
5300             var value = symbol.value;
5301             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5302             return value;
5303         })(), l108)) : l5.value));
5304     })();
5305 })), cdr: (function(){
5306     var symbol = l211;
5307     var value = symbol.value;
5308     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5309     return value;
5310 })()}));
5311 var l246 = {name: "MAKE-FUNCTION-BINDING"};
5312 (function(){
5313     (l246).fvalue = (function(v591){
5314         ((v591)["fname"] = "MAKE-FUNCTION-BINDING");
5315         return v591;
5316     })((function (values,v590){
5317         checkArgs(arguments, 2);
5318         var i;
5319         return (function(){
5320             return l178.fvalue(values, v590, l108, l195.fvalue(pv, v590));
5321         })();
5322     }));
5323     return l246;
5324 })();
5325 var l247 = {name: "COMPILE-FUNCTION-DEFINITION"};
5326 (function(){
5327     (l247).fvalue = (function(v593){
5328         ((v593)["fname"] = "COMPILE-FUNCTION-DEFINITION");
5329         return v593;
5330     })((function (values,v592){
5331         checkArgs(arguments, 2);
5332         var i;
5333         return (function(){
5334             return l233.fvalue(values, (function(){
5335                 var tmp = v592;
5336                 return tmp === l5.value? l5.value: tmp.car;
5337             })(), (function(){
5338                 var tmp = v592;
5339                 return tmp === l5.value? l5.value: tmp.cdr;
5340             })());
5341         })();
5342     }));
5343     return l247;
5344 })();
5345 var l248 = {name: "TRANSLATE-FUNCTION"};
5346 (function(){
5347     (l248).fvalue = (function(v596){
5348         ((v596)["fname"] = "TRANSLATE-FUNCTION");
5349         return v596;
5350     })((function (values,v594){
5351         checkArgs(arguments, 2);
5352         var i;
5353         return (function(){
5354             return (function(v595){
5355                 return l181.fvalue(values, v595);
5356             })(l192.fvalue(pv, v594, (function(){
5357                 var symbol = l193;
5358                 var value = symbol.value;
5359                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5360                 return value;
5361             })(), l108));
5362         })();
5363     }));
5364     return l248;
5365 })();
5366 var l249 = {name: "FLET"};
5367 ((l211).value = ({car: l45.fvalue(pv, l249, (function (values,v598){
5368     checkArgsAtLeast(arguments, 2);
5369     var v597= l5.value;
5370     for (var i = arguments.length-1; i>=2; i--)
5371         v597 = {car: arguments[i], cdr:
5372     v597};
5373     var i;
5374     return (function(){
5375         return (function(){
5376             try {
5377                 var v603 = l193.value;
5378                 var v599 = l78.fvalue(pv, (function(){
5379                     var symbol = l31;
5380                     var func = symbol.fvalue;
5381                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5382                     return func;
5383                 })(), v598);
5384                 var v600 = l78.fvalue(pv, (function(){
5385                     var symbol = l32;
5386                     var func = symbol.fvalue;
5387                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5388                     return func;
5389                 })(), v598);
5390                 var v601 = l78.fvalue(pv, (function(){
5391                     var symbol = l247;
5392                     var func = symbol.fvalue;
5393                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5394                     return func;
5395                 })(), v600);
5396                 ((l193).value = l191.fvalue(pv, l78.fvalue(pv, (function(){
5397                     var symbol = l246;
5398                     var func = symbol.fvalue;
5399                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5400                     return func;
5401                 })(), v599), (function(){
5402                     var symbol = l193;
5403                     var value = symbol.value;
5404                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5405                     return value;
5406                 })(), l108));
5407                 return l172.fvalue(values, "(function(", l140.fvalue(pv, l78.fvalue(pv, (function(){
5408                     var symbol = l248;
5409                     var func = symbol.fvalue;
5410                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5411                     return func;
5412                 })(), v599), ","), "){", (function(){
5413                     var symbol = l137;
5414                     var value = symbol.value;
5415                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5416                     return value;
5417                 })(), (function(v602){
5418                     return l176.fvalue(pv, v602);
5419                 })(l234.fvalue(pv, v597, l4.value)), "})(", l140.fvalue(pv, v601, ","), ")");
5420             }
5421             finally {
5422                 l193.value = v603;
5423             }
5424         })();
5425     })();
5426 })), cdr: (function(){
5427     var symbol = l211;
5428     var value = symbol.value;
5429     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5430     return value;
5431 })()}));
5432 var l250 = {name: "LABELS"};
5433 ((l211).value = ({car: l45.fvalue(pv, l250, (function (values,v605){
5434     checkArgsAtLeast(arguments, 2);
5435     var v604= l5.value;
5436     for (var i = arguments.length-1; i>=2; i--)
5437         v604 = {car: arguments[i], cdr:
5438     v604};
5439     var i;
5440     return (function(){
5441         return (function(){
5442             try {
5443                 var v608 = l193.value;
5444                 var v606 = l78.fvalue(pv, (function(){
5445                     var symbol = l31;
5446                     var func = symbol.fvalue;
5447                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5448                     return func;
5449                 })(), v605);
5450                 ((l193).value = l191.fvalue(pv, l78.fvalue(pv, (function(){
5451                     var symbol = l246;
5452                     var func = symbol.fvalue;
5453                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5454                     return func;
5455                 })(), v606), (function(){
5456                     var symbol = l193;
5457                     var value = symbol.value;
5458                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5459                     return value;
5460                 })(), l108));
5461                 return l172.fvalue(values, "(function(){", (function(){
5462                     var symbol = l137;
5463                     var value = symbol.value;
5464                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5465                     return value;
5466                 })(), l176.fvalue(pv, l142.fvalue(pv, (function (values,v607){
5467                     checkArgs(arguments, 2);
5468                     var i;
5469                     return l172.fvalue(values, "var ", l248.fvalue(pv, (function(){
5470                         var tmp = v607;
5471                         return tmp === l5.value? l5.value: tmp.car;
5472                     })()), " = ", l233.fvalue(pv, l34.fvalue(pv, v607), l36.fvalue(pv, v607)), ";", (function(){
5473                         var symbol = l137;
5474                         var value = symbol.value;
5475                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5476                         return value;
5477                     })());
5478                 }), v605), l234.fvalue(pv, v604, l4.value)), "})()");
5479             }
5480             finally {
5481                 l193.value = v608;
5482             }
5483         })();
5484     })();
5485 })), cdr: (function(){
5486     var symbol = l211;
5487     var value = symbol.value;
5488     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5489     return value;
5490 })()}));
5491 var l251 = {name: "*COMPILING-FILE*"};
5492 (function(){
5493     (((l251.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l251).value = l5.value));
5494     return l251;
5495 })();
5496 var l252 = {name: "EVAL-WHEN-COMPILE"};
5497 var l253 = {name: "PROGN"};
5498 var l254 = {name: "EVAL"};
5499 ((l211).value = ({car: l45.fvalue(pv, l252, (function (values){
5500     var v609= l5.value;
5501     for (var i = arguments.length-1; i>=1; i--)
5502         v609 = {car: arguments[i], cdr:
5503     v609};
5504     var i;
5505     return (function(){
5506         return ((function(){
5507             var symbol = l251;
5508             var value = symbol.value;
5509             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5510             return value;
5511         })() !== l5.value ? (function(){
5512             l254.fvalue(pv, ({car: l253, cdr: v609}));
5513             return l5.value;
5514         })() : l174.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l253), v609)));
5515     })();
5516 })), cdr: (function(){
5517     var symbol = l211;
5518     var value = symbol.value;
5519     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5520     return value;
5521 })()}));
5522 var l255 = {name: "DEFINE-TRANSFORMATION"};
5523 l255;
5524 ((l211).value = ({car: l45.fvalue(pv, l253, (function (values){
5525     var v610= l5.value;
5526     for (var i = arguments.length-1; i>=1; i--)
5527         v610 = {car: arguments[i], cdr:
5528     v610};
5529     var i;
5530     return (function(){
5531         return (l13.fvalue(pv, (function(){
5532             var tmp = v610;
5533             return tmp === l5.value? l5.value: tmp.cdr;
5534         })()) !== l5.value ? l174.fvalue(values, (function(){
5535             var tmp = v610;
5536             return tmp === l5.value? l5.value: tmp.car;
5537         })(), (function(){
5538             var symbol = l177;
5539             var value = symbol.value;
5540             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5541             return value;
5542         })()) : l172.fvalue(values, "(function(){", (function(){
5543             var symbol = l137;
5544             var value = symbol.value;
5545             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5546             return value;
5547         })(), l176.fvalue(pv, l234.fvalue(pv, v610, l4.value)), "})()"));
5548     })();
5549 })), cdr: (function(){
5550     var symbol = l211;
5551     var value = symbol.value;
5552     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5553     return value;
5554 })()}));
5555 var l256 = {name: "SPECIAL-VARIABLE-P"};
5556 (function(){
5557     (l256).fvalue = (function(v612){
5558         ((v612)["fname"] = "SPECIAL-VARIABLE-P");
5559         return v612;
5560     })((function (values,v611){
5561         checkArgs(arguments, 2);
5562         var i;
5563         return (function(){
5564             return (l205.fvalue(pv, v611, l109, l207) !== l5.value ? l4.value : l5.value);
5565         })();
5566     }));
5567     return l256;
5568 })();
5569 var l257 = {name: "LET-BINDING-WRAPPER"};
5570 (function(){
5571     (l257).fvalue = (function(v619){
5572         ((v619)["fname"] = "LET-BINDING-WRAPPER");
5573         return v619;
5574     })((function (values,v613,v614){
5575         checkArgs(arguments, 3);
5576         var i;
5577         return (function(){
5578             try {
5579                 (l13.fvalue(pv, v613) !== l5.value ? (function(){
5580                     var values = mv;
5581                     throw ({type: 'block', id: 217, values: v614, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
5582                 })() : l5.value);
5583                 return l172.fvalue(values, "try {", (function(){
5584                     var symbol = l137;
5585                     var value = symbol.value;
5586                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5587                     return value;
5588                 })(), l176.fvalue(pv, "var tmp;", (function(){
5589                     var symbol = l137;
5590                     var value = symbol.value;
5591                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5592                     return value;
5593                 })(), l142.fvalue(pv, (function (values,v615){
5594                     checkArgs(arguments, 2);
5595                     var i;
5596                     return (function(v616){
5597                         return l172.fvalue(values, "tmp = ", v616, ".value;", (function(){
5598                             var symbol = l137;
5599                             var value = symbol.value;
5600                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5601                             return value;
5602                         })(), v616, ".value = ", (function(){
5603                             var tmp = v615;
5604                             return tmp === l5.value? l5.value: tmp.cdr;
5605                         })(), ";", (function(){
5606                             var symbol = l137;
5607                             var value = symbol.value;
5608                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5609                             return value;
5610                         })(), (function(){
5611                             var tmp = v615;
5612                             return tmp === l5.value? l5.value: tmp.cdr;
5613                         })(), " = tmp;", (function(){
5614                             var symbol = l137;
5615                             var value = symbol.value;
5616                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5617                             return value;
5618                         })());
5619                     })(l174.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l167), l45.fvalue(pv, (function(){
5620                         var tmp = v615;
5621                         return tmp === l5.value? l5.value: tmp.car;
5622                     })()))));
5623                 }), v613), v614, (function(){
5624                     var symbol = l137;
5625                     var value = symbol.value;
5626                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5627                     return value;
5628                 })()), "}", (function(){
5629                     var symbol = l137;
5630                     var value = symbol.value;
5631                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5632                     return value;
5633                 })(), "finally {", (function(){
5634                     var symbol = l137;
5635                     var value = symbol.value;
5636                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5637                     return value;
5638                 })(), l176.fvalue(pv, l142.fvalue(pv, (function (values,v617){
5639                     checkArgs(arguments, 2);
5640                     var i;
5641                     return (function(v618){
5642                         return l172.fvalue(values, v618, ".value", " = ", (function(){
5643                             var tmp = v617;
5644                             return tmp === l5.value? l5.value: tmp.cdr;
5645                         })(), ";", (function(){
5646                             var symbol = l137;
5647                             var value = symbol.value;
5648                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5649                             return value;
5650                         })());
5651                     })(l174.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l167), l45.fvalue(pv, (function(){
5652                         var tmp = v617;
5653                         return tmp === l5.value? l5.value: tmp.car;
5654                     })()))));
5655                 }), v613)), "}", (function(){
5656                     var symbol = l137;
5657                     var value = symbol.value;
5658                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5659                     return value;
5660                 })());
5661             }
5662             catch (cf){
5663                 if (cf.type == 'block' && cf.id == 217)
5664                     return values.apply(this, forcemv(cf.values));
5665                 else
5666                     throw cf;
5667             }
5668         })();
5669     }));
5670     return l257;
5671 })();
5672 var l258 = {name: "LET"};
5673 ((l211).value = ({car: l45.fvalue(pv, l258, (function (values,v621){
5674     checkArgsAtLeast(arguments, 2);
5675     var v620= l5.value;
5676     for (var i = arguments.length-1; i>=2; i--)
5677         v620 = {car: arguments[i], cdr:
5678     v620};
5679     var i;
5680     return (function(){
5681         return (function(){
5682             try {
5683                 var v629 = l193.value;
5684                 var v622 = l78.fvalue(pv, (function(){
5685                     var symbol = l59;
5686                     var func = symbol.fvalue;
5687                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5688                     return func;
5689                 })(), v621);
5690                 var v623 = l78.fvalue(pv, (function(){
5691                     var symbol = l40;
5692                     var func = symbol.fvalue;
5693                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5694                     return func;
5695                 })(), v622);
5696                 var v624 = l78.fvalue(pv, (function(){
5697                     var symbol = l174;
5698                     var func = symbol.fvalue;
5699                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5700                     return func;
5701                 })(), l78.fvalue(pv, (function(){
5702                     var symbol = l41;
5703                     var func = symbol.fvalue;
5704                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5705                     return func;
5706                 })(), v622));
5707                 ((l193).value = l197.fvalue(pv, l94.fvalue(pv, (function(){
5708                     var symbol = l256;
5709                     var func = symbol.fvalue;
5710                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5711                     return func;
5712                 })(), v623)));
5713                 var v625 = l5.value;
5714                 return l172.fvalue(values, "(function(", l140.fvalue(pv, l78.fvalue(pv, (function (values,v626){
5715                     checkArgs(arguments, 2);
5716                     var i;
5717                     return (l256.fvalue(pv, v626) !== l5.value ? (function(v627){
5718                         (v625 = ({car: ({car: v626, cdr: v627}), cdr: v625}));
5719                         return v627;
5720                     })(l195.fvalue(pv, v626)) : l196.fvalue(values, v626));
5721                 }), v623), ","), "){", (function(){
5722                     var symbol = l137;
5723                     var value = symbol.value;
5724                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5725                     return value;
5726                 })(), (function(v628){
5727                     return l176.fvalue(pv, l257.fvalue(pv, v625, v628));
5728                 })(l234.fvalue(pv, v620, l4.value)), "})(", l140.fvalue(pv, v624, ","), ")");
5729             }
5730             finally {
5731                 l193.value = v629;
5732             }
5733         })();
5734     })();
5735 })), cdr: (function(){
5736     var symbol = l211;
5737     var value = symbol.value;
5738     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5739     return value;
5740 })()}));
5741 var l259 = {name: "LET*-INITIALIZE-VALUE"};
5742 (function(){
5743     (l259).fvalue = (function(v636){
5744         ((v636)["fname"] = "LET*-INITIALIZE-VALUE");
5745         return v636;
5746     })((function (values,v630){
5747         checkArgs(arguments, 2);
5748         var i;
5749         return (function(){
5750             return (function(v631,v632){
5751                 return (l256.fvalue(pv, v631) !== l5.value ? l172.fvalue(values, l174.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l237), l45.fvalue(pv, v631), l45.fvalue(pv, v632))), ";", (function(){
5752                     var symbol = l137;
5753                     var value = symbol.value;
5754                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5755                     return value;
5756                 })()) : (function(){
5757                     var v633 = l195.fvalue(pv, v631);
5758                     var v634 = l178.fvalue(pv, v631, l109, v633);
5759                     return (function(v635){
5760                         l188.fvalue(pv, v634, (function(){
5761                             var symbol = l193;
5762                             var value = symbol.value;
5763                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5764                             return value;
5765                         })(), l109);
5766                         return v635;
5767                     })(l172.fvalue(pv, "var ", v633, " = ", l174.fvalue(pv, v632), ";", (function(){
5768                         var symbol = l137;
5769                         var value = symbol.value;
5770                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5771                         return value;
5772                     })()));
5773                 })());
5774             })(l40.fvalue(pv, v630),l41.fvalue(pv, v630));
5775         })();
5776     }));
5777     return l259;
5778 })();
5779 var l260 = {name: "LET*-BINDING-WRAPPER"};
5780 (function(){
5781     (l260).fvalue = (function(v645){
5782         ((v645)["fname"] = "LET*-BINDING-WRAPPER");
5783         return v645;
5784     })((function (values,v637,v638){
5785         checkArgs(arguments, 3);
5786         var i;
5787         return (function(){
5788             try {
5789                 (l13.fvalue(pv, v637) !== l5.value ? (function(){
5790                     var values = mv;
5791                     throw ({type: 'block', id: 220, values: v638, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
5792                 })() : l5.value);
5793                 return (function(v640){
5794                     return l172.fvalue(values, "try {", (function(){
5795                         var symbol = l137;
5796                         var value = symbol.value;
5797                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5798                         return value;
5799                     })(), l176.fvalue(pv, l142.fvalue(pv, (function (values,v641){
5800                         checkArgs(arguments, 2);
5801                         var i;
5802                         return (function(v642){
5803                             return l172.fvalue(values, "var ", (function(){
5804                                 var tmp = v641;
5805                                 return tmp === l5.value? l5.value: tmp.cdr;
5806                             })(), " = ", v642, ".value;", (function(){
5807                                 var symbol = l137;
5808                                 var value = symbol.value;
5809                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5810                                 return value;
5811                             })());
5812                         })(l174.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l167), l45.fvalue(pv, (function(){
5813                             var tmp = v641;
5814                             return tmp === l5.value? l5.value: tmp.car;
5815                         })()))));
5816                     }), v640), v638), "}", (function(){
5817                         var symbol = l137;
5818                         var value = symbol.value;
5819                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5820                         return value;
5821                     })(), "finally {", (function(){
5822                         var symbol = l137;
5823                         var value = symbol.value;
5824                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5825                         return value;
5826                     })(), l176.fvalue(pv, l142.fvalue(pv, (function (values,v643){
5827                         checkArgs(arguments, 2);
5828                         var i;
5829                         return (function(v644){
5830                             return l172.fvalue(values, v644, ".value", " = ", (function(){
5831                                 var tmp = v643;
5832                                 return tmp === l5.value? l5.value: tmp.cdr;
5833                             })(), ";", (function(){
5834                                 var symbol = l137;
5835                                 var value = symbol.value;
5836                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5837                                 return value;
5838                             })());
5839                         })(l174.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l167), l45.fvalue(pv, (function(){
5840                             var tmp = v643;
5841                             return tmp === l5.value? l5.value: tmp.car;
5842                         })()))));
5843                     }), v640)), "}", (function(){
5844                         var symbol = l137;
5845                         var value = symbol.value;
5846                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5847                         return value;
5848                     })());
5849                 })(l78.fvalue(pv, (function (values,v639){
5850                     checkArgs(arguments, 2);
5851                     var i;
5852                     return ({car: v639, cdr: l195.fvalue(pv, v639)});
5853                 }), l95.fvalue(pv, (function(){
5854                     var symbol = l256;
5855                     var func = symbol.fvalue;
5856                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5857                     return func;
5858                 })(), v637)));
5859             }
5860             catch (cf){
5861                 if (cf.type == 'block' && cf.id == 220)
5862                     return values.apply(this, forcemv(cf.values));
5863                 else
5864                     throw cf;
5865             }
5866         })();
5867     }));
5868     return l260;
5869 })();
5870 var l261 = {name: "LET*"};
5871 ((l211).value = ({car: l45.fvalue(pv, l261, (function (values,v647){
5872     checkArgsAtLeast(arguments, 2);
5873     var v646= l5.value;
5874     for (var i = arguments.length-1; i>=2; i--)
5875         v646 = {car: arguments[i], cdr:
5876     v646};
5877     var i;
5878     return (function(){
5879         return (function(v648,v649){
5880             try {
5881                 var tmp;
5882                 tmp = l193.value;
5883                 l193.value = v649;
5884                 v649 = tmp;
5885                 return l172.fvalue(values, "(function(){", (function(){
5886                     var symbol = l137;
5887                     var value = symbol.value;
5888                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5889                     return value;
5890                 })(), l176.fvalue(pv, (function(v650,v651){
5891                     return l260.fvalue(pv, v650, v651);
5892                 })(l95.fvalue(pv, (function(){
5893                     var symbol = l256;
5894                     var func = symbol.fvalue;
5895                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5896                     return func;
5897                 })(), l78.fvalue(pv, (function(){
5898                     var symbol = l40;
5899                     var func = symbol.fvalue;
5900                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5901                     return func;
5902                 })(), v648)),l138.fvalue(pv, l142.fvalue(pv, (function(){
5903                     var symbol = l259;
5904                     var func = symbol.fvalue;
5905                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5906                     return func;
5907                 })(), v648), l234.fvalue(pv, v646, l4.value)))), "})()");
5908             }
5909             finally {
5910                 l193.value = v649;
5911             }
5912         })(l78.fvalue(pv, (function(){
5913             var symbol = l59;
5914             var func = symbol.fvalue;
5915             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5916             return func;
5917         })(), v647),l187.fvalue(pv, (function(){
5918             var symbol = l193;
5919             var value = symbol.value;
5920             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5921             return value;
5922         })()));
5923     })();
5924 })), cdr: (function(){
5925     var symbol = l211;
5926     var value = symbol.value;
5927     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5928     return value;
5929 })()}));
5930 var l262 = {name: "*BLOCK-COUNTER*"};
5931 (function(){
5932     (((l262.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l262).value = 0));
5933     return l262;
5934 })();
5935 var l263 = {name: "MULTIPLE-VALUE"};
5936 var l264 = {name: "USED"};
5937 ((l211).value = ({car: l45.fvalue(pv, l189, (function (values,v653){
5938     checkArgsAtLeast(arguments, 2);
5939     var v652= l5.value;
5940     for (var i = arguments.length-1; i>=2; i--)
5941         v652 = {car: arguments[i], cdr:
5942     v652};
5943     var i;
5944     return (function(){
5945         return (function(){
5946             var v654 = ((l262).value = (function(){
5947                 var x1 = (function(){
5948                     var symbol = l262;
5949                     var value = symbol.value;
5950                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5951                     return value;
5952                 })();
5953                 if (typeof x1 !== 'number') throw 'Not a number!';
5954                 return x1+1;
5955             })());
5956             var v655 = l178.fvalue(pv, v653, l189, v654);
5957             ((function(){
5958                 var symbol = l177;
5959                 var value = symbol.value;
5960                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5961                 return value;
5962             })() !== l5.value ? l185.fvalue(pv, l263, v655) : l5.value);
5963             return (function(){
5964                 try {
5965                     var v657 = l193.value;
5966                     ((l193).value = l191.fvalue(pv, l45.fvalue(pv, v655), (function(){
5967                         var symbol = l193;
5968                         var value = symbol.value;
5969                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5970                         return value;
5971                     })(), l189));
5972                     var v656 = l234.fvalue(pv, v652, l4.value);
5973                     return (l92.fvalue(pv, l264, l182.fvalue(pv, v655)) !== l5.value ? l172.fvalue(values, "(function(){", (function(){
5974                         var symbol = l137;
5975                         var value = symbol.value;
5976                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5977                         return value;
5978                     })(), l176.fvalue(pv, "try {", (function(){
5979                         var symbol = l137;
5980                         var value = symbol.value;
5981                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5982                         return value;
5983                     })(), l176.fvalue(pv, v656), "}", (function(){
5984                         var symbol = l137;
5985                         var value = symbol.value;
5986                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5987                         return value;
5988                     })(), "catch (cf){", (function(){
5989                         var symbol = l137;
5990                         var value = symbol.value;
5991                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5992                         return value;
5993                     })(), "    if (cf.type == 'block' && cf.id == ", v654, ")", (function(){
5994                         var symbol = l137;
5995                         var value = symbol.value;
5996                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5997                         return value;
5998                     })(), ((function(){
5999                         var symbol = l177;
6000                         var value = symbol.value;
6001                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6002                         return value;
6003                     })() !== l5.value ? "        return values.apply(this, forcemv(cf.values));" : "        return cf.values;"), (function(){
6004                         var symbol = l137;
6005                         var value = symbol.value;
6006                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6007                         return value;
6008                     })(), "    else", (function(){
6009                         var symbol = l137;
6010                         var value = symbol.value;
6011                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6012                         return value;
6013                     })(), "        throw cf;", (function(){
6014                         var symbol = l137;
6015                         var value = symbol.value;
6016                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6017                         return value;
6018                     })(), "}", (function(){
6019                         var symbol = l137;
6020                         var value = symbol.value;
6021                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6022                         return value;
6023                     })()), "})()") : l172.fvalue(values, "(function(){", (function(){
6024                         var symbol = l137;
6025                         var value = symbol.value;
6026                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6027                         return value;
6028                     })(), l176.fvalue(pv, v656), "})()"));
6029                 }
6030                 finally {
6031                     l193.value = v657;
6032                 }
6033             })();
6034         })();
6035     })();
6036 })), cdr: (function(){
6037     var symbol = l211;
6038     var value = symbol.value;
6039     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6040     return value;
6041 })()}));
6042 var l265 = {name: "RETURN-FROM"};
6043 ((l211).value = ({car: l45.fvalue(pv, l265, (function (values,v658,v659){
6044     checkArgsAtLeast(arguments, 2);
6045     checkArgsAtMost(arguments, 3);
6046     switch(arguments.length-1){
6047     case 1:
6048     v659=l5.value;
6049     default: break;
6050     }
6051     var i;
6052     return (function(){
6053         return (function(){
6054             var v660 = l192.fvalue(pv, v658, (function(){
6055                 var symbol = l193;
6056                 var value = symbol.value;
6057                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6058                 return value;
6059             })(), l189);
6060             var v661 = l92.fvalue(pv, l263, l182.fvalue(pv, v660));
6061             (l13.fvalue(pv, v660) !== l5.value ? (function(){
6062                 throw l138.fvalue(pv, "Unknown block `", (v658).name, "'.");
6063             })() : l5.value);
6064             l185.fvalue(pv, l264, v660);
6065             return l172.fvalue(values, "(function(){", (function(){
6066                 var symbol = l137;
6067                 var value = symbol.value;
6068                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6069                 return value;
6070             })(), l176.fvalue(pv, (v661 !== l5.value ? l172.fvalue(pv, "var values = mv;", (function(){
6071                 var symbol = l137;
6072                 var value = symbol.value;
6073                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6074                 return value;
6075             })()) : l5.value), "throw ({", "type: 'block', ", "id: ", l181.fvalue(pv, v660), ", ", "values: ", l174.fvalue(pv, v659, v661), ", ", "message: 'Return from unknown block ", (v658).name, ".'", "})"), "})()");
6076         })();
6077     })();
6078 })), cdr: (function(){
6079     var symbol = l211;
6080     var value = symbol.value;
6081     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6082     return value;
6083 })()}));
6084 var l266 = {name: "CATCH"};
6085 ((l211).value = ({car: l45.fvalue(pv, l266, (function (values,v663){
6086     checkArgsAtLeast(arguments, 2);
6087     var v662= l5.value;
6088     for (var i = arguments.length-1; i>=2; i--)
6089         v662 = {car: arguments[i], cdr:
6090     v662};
6091     var i;
6092     return (function(){
6093         return l172.fvalue(values, "(function(){", (function(){
6094             var symbol = l137;
6095             var value = symbol.value;
6096             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6097             return value;
6098         })(), l176.fvalue(pv, "var id = ", l174.fvalue(pv, v663), ";", (function(){
6099             var symbol = l137;
6100             var value = symbol.value;
6101             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6102             return value;
6103         })(), "try {", (function(){
6104             var symbol = l137;
6105             var value = symbol.value;
6106             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6107             return value;
6108         })(), l176.fvalue(pv, l234.fvalue(pv, v662, l4.value)), (function(){
6109             var symbol = l137;
6110             var value = symbol.value;
6111             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6112             return value;
6113         })(), "}", (function(){
6114             var symbol = l137;
6115             var value = symbol.value;
6116             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6117             return value;
6118         })(), "catch (cf){", (function(){
6119             var symbol = l137;
6120             var value = symbol.value;
6121             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6122             return value;
6123         })(), "    if (cf.type == 'catch' && cf.id == id)", (function(){
6124             var symbol = l137;
6125             var value = symbol.value;
6126             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6127             return value;
6128         })(), ((function(){
6129             var symbol = l177;
6130             var value = symbol.value;
6131             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6132             return value;
6133         })() !== l5.value ? "        return values.apply(this, forcemv(cf.values));" : "        return pv.apply(this, forcemv(cf.values));"), (function(){
6134             var symbol = l137;
6135             var value = symbol.value;
6136             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6137             return value;
6138         })(), "    else", (function(){
6139             var symbol = l137;
6140             var value = symbol.value;
6141             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6142             return value;
6143         })(), "        throw cf;", (function(){
6144             var symbol = l137;
6145             var value = symbol.value;
6146             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6147             return value;
6148         })(), "}", (function(){
6149             var symbol = l137;
6150             var value = symbol.value;
6151             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6152             return value;
6153         })()), "})()");
6154     })();
6155 })), cdr: (function(){
6156     var symbol = l211;
6157     var value = symbol.value;
6158     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6159     return value;
6160 })()}));
6161 var l267 = {name: "THROW"};
6162 ((l211).value = ({car: l45.fvalue(pv, l267, (function (values,v664,v665){
6163     checkArgs(arguments, 3);
6164     var i;
6165     return (function(){
6166         return l172.fvalue(values, "(function(){", (function(){
6167             var symbol = l137;
6168             var value = symbol.value;
6169             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6170             return value;
6171         })(), l176.fvalue(pv, "var values = mv;", (function(){
6172             var symbol = l137;
6173             var value = symbol.value;
6174             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6175             return value;
6176         })(), "throw ({", "type: 'catch', ", "id: ", l174.fvalue(pv, v664), ", ", "values: ", l174.fvalue(pv, v665, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
6177     })();
6178 })), cdr: (function(){
6179     var symbol = l211;
6180     var value = symbol.value;
6181     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6182     return value;
6183 })()}));
6184 var l268 = {name: "*TAGBODY-COUNTER*"};
6185 (function(){
6186     (((l268.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l268).value = 0));
6187     return l268;
6188 })();
6189 var l269 = {name: "*GO-TAG-COUNTER*"};
6190 (function(){
6191     (((l269.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l269).value = 0));
6192     return l269;
6193 })();
6194 var l270 = {name: "GO-TAG-P"};
6195 (function(){
6196     (l270).fvalue = (function(v668){
6197         ((v668)["fname"] = "GO-TAG-P");
6198         return v668;
6199     })((function (values,v666){
6200         checkArgs(arguments, 2);
6201         var i;
6202         return (function(){
6203             return (function(v667){
6204                 return (v667 !== l5.value ? v667 : ((function(){
6205                     var tmp = v666;
6206                     return (typeof tmp == 'object' && 'name' in tmp);
6207                 })()?l4.value: l5.value));
6208             })(l85.fvalue(pv, v666));
6209         })();
6210     }));
6211     return l270;
6212 })();
6213 var l271 = {name: "DECLARE-TAGBODY-TAGS"};
6214 (function(){
6215     (l271).fvalue = (function(v674){
6216         ((v674)["fname"] = "DECLARE-TAGBODY-TAGS");
6217         return v674;
6218     })((function (values,v669,v670){
6219         checkArgs(arguments, 3);
6220         var i;
6221         return (function(){
6222             return (function(v673){
6223                 return l191.fvalue(values, v673, (function(){
6224                     var symbol = l193;
6225                     var value = symbol.value;
6226                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6227                     return value;
6228                 })(), l190);
6229             })(l78.fvalue(pv, (function (values,v671){
6230                 checkArgs(arguments, 2);
6231                 var i;
6232                 return (function(v672){
6233                     return l178.fvalue(values, v671, l190, l45.fvalue(pv, v669, v672));
6234                 })(l18.fvalue(pv, ((l269).value = (function(){
6235                     var x1 = (function(){
6236                         var symbol = l269;
6237                         var value = symbol.value;
6238                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6239                         return value;
6240                     })();
6241                     if (typeof x1 !== 'number') throw 'Not a number!';
6242                     return x1+1;
6243                 })())));
6244             }), l95.fvalue(pv, (function(){
6245                 var symbol = l270;
6246                 var func = symbol.fvalue;
6247                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6248                 return func;
6249             })(), v670)));
6250         })();
6251     }));
6252     return l271;
6253 })();
6254 var l272 = {name: "TAGBODY"};
6255 ((l211).value = ({car: l45.fvalue(pv, l272, (function (values){
6256     var v675= l5.value;
6257     for (var i = arguments.length-1; i>=1; i--)
6258         v675 = {car: arguments[i], cdr:
6259     v675};
6260     var i;
6261     return (function(){
6262         try {
6263             (l99.fvalue(pv, (function(){
6264                 var symbol = l270;
6265                 var func = symbol.fvalue;
6266                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6267                 return func;
6268             })(), v675) !== l5.value ? l5.value : (function(){
6269                 var values = mv;
6270                 throw ({type: 'block', id: 228, values: l174.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l253), v675, l45.fvalue(pv, l5))), message: 'Return from unknown block TAGBODY.'})
6271             })());
6272             (l270.fvalue(pv, (function(){
6273                 var tmp = v675;
6274                 return tmp === l5.value? l5.value: tmp.car;
6275             })()) !== l5.value ? l5.value : (v675 = ({car: l17.fvalue(pv, "START"), cdr: v675})));
6276             return (function(v676){
6277                 return (function(v678,v677){
6278                     try {
6279                         var tmp;
6280                         tmp = l193.value;
6281                         l193.value = v678;
6282                         v678 = tmp;
6283                         (function(v679){
6284                             return (v677 = l41.fvalue(pv, l181.fvalue(pv, v679)));
6285                         })(l192.fvalue(pv, l40.fvalue(pv, v675), (function(){
6286                             var symbol = l193;
6287                             var value = symbol.value;
6288                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6289                             return value;
6290                         })(), l190));
6291                         return l172.fvalue(values, "(function(){", (function(){
6292                             var symbol = l137;
6293                             var value = symbol.value;
6294                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6295                             return value;
6296                         })(), l176.fvalue(pv, "var tagbody_", v676, " = ", v677, ";", (function(){
6297                             var symbol = l137;
6298                             var value = symbol.value;
6299                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6300                             return value;
6301                         })(), "tbloop:", (function(){
6302                             var symbol = l137;
6303                             var value = symbol.value;
6304                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6305                             return value;
6306                         })(), "while (true) {", (function(){
6307                             var symbol = l137;
6308                             var value = symbol.value;
6309                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6310                             return value;
6311                         })(), l176.fvalue(pv, "try {", (function(){
6312                             var symbol = l137;
6313                             var value = symbol.value;
6314                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6315                             return value;
6316                         })(), l176.fvalue(pv, (function(v680){
6317                             return l172.fvalue(pv, "switch(tagbody_", v676, "){", (function(){
6318                                 var symbol = l137;
6319                                 var value = symbol.value;
6320                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6321                                 return value;
6322                             })(), "case ", v677, ":", (function(){
6323                                 var symbol = l137;
6324                                 var value = symbol.value;
6325                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6326                                 return value;
6327                             })(), (function(){
6328                                 return (function(v681,v682){
6329                                     (function(){
6330                                         while(v681 !== l5.value){
6331                                             (v682 = (function(){
6332                                                 var tmp = v681;
6333                                                 return tmp === l5.value? l5.value: tmp.car;
6334                                             })());
6335                                             (function(){
6336                                                 (v680 = l138.fvalue(pv, v680, (l28.fvalue(pv, l270.fvalue(pv, v682)) !== l5.value ? l176.fvalue(pv, l174.fvalue(pv, v682), ";", (function(){
6337                                                     var symbol = l137;
6338                                                     var value = symbol.value;
6339                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6340                                                     return value;
6341                                                 })()) : (function(v683){
6342                                                     return l172.fvalue(pv, "case ", l41.fvalue(pv, l181.fvalue(pv, v683)), ":", (function(){
6343                                                         var symbol = l137;
6344                                                         var value = symbol.value;
6345                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6346                                                         return value;
6347                                                     })());
6348                                                 })(l192.fvalue(pv, v682, (function(){
6349                                                     var symbol = l193;
6350                                                     var value = symbol.value;
6351                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6352                                                     return value;
6353                                                 })(), l190)))));
6354                                                 return l5.value;
6355                                             })();
6356                                             (v681 = (function(){
6357                                                 var tmp = v681;
6358                                                 return tmp === l5.value? l5.value: tmp.cdr;
6359                                             })());
6360                                         }return l5.value;
6361                                     })();
6362                                     return v680;
6363                                 })((function(){
6364                                     var tmp = v675;
6365                                     return tmp === l5.value? l5.value: tmp.cdr;
6366                                 })(),l5.value);
6367                             })(), "default:", (function(){
6368                                 var symbol = l137;
6369                                 var value = symbol.value;
6370                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6371                                 return value;
6372                             })(), "    break tbloop;", (function(){
6373                                 var symbol = l137;
6374                                 var value = symbol.value;
6375                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6376                                 return value;
6377                             })(), "}", (function(){
6378                                 var symbol = l137;
6379                                 var value = symbol.value;
6380                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6381                                 return value;
6382                             })());
6383                         })("")), "}", (function(){
6384                             var symbol = l137;
6385                             var value = symbol.value;
6386                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6387                             return value;
6388                         })(), "catch (jump) {", (function(){
6389                             var symbol = l137;
6390                             var value = symbol.value;
6391                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6392                             return value;
6393                         })(), "    if (jump.type == 'tagbody' && jump.id == ", v676, ")", (function(){
6394                             var symbol = l137;
6395                             var value = symbol.value;
6396                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6397                             return value;
6398                         })(), "        tagbody_", v676, " = jump.label;", (function(){
6399                             var symbol = l137;
6400                             var value = symbol.value;
6401                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6402                             return value;
6403                         })(), "    else", (function(){
6404                             var symbol = l137;
6405                             var value = symbol.value;
6406                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6407                             return value;
6408                         })(), "        throw(jump);", (function(){
6409                             var symbol = l137;
6410                             var value = symbol.value;
6411                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6412                             return value;
6413                         })(), "}", (function(){
6414                             var symbol = l137;
6415                             var value = symbol.value;
6416                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6417                             return value;
6418                         })()), "}", (function(){
6419                             var symbol = l137;
6420                             var value = symbol.value;
6421                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6422                             return value;
6423                         })(), "return ", l174.fvalue(pv, l5.value), ";", (function(){
6424                             var symbol = l137;
6425                             var value = symbol.value;
6426                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6427                             return value;
6428                         })()), "})()");
6429                     }
6430                     finally {
6431                         l193.value = v678;
6432                     }
6433                 })(l271.fvalue(pv, v676, v675),l5.value);
6434             })((function(){
6435                 var symbol = l268;
6436                 var value = symbol.value;
6437                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6438                 return value;
6439             })());
6440         }
6441         catch (cf){
6442             if (cf.type == 'block' && cf.id == 228)
6443                 return values.apply(this, forcemv(cf.values));
6444             else
6445                 throw cf;
6446         }
6447     })();
6448 })), cdr: (function(){
6449     var symbol = l211;
6450     var value = symbol.value;
6451     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6452     return value;
6453 })()}));
6454 var l273 = {name: "GO"};
6455 ((l211).value = ({car: l45.fvalue(pv, l273, (function (values,v684){
6456     checkArgs(arguments, 2);
6457     var i;
6458     return (function(){
6459         return (function(v685,v686){
6460             (l13.fvalue(pv, v685) !== l5.value ? (function(){
6461                 throw l138.fvalue(pv, "Unknown tag `", v686, "'.");
6462             })() : l5.value);
6463             return l172.fvalue(values, "(function(){", (function(){
6464                 var symbol = l137;
6465                 var value = symbol.value;
6466                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6467                 return value;
6468             })(), l176.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l40.fvalue(pv, l181.fvalue(pv, v685)), ", ", "label: ", l41.fvalue(pv, l181.fvalue(pv, v685)), ", ", "message: 'Attempt to GO to non-existing tag ", v686, "'", "})", (function(){
6469                 var symbol = l137;
6470                 var value = symbol.value;
6471                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6472                 return value;
6473             })()), "})()");
6474         })(l192.fvalue(pv, v684, (function(){
6475             var symbol = l193;
6476             var value = symbol.value;
6477             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6478             return value;
6479         })(), l190),(((function(){
6480             var tmp = v684;
6481             return (typeof tmp == 'object' && 'name' in tmp);
6482         })()?l4.value: l5.value) !== l5.value ? (v684).name : (l85.fvalue(pv, v684) !== l5.value ? l18.fvalue(pv, v684) : l5.value)));
6483     })();
6484 })), cdr: (function(){
6485     var symbol = l211;
6486     var value = symbol.value;
6487     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6488     return value;
6489 })()}));
6490 var l274 = {name: "UNWIND-PROTECT"};
6491 ((l211).value = ({car: l45.fvalue(pv, l274, (function (values,v688){
6492     checkArgsAtLeast(arguments, 2);
6493     var v687= l5.value;
6494     for (var i = arguments.length-1; i>=2; i--)
6495         v687 = {car: arguments[i], cdr:
6496     v687};
6497     var i;
6498     return (function(){
6499         return l172.fvalue(values, "(function(){", (function(){
6500             var symbol = l137;
6501             var value = symbol.value;
6502             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6503             return value;
6504         })(), l176.fvalue(pv, "var ret = ", l174.fvalue(pv, l5.value), ";", (function(){
6505             var symbol = l137;
6506             var value = symbol.value;
6507             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6508             return value;
6509         })(), "try {", (function(){
6510             var symbol = l137;
6511             var value = symbol.value;
6512             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6513             return value;
6514         })(), l176.fvalue(pv, "ret = ", l174.fvalue(pv, v688), ";", (function(){
6515             var symbol = l137;
6516             var value = symbol.value;
6517             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6518             return value;
6519         })()), "} finally {", (function(){
6520             var symbol = l137;
6521             var value = symbol.value;
6522             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6523             return value;
6524         })(), l176.fvalue(pv, l234.fvalue(pv, v687)), "}", (function(){
6525             var symbol = l137;
6526             var value = symbol.value;
6527             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6528             return value;
6529         })(), "return ret;", (function(){
6530             var symbol = l137;
6531             var value = symbol.value;
6532             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6533             return value;
6534         })()), "})()");
6535     })();
6536 })), cdr: (function(){
6537     var symbol = l211;
6538     var value = symbol.value;
6539     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6540     return value;
6541 })()}));
6542 var l275 = {name: "MULTIPLE-VALUE-CALL"};
6543 ((l211).value = ({car: l45.fvalue(pv, l275, (function (values,v690){
6544     checkArgsAtLeast(arguments, 2);
6545     var v689= l5.value;
6546     for (var i = arguments.length-1; i>=2; i--)
6547         v689 = {car: arguments[i], cdr:
6548     v689};
6549     var i;
6550     return (function(){
6551         return l172.fvalue(values, "(function(){", (function(){
6552             var symbol = l137;
6553             var value = symbol.value;
6554             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6555             return value;
6556         })(), l176.fvalue(pv, "var func = ", l174.fvalue(pv, v690), ";", (function(){
6557             var symbol = l137;
6558             var value = symbol.value;
6559             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6560             return value;
6561         })(), "var args = [", ((function(){
6562             var symbol = l177;
6563             var value = symbol.value;
6564             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6565             return value;
6566         })() !== l5.value ? "values" : "pv"), "];", (function(){
6567             var symbol = l137;
6568             var value = symbol.value;
6569             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6570             return value;
6571         })(), "return ", l172.fvalue(pv, "(function(){", (function(){
6572             var symbol = l137;
6573             var value = symbol.value;
6574             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6575             return value;
6576         })(), l176.fvalue(pv, "var values = mv;", (function(){
6577             var symbol = l137;
6578             var value = symbol.value;
6579             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6580             return value;
6581         })(), "var vs;", (function(){
6582             var symbol = l137;
6583             var value = symbol.value;
6584             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6585             return value;
6586         })(), l142.fvalue(pv, (function (values,v691){
6587             checkArgs(arguments, 2);
6588             var i;
6589             return l172.fvalue(values, "vs = ", l174.fvalue(pv, v691, l4.value), ";", (function(){
6590                 var symbol = l137;
6591                 var value = symbol.value;
6592                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6593                 return value;
6594             })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){
6595                 var symbol = l137;
6596                 var value = symbol.value;
6597                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6598                 return value;
6599             })(), l176.fvalue(pv, "args = args.concat(vs);", (function(){
6600                 var symbol = l137;
6601                 var value = symbol.value;
6602                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6603                 return value;
6604             })()), "else", (function(){
6605                 var symbol = l137;
6606                 var value = symbol.value;
6607                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6608                 return value;
6609             })(), l176.fvalue(pv, "args.push(vs);", (function(){
6610                 var symbol = l137;
6611                 var value = symbol.value;
6612                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6613                 return value;
6614             })()));
6615         }), v689), "return func.apply(window, args);", (function(){
6616             var symbol = l137;
6617             var value = symbol.value;
6618             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6619             return value;
6620         })()), "})()"), ";", (function(){
6621             var symbol = l137;
6622             var value = symbol.value;
6623             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6624             return value;
6625         })()), "})()");
6626     })();
6627 })), cdr: (function(){
6628     var symbol = l211;
6629     var value = symbol.value;
6630     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6631     return value;
6632 })()}));
6633 var l276 = {name: "MULTIPLE-VALUE-PROG1"};
6634 ((l211).value = ({car: l45.fvalue(pv, l276, (function (values,v693){
6635     checkArgsAtLeast(arguments, 2);
6636     var v692= l5.value;
6637     for (var i = arguments.length-1; i>=2; i--)
6638         v692 = {car: arguments[i], cdr:
6639     v692};
6640     var i;
6641     return (function(){
6642         return l172.fvalue(values, "(function(){", (function(){
6643             var symbol = l137;
6644             var value = symbol.value;
6645             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6646             return value;
6647         })(), l176.fvalue(pv, "var args = ", l174.fvalue(pv, v693, (function(){
6648             var symbol = l177;
6649             var value = symbol.value;
6650             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6651             return value;
6652         })()), ";", (function(){
6653             var symbol = l137;
6654             var value = symbol.value;
6655             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6656             return value;
6657         })(), l234.fvalue(pv, v692), "return args;", (function(){
6658             var symbol = l137;
6659             var value = symbol.value;
6660             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6661             return value;
6662         })()), "})()");
6663     })();
6664 })), cdr: (function(){
6665     var symbol = l211;
6666     var value = symbol.value;
6667     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6668     return value;
6669 })()}));
6670 var l277 = {name: "BACKQUOTE-EXPAND-1"};
6671 (function(){
6672     (l277).fvalue = (function(v696){
6673         ((v696)["fname"] = "BACKQUOTE-EXPAND-1");
6674         return v696;
6675     })((function (values,v694){
6676         checkArgs(arguments, 2);
6677         var i;
6678         return (function(){
6679             return (((function(){
6680                 var tmp = v694;
6681                 return (typeof tmp == 'object' && 'name' in tmp);
6682             })()?l4.value: l5.value) !== l5.value ? l45.fvalue(values, l167, v694) : (l46.fvalue(pv, v694) !== l5.value ? v694 : ((((function(){
6683                 var tmp = v694;
6684                 return tmp === l5.value? l5.value: tmp.car;
6685             })() === l170)?l4.value: l5.value) !== l5.value ? (function(){
6686                 var tmp = v694;
6687                 return tmp === l5.value? l5.value: tmp.car;
6688             })() : ((((function(){
6689                 var tmp = v694;
6690                 return tmp === l5.value? l5.value: tmp.car;
6691             })() === l168)?l4.value: l5.value) !== l5.value ? l277.fvalue(values, l277.fvalue(pv, l34.fvalue(pv, v694))) : ({car: l65, cdr: l78.fvalue(pv, (function (values,v695){
6692                 checkArgs(arguments, 2);
6693                 var i;
6694                 return ((l60.fvalue(pv, v695) !== l5.value ? (((function(){
6695                     var tmp = v695;
6696                     return tmp === l5.value? l5.value: tmp.car;
6697                 })() === l170)?l4.value: l5.value) : l5.value) !== l5.value ? l45.fvalue(values, l45, l34.fvalue(pv, v695)) : ((l60.fvalue(pv, v695) !== l5.value ? (((function(){
6698                     var tmp = v695;
6699                     return tmp === l5.value? l5.value: tmp.car;
6700                 })() === l169)?l4.value: l5.value) : l5.value) !== l5.value ? l34.fvalue(values, v695) : l45.fvalue(values, l45, l277.fvalue(pv, v695))));
6701             }), v694)})))));
6702         })();
6703     }));
6704     return l277;
6705 })();
6706 var l278 = {name: "BACKQUOTE-EXPAND"};
6707 (function(){
6708     (l278).fvalue = (function(v698){
6709         ((v698)["fname"] = "BACKQUOTE-EXPAND");
6710         return v698;
6711     })((function (values,v697){
6712         checkArgs(arguments, 2);
6713         var i;
6714         return (function(){
6715             return ((l60.fvalue(pv, v697) !== l5.value ? (((function(){
6716                 var tmp = v697;
6717                 return tmp === l5.value? l5.value: tmp.car;
6718             })() === l168)?l4.value: l5.value) : l5.value) !== l5.value ? l277.fvalue(values, l34.fvalue(pv, v697)) : v697);
6719         })();
6720     }));
6721     return l278;
6722 })();
6723 l168;
6724 ((l211).value = ({car: l45.fvalue(pv, l168, (function (values,v699){
6725     checkArgs(arguments, 2);
6726     var i;
6727     return (function(){
6728         return l174.fvalue(values, l277.fvalue(pv, v699));
6729     })();
6730 })), cdr: (function(){
6731     var symbol = l211;
6732     var value = symbol.value;
6733     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6734     return value;
6735 })()}));
6736 var l279 = {name: "*BUILTINS*"};
6737 (function(){
6738     (((l279.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l279).value = l5.value));
6739     return l279;
6740 })();
6741 var l280 = {name: "DEFINE-RAW-BUILTIN"};
6742 l280;
6743 var l281 = {name: "DEFINE-BUILTIN"};
6744 l281;
6745 var l282 = {name: "TYPE-CHECK"};
6746 l282;
6747 var l283 = {name: "VARIABLE-ARITY-CALL"};
6748 (function(){
6749     (l283).fvalue = (function(v708){
6750         ((v708)["fname"] = "VARIABLE-ARITY-CALL");
6751         return v708;
6752     })((function (values,v700,v701){
6753         checkArgs(arguments, 3);
6754         var i;
6755         return (function(){
6756             (((function(){
6757                 var tmp = v700;
6758                 return (typeof tmp == 'object' && 'car' in tmp);
6759             })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
6760                 throw "ARGS must be a non-empty list";
6761             })());
6762             return (function(v702,v703,v704){
6763                 (function(){
6764                     return (function(v705,v706){
6765                         (function(){
6766                             while(v705 !== l5.value){
6767                                 (v706 = (function(){
6768                                     var tmp = v705;
6769                                     return tmp === l5.value? l5.value: tmp.car;
6770                                 })());
6771                                 (function(){
6772                                     (((typeof (v706) == "number")?l4.value: l5.value) !== l5.value ? (v703 = ({car: l18.fvalue(pv, v706), cdr: v703})) : (function(v707){
6773                                         (v703 = ({car: v707, cdr: v703}));
6774                                         return (v704 = l138.fvalue(pv, v704, l172.fvalue(pv, "var ", v707, " = ", l174.fvalue(pv, v706), ";", (function(){
6775                                             var symbol = l137;
6776                                             var value = symbol.value;
6777                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6778                                             return value;
6779                                         })(), "if (typeof ", v707, " !== 'number') throw 'Not a number!';", (function(){
6780                                             var symbol = l137;
6781                                             var value = symbol.value;
6782                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6783                                             return value;
6784                                         })())));
6785                                     })(l172.fvalue(pv, "x", (v702 = (function(){
6786                                         var x1 = v702;
6787                                         if (typeof x1 !== 'number') throw 'Not a number!';
6788                                         return x1+1;
6789                                     })()))));
6790                                     return l5.value;
6791                                 })();
6792                                 (v705 = (function(){
6793                                     var tmp = v705;
6794                                     return tmp === l5.value? l5.value: tmp.cdr;
6795                                 })());
6796                             }return l5.value;
6797                         })();
6798                         return l5.value;
6799                     })(v700,l5.value);
6800                 })();
6801                 return l172.fvalue(values, "(function(){", (function(){
6802                     var symbol = l137;
6803                     var value = symbol.value;
6804                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6805                     return value;
6806                 })(), l176.fvalue(pv, v704, (v701)(pv, l67.fvalue(pv, v703))), "})()");
6807             })(0,l5,"");
6808         })();
6809     }));
6810     return l283;
6811 })();
6812 var l284 = {name: "VARIABLE-ARITY"};
6813 l284;
6814 var l285 = {name: "NUM-OP-NUM"};
6815 (function(){
6816     (l285).fvalue = (function(v712){
6817         ((v712)["fname"] = "NUM-OP-NUM");
6818         return v712;
6819     })((function (values,v709,v710,v711){
6820         checkArgs(arguments, 4);
6821         var i;
6822         return (function(){
6823             return l172.fvalue(values, "(function(){", (function(){
6824                 var symbol = l137;
6825                 var value = symbol.value;
6826                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6827                 return value;
6828             })(), l176.fvalue(pv, l172.fvalue(pv, "var ", "x", " = ", v709, ";", (function(){
6829                 var symbol = l137;
6830                 var value = symbol.value;
6831                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6832                 return value;
6833             })()), l172.fvalue(pv, "var ", "y", " = ", v711, ";", (function(){
6834                 var symbol = l137;
6835                 var value = symbol.value;
6836                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6837                 return value;
6838             })()), l172.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6839                 var symbol = l137;
6840                 var value = symbol.value;
6841                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6842                 return value;
6843             })(), l176.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6844                 var symbol = l137;
6845                 var value = symbol.value;
6846                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6847                 return value;
6848             })())), l172.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
6849                 var symbol = l137;
6850                 var value = symbol.value;
6851                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6852                 return value;
6853             })(), l176.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
6854                 var symbol = l137;
6855                 var value = symbol.value;
6856                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6857                 return value;
6858             })())), l172.fvalue(pv, "return ", l172.fvalue(pv, "x", v710, "y"), ";", (function(){
6859                 var symbol = l137;
6860                 var value = symbol.value;
6861                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6862                 return value;
6863             })())), "})()");
6864         })();
6865     }));
6866     return l285;
6867 })();
6868 ((l279).value = ({car: l45.fvalue(pv, l62, (function (values){
6869     var v713= l5.value;
6870     for (var i = arguments.length-1; i>=1; i--)
6871         v713 = {car: arguments[i], cdr:
6872     v713};
6873     var i;
6874     return (function(){
6875         return (l13.fvalue(pv, v713) !== l5.value ? "0" : l283.fvalue(values, v713, (function (values,v714){
6876             checkArgs(arguments, 2);
6877             var i;
6878             return l172.fvalue(values, "return ", l140.fvalue(pv, v714, "+"), ";", (function(){
6879                 var symbol = l137;
6880                 var value = symbol.value;
6881                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6882                 return value;
6883             })());
6884         })));
6885     })();
6886 })), cdr: (function(){
6887     var symbol = l279;
6888     var value = symbol.value;
6889     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6890     return value;
6891 })()}));
6892 ((l279).value = ({car: l45.fvalue(pv, l63, (function (values,v716){
6893     checkArgsAtLeast(arguments, 2);
6894     var v715= l5.value;
6895     for (var i = arguments.length-1; i>=2; i--)
6896         v715 = {car: arguments[i], cdr:
6897     v715};
6898     var i;
6899     return (function(){
6900         return (function(v717){
6901             return l283.fvalue(values, v717, (function (values,v718){
6902                 checkArgs(arguments, 2);
6903                 var i;
6904                 return l172.fvalue(values, "return ", (l13.fvalue(pv, v715) !== l5.value ? l138.fvalue(pv, "-", (function(){
6905                     var tmp = v718;
6906                     return tmp === l5.value? l5.value: tmp.car;
6907                 })()) : l140.fvalue(pv, v718, "-")), ";", (function(){
6908                     var symbol = l137;
6909                     var value = symbol.value;
6910                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6911                     return value;
6912                 })());
6913             }));
6914         })(({car: v716, cdr: v715}));
6915     })();
6916 })), cdr: (function(){
6917     var symbol = l279;
6918     var value = symbol.value;
6919     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6920     return value;
6921 })()}));
6922 ((l279).value = ({car: l45.fvalue(pv, l21, (function (values){
6923     var v719= l5.value;
6924     for (var i = arguments.length-1; i>=1; i--)
6925         v719 = {car: arguments[i], cdr:
6926     v719};
6927     var i;
6928     return (function(){
6929         return (l13.fvalue(pv, v719) !== l5.value ? "1" : l283.fvalue(values, v719, (function (values,v720){
6930             checkArgs(arguments, 2);
6931             var i;
6932             return l172.fvalue(values, "return ", l140.fvalue(pv, v720, "*"), ";", (function(){
6933                 var symbol = l137;
6934                 var value = symbol.value;
6935                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6936                 return value;
6937             })());
6938         })));
6939     })();
6940 })), cdr: (function(){
6941     var symbol = l279;
6942     var value = symbol.value;
6943     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6944     return value;
6945 })()}));
6946 ((l279).value = ({car: l45.fvalue(pv, l22, (function (values,v722){
6947     checkArgsAtLeast(arguments, 2);
6948     var v721= l5.value;
6949     for (var i = arguments.length-1; i>=2; i--)
6950         v721 = {car: arguments[i], cdr:
6951     v721};
6952     var i;
6953     return (function(){
6954         return (function(v723){
6955             return l283.fvalue(values, v723, (function (values,v724){
6956                 checkArgs(arguments, 2);
6957                 var i;
6958                 return l172.fvalue(values, "return ", (l13.fvalue(pv, v721) !== l5.value ? l138.fvalue(pv, "1 /", (function(){
6959                     var tmp = v724;
6960                     return tmp === l5.value? l5.value: tmp.car;
6961                 })()) : l140.fvalue(pv, v724, "/")), ";", (function(){
6962                     var symbol = l137;
6963                     var value = symbol.value;
6964                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6965                     return value;
6966                 })());
6967             }));
6968         })(({car: v722, cdr: v721}));
6969     })();
6970 })), cdr: (function(){
6971     var symbol = l279;
6972     var value = symbol.value;
6973     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6974     return value;
6975 })()}));
6976 var l286 = {name: "MOD"};
6977 ((l279).value = ({car: l45.fvalue(pv, l286, (function (values,v725,v726){
6978     checkArgs(arguments, 3);
6979     var i;
6980     return (function(){
6981         return (function(v727,v728){
6982             return l285.fvalue(values, v727, "%", v728);
6983         })(l174.fvalue(pv, v725),l174.fvalue(pv, v726));
6984     })();
6985 })), cdr: (function(){
6986     var symbol = l279;
6987     var value = symbol.value;
6988     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6989     return value;
6990 })()}));
6991 var l287 = {name: "COMPARISON-CONJUNTION"};
6992 (function(){
6993     (l287).fvalue = (function(v731){
6994         ((v731)["fname"] = "COMPARISON-CONJUNTION");
6995         return v731;
6996     })((function (values,v729,v730){
6997         checkArgs(arguments, 3);
6998         var i;
6999         return (function(){
7000             return (l13.fvalue(pv, (function(){
7001                 var tmp = v729;
7002                 return tmp === l5.value? l5.value: tmp.cdr;
7003             })()) !== l5.value ? "true" : (l13.fvalue(pv, l36.fvalue(pv, v729)) !== l5.value ? l138.fvalue(values, (function(){
7004                 var tmp = v729;
7005                 return tmp === l5.value? l5.value: tmp.car;
7006             })(), v730, l34.fvalue(pv, v729)) : l138.fvalue(values, (function(){
7007                 var tmp = v729;
7008                 return tmp === l5.value? l5.value: tmp.car;
7009             })(), v730, l34.fvalue(pv, v729), " && ", l287.fvalue(pv, (function(){
7010                 var tmp = v729;
7011                 return tmp === l5.value? l5.value: tmp.cdr;
7012             })(), v730))));
7013         })();
7014     }));
7015     return l287;
7016 })();
7017 var l288 = {name: "DEFINE-BUILTIN-COMPARISON"};
7018 l288;
7019 var l289 = {name: ">"};
7020 ((l279).value = ({car: l45.fvalue(pv, l289, (function (values,v733){
7021     checkArgsAtLeast(arguments, 2);
7022     var v732= l5.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 l283.fvalue(values, v734, (function (values,v735){
7030                 checkArgs(arguments, 2);
7031                 var i;
7032                 return l172.fvalue(values, "return ", l173.fvalue(pv, l287.fvalue(pv, v735, ">")), ";", (function(){
7033                     var symbol = l137;
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 = l279;
7043     var value = symbol.value;
7044     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7045     return value;
7046 })()}));
7047 var l290 = {name: "<"};
7048 ((l279).value = ({car: l45.fvalue(pv, l290, (function (values,v737){
7049     checkArgsAtLeast(arguments, 2);
7050     var v736= l5.value;
7051     for (var i = arguments.length-1; i>=2; i--)
7052         v736 = {car: arguments[i], cdr:
7053     v736};
7054     var i;
7055     return (function(){
7056         return (function(v738){
7057             return l283.fvalue(values, v738, (function (values,v739){
7058                 checkArgs(arguments, 2);
7059                 var i;
7060                 return l172.fvalue(values, "return ", l173.fvalue(pv, l287.fvalue(pv, v739, "<")), ";", (function(){
7061                     var symbol = l137;
7062                     var value = symbol.value;
7063                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7064                     return value;
7065                 })());
7066             }));
7067         })(({car: v737, cdr: v736}));
7068     })();
7069 })), cdr: (function(){
7070     var symbol = l279;
7071     var value = symbol.value;
7072     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7073     return value;
7074 })()}));
7075 var l291 = {name: ">="};
7076 ((l279).value = ({car: l45.fvalue(pv, l291, (function (values,v741){
7077     checkArgsAtLeast(arguments, 2);
7078     var v740= l5.value;
7079     for (var i = arguments.length-1; i>=2; i--)
7080         v740 = {car: arguments[i], cdr:
7081     v740};
7082     var i;
7083     return (function(){
7084         return (function(v742){
7085             return l283.fvalue(values, v742, (function (values,v743){
7086                 checkArgs(arguments, 2);
7087                 var i;
7088                 return l172.fvalue(values, "return ", l173.fvalue(pv, l287.fvalue(pv, v743, ">=")), ";", (function(){
7089                     var symbol = l137;
7090                     var value = symbol.value;
7091                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7092                     return value;
7093                 })());
7094             }));
7095         })(({car: v741, cdr: v740}));
7096     })();
7097 })), cdr: (function(){
7098     var symbol = l279;
7099     var value = symbol.value;
7100     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7101     return value;
7102 })()}));
7103 var l292 = {name: "<="};
7104 ((l279).value = ({car: l45.fvalue(pv, l292, (function (values,v745){
7105     checkArgsAtLeast(arguments, 2);
7106     var v744= l5.value;
7107     for (var i = arguments.length-1; i>=2; i--)
7108         v744 = {car: arguments[i], cdr:
7109     v744};
7110     var i;
7111     return (function(){
7112         return (function(v746){
7113             return l283.fvalue(values, v746, (function (values,v747){
7114                 checkArgs(arguments, 2);
7115                 var i;
7116                 return l172.fvalue(values, "return ", l173.fvalue(pv, l287.fvalue(pv, v747, "<=")), ";", (function(){
7117                     var symbol = l137;
7118                     var value = symbol.value;
7119                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7120                     return value;
7121                 })());
7122             }));
7123         })(({car: v745, cdr: v744}));
7124     })();
7125 })), cdr: (function(){
7126     var symbol = l279;
7127     var value = symbol.value;
7128     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7129     return value;
7130 })()}));
7131 ((l279).value = ({car: l45.fvalue(pv, l20, (function (values,v749){
7132     checkArgsAtLeast(arguments, 2);
7133     var v748= l5.value;
7134     for (var i = arguments.length-1; i>=2; i--)
7135         v748 = {car: arguments[i], cdr:
7136     v748};
7137     var i;
7138     return (function(){
7139         return (function(v750){
7140             return l283.fvalue(values, v750, (function (values,v751){
7141                 checkArgs(arguments, 2);
7142                 var i;
7143                 return l172.fvalue(values, "return ", l173.fvalue(pv, l287.fvalue(pv, v751, "==")), ";", (function(){
7144                     var symbol = l137;
7145                     var value = symbol.value;
7146                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7147                     return value;
7148                 })());
7149             }));
7150         })(({car: v749, cdr: v748}));
7151     })();
7152 })), cdr: (function(){
7153     var symbol = l279;
7154     var value = symbol.value;
7155     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7156     return value;
7157 })()}));
7158 var l293 = {name: "NUMBERP"};
7159 ((l279).value = ({car: l45.fvalue(pv, l293, (function (values,v752){
7160     checkArgs(arguments, 2);
7161     var i;
7162     return (function(){
7163         return (function(v753){
7164             return l173.fvalue(values, l172.fvalue(pv, "(typeof (", v753, ") == \"number\")"));
7165         })(l174.fvalue(pv, v752));
7166     })();
7167 })), cdr: (function(){
7168     var symbol = l279;
7169     var value = symbol.value;
7170     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7171     return value;
7172 })()}));
7173 var l294 = {name: "FLOOR"};
7174 ((l279).value = ({car: l45.fvalue(pv, l294, (function (values,v754){
7175     checkArgs(arguments, 2);
7176     var i;
7177     return (function(){
7178         return (function(v755){
7179             return l172.fvalue(values, "(function(){", (function(){
7180                 var symbol = l137;
7181                 var value = symbol.value;
7182                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7183                 return value;
7184             })(), l176.fvalue(pv, l172.fvalue(pv, "var ", "x", " = ", v755, ";", (function(){
7185                 var symbol = l137;
7186                 var value = symbol.value;
7187                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7188                 return value;
7189             })()), l172.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7190                 var symbol = l137;
7191                 var value = symbol.value;
7192                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7193                 return value;
7194             })(), l176.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7195                 var symbol = l137;
7196                 var value = symbol.value;
7197                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7198                 return value;
7199             })())), l172.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){
7200                 var symbol = l137;
7201                 var value = symbol.value;
7202                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7203                 return value;
7204             })())), "})()");
7205         })(l174.fvalue(pv, v754));
7206     })();
7207 })), cdr: (function(){
7208     var symbol = l279;
7209     var value = symbol.value;
7210     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7211     return value;
7212 })()}));
7213 ((l279).value = ({car: l45.fvalue(pv, l29, (function (values,v756,v757){
7214     checkArgs(arguments, 3);
7215     var i;
7216     return (function(){
7217         return (function(v758,v759){
7218             return l172.fvalue(values, "({car: ", v758, ", cdr: ", v759, "})");
7219         })(l174.fvalue(pv, v756),l174.fvalue(pv, v757));
7220     })();
7221 })), cdr: (function(){
7222     var symbol = l279;
7223     var value = symbol.value;
7224     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7225     return value;
7226 })()}));
7227 ((l279).value = ({car: l45.fvalue(pv, l30, (function (values,v760){
7228     checkArgs(arguments, 2);
7229     var i;
7230     return (function(){
7231         return (function(v761){
7232             return l173.fvalue(values, l172.fvalue(pv, "(function(){", (function(){
7233                 var symbol = l137;
7234                 var value = symbol.value;
7235                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7236                 return value;
7237             })(), l176.fvalue(pv, "var tmp = ", v761, ";", (function(){
7238                 var symbol = l137;
7239                 var value = symbol.value;
7240                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7241                 return value;
7242             })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
7243                 var symbol = l137;
7244                 var value = symbol.value;
7245                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7246                 return value;
7247             })()), "})()"));
7248         })(l174.fvalue(pv, v760));
7249     })();
7250 })), cdr: (function(){
7251     var symbol = l279;
7252     var value = symbol.value;
7253     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7254     return value;
7255 })()}));
7256 ((l279).value = ({car: l45.fvalue(pv, l31, (function (values,v762){
7257     checkArgs(arguments, 2);
7258     var i;
7259     return (function(){
7260         return (function(v763){
7261             return l172.fvalue(values, "(function(){", (function(){
7262                 var symbol = l137;
7263                 var value = symbol.value;
7264                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7265                 return value;
7266             })(), l176.fvalue(pv, "var tmp = ", v763, ";", (function(){
7267                 var symbol = l137;
7268                 var value = symbol.value;
7269                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7270                 return value;
7271             })(), "return tmp === ", l174.fvalue(pv, l5.value), "? ", l174.fvalue(pv, l5.value), ": tmp.car;", (function(){
7272                 var symbol = l137;
7273                 var value = symbol.value;
7274                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7275                 return value;
7276             })()), "})()");
7277         })(l174.fvalue(pv, v762));
7278     })();
7279 })), cdr: (function(){
7280     var symbol = l279;
7281     var value = symbol.value;
7282     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7283     return value;
7284 })()}));
7285 ((l279).value = ({car: l45.fvalue(pv, l32, (function (values,v764){
7286     checkArgs(arguments, 2);
7287     var i;
7288     return (function(){
7289         return (function(v765){
7290             return l172.fvalue(values, "(function(){", (function(){
7291                 var symbol = l137;
7292                 var value = symbol.value;
7293                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7294                 return value;
7295             })(), l176.fvalue(pv, "var tmp = ", v765, ";", (function(){
7296                 var symbol = l137;
7297                 var value = symbol.value;
7298                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7299                 return value;
7300             })(), "return tmp === ", l174.fvalue(pv, l5.value), "? ", l174.fvalue(pv, l5.value), ": tmp.cdr;", (function(){
7301                 var symbol = l137;
7302                 var value = symbol.value;
7303                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7304                 return value;
7305             })()), "})()");
7306         })(l174.fvalue(pv, v764));
7307     })();
7308 })), cdr: (function(){
7309     var symbol = l279;
7310     var value = symbol.value;
7311     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7312     return value;
7313 })()}));
7314 var l295 = {name: "RPLACA"};
7315 ((l279).value = ({car: l45.fvalue(pv, l295, (function (values,v766,v767){
7316     checkArgs(arguments, 3);
7317     var i;
7318     return (function(){
7319         return (function(v768,v769){
7320             return l172.fvalue(values, "(function(){", (function(){
7321                 var symbol = l137;
7322                 var value = symbol.value;
7323                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7324                 return value;
7325             })(), l176.fvalue(pv, l172.fvalue(pv, "var ", "x", " = ", v768, ";", (function(){
7326                 var symbol = l137;
7327                 var value = symbol.value;
7328                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7329                 return value;
7330             })()), l172.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
7331                 var symbol = l137;
7332                 var value = symbol.value;
7333                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7334                 return value;
7335             })(), l176.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
7336                 var symbol = l137;
7337                 var value = symbol.value;
7338                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7339                 return value;
7340             })())), l172.fvalue(pv, "return ", l172.fvalue(pv, "(x.car = ", v769, ", x)"), ";", (function(){
7341                 var symbol = l137;
7342                 var value = symbol.value;
7343                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7344                 return value;
7345             })())), "})()");
7346         })(l174.fvalue(pv, v766),l174.fvalue(pv, v767));
7347     })();
7348 })), cdr: (function(){
7349     var symbol = l279;
7350     var value = symbol.value;
7351     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7352     return value;
7353 })()}));
7354 var l296 = {name: "RPLACD"};
7355 ((l279).value = ({car: l45.fvalue(pv, l296, (function (values,v770,v771){
7356     checkArgs(arguments, 3);
7357     var i;
7358     return (function(){
7359         return (function(v772,v773){
7360             return l172.fvalue(values, "(function(){", (function(){
7361                 var symbol = l137;
7362                 var value = symbol.value;
7363                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7364                 return value;
7365             })(), l176.fvalue(pv, l172.fvalue(pv, "var ", "x", " = ", v772, ";", (function(){
7366                 var symbol = l137;
7367                 var value = symbol.value;
7368                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7369                 return value;
7370             })()), l172.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
7371                 var symbol = l137;
7372                 var value = symbol.value;
7373                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7374                 return value;
7375             })(), l176.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
7376                 var symbol = l137;
7377                 var value = symbol.value;
7378                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7379                 return value;
7380             })())), l172.fvalue(pv, "return ", l172.fvalue(pv, "(x.cdr = ", v773, ", x)"), ";", (function(){
7381                 var symbol = l137;
7382                 var value = symbol.value;
7383                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7384                 return value;
7385             })())), "})()");
7386         })(l174.fvalue(pv, v770),l174.fvalue(pv, v771));
7387     })();
7388 })), cdr: (function(){
7389     var symbol = l279;
7390     var value = symbol.value;
7391     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7392     return value;
7393 })()}));
7394 var l297 = {name: "SYMBOLP"};
7395 ((l279).value = ({car: l45.fvalue(pv, l297, (function (values,v774){
7396     checkArgs(arguments, 2);
7397     var i;
7398     return (function(){
7399         return (function(v775){
7400             return l173.fvalue(values, l172.fvalue(pv, "(function(){", (function(){
7401                 var symbol = l137;
7402                 var value = symbol.value;
7403                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7404                 return value;
7405             })(), l176.fvalue(pv, "var tmp = ", v775, ";", (function(){
7406                 var symbol = l137;
7407                 var value = symbol.value;
7408                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7409                 return value;
7410             })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
7411                 var symbol = l137;
7412                 var value = symbol.value;
7413                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7414                 return value;
7415             })()), "})()"));
7416         })(l174.fvalue(pv, v774));
7417     })();
7418 })), cdr: (function(){
7419     var symbol = l279;
7420     var value = symbol.value;
7421     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7422     return value;
7423 })()}));
7424 var l298 = {name: "MAKE-SYMBOL"};
7425 ((l279).value = ({car: l45.fvalue(pv, l298, (function (values,v776){
7426     checkArgs(arguments, 2);
7427     var i;
7428     return (function(){
7429         return (function(v777){
7430             return l172.fvalue(values, "(function(){", (function(){
7431                 var symbol = l137;
7432                 var value = symbol.value;
7433                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7434                 return value;
7435             })(), l176.fvalue(pv, l172.fvalue(pv, "var ", "name", " = ", v777, ";", (function(){
7436                 var symbol = l137;
7437                 var value = symbol.value;
7438                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7439                 return value;
7440             })()), l172.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){
7441                 var symbol = l137;
7442                 var value = symbol.value;
7443                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7444                 return value;
7445             })(), l176.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
7446                 var symbol = l137;
7447                 var value = symbol.value;
7448                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7449                 return value;
7450             })())), l172.fvalue(pv, "return ", "({name: name})", ";", (function(){
7451                 var symbol = l137;
7452                 var value = symbol.value;
7453                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7454                 return value;
7455             })())), "})()");
7456         })(l174.fvalue(pv, v776));
7457     })();
7458 })), cdr: (function(){
7459     var symbol = l279;
7460     var value = symbol.value;
7461     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7462     return value;
7463 })()}));
7464 var l299 = {name: "SYMBOL-NAME"};
7465 ((l279).value = ({car: l45.fvalue(pv, l299, (function (values,v778){
7466     checkArgs(arguments, 2);
7467     var i;
7468     return (function(){
7469         return (function(v779){
7470             return l172.fvalue(values, "(", v779, ").name");
7471         })(l174.fvalue(pv, v778));
7472     })();
7473 })), cdr: (function(){
7474     var symbol = l279;
7475     var value = symbol.value;
7476     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7477     return value;
7478 })()}));
7479 ((l279).value = ({car: l45.fvalue(pv, l236, (function (values,v780,v781){
7480     checkArgs(arguments, 3);
7481     var i;
7482     return (function(){
7483         return (function(v782,v783){
7484             return l172.fvalue(values, "(", v782, ").value = ", v783);
7485         })(l174.fvalue(pv, v780),l174.fvalue(pv, v781));
7486     })();
7487 })), cdr: (function(){
7488     var symbol = l279;
7489     var value = symbol.value;
7490     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7491     return value;
7492 })()}));
7493 var l300 = {name: "FSET"};
7494 ((l279).value = ({car: l45.fvalue(pv, l300, (function (values,v784,v785){
7495     checkArgs(arguments, 3);
7496     var i;
7497     return (function(){
7498         return (function(v786,v787){
7499             return l172.fvalue(values, "(", v786, ").fvalue = ", v787);
7500         })(l174.fvalue(pv, v784),l174.fvalue(pv, v785));
7501     })();
7502 })), cdr: (function(){
7503     var symbol = l279;
7504     var value = symbol.value;
7505     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7506     return value;
7507 })()}));
7508 ((l279).value = ({car: l45.fvalue(pv, l19, (function (values,v788){
7509     checkArgs(arguments, 2);
7510     var i;
7511     return (function(){
7512         return (function(v789){
7513             return l173.fvalue(values, l172.fvalue(pv, "(", v789, ".value !== undefined)"));
7514         })(l174.fvalue(pv, v788));
7515     })();
7516 })), cdr: (function(){
7517     var symbol = l279;
7518     var value = symbol.value;
7519     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7520     return value;
7521 })()}));
7522 var l301 = {name: "SYMBOL-VALUE"};
7523 ((l279).value = ({car: l45.fvalue(pv, l301, (function (values,v790){
7524     checkArgs(arguments, 2);
7525     var i;
7526     return (function(){
7527         return (function(v791){
7528             return l172.fvalue(values, "(function(){", (function(){
7529                 var symbol = l137;
7530                 var value = symbol.value;
7531                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7532                 return value;
7533             })(), l176.fvalue(pv, "var symbol = ", v791, ";", (function(){
7534                 var symbol = l137;
7535                 var value = symbol.value;
7536                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7537                 return value;
7538             })(), "var value = symbol.value;", (function(){
7539                 var symbol = l137;
7540                 var value = symbol.value;
7541                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7542                 return value;
7543             })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
7544                 var symbol = l137;
7545                 var value = symbol.value;
7546                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7547                 return value;
7548             })(), "return value;", (function(){
7549                 var symbol = l137;
7550                 var value = symbol.value;
7551                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7552                 return value;
7553             })()), "})()");
7554         })(l174.fvalue(pv, v790));
7555     })();
7556 })), cdr: (function(){
7557     var symbol = l279;
7558     var value = symbol.value;
7559     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7560     return value;
7561 })()}));
7562 ((l279).value = ({car: l45.fvalue(pv, l245, (function (values,v792){
7563     checkArgs(arguments, 2);
7564     var i;
7565     return (function(){
7566         return (function(v793){
7567             return l172.fvalue(values, "(function(){", (function(){
7568                 var symbol = l137;
7569                 var value = symbol.value;
7570                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7571                 return value;
7572             })(), l176.fvalue(pv, "var symbol = ", v793, ";", (function(){
7573                 var symbol = l137;
7574                 var value = symbol.value;
7575                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7576                 return value;
7577             })(), "var func = symbol.fvalue;", (function(){
7578                 var symbol = l137;
7579                 var value = symbol.value;
7580                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7581                 return value;
7582             })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
7583                 var symbol = l137;
7584                 var value = symbol.value;
7585                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7586                 return value;
7587             })(), "return func;", (function(){
7588                 var symbol = l137;
7589                 var value = symbol.value;
7590                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7591                 return value;
7592             })()), "})()");
7593         })(l174.fvalue(pv, v792));
7594     })();
7595 })), cdr: (function(){
7596     var symbol = l279;
7597     var value = symbol.value;
7598     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7599     return value;
7600 })()}));
7601 var l302 = {name: "SYMBOL-PLIST"};
7602 ((l279).value = ({car: l45.fvalue(pv, l302, (function (values,v794){
7603     checkArgs(arguments, 2);
7604     var i;
7605     return (function(){
7606         return (function(v795){
7607             return l172.fvalue(values, "((", v795, ").plist || ", l174.fvalue(pv, l5.value), ")");
7608         })(l174.fvalue(pv, v794));
7609     })();
7610 })), cdr: (function(){
7611     var symbol = l279;
7612     var value = symbol.value;
7613     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7614     return value;
7615 })()}));
7616 var l303 = {name: "LAMBDA-CODE"};
7617 ((l279).value = ({car: l45.fvalue(pv, l303, (function (values,v796){
7618     checkArgs(arguments, 2);
7619     var i;
7620     return (function(){
7621         return (function(v797){
7622             return l172.fvalue(values, "(", v797, ").toString()");
7623         })(l174.fvalue(pv, v796));
7624     })();
7625 })), cdr: (function(){
7626     var symbol = l279;
7627     var value = symbol.value;
7628     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7629     return value;
7630 })()}));
7631 var l304 = {name: "EQ"};
7632 ((l279).value = ({car: l45.fvalue(pv, l304, (function (values,v798,v799){
7633     checkArgs(arguments, 3);
7634     var i;
7635     return (function(){
7636         return (function(v800,v801){
7637             return l173.fvalue(values, l172.fvalue(pv, "(", v800, " === ", v801, ")"));
7638         })(l174.fvalue(pv, v798),l174.fvalue(pv, v799));
7639     })();
7640 })), cdr: (function(){
7641     var symbol = l279;
7642     var value = symbol.value;
7643     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7644     return value;
7645 })()}));
7646 var l305 = {name: "EQUAL"};
7647 ((l279).value = ({car: l45.fvalue(pv, l305, (function (values,v802,v803){
7648     checkArgs(arguments, 3);
7649     var i;
7650     return (function(){
7651         return (function(v804,v805){
7652             return l173.fvalue(values, l172.fvalue(pv, "(", v804, " == ", v805, ")"));
7653         })(l174.fvalue(pv, v802),l174.fvalue(pv, v803));
7654     })();
7655 })), cdr: (function(){
7656     var symbol = l279;
7657     var value = symbol.value;
7658     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7659     return value;
7660 })()}));
7661 var l306 = {name: "CHAR-TO-STRING"};
7662 ((l279).value = ({car: l45.fvalue(pv, l306, (function (values,v806){
7663     checkArgs(arguments, 2);
7664     var i;
7665     return (function(){
7666         return (function(v807){
7667             return l172.fvalue(values, "(function(){", (function(){
7668                 var symbol = l137;
7669                 var value = symbol.value;
7670                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7671                 return value;
7672             })(), l176.fvalue(pv, l172.fvalue(pv, "var ", "x", " = ", v807, ";", (function(){
7673                 var symbol = l137;
7674                 var value = symbol.value;
7675                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7676                 return value;
7677             })()), l172.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7678                 var symbol = l137;
7679                 var value = symbol.value;
7680                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7681                 return value;
7682             })(), l176.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7683                 var symbol = l137;
7684                 var value = symbol.value;
7685                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7686                 return value;
7687             })())), l172.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){
7688                 var symbol = l137;
7689                 var value = symbol.value;
7690                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7691                 return value;
7692             })())), "})()");
7693         })(l174.fvalue(pv, v806));
7694     })();
7695 })), cdr: (function(){
7696     var symbol = l279;
7697     var value = symbol.value;
7698     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7699     return value;
7700 })()}));
7701 var l307 = {name: "STRINGP"};
7702 ((l279).value = ({car: l45.fvalue(pv, l307, (function (values,v808){
7703     checkArgs(arguments, 2);
7704     var i;
7705     return (function(){
7706         return (function(v809){
7707             return l173.fvalue(values, l172.fvalue(pv, "(typeof(", v809, ") == \"string\")"));
7708         })(l174.fvalue(pv, v808));
7709     })();
7710 })), cdr: (function(){
7711     var symbol = l279;
7712     var value = symbol.value;
7713     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7714     return value;
7715 })()}));
7716 var l308 = {name: "STRING-UPCASE"};
7717 ((l279).value = ({car: l45.fvalue(pv, l308, (function (values,v810){
7718     checkArgs(arguments, 2);
7719     var i;
7720     return (function(){
7721         return (function(v811){
7722             return l172.fvalue(values, "(function(){", (function(){
7723                 var symbol = l137;
7724                 var value = symbol.value;
7725                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7726                 return value;
7727             })(), l176.fvalue(pv, l172.fvalue(pv, "var ", "x", " = ", v811, ";", (function(){
7728                 var symbol = l137;
7729                 var value = symbol.value;
7730                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7731                 return value;
7732             })()), l172.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7733                 var symbol = l137;
7734                 var value = symbol.value;
7735                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7736                 return value;
7737             })(), l176.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7738                 var symbol = l137;
7739                 var value = symbol.value;
7740                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7741                 return value;
7742             })())), l172.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){
7743                 var symbol = l137;
7744                 var value = symbol.value;
7745                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7746                 return value;
7747             })())), "})()");
7748         })(l174.fvalue(pv, v810));
7749     })();
7750 })), cdr: (function(){
7751     var symbol = l279;
7752     var value = symbol.value;
7753     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7754     return value;
7755 })()}));
7756 var l309 = {name: "STRING-LENGTH"};
7757 ((l279).value = ({car: l45.fvalue(pv, l309, (function (values,v812){
7758     checkArgs(arguments, 2);
7759     var i;
7760     return (function(){
7761         return (function(v813){
7762             return l172.fvalue(values, "(function(){", (function(){
7763                 var symbol = l137;
7764                 var value = symbol.value;
7765                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7766                 return value;
7767             })(), l176.fvalue(pv, l172.fvalue(pv, "var ", "x", " = ", v813, ";", (function(){
7768                 var symbol = l137;
7769                 var value = symbol.value;
7770                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7771                 return value;
7772             })()), l172.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7773                 var symbol = l137;
7774                 var value = symbol.value;
7775                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7776                 return value;
7777             })(), l176.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7778                 var symbol = l137;
7779                 var value = symbol.value;
7780                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7781                 return value;
7782             })())), l172.fvalue(pv, "return ", "x.length", ";", (function(){
7783                 var symbol = l137;
7784                 var value = symbol.value;
7785                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7786                 return value;
7787             })())), "})()");
7788         })(l174.fvalue(pv, v812));
7789     })();
7790 })), cdr: (function(){
7791     var symbol = l279;
7792     var value = symbol.value;
7793     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7794     return value;
7795 })()}));
7796 var l310 = {name: "SLICE"};
7797 ((l279).value = ({car: l45.fvalue(pv, l310, (function (values,v814,v815,v816){
7798     checkArgsAtLeast(arguments, 3);
7799     checkArgsAtMost(arguments, 4);
7800     switch(arguments.length-1){
7801     case 2:
7802     v816=l5.value;
7803     default: break;
7804     }
7805     var i;
7806     return (function(){
7807         return l172.fvalue(values, "(function(){", (function(){
7808             var symbol = l137;
7809             var value = symbol.value;
7810             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7811             return value;
7812         })(), l176.fvalue(pv, "var str = ", l174.fvalue(pv, v814), ";", (function(){
7813             var symbol = l137;
7814             var value = symbol.value;
7815             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7816             return value;
7817         })(), "var a = ", l174.fvalue(pv, v815), ";", (function(){
7818             var symbol = l137;
7819             var value = symbol.value;
7820             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7821             return value;
7822         })(), "var b;", (function(){
7823             var symbol = l137;
7824             var value = symbol.value;
7825             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7826             return value;
7827         })(), (v816 !== l5.value ? l172.fvalue(pv, "b = ", l174.fvalue(pv, v816), ";", (function(){
7828             var symbol = l137;
7829             var value = symbol.value;
7830             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7831             return value;
7832         })()) : l5.value), "return str.slice(a,b);", (function(){
7833             var symbol = l137;
7834             var value = symbol.value;
7835             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7836             return value;
7837         })()), "})()");
7838     })();
7839 })), cdr: (function(){
7840     var symbol = l279;
7841     var value = symbol.value;
7842     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7843     return value;
7844 })()}));
7845 var l311 = {name: "CHAR"};
7846 ((l279).value = ({car: l45.fvalue(pv, l311, (function (values,v817,v818){
7847     checkArgs(arguments, 3);
7848     var i;
7849     return (function(){
7850         return (function(v819,v820){
7851             return l172.fvalue(values, "(function(){", (function(){
7852                 var symbol = l137;
7853                 var value = symbol.value;
7854                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7855                 return value;
7856             })(), l176.fvalue(pv, l172.fvalue(pv, "var ", "string", " = ", v819, ";", (function(){
7857                 var symbol = l137;
7858                 var value = symbol.value;
7859                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7860                 return value;
7861             })()), l172.fvalue(pv, "var ", "index", " = ", v820, ";", (function(){
7862                 var symbol = l137;
7863                 var value = symbol.value;
7864                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7865                 return value;
7866             })()), l172.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7867                 var symbol = l137;
7868                 var value = symbol.value;
7869                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7870                 return value;
7871             })(), l176.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7872                 var symbol = l137;
7873                 var value = symbol.value;
7874                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7875                 return value;
7876             })())), l172.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){
7877                 var symbol = l137;
7878                 var value = symbol.value;
7879                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7880                 return value;
7881             })(), l176.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
7882                 var symbol = l137;
7883                 var value = symbol.value;
7884                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7885                 return value;
7886             })())), l172.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){
7887                 var symbol = l137;
7888                 var value = symbol.value;
7889                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7890                 return value;
7891             })())), "})()");
7892         })(l174.fvalue(pv, v817),l174.fvalue(pv, v818));
7893     })();
7894 })), cdr: (function(){
7895     var symbol = l279;
7896     var value = symbol.value;
7897     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7898     return value;
7899 })()}));
7900 ((l279).value = ({car: l45.fvalue(pv, l73, (function (values,v821,v822){
7901     checkArgs(arguments, 3);
7902     var i;
7903     return (function(){
7904         return (function(v823,v824){
7905             return l172.fvalue(values, "(function(){", (function(){
7906                 var symbol = l137;
7907                 var value = symbol.value;
7908                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7909                 return value;
7910             })(), l176.fvalue(pv, l172.fvalue(pv, "var ", "string1", " = ", v823, ";", (function(){
7911                 var symbol = l137;
7912                 var value = symbol.value;
7913                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7914                 return value;
7915             })()), l172.fvalue(pv, "var ", "string2", " = ", v824, ";", (function(){
7916                 var symbol = l137;
7917                 var value = symbol.value;
7918                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7919                 return value;
7920             })()), l172.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){
7921                 var symbol = l137;
7922                 var value = symbol.value;
7923                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7924                 return value;
7925             })(), l176.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
7926                 var symbol = l137;
7927                 var value = symbol.value;
7928                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7929                 return value;
7930             })())), l172.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){
7931                 var symbol = l137;
7932                 var value = symbol.value;
7933                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7934                 return value;
7935             })(), l176.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
7936                 var symbol = l137;
7937                 var value = symbol.value;
7938                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7939                 return value;
7940             })())), l172.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){
7941                 var symbol = l137;
7942                 var value = symbol.value;
7943                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7944                 return value;
7945             })())), "})()");
7946         })(l174.fvalue(pv, v821),l174.fvalue(pv, v822));
7947     })();
7948 })), cdr: (function(){
7949     var symbol = l279;
7950     var value = symbol.value;
7951     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7952     return value;
7953 })()}));
7954 var l312 = {name: "FUNCALL"};
7955 ((l279).value = ({car: l45.fvalue(pv, l312, (function (values,v826){
7956     checkArgsAtLeast(arguments, 2);
7957     var v825= l5.value;
7958     for (var i = arguments.length-1; i>=2; i--)
7959         v825 = {car: arguments[i], cdr:
7960     v825};
7961     var i;
7962     return (function(){
7963         return l172.fvalue(values, "(", l174.fvalue(pv, v826), ")(", l140.fvalue(pv, ({car: ((function(){
7964             var symbol = l177;
7965             var value = symbol.value;
7966             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7967             return value;
7968         })() !== l5.value ? "values" : "pv"), cdr: l78.fvalue(pv, (function(){
7969             var symbol = l174;
7970             var func = symbol.fvalue;
7971             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7972             return func;
7973         })(), v825)}), ", "), ")");
7974     })();
7975 })), cdr: (function(){
7976     var symbol = l279;
7977     var value = symbol.value;
7978     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7979     return value;
7980 })()}));
7981 var l313 = {name: "APPLY"};
7982 ((l279).value = ({car: l45.fvalue(pv, l313, (function (values,v828){
7983     checkArgsAtLeast(arguments, 2);
7984     var v827= l5.value;
7985     for (var i = arguments.length-1; i>=2; i--)
7986         v827 = {car: arguments[i], cdr:
7987     v827};
7988     var i;
7989     return (function(){
7990         return (l13.fvalue(pv, v827) !== l5.value ? l172.fvalue(values, "(", l174.fvalue(pv, v828), ")()") : (function(v829,v830){
7991             return l172.fvalue(values, "(function(){", (function(){
7992                 var symbol = l137;
7993                 var value = symbol.value;
7994                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7995                 return value;
7996             })(), l176.fvalue(pv, "var f = ", l174.fvalue(pv, v828), ";", (function(){
7997                 var symbol = l137;
7998                 var value = symbol.value;
7999                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8000                 return value;
8001             })(), "var args = [", l140.fvalue(pv, ({car: ((function(){
8002                 var symbol = l177;
8003                 var value = symbol.value;
8004                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8005                 return value;
8006             })() !== l5.value ? "values" : "pv"), cdr: l78.fvalue(pv, (function(){
8007                 var symbol = l174;
8008                 var func = symbol.fvalue;
8009                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8010                 return func;
8011             })(), v829)}), ", "), "];", (function(){
8012                 var symbol = l137;
8013                 var value = symbol.value;
8014                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8015                 return value;
8016             })(), "var tail = (", l174.fvalue(pv, v830), ");", (function(){
8017                 var symbol = l137;
8018                 var value = symbol.value;
8019                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8020                 return value;
8021             })(), "while (tail != ", l174.fvalue(pv, l5.value), "){", (function(){
8022                 var symbol = l137;
8023                 var value = symbol.value;
8024                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8025                 return value;
8026             })(), "    args.push(tail.car);", (function(){
8027                 var symbol = l137;
8028                 var value = symbol.value;
8029                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8030                 return value;
8031             })(), "    tail = tail.cdr;", (function(){
8032                 var symbol = l137;
8033                 var value = symbol.value;
8034                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8035                 return value;
8036             })(), "}", (function(){
8037                 var symbol = l137;
8038                 var value = symbol.value;
8039                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8040                 return value;
8041             })(), "return f.apply(this, args);", (function(){
8042                 var symbol = l137;
8043                 var value = symbol.value;
8044                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8045                 return value;
8046             })()), "})()");
8047         })(l91.fvalue(pv, v827),(function(){
8048             var tmp = l90.fvalue(pv, v827);
8049             return tmp === l5.value? l5.value: tmp.car;
8050         })()));
8051     })();
8052 })), cdr: (function(){
8053     var symbol = l279;
8054     var value = symbol.value;
8055     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8056     return value;
8057 })()}));
8058 var l314 = {name: "JS-EVAL"};
8059 ((l279).value = ({car: l45.fvalue(pv, l314, (function (values,v831){
8060     checkArgs(arguments, 2);
8061     var i;
8062     return (function(){
8063         return (function(v832){
8064             return l172.fvalue(values, "(function(){", (function(){
8065                 var symbol = l137;
8066                 var value = symbol.value;
8067                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8068                 return value;
8069             })(), l176.fvalue(pv, l172.fvalue(pv, "var ", "string", " = ", v832, ";", (function(){
8070                 var symbol = l137;
8071                 var value = symbol.value;
8072                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8073                 return value;
8074             })()), l172.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
8075                 var symbol = l137;
8076                 var value = symbol.value;
8077                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8078                 return value;
8079             })(), l176.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
8080                 var symbol = l137;
8081                 var value = symbol.value;
8082                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8083                 return value;
8084             })())), l172.fvalue(pv, "return ", ((function(){
8085                 var symbol = l177;
8086                 var value = symbol.value;
8087                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8088                 return value;
8089             })() !== l5.value ? l172.fvalue(pv, "(function(){", (function(){
8090                 var symbol = l137;
8091                 var value = symbol.value;
8092                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8093                 return value;
8094             })(), l176.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){
8095                 var symbol = l137;
8096                 var value = symbol.value;
8097                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8098                 return value;
8099             })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){
8100                 var symbol = l137;
8101                 var value = symbol.value;
8102                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8103                 return value;
8104             })(), l176.fvalue(pv, "v = [v];", (function(){
8105                 var symbol = l137;
8106                 var value = symbol.value;
8107                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8108                 return value;
8109             })(), "v['multiple-value'] = true;", (function(){
8110                 var symbol = l137;
8111                 var value = symbol.value;
8112                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8113                 return value;
8114             })()), "}", (function(){
8115                 var symbol = l137;
8116                 var value = symbol.value;
8117                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8118                 return value;
8119             })(), "return values.apply(this, v);", (function(){
8120                 var symbol = l137;
8121                 var value = symbol.value;
8122                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8123                 return value;
8124             })()), "})()") : "eval.apply(window, [string])"), ";", (function(){
8125                 var symbol = l137;
8126                 var value = symbol.value;
8127                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8128                 return value;
8129             })())), "})()");
8130         })(l174.fvalue(pv, v831));
8131     })();
8132 })), cdr: (function(){
8133     var symbol = l279;
8134     var value = symbol.value;
8135     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8136     return value;
8137 })()}));
8138 var l315 = {name: "ERROR"};
8139 ((l279).value = ({car: l45.fvalue(pv, l315, (function (values,v833){
8140     checkArgs(arguments, 2);
8141     var i;
8142     return (function(){
8143         return (function(v834){
8144             return l172.fvalue(values, "(function(){", (function(){
8145                 var symbol = l137;
8146                 var value = symbol.value;
8147                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8148                 return value;
8149             })(), l176.fvalue(pv, "throw ", v834, ";", (function(){
8150                 var symbol = l137;
8151                 var value = symbol.value;
8152                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8153                 return value;
8154             })()), "})()");
8155         })(l174.fvalue(pv, v833));
8156     })();
8157 })), cdr: (function(){
8158     var symbol = l279;
8159     var value = symbol.value;
8160     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8161     return value;
8162 })()}));
8163 var l316 = {name: "NEW"};
8164 ((l279).value = ({car: l45.fvalue(pv, l316, (function (values){
8165     checkArgsAtMost(arguments, 1);
8166     var i;
8167     return (function(){
8168         return (function(){
8169             return "{}";
8170         })();
8171     })();
8172 })), cdr: (function(){
8173     var symbol = l279;
8174     var value = symbol.value;
8175     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8176     return value;
8177 })()}));
8178 var l317 = {name: "OBJECTP"};
8179 ((l279).value = ({car: l45.fvalue(pv, l317, (function (values,v835){
8180     checkArgs(arguments, 2);
8181     var i;
8182     return (function(){
8183         return (function(v836){
8184             return l173.fvalue(values, l172.fvalue(pv, "(typeof (", v836, ") === 'object')"));
8185         })(l174.fvalue(pv, v835));
8186     })();
8187 })), cdr: (function(){
8188     var symbol = l279;
8189     var value = symbol.value;
8190     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8191     return value;
8192 })()}));
8193 var l318 = {name: "OGET"};
8194 ((l279).value = ({car: l45.fvalue(pv, l318, (function (values,v837,v838){
8195     checkArgs(arguments, 3);
8196     var i;
8197     return (function(){
8198         return (function(v839,v840){
8199             return l172.fvalue(values, "(function(){", (function(){
8200                 var symbol = l137;
8201                 var value = symbol.value;
8202                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8203                 return value;
8204             })(), l176.fvalue(pv, "var tmp = ", "(", v839, ")[", v840, "];", (function(){
8205                 var symbol = l137;
8206                 var value = symbol.value;
8207                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8208                 return value;
8209             })(), "return tmp == undefined? ", l174.fvalue(pv, l5.value), ": tmp ;", (function(){
8210                 var symbol = l137;
8211                 var value = symbol.value;
8212                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8213                 return value;
8214             })()), "})()");
8215         })(l174.fvalue(pv, v837),l174.fvalue(pv, v838));
8216     })();
8217 })), cdr: (function(){
8218     var symbol = l279;
8219     var value = symbol.value;
8220     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8221     return value;
8222 })()}));
8223 var l319 = {name: "OSET"};
8224 ((l279).value = ({car: l45.fvalue(pv, l319, (function (values,v841,v842,v843){
8225     checkArgs(arguments, 4);
8226     var i;
8227     return (function(){
8228         return (function(v844,v845,v846){
8229             return l172.fvalue(values, "((", v844, ")[", v845, "] = ", v846, ")");
8230         })(l174.fvalue(pv, v841),l174.fvalue(pv, v842),l174.fvalue(pv, v843));
8231     })();
8232 })), cdr: (function(){
8233     var symbol = l279;
8234     var value = symbol.value;
8235     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8236     return value;
8237 })()}));
8238 var l320 = {name: "IN"};
8239 ((l279).value = ({car: l45.fvalue(pv, l320, (function (values,v847,v848){
8240     checkArgs(arguments, 3);
8241     var i;
8242     return (function(){
8243         return (function(v849,v850){
8244             return l173.fvalue(values, l172.fvalue(pv, "((", v849, ") in (", v850, "))"));
8245         })(l174.fvalue(pv, v847),l174.fvalue(pv, v848));
8246     })();
8247 })), cdr: (function(){
8248     var symbol = l279;
8249     var value = symbol.value;
8250     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8251     return value;
8252 })()}));
8253 var l321 = {name: "FUNCTIONP"};
8254 ((l279).value = ({car: l45.fvalue(pv, l321, (function (values,v851){
8255     checkArgs(arguments, 2);
8256     var i;
8257     return (function(){
8258         return (function(v852){
8259             return l173.fvalue(values, l172.fvalue(pv, "(typeof ", v852, " == 'function')"));
8260         })(l174.fvalue(pv, v851));
8261     })();
8262 })), cdr: (function(){
8263     var symbol = l279;
8264     var value = symbol.value;
8265     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8266     return value;
8267 })()}));
8268 var l322 = {name: "WRITE-STRING"};
8269 ((l279).value = ({car: l45.fvalue(pv, l322, (function (values,v853){
8270     checkArgs(arguments, 2);
8271     var i;
8272     return (function(){
8273         return (function(v854){
8274             return l172.fvalue(values, "(function(){", (function(){
8275                 var symbol = l137;
8276                 var value = symbol.value;
8277                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8278                 return value;
8279             })(), l176.fvalue(pv, l172.fvalue(pv, "var ", "x", " = ", v854, ";", (function(){
8280                 var symbol = l137;
8281                 var value = symbol.value;
8282                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8283                 return value;
8284             })()), l172.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
8285                 var symbol = l137;
8286                 var value = symbol.value;
8287                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8288                 return value;
8289             })(), l176.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
8290                 var symbol = l137;
8291                 var value = symbol.value;
8292                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8293                 return value;
8294             })())), l172.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){
8295                 var symbol = l137;
8296                 var value = symbol.value;
8297                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8298                 return value;
8299             })())), "})()");
8300         })(l174.fvalue(pv, v853));
8301     })();
8302 })), cdr: (function(){
8303     var symbol = l279;
8304     var value = symbol.value;
8305     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8306     return value;
8307 })()}));
8308 var l323 = {name: "MAKE-ARRAY"};
8309 ((l279).value = ({car: l45.fvalue(pv, l323, (function (values,v855){
8310     checkArgs(arguments, 2);
8311     var i;
8312     return (function(){
8313         return (function(v856){
8314             return l172.fvalue(values, "(function(){", (function(){
8315                 var symbol = l137;
8316                 var value = symbol.value;
8317                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8318                 return value;
8319             })(), l176.fvalue(pv, "var r = [];", (function(){
8320                 var symbol = l137;
8321                 var value = symbol.value;
8322                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8323                 return value;
8324             })(), "for (var i = 0; i < ", v856, "; i++)", (function(){
8325                 var symbol = l137;
8326                 var value = symbol.value;
8327                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8328                 return value;
8329             })(), l176.fvalue(pv, "r.push(", l174.fvalue(pv, l5.value), ");", (function(){
8330                 var symbol = l137;
8331                 var value = symbol.value;
8332                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8333                 return value;
8334             })()), "return r;", (function(){
8335                 var symbol = l137;
8336                 var value = symbol.value;
8337                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8338                 return value;
8339             })()), "})()");
8340         })(l174.fvalue(pv, v855));
8341     })();
8342 })), cdr: (function(){
8343     var symbol = l279;
8344     var value = symbol.value;
8345     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8346     return value;
8347 })()}));
8348 var l324 = {name: "ARRAYP"};
8349 ((l279).value = ({car: l45.fvalue(pv, l324, (function (values,v857){
8350     checkArgs(arguments, 2);
8351     var i;
8352     return (function(){
8353         return (function(v858){
8354             return l173.fvalue(values, l172.fvalue(pv, "(function(){", (function(){
8355                 var symbol = l137;
8356                 var value = symbol.value;
8357                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8358                 return value;
8359             })(), l176.fvalue(pv, "var x = ", v858, ";", (function(){
8360                 var symbol = l137;
8361                 var value = symbol.value;
8362                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8363                 return value;
8364             })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
8365         })(l174.fvalue(pv, v857));
8366     })();
8367 })), cdr: (function(){
8368     var symbol = l279;
8369     var value = symbol.value;
8370     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8371     return value;
8372 })()}));
8373 var l325 = {name: "AREF"};
8374 ((l279).value = ({car: l45.fvalue(pv, l325, (function (values,v859,v860){
8375     checkArgs(arguments, 3);
8376     var i;
8377     return (function(){
8378         return (function(v861,v862){
8379             return l172.fvalue(values, "(function(){", (function(){
8380                 var symbol = l137;
8381                 var value = symbol.value;
8382                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8383                 return value;
8384             })(), l176.fvalue(pv, "var x = ", "(", v861, ")[", v862, "];", (function(){
8385                 var symbol = l137;
8386                 var value = symbol.value;
8387                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8388                 return value;
8389             })(), "if (x === undefined) throw 'Out of range';", (function(){
8390                 var symbol = l137;
8391                 var value = symbol.value;
8392                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8393                 return value;
8394             })(), "return x;", (function(){
8395                 var symbol = l137;
8396                 var value = symbol.value;
8397                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8398                 return value;
8399             })()), "})()");
8400         })(l174.fvalue(pv, v859),l174.fvalue(pv, v860));
8401     })();
8402 })), cdr: (function(){
8403     var symbol = l279;
8404     var value = symbol.value;
8405     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8406     return value;
8407 })()}));
8408 var l326 = {name: "ASET"};
8409 ((l279).value = ({car: l45.fvalue(pv, l326, (function (values,v863,v864,v865){
8410     checkArgs(arguments, 4);
8411     var i;
8412     return (function(){
8413         return (function(v866,v867,v868){
8414             return l172.fvalue(values, "(function(){", (function(){
8415                 var symbol = l137;
8416                 var value = symbol.value;
8417                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8418                 return value;
8419             })(), l176.fvalue(pv, "var x = ", v866, ";", (function(){
8420                 var symbol = l137;
8421                 var value = symbol.value;
8422                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8423                 return value;
8424             })(), "var i = ", v867, ";", (function(){
8425                 var symbol = l137;
8426                 var value = symbol.value;
8427                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8428                 return value;
8429             })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
8430                 var symbol = l137;
8431                 var value = symbol.value;
8432                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8433                 return value;
8434             })(), "return x[i] = ", v868, ";", (function(){
8435                 var symbol = l137;
8436                 var value = symbol.value;
8437                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8438                 return value;
8439             })()), "})()");
8440         })(l174.fvalue(pv, v863),l174.fvalue(pv, v864),l174.fvalue(pv, v865));
8441     })();
8442 })), cdr: (function(){
8443     var symbol = l279;
8444     var value = symbol.value;
8445     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8446     return value;
8447 })()}));
8448 var l327 = {name: "GET-UNIX-TIME"};
8449 ((l279).value = ({car: l45.fvalue(pv, l327, (function (values){
8450     checkArgsAtMost(arguments, 1);
8451     var i;
8452     return (function(){
8453         return (function(){
8454             return l172.fvalue(values, "(Math.round(new Date() / 1000))");
8455         })();
8456     })();
8457 })), cdr: (function(){
8458     var symbol = l279;
8459     var value = symbol.value;
8460     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8461     return value;
8462 })()}));
8463 var l328 = {name: "VALUES-ARRAY"};
8464 ((l279).value = ({car: l45.fvalue(pv, l328, (function (values,v869){
8465     checkArgs(arguments, 2);
8466     var i;
8467     return (function(){
8468         return (function(v870){
8469             return ((function(){
8470                 var symbol = l177;
8471                 var value = symbol.value;
8472                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8473                 return value;
8474             })() !== l5.value ? l172.fvalue(values, "values.apply(this, ", v870, ")") : l172.fvalue(values, "pv.apply(this, ", v870, ")"));
8475         })(l174.fvalue(pv, v869));
8476     })();
8477 })), cdr: (function(){
8478     var symbol = l279;
8479     var value = symbol.value;
8480     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8481     return value;
8482 })()}));
8483 ((l279).value = ({car: l45.fvalue(pv, l146, (function (values){
8484     var v871= l5.value;
8485     for (var i = arguments.length-1; i>=1; i--)
8486         v871 = {car: arguments[i], cdr:
8487     v871};
8488     var i;
8489     return (function(){
8490         return ((function(){
8491             var symbol = l177;
8492             var value = symbol.value;
8493             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8494             return value;
8495         })() !== l5.value ? l172.fvalue(values, "values(", l140.fvalue(pv, l78.fvalue(pv, (function(){
8496             var symbol = l174;
8497             var func = symbol.fvalue;
8498             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8499             return func;
8500         })(), v871), ", "), ")") : l172.fvalue(values, "pv(", l140.fvalue(pv, l78.fvalue(pv, (function(){
8501             var symbol = l174;
8502             var func = symbol.fvalue;
8503             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8504             return func;
8505         })(), v871), ", "), ")"));
8506     })();
8507 })), cdr: (function(){
8508     var symbol = l279;
8509     var value = symbol.value;
8510     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8511     return value;
8512 })()}));
8513 (function(){
8514     (l203).fvalue = (function(v874){
8515         ((v874)["fname"] = "MACRO");
8516         return v874;
8517     })((function (values,v872){
8518         checkArgs(arguments, 2);
8519         var i;
8520         return (function(){
8521             return (((function(){
8522                 var tmp = v872;
8523                 return (typeof tmp == 'object' && 'name' in tmp);
8524             })()?l4.value: l5.value) !== l5.value ? (function(v873){
8525                 return (((l180.fvalue(pv, v873) === l203)?l4.value: l5.value) !== l5.value ? v873 : l5.value);
8526             })(l192.fvalue(pv, v872, (function(){
8527                 var symbol = l193;
8528                 var value = symbol.value;
8529                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8530                 return value;
8531             })(), l108)) : l5.value);
8532         })();
8533     }));
8534     return l203;
8535 })();
8536 var l329 = {name: "LS-MACROEXPAND-1"};
8537 (function(){
8538     (l329).fvalue = (function(v879){
8539         ((v879)["fname"] = "LS-MACROEXPAND-1");
8540         return v879;
8541     })((function (values,v875){
8542         checkArgs(arguments, 2);
8543         var i;
8544         return (function(){
8545             return (function(v876){
8546                 return (v876 !== l5.value ? (function(v877){
8547                     (l60.fvalue(pv, v877) !== l5.value ? (function(v878){
8548                         l183.fvalue(pv, v876, v878);
8549                         return (v877 = v878);
8550                     })(l254.fvalue(pv, v877)) : l5.value);
8551                     return (function(){
8552                         var f = v877;
8553                         var args = [values];
8554                         var tail = ((function(){
8555                             var tmp = v875;
8556                             return tmp === l5.value? l5.value: tmp.cdr;
8557                         })());
8558                         while (tail != l5.value){
8559                             args.push(tail.car);
8560                             tail = tail.cdr;
8561                         }
8562                         return f.apply(this, args);
8563                     })();
8564                 })(l181.fvalue(pv, v876)) : v875);
8565             })(l203.fvalue(pv, (function(){
8566                 var tmp = v875;
8567                 return tmp === l5.value? l5.value: tmp.car;
8568             })()));
8569         })();
8570     }));
8571     return l329;
8572 })();
8573 var l330 = {name: "COMPILE-FUNCALL"};
8574 var l331 = {name: "G764"};
8575 (function(){
8576     (l330).fvalue = (function(v884){
8577         ((v884)["fname"] = "COMPILE-FUNCALL");
8578         return v884;
8579     })((function (values,v880,v881){
8580         checkArgs(arguments, 3);
8581         var i;
8582         return (function(){
8583             return (function(){
8584                 var v882 = ((function(){
8585                     var symbol = l177;
8586                     var value = symbol.value;
8587                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8588                     return value;
8589                 })() !== l5.value ? "values" : "pv");
8590                 var v883 = l138.fvalue(pv, "(", l140.fvalue(pv, ({car: v882, cdr: l78.fvalue(pv, (function(){
8591                     var symbol = l174;
8592                     var func = symbol.fvalue;
8593                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8594                     return func;
8595                 })(), v881)}), ", "), ")");
8596                 return (l248.fvalue(pv, v880) !== l5.value ? l138.fvalue(values, l248.fvalue(pv, v880), v883) : ((((function(){
8597                     var tmp = v880;
8598                     return (typeof tmp == 'object' && 'name' in tmp);
8599                 })()?l4.value: l5.value) !== l5.value ? (((l126.fvalue(pv, v880) === l117.fvalue(pv, "COMMON-LISP"))?l4.value: l5.value) !== l5.value ? (function(){
8600                     var symbol = l331;
8601                     var value = symbol.value;
8602                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8603                     return value;
8604                 })() : l5.value) : l5.value) !== l5.value ? l172.fvalue(values, l174.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l167), l45.fvalue(pv, v880))), ".fvalue", v883) : l172.fvalue(values, l174.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l108), l45.fvalue(pv, v880))), v883)));
8605             })();
8606         })();
8607     }));
8608     return l330;
8609 })();
8610 (function(){
8611     (l234).fvalue = (function(v887){
8612         ((v887)["fname"] = "LS-COMPILE-BLOCK");
8613         return v887;
8614     })((function (values,v885,v886){
8615         checkArgsAtLeast(arguments, 2);
8616         checkArgsAtMost(arguments, 3);
8617         switch(arguments.length-1){
8618         case 1:
8619         v886=l5.value;
8620         default: break;
8621         }
8622         var i;
8623         return (function(){
8624             return (v886 !== l5.value ? l172.fvalue(values, l234.fvalue(pv, l91.fvalue(pv, v885)), "return ", l174.fvalue(pv, (function(){
8625                 var tmp = l90.fvalue(pv, v885);
8626                 return tmp === l5.value? l5.value: tmp.car;
8627             })(), (function(){
8628                 var symbol = l177;
8629                 var value = symbol.value;
8630                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8631                 return value;
8632             })()), ";") : l141.fvalue(values, l94.fvalue(pv, (function(){
8633                 var symbol = l200;
8634                 var func = symbol.fvalue;
8635                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8636                 return func;
8637             })(), l78.fvalue(pv, (function(){
8638                 var symbol = l174;
8639                 var func = symbol.fvalue;
8640                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8641                 return func;
8642             })(), v885)), l138.fvalue(pv, ";", (function(){
8643                 var symbol = l137;
8644                 var value = symbol.value;
8645                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8646                 return value;
8647             })())));
8648         })();
8649     }));
8650     return l234;
8651 })();
8652 (function(){
8653     (l174).fvalue = (function(v897){
8654         ((v897)["fname"] = "LS-COMPILE");
8655         return v897;
8656     })((function (values,v888,v889){
8657         checkArgsAtLeast(arguments, 2);
8658         checkArgsAtMost(arguments, 3);
8659         switch(arguments.length-1){
8660         case 1:
8661         v889=l5.value;
8662         default: break;
8663         }
8664         var i;
8665         return (function(){
8666             return (function(v890){
8667                 try {
8668                     var tmp;
8669                     tmp = l177.value;
8670                     l177.value = v890;
8671                     v890 = tmp;
8672                     return (((function(){
8673                         var tmp = v888;
8674                         return (typeof tmp == 'object' && 'name' in tmp);
8675                     })()?l4.value: l5.value) !== l5.value ? (function(v891){
8676                         return ((v891 !== l5.value ? l28.fvalue(pv, l92.fvalue(pv, l207, l182.fvalue(pv, v891))) : l5.value) !== l5.value ? l181.fvalue(values, v891) : ((function(v892){
8677                             return (v892 !== l5.value ? v892 : l92.fvalue(pv, l209, l182.fvalue(pv, v891)));
8678                         })(l125.fvalue(pv, v888)) !== l5.value ? l172.fvalue(values, l174.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l167), l45.fvalue(pv, v888))), ".value") : l174.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l301), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l167), l45.fvalue(pv, v888)))))));
8679                     })(l192.fvalue(pv, v888, (function(){
8680                         var symbol = l193;
8681                         var value = symbol.value;
8682                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8683                         return value;
8684                     })(), l109)) : (l85.fvalue(pv, v888) !== l5.value ? l18.fvalue(values, v888) : (((typeof(v888) == "string")?l4.value: l5.value) !== l5.value ? l172.fvalue(values, "\"", l148.fvalue(pv, v888), "\"") : (((function(){
8685                         var x = v888;
8686                         return typeof x === 'object' && 'length' in x;
8687                     })()?l4.value: l5.value) !== l5.value ? l243.fvalue(values, v888) : (l60.fvalue(pv, v888) !== l5.value ? (function(v893,v894){
8688                         return (l101.fvalue(pv, v893, (function(){
8689                             var symbol = l211;
8690                             var value = symbol.value;
8691                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8692                             return value;
8693                         })()) !== l5.value ? (function(v895){
8694                             return (function(){
8695                                 var f = v895;
8696                                 var args = [values];
8697                                 var tail = (v894);
8698                                 while (tail != l5.value){
8699                                     args.push(tail.car);
8700                                     tail = tail.cdr;
8701                                 }
8702                                 return f.apply(this, args);
8703                             })();
8704                         })(l41.fvalue(pv, l101.fvalue(pv, v893, (function(){
8705                             var symbol = l211;
8706                             var value = symbol.value;
8707                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8708                             return value;
8709                         })()))) : ((l101.fvalue(pv, v893, (function(){
8710                             var symbol = l279;
8711                             var value = symbol.value;
8712                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8713                             return value;
8714                         })()) !== l5.value ? l28.fvalue(pv, l205.fvalue(pv, v893, l108, l208)) : l5.value) !== l5.value ? (function(v896){
8715                             return (function(){
8716                                 var f = v896;
8717                                 var args = [values];
8718                                 var tail = (v894);
8719                                 while (tail != l5.value){
8720                                     args.push(tail.car);
8721                                     tail = tail.cdr;
8722                                 }
8723                                 return f.apply(this, args);
8724                             })();
8725                         })(l41.fvalue(pv, l101.fvalue(pv, v893, (function(){
8726                             var symbol = l279;
8727                             var value = symbol.value;
8728                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8729                             return value;
8730                         })()))) : (l203.fvalue(pv, v893) !== l5.value ? l174.fvalue(values, l329.fvalue(pv, v888), v889) : l330.fvalue(values, v893, v894))));
8731                     })((function(){
8732                         var tmp = v888;
8733                         return tmp === l5.value? l5.value: tmp.car;
8734                     })(),(function(){
8735                         var tmp = v888;
8736                         return tmp === l5.value? l5.value: tmp.cdr;
8737                     })()) : (function(){
8738                         throw "How should I compile this?";
8739                     })())))));
8740                 }
8741                 finally {
8742                     l177.value = v890;
8743                 }
8744             })(v889);
8745         })();
8746     }));
8747     return l174;
8748 })();
8749 var l332 = {name: "LS-COMPILE-TOPLEVEL"};
8750 (function(){
8751     (l332).fvalue = (function(v904){
8752         ((v904)["fname"] = "LS-COMPILE-TOPLEVEL");
8753         return v904;
8754     })((function (values,v898,v899){
8755         checkArgsAtLeast(arguments, 2);
8756         checkArgsAtMost(arguments, 3);
8757         switch(arguments.length-1){
8758         case 1:
8759         v899=l5.value;
8760         default: break;
8761         }
8762         var i;
8763         return (function(){
8764             return (function(v900){
8765                 try {
8766                     var tmp;
8767                     tmp = l198.value;
8768                     l198.value = v900;
8769                     v900 = tmp;
8770                     return ((((function(){
8771                         var tmp = v898;
8772                         return (typeof tmp == 'object' && 'car' in tmp);
8773                     })()?l4.value: l5.value) !== l5.value ? (((function(){
8774                         var tmp = v898;
8775                         return tmp === l5.value? l5.value: tmp.car;
8776                     })() === l253)?l4.value: l5.value) : l5.value) !== l5.value ? (function(v902){
8777                         return l140.fvalue(values, l94.fvalue(pv, (function(){
8778                             var symbol = l200;
8779                             var func = symbol.fvalue;
8780                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8781                             return func;
8782                         })(), v902));
8783                     })(l78.fvalue(pv, (function (values,v901){
8784                         checkArgs(arguments, 2);
8785                         var i;
8786                         return l332.fvalue(values, v901, l4.value);
8787                     }), (function(){
8788                         var tmp = v898;
8789                         return tmp === l5.value? l5.value: tmp.cdr;
8790                     })())) : (function(v903){
8791                         return l172.fvalue(values, l141.fvalue(pv, l201.fvalue(pv), l172.fvalue(pv, ";", (function(){
8792                             var symbol = l137;
8793                             var value = symbol.value;
8794                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8795                             return value;
8796                         })())), (v903 !== l5.value ? l172.fvalue(pv, v903, ";", (function(){
8797                             var symbol = l137;
8798                             var value = symbol.value;
8799                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8800                             return value;
8801                         })()) : l5.value));
8802                     })(l174.fvalue(pv, v898, v899)));
8803                 }
8804                 finally {
8805                     l198.value = v900;
8806                 }
8807             })(l5.value);
8808         })();
8809     }));
8810     return l332;
8811 })();
8812 (function(){
8813     (l254).fvalue = (function(v906){
8814         ((v906)["fname"] = "EVAL");
8815         return v906;
8816     })((function (values,v905){
8817         checkArgs(arguments, 2);
8818         var i;
8819         return (function(){
8820             return (function(){
8821                 var string = l332.fvalue(pv, v905, l4.value);
8822                 if (typeof string != 'string')
8823                     throw 'The value ' + string + ' is not a type string.';
8824                 return (function(){
8825                     var v = eval.apply(window, [string]);
8826                     if (typeof v !== 'object' || !('multiple-value' in v)){
8827                         v = [v];
8828                         v['multiple-value'] = true;
8829                     }
8830                     return values.apply(this, v);
8831                 })();
8832             })();
8833         })();
8834     }));
8835     return l254;
8836 })();
8837 var l333 = {name: "&BODY"};
8838 var l334 = QIList(l216,l217,l215,l333,l21,l16,l127,l62,l63,l22,l23,l24,l290,l292,l20,l20,l289,l291,l55,l65,l313,l325,l324,l101,l46,l189,l19,l19,l91,l33,l39,l37,l34,l31,l31,l53,l266,l35,l38,l36,l32,l32,l311,l83,l84,l82,l52,l29,l30,l80,l81,l48,l2,l3,l10,l12,l1,l9,l97,l96,l105,l69,l70,l107,l50,l51,l54,l304,l27,l305,l315,l254,l100,l135,l104,l117,l130,l40,l249,l43,l300,l312,l108,l321,l17,l136,l273,l79,l213,l128,l47,l85,l85,l134,l125,l250,l6,l90,l72,l258,l261,l113,l45,l60,l323,l114,l298,l78,l92,l87,l286,l110,l275,l111,l276,l5,l28,l89,l88,l13,l293,l56,l118,l120,l116,l165,l86,l147,l150,l210,l57,l58,l253,l68,l49,l167,l93,l94,l95,l14,l265,l66,l67,l295,l296,l41,l236,l237,l99,l308,l102,l103,l307,l98,l245,l299,l126,l302,l301,l297,l4,l272,l42,l267,l26,l8,l274,l146,l145,l109,l149,l7,l106,l322,l25,l5);
8839 l135.fvalue(values, l334);
8840 ((l127).value = (function(){
8841     var symbol = l123;
8842     var value = symbol.value;
8843     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8844     return value;
8845 })());
8846 (function(){
8847     var string = "var lisp";
8848     if (typeof string != 'string')
8849         throw 'The value ' + string + ' is not a type string.';
8850     return (function(){
8851         var v = eval.apply(window, [string]);
8852         if (typeof v !== 'object' || !('multiple-value' in v)){
8853             v = [v];
8854             v['multiple-value'] = true;
8855         }
8856         return values.apply(this, v);
8857     })();
8858 })();
8859 (lisp = {});
8860 (lisp.read = (function(){
8861     var symbol = l171;
8862     var func = symbol.fvalue;
8863     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8864     return func;
8865 })());
8866 (lisp.print = (function(){
8867     var symbol = l147;
8868     var func = symbol.fvalue;
8869     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8870     return func;
8871 })());
8872 (lisp.eval = (function(){
8873     var symbol = l254;
8874     var func = symbol.fvalue;
8875     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8876     return func;
8877 })());
8878 (lisp.compile = (function (values,v907){
8879     checkArgs(arguments, 2);
8880     var i;
8881     return l332.fvalue(values, v907, l4.value);
8882 }));
8883 (lisp.evalString = (function (values,v908){
8884     checkArgs(arguments, 2);
8885     var i;
8886     return l254.fvalue(values, l171.fvalue(pv, v908));
8887 }));
8888 (lisp.compileString = (function (values,v909){
8889     checkArgs(arguments, 2);
8890     var i;
8891     return l332.fvalue(values, l171.fvalue(pv, v909), l4.value);
8892 }));
8893 var l335 = {name: "OP"};
8894 var l336 = {name: "SYM"};
8895 var l337 = {name: "X"};
8896 var l338 = {name: "ARGS"};
8897 var l339 = {name: "BODY"};
8898 var l340 = {name: "DECLS"};
8899 var l341 = {name: "DECL"};
8900 var l342 = {name: "NAME"};
8901 var l343 = {name: "ARG"};
8902 var l344 = {name: "FORM"};
8903 var l345 = {name: "PACKAGE-DESIGNATOR"};
8904 var l346 = {name: "VALUE-FROM"};
8905 var l347 = {name: "VARIABLES"};
8906 var l348 = {name: "HEAD"};
8907 var l349 = {name: "TAIL"};
8908 var l350 = {name: "COLLECT"};
8909 var l351 = {name: "VARLIST"};
8910 var l352 = {name: "ENDLIST"};
8911 var l353 = {name: "V"};
8912 var l354 = {name: "PAIRS"};
8913 var l355 = {name: "ASSIGNMENTS"};
8914 var l356 = {name: "VALUE"};
8915 var l357 = {name: "FORM1"};
8916 var l358 = {name: "RESULT"};
8917 var l359 = {name: "FORMS"};
8918 var l360 = {name: "G"};
8919 var l361 = {name: "CLAUSULES"};
8920 var l362 = {name: "!FORM"};
8921 var l363 = {name: "CLAUSULE"};
8922 var l364 = {name: "ITER"};
8923 var l365 = {name: "G!TO"};
8924 var l366 = {name: "VAR"};
8925 var l367 = {name: "TO"};
8926 var l368 = {name: "G!LIST"};
8927 var l369 = {name: "PLACE"};
8928 var l370 = {name: "DELTA"};
8929 var l371 = {name: "CONDITION"};
8930 var l372 = {name: "DOCSTRING"};
8931 var l373 = QIList(QIList(QIList(l279,l109,l5,QIList(l207,l5),l5),QIList(l269,l109,l5,QIList(l207,l5),l5),QIList(l268,l109,l5,QIList(l207,l5),l5),QIList(l262,l109,l5,QIList(l207,l5),l5),QIList(l251,l109,l5,QIList(l207,l5),l5),QIList(l241,l109,l5,QIList(l207,l5),l5),QIList(l240,l109,l5,QIList(l207,l5),l5),QIList(l214,l109,l5,QIList(l207,l5),l5),QIList(l211,l109,l5,QIList(l207,l5),l5),QIList(l198,l109,l5,QIList(l207,l5),l5),QIList(l194,l109,l5,QIList(l207,l5),l5),QIList(l193,l109,l5,QIList(l207,l5),l5),QIList(l177,l109,l5,QIList(l207,l5),l5),QIList(l166,l109,l5,QIList(l207,l5),l5),QIList(l137,l109,l5,QIList(l207,l5),l5),QIList(l127,l109,l5,QIList(l207,l5),l5),QIList(l124,l109,l5,QIList(l207,l5),l5),QIList(l123,l109,l5,QIList(l207,l5),l5),QIList(l122,l109,l5,QIList(l207,l5),l5),QIList(l112,l109,l5,QIList(l207,l5),l5),QIList(l16,l109,l5,QIList(l207,l5),l5),QIList(l5,l109,l5,QIList(l209,l207,l5),l5),QIList(l4,l109,l5,QIList(l209,l207,l5),l5),l5),QIList(QIList(l288,l203,QIList(l108,QIList(l6,QIList(l335,l336,l5),QIList(l168,QIList(l280,QIList(l170,l335,l5),QIList(l337,l216,l338,l5),QIList(l258,QIList(QIList(l338,QIList(l29,l337,l338,l5),l5),l5),QIList(l284,l338,QIList(l173,QIList(l287,l338,QIList(l170,l336,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l284,l203,QIList(l108,QIList(l6,QIList(l338,l216,l339,l5),QIList(l8,QIList(l297,l338,l5),QIList(l315,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l5),l5),QIList(l168,QIList(l283,QIList(l170,l338,l5),QIList(l6,QIList(QIList(l170,l338,l5),l5),QIList(l172,"return ",QIList(l169,l339,l5),";",l137,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l282,l203,QIList(l108,QIList(l6,QIList(l340,l216,l339,l5),QIList(l168,QIList(l175,QIList(l169,QIList(l78,QIList(l6,QIList(l341,l5),QIList(l168,QIList(l172,"var ",QIList(l170,QIList(l40,l341,l5),l5)," = ",QIList(l170,QIList(l42,l341,l5),l5),";",l137,l5),l5),l5),l340,l5),l5),QIList(l169,QIList(l78,QIList(l6,QIList(l341,l5),QIList(l168,QIList(l172,"if (typeof ",QIList(l170,QIList(l40,l341,l5),l5)," != '",QIList(l170,QIList(l41,l341,l5),l5),"')",l137,QIList(l176,"throw 'The value ' + ",QIList(l170,QIList(l40,l341,l5),l5)," + ' is not a type ",QIList(l170,QIList(l41,l341,l5),l5),".';",l137,l5),l5),l5),l5),l340,l5),l5),QIList(l172,"return ",QIList(l253,QIList(l169,l339,l5),l5),";",l137,l5),l5),l5),l5),l5),l5,l5),QIList(l281,l203,QIList(l108,QIList(l6,QIList(l342,l338,l216,l339,l5),QIList(l168,QIList(l253,QIList(l280,QIList(l170,l342,l5),QIList(l170,l338,l5),QIList(l258,QIList(l170,QIList(l78,QIList(l6,QIList(l343,l5),QIList(l168,QIList(QIList(l170,l343,l5),QIList(l174,QIList(l170,l343,l5),l5),l5),l5),l5),l338,l5),l5),QIList(l169,l339,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l280,l203,QIList(l108,QIList(l6,QIList(l342,l338,l216,l339,l5),QIList(l168,QIList(l49,QIList(l45,QIList(l167,QIList(l170,l342,l5),l5),QIList(l6,QIList(l170,l338,l5),QIList(l189,QIList(l170,l342,l5),QIList(l169,l339,l5),l5),l5),l5),l279,l5),l5),l5),l5),l5,l5),QIList(l168,l203,QIList(l108,QIList(l6,QIList(l344,l5),QIList(l277,l344,l5),l5),l5),l5,l5),QIList(l255,l203,QIList(l108,QIList(l6,QIList(l342,l338,l344,l5),QIList(l168,QIList(l212,QIList(l170,l342,l5),QIList(l170,l338,l5),QIList(l174,QIList(l170,l344,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l212,l203,QIList(l108,QIList(l6,QIList(l342,l338,l216,l339,l5),QIList(l168,QIList(l49,QIList(l45,QIList(l167,QIList(l170,l342,l5),l5),QIList(l6,QIList(l170,l338,l5),QIList(l189,QIList(l170,l342,l5),QIList(l169,l339,l5),l5),l5),l5),l211,l5),l5),l5),l5),l5,l5),QIList(l175,l203,QIList(l108,QIList(l6,QIList(l216,l339,l5),QIList(l168,QIList(l172,"(function(){",l137,QIList(l176,QIList(l169,l339,l5),l5),"})()",l5),l5),l5),l5),l5,l5),QIList(l139,l203,QIList(l108,QIList(l6,QIList(l109,l216,l344,l5),QIList(l168,QIList(l237,QIList(l170,l109,l5),QIList(l138,QIList(l170,l109,l5),QIList(l253,QIList(l169,l344,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l128,l203,QIList(l108,QIList(l6,QIList(l345,l5),QIList(l168,QIList(l252,QIList(l237,l127,QIList(l115,QIList(l170,l345,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l111,l203,QIList(l108,QIList(l6,QIList(l346,l5),QIList(l168,QIList(l275,QIList(l108,l45,l5),QIList(l170,l346,l5),l5),l5),l5),l5),l5,l5),QIList(l110,l203,QIList(l108,QIList(l6,QIList(l347,l346,l216,l339,l5),QIList(l168,QIList(l275,QIList(l6,QIList(l215,QIList(l169,l347,l5),l216,QIList(l170,QIList(l17,l5),l5),l5),QIList(l169,l339,l5),l5),QIList(l170,l346,l5),l5),l5),l5),l5),l5,l5),QIList(l77,l203,QIList(l108,QIList(l6,QIList(l216,l339,l5),QIList(l168,QIList(l15,l4,QIList(l169,l339,l5),l5),l5),l5),l5),l5,l5),QIList(l74,l203,QIList(l108,QIList(l6,QIList(l216,l339,l5),QIList(l258,QIList(QIList(l348,QIList(l17,l5),l5),QIList(l349,QIList(l17,l5),l5),l5),QIList(l168,QIList(l261,QIList(QIList(QIList(l170,l348,l5),QIList(l29,QIList(l167,l76,l5),l5,l5),l5),QIList(QIList(l170,l349,l5),QIList(l170,l348,l5),l5),l5),QIList(l249,QIList(QIList(l350,QIList(l337,l5),QIList(l296,QIList(l170,l349,l5),QIList(l29,l337,l5,l5),l5),QIList(l237,QIList(l170,l349,l5),QIList(l32,QIList(l170,l349,l5),l5),l5),l337,l5),l5),QIList(l169,l339,l5),l5),QIList(l32,QIList(l170,l348,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l70,l203,QIList(l108,QIList(l6,QIList(l351,l352,l216,l339,l5),QIList(l168,QIList(l189,l5,QIList(l261,QIList(l170,QIList(l78,QIList(l6,QIList(l337,l5),QIList(l45,QIList(l40,l337,l5),QIList(l41,l337,l5),l5),l5),l351,l5),l5),QIList(l15,l4,QIList(l7,QIList(l170,QIList(l31,l352,l5),l5),QIList(l14,QIList(l253,QIList(l170,QIList(l32,l352,l5),l5),l5),l5),l5),QIList(l272,QIList(l169,l339,l5),l5),QIList(l237,QIList(l169,QIList(l313,QIList(l108,l65,l5),QIList(l78,QIList(l6,QIList(l353,l5),QIList(l55,QIList(l30,QIList(l36,l353,l5),l5),QIList(l45,QIList(l40,l353,l5),QIList(l42,l353,l5),l5),l5),l5),l351,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l69,l203,QIList(l108,QIList(l6,QIList(l351,l352,l216,l339,l5),QIList(l168,QIList(l189,l5,QIList(l258,QIList(l170,QIList(l78,QIList(l6,QIList(l337,l5),QIList(l45,QIList(l40,l337,l5),QIList(l41,l337,l5),l5),l5),l351,l5),l5),QIList(l15,l4,QIList(l7,QIList(l170,QIList(l31,l352,l5),l5),QIList(l14,QIList(l253,QIList(l170,QIList(l32,l352,l5),l5),l5),l5),l5),QIList(l272,QIList(l169,l339,l5),l5),QIList(l68,QIList(l169,QIList(l313,QIList(l108,l65,l5),QIList(l78,QIList(l6,QIList(l353,l5),QIList(l55,QIList(l30,QIList(l36,l353,l5),l5),QIList(l45,QIList(l40,l353,l5),QIList(l42,l353,l5),l5),l5),l5),l351,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l68,l203,QIList(l108,QIList(l6,QIList(l216,l354,l5),QIList(l258,QIList(QIList(l355,QIList(l167,l5,l5),l5),l5),QIList(l15,l4,QIList(l52,QIList(QIList(l13,l354,l5),QIList(l14,l5),l5),QIList(QIList(l13,QIList(l32,l354,l5),l5),QIList(l315,"Odd paris in PSETQ",l5),l5),QIList(l4,QIList(l258,QIList(QIList(l109,QIList(l31,l354,l5),l5),QIList(l356,QIList(l34,l354,l5),l5),l5),QIList(l49,QIList(l168,QIList(QIList(l170,l109,l5),QIList(l170,QIList(l17,l5),l5),QIList(l170,l356,l5),l5),l5),l355,l5),QIList(l237,l354,QIList(l36,l354,l5),l5),l5),l5),l5),l5),QIList(l237,l355,QIList(l67,l355,l5),l5),QIList(l168,QIList(l258,QIList(l170,QIList(l78,QIList(l108,l32,l5),l355,l5),l5),QIList(l237,QIList(l169,QIList(l61,QIList(l108,l65,l5),QIList(l78,QIList(l108,l91,l5),l355,l5),QIList(l167,l5,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l58,l203,QIList(l108,QIList(l6,QIList(l357,l358,l216,l339,l5),QIList(l168,QIList(l57,QIList(l253,QIList(l170,l357,l5),QIList(l170,l358,l5),l5),QIList(l169,l339,l5),l5),l5),l5),l5),l5,l5),QIList(l57,l203,QIList(l108,QIList(l6,QIList(l344,l216,l339,l5),QIList(l258,QIList(QIList(l356,QIList(l17,l5),l5),l5),QIList(l168,QIList(l258,QIList(QIList(QIList(l170,l356,l5),QIList(l170,l344,l5),l5),l5),QIList(l169,l339,l5),QIList(l170,l356,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l56,l203,QIList(l108,QIList(l6,QIList(l216,l359,l5),QIList(l52,QIList(QIList(l13,l359,l5),l5,l5),QIList(QIList(l13,QIList(l32,l359,l5),l5),QIList(l31,l359,l5),l5),QIList(l4,QIList(l258,QIList(QIList(l360,QIList(l17,l5),l5),l5),QIList(l168,QIList(l258,QIList(QIList(QIList(l170,l360,l5),QIList(l170,QIList(l31,l359,l5),l5),l5),l5),QIList(l213,QIList(l170,l360,l5),QIList(l170,l360,l5),QIList(l56,QIList(l169,QIList(l32,l359,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l55,l203,QIList(l108,QIList(l6,QIList(l216,l359,l5),QIList(l52,QIList(QIList(l13,l359,l5),l4,l5),QIList(QIList(l13,QIList(l32,l359,l5),l5),QIList(l31,l359,l5),l5),QIList(l4,QIList(l168,QIList(l213,QIList(l170,QIList(l31,l359,l5),l5),QIList(l55,QIList(l169,QIList(l32,l359,l5),l5),l5),l5,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l54,l203,QIList(l108,QIList(l6,QIList(l344,l216,l361,l5),QIList(l168,QIList(l53,QIList(l170,l344,l5),QIList(l169,QIList(l65,l361,QIList(l168,QIList(QIList(l4,QIList(l315,"ECASE expression failed.",l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l53,l203,QIList(l108,QIList(l6,QIList(l344,l216,l361,l5),QIList(l258,QIList(QIList(l362,QIList(l17,l5),l5),l5),QIList(l168,QIList(l258,QIList(QIList(QIList(l170,l362,l5),QIList(l170,l344,l5),l5),l5),QIList(l52,QIList(l169,QIList(l78,QIList(l6,QIList(l363,l5),QIList(l213,QIList(l304,QIList(l31,l363,l5),l4,l5),l363,QIList(l168,QIList(QIList(l27,QIList(l170,l362,l5),QIList(l167,QIList(l170,QIList(l31,l363,l5),l5),l5),l5),QIList(l169,QIList(l32,l363,l5),l5),l5),l5),l5),l5),l361,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l52,l203,QIList(l108,QIList(l6,QIList(l216,l361,l5),QIList(l213,QIList(l13,l361,l5),l5,QIList(l213,QIList(l304,QIList(l33,l361,l5),l4,l5),QIList(l168,QIList(l253,QIList(l169,QIList(l35,l361,l5),l5),l5),l5),QIList(l168,QIList(l213,QIList(l170,QIList(l33,l361,l5),l5),QIList(l253,QIList(l169,QIList(l35,l361,l5),l5),l5),QIList(l52,QIList(l169,QIList(l32,l361,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l203,QIList(l108,QIList(l6,QIList(l364,l216,l339,l5),QIList(l258,QIList(QIList(l365,QIList(l17,l5),l5),QIList(l366,QIList(l40,l364,l5),l5),QIList(l367,QIList(l41,l364,l5),l5),QIList(l358,QIList(l42,l364,l5),l5),l5),QIList(l168,QIList(l189,l5,QIList(l258,QIList(QIList(QIList(l170,l366,l5),0,l5),QIList(QIList(l170,l365,l5),QIList(l170,l367,l5),l5),l5),QIList(l244,QIList(l290,QIList(l170,l366,l5),QIList(l170,l365,l5),l5),QIList(l272,QIList(l169,l339,l5),l5),QIList(l47,QIList(l170,l366,l5),l5),l5),QIList(l170,l358,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l50,l203,QIList(l108,QIList(l6,QIList(l364,l216,l339,l5),QIList(l258,QIList(QIList(l366,QIList(l40,l364,l5),l5),QIList(l368,QIList(l17,l5),l5),l5),QIList(l168,QIList(l189,l5,QIList(l258,QIList(QIList(QIList(l170,l368,l5),QIList(l170,QIList(l41,l364,l5),l5),l5),QIList(QIList(l170,l366,l5),l5,l5),l5),QIList(l244,QIList(l170,l368,l5),QIList(l237,QIList(l170,l366,l5),QIList(l31,QIList(l170,l368,l5),l5),l5),QIList(l272,QIList(l169,l339,l5),l5),QIList(l237,QIList(l170,l368,l5),QIList(l32,QIList(l170,l368,l5),l5),l5),l5),QIList(l170,QIList(l42,l364,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l49,l203,QIList(l108,QIList(l6,QIList(l337,l369,l5),QIList(l168,QIList(l237,QIList(l170,l369,l5),QIList(l29,QIList(l170,l337,l5),QIList(l170,l369,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l48,l203,QIList(l108,QIList(l6,QIList(l337,l215,QIList(l370,1,l5),l5),QIList(l168,QIList(l237,QIList(l170,l337,l5),QIList(l63,QIList(l170,l337,l5),QIList(l170,l370,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l47,l203,QIList(l108,QIList(l6,QIList(l337,l215,QIList(l370,1,l5),l5),QIList(l168,QIList(l237,QIList(l170,l337,l5),QIList(l62,QIList(l170,l337,l5),QIList(l170,l370,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l15,l203,QIList(l108,QIList(l6,QIList(l371,l216,l339,l5),QIList(l168,QIList(l189,l5,QIList(l244,QIList(l170,l371,l5),QIList(l169,l339,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l14,l203,QIList(l108,QIList(l6,QIList(l215,l356,l5),QIList(l168,QIList(l265,l5,QIList(l170,l356,l5),l5),l5),l5),l5),l5,l5),QIList(l12,l203,QIList(l108,QIList(l6,QIList(l342,l338,l216,l339,l5),QIList(l168,QIList(l253,QIList(l300,QIList(l167,QIList(l170,l342,l5),l5),QIList(l11,QIList(l170,QIList(l299,l342,l5),l5),QIList(l170,l338,l5),QIList(l169,QIList(l213,QIList(l55,QIList(l307,QIList(l31,l339,l5),l5),QIList(l28,QIList(l13,QIList(l32,l339,l5),l5),l5),l5),QIList(l168,QIList(QIList(l170,QIList(l31,l339,l5),l5),QIList(l189,QIList(l170,l342,l5),QIList(l169,QIList(l32,l339,l5),l5),l5),l5),l5),QIList(l168,QIList(QIList(l189,QIList(l170,l342,l5),QIList(l169,l339,l5),l5),l5),l5),l5),l5),l5),l5),QIList(l167,QIList(l170,l342,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l11,l203,QIList(l108,QIList(l6,QIList(l342,l338,l216,l339,l5),QIList(l258,QIList(QIList(l337,QIList(l17,"FN",l5),l5),l5),QIList(l168,QIList(l258,QIList(QIList(QIList(l170,l337,l5),QIList(l6,QIList(l170,l338,l5),QIList(l169,l339,l5),l5),l5),l5),QIList(l319,QIList(l170,l337,l5),"fname",QIList(l170,l342,l5),l5),QIList(l170,l337,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l10,l203,QIList(l108,QIList(l6,QIList(l342,l356,l215,l372,l5),QIList(l168,QIList(l253,QIList(l237,QIList(l170,l342,l5),QIList(l170,l356,l5),l5),QIList(l169,QIList(l7,QIList(l307,l372,l5),QIList(l168,QIList(QIList(l319,QIList(l167,QIList(l170,l342,l5),l5),"vardoc",QIList(l170,l372,l5),l5),l5),l5),l5),l5),QIList(l167,QIList(l170,l342,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l9,l203,QIList(l108,QIList(l6,QIList(l342,l356,l215,l372,l5),QIList(l168,QIList(l253,QIList(l2,QIList(l207,QIList(l170,l342,l5),l5),l5),QIList(l8,QIList(l19,QIList(l167,QIList(l170,l342,l5),l5),l5),QIList(l237,QIList(l170,l342,l5),QIList(l170,l356,l5),l5),l5),QIList(l169,QIList(l7,QIList(l307,l372,l5),QIList(l168,QIList(QIList(l319,QIList(l167,QIList(l170,l342,l5),l5),"vardoc",QIList(l170,l372,l5),l5),l5),l5),l5),l5),QIList(l167,QIList(l170,l342,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l8,l203,QIList(l108,QIList(l6,QIList(l371,l216,l339,l5),QIList(l168,QIList(l213,QIList(l170,l371,l5),l5,QIList(l253,QIList(l169,l339,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l7,l203,QIList(l108,QIList(l6,QIList(l371,l216,l339,l5),QIList(l168,QIList(l213,QIList(l170,l371,l5),QIList(l253,QIList(l169,l339,l5),l5),l5,l5),l5),l5),l5),l5,l5),QIList(l6,l203,QIList(l108,QIList(l6,QIList(l338,l216,l339,l5),QIList(l168,QIList(l108,QIList(l6,QIList(l170,l338,l5),QIList(l169,l339,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l3,l203,QIList(l108,QIList(l6,QIList(l342,l356,l215,l372,l5),QIList(l168,QIList(l253,QIList(l2,QIList(l207,QIList(l170,l342,l5),l5),l5),QIList(l2,QIList(l209,QIList(l170,l342,l5),l5),l5),QIList(l237,QIList(l170,l342,l5),QIList(l170,l356,l5),l5),QIList(l169,QIList(l7,QIList(l307,l372,l5),QIList(l168,QIList(QIList(l319,QIList(l167,QIList(l170,l342,l5),l5),"vardoc",QIList(l170,l372,l5),l5),l5),l5),l5),l5),QIList(l167,QIList(l170,l342,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l2,l203,QIList(l108,QIList(l6,QIList(l216,l340,l5),QIList(l168,QIList(l252,QIList(l169,QIList(l78,QIList(l6,QIList(l341,l5),QIList(l168,QIList(l206,QIList(l167,QIList(l170,l341,l5),l5),l5),l5),l5),l340,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l1,l203,QIList(l108,QIList(l6,QIList(l342,l338,l216,l339,l5),QIList(l168,QIList(l252,QIList(l202,QIList(l167,QIList(l170,l342,l5),l5),QIList(l167,QIList(l108,QIList(l6,QIList(l170,QIList(l78,QIList(l108,QIList(l6,QIList(l337,l5),QIList(l213,QIList(l304,l337,QIList(l167,l333,l5),l5),QIList(l167,l216,l5),l337,l5),l5),l5),l338,l5),l5),QIList(l169,l339,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),l5),l5,l5,l5);
8932 ((l193).value = l373);
8933 var l374 = QIList(QIList(l372,"l372"),QIList(l371,"l371"),QIList(l370,"l370"),QIList(l369,"l369"),QIList(l368,"l368"),QIList(l367,"l367"),QIList(l366,"l366"),QIList(l365,"l365"),QIList(l364,"l364"),QIList(l363,"l363"),QIList(l362,"l362"),QIList(l361,"l361"),QIList(l360,"l360"),QIList(l359,"l359"),QIList(l358,"l358"),QIList(l357,"l357"),QIList(l356,"l356"),QIList(l355,"l355"),QIList(l354,"l354"),QIList(l353,"l353"),QIList(l352,"l352"),QIList(l351,"l351"),QIList(l350,"l350"),QIList(l349,"l349"),QIList(l348,"l348"),QIList(l347,"l347"),QIList(l346,"l346"),QIList(l345,"l345"),QIList(l344,"l344"),QIList(l343,"l343"),QIList(l342,"l342"),QIList(l341,"l341"),QIList(l340,"l340"),QIList(l339,"l339"),QIList(l338,"l338"),QIList(l337,"l337"),QIList(l336,"l336"),QIList(l335,"l335"),QIList(l333,"l333"),QIList(l332,"l332"),QIList(l331,"l331"),QIList(l330,"l330"),QIList(l329,"l329"),QIList(l328,"l328"),QIList(l327,"l327"),QIList(l326,"l326"),QIList(l325,"l325"),QIList(l324,"l324"),QIList(l323,"l323"),QIList(l322,"l322"),QIList(l321,"l321"),QIList(l320,"l320"),QIList(l319,"l319"),QIList(l318,"l318"),QIList(l317,"l317"),QIList(l316,"l316"),QIList(l315,"l315"),QIList(l314,"l314"),QIList(l313,"l313"),QIList(l312,"l312"),QIList(l311,"l311"),QIList(l310,"l310"),QIList(l309,"l309"),QIList(l308,"l308"),QIList(l307,"l307"),QIList(l306,"l306"),QIList(l305,"l305"),QIList(l304,"l304"),QIList(l303,"l303"),QIList(l302,"l302"),QIList(l301,"l301"),QIList(l300,"l300"),QIList(l299,"l299"),QIList(l298,"l298"),QIList(l297,"l297"),QIList(l296,"l296"),QIList(l295,"l295"),QIList(l294,"l294"),QIList(l293,"l293"),QIList(l292,"l292"),QIList(l291,"l291"),QIList(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(l217,"l217"),QIList(l216,"l216"),QIList(l215,"l215"),QIList(l214,"l214"),QIList(l213,"l213"),QIList(l212,"l212"),QIList(l211,"l211"),QIList(l210,"l210"),QIList(l209,"l209"),QIList(l208,"l208"),QIList(l207,"l207"),QIList(l206,"l206"),QIList(l205,"l205"),QIList(l204,"l204"),QIList(l203,"l203"),QIList(l202,"l202"),QIList(l201,"l201"),QIList(l200,"l200"),QIList(l199,"l199"),QIList(l198,"l198"),QIList(l197,"l197"),QIList(l196,"l196"),QIList(l195,"l195"),QIList(l194,"l194"),QIList(l193,"l193"),QIList(l192,"l192"),QIList(l191,"l191"),QIList(l190,"l190"),QIList(l189,"l189"),QIList(l188,"l188"),QIList(l187,"l187"),QIList(l186,"l186"),QIList(l185,"l185"),QIList(l184,"l184"),QIList(l183,"l183"),QIList(l182,"l182"),QIList(l181,"l181"),QIList(l180,"l180"),QIList(l179,"l179"),QIList(l178,"l178"),QIList(l177,"l177"),QIList(l176,"l176"),QIList(l175,"l175"),QIList(l174,"l174"),QIList(l173,"l173"),QIList(l172,"l172"),QIList(l171,"l171"),QIList(l170,"l170"),QIList(l169,"l169"),QIList(l168,"l168"),QIList(l167,"l167"),QIList(l166,"l166"),QIList(l165,"l165"),QIList(l164,"l164"),QIList(l163,"l163"),QIList(l162,"l162"),QIList(l161,"l161"),QIList(l160,"l160"),QIList(l159,"l159"),QIList(l158,"l158"),QIList(l157,"l157"),QIList(l156,"l156"),QIList(l155,"l155"),QIList(l154,"l154"),QIList(l153,"l153"),QIList(l152,"l152"),QIList(l151,"l151"),QIList(l150,"l150"),QIList(l149,"l149"),QIList(l148,"l148"),QIList(l147,"l147"),QIList(l146,"l146"),QIList(l145,"l145"),QIList(l144,"l144"),QIList(l143,"l143"),QIList(l142,"l142"),QIList(l141,"l141"),QIList(l140,"l140"),QIList(l139,"l139"),QIList(l138,"l138"),QIList(l137,"l137"),QIList(l136,"l136"),QIList(l135,"l135"),QIList(l134,"l134"),QIList(l133,"l133"),QIList(l132,"l132"),QIList(l131,"l131"),QIList(l130,"l130"),QIList(l129,"l129"),QIList(l128,"l128"),QIList(l127,"l127"),QIList(l126,"l126"),QIList(l125,"l125"),QIList(l124,"l124"),QIList(l123,"l123"),QIList(l122,"l122"),QIList(l121,"l121"),QIList(l120,"l120"),QIList(l119,"l119"),QIList(l118,"l118"),QIList(l117,"l117"),QIList(l116,"l116"),QIList(l115,"l115"),QIList(l114,"l114"),QIList(l113,"l113"),QIList(l112,"l112"),QIList(l111,"l111"),QIList(l110,"l110"),QIList(l109,"l109"),QIList(l108,"l108"),QIList(l107,"l107"),QIList(l106,"l106"),QIList(l105,"l105"),QIList(l104,"l104"),QIList(l103,"l103"),QIList(l102,"l102"),QIList(l101,"l101"),QIList(l100,"l100"),QIList(l99,"l99"),QIList(l98,"l98"),QIList(l97,"l97"),QIList(l96,"l96"),QIList(l95,"l95"),QIList(l94,"l94"),QIList(l93,"l93"),QIList(l92,"l92"),QIList(l91,"l91"),QIList(l90,"l90"),QIList(l89,"l89"),QIList(l88,"l88"),QIList(l87,"l87"),QIList(l86,"l86"),QIList(l85,"l85"),QIList(l84,"l84"),QIList(l83,"l83"),QIList(l82,"l82"),QIList(l81,"l81"),QIList(l80,"l80"),QIList(l79,"l79"),QIList(l78,"l78"),QIList(l77,"l77"),QIList(l76,"l76"),QIList(l75,"l75"),QIList(l74,"l74"),QIList(l73,"l73"),QIList(l72,"l72"),QIList(l71,"l71"),QIList(l70,"l70"),QIList(l69,"l69"),QIList(l68,"l68"),QIList(l67,"l67"),QIList(l66,"l66"),QIList(l65,"l65"),QIList(l64,"l64"),QIList(l63,"l63"),QIList(l62,"l62"),QIList(l61,"l61"),QIList(l60,"l60"),QIList(l59,"l59"),QIList(l58,"l58"),QIList(l57,"l57"),QIList(l56,"l56"),QIList(l55,"l55"),QIList(l54,"l54"),QIList(l53,"l53"),QIList(l52,"l52"),QIList(l51,"l51"),QIList(l50,"l50"),QIList(l49,"l49"),QIList(l48,"l48"),QIList(l47,"l47"),QIList(l46,"l46"),QIList(l45,"l45"),QIList(l44,"l44"),QIList(l43,"l43"),QIList(l42,"l42"),QIList(l41,"l41"),QIList(l40,"l40"),QIList(l39,"l39"),QIList(l38,"l38"),QIList(l37,"l37"),QIList(l36,"l36"),QIList(l35,"l35"),QIList(l34,"l34"),QIList(l33,"l33"),QIList(l32,"l32"),QIList(l31,"l31"),QIList(l30,"l30"),QIList(l29,"l29"),QIList(l28,"l28"),QIList(l27,"l27"),QIList(l26,"l26"),QIList(l25,"l25"),QIList(l24,"l24"),QIList(l23,"l23"),QIList(l22,"l22"),QIList(l21,"l21"),QIList(l20,"l20"),QIList(l19,"l19"),QIList(l18,"l18"),QIList(l17,"l17"),QIList(l16,"l16"),QIList(l15,"l15"),QIList(l14,"l14"),QIList(l13,"l13"),QIList(l12,"l12"),QIList(l11,"l11"),QIList(l10,"l10"),QIList(l9,"l9"),QIList(l8,"l8"),QIList(l7,"l7"),QIList(l6,"l6"),QIList(l5,"l5"),QIList(l4,"l4"),QIList(l3,"l3"),QIList(l2,"l2"),QIList(l1,"l1"),l5);
8934 (function(){
8935     l129.fvalue(pv, l372);
8936     l129.fvalue(pv, l371);
8937     l129.fvalue(pv, l370);
8938     l129.fvalue(pv, l369);
8939     l129.fvalue(pv, l368);
8940     l129.fvalue(pv, l367);
8941     l129.fvalue(pv, l366);
8942     l129.fvalue(pv, l365);
8943     l129.fvalue(pv, l364);
8944     l129.fvalue(pv, l363);
8945     l129.fvalue(pv, l362);
8946     l129.fvalue(pv, l361);
8947     l129.fvalue(pv, l360);
8948     l129.fvalue(pv, l359);
8949     l129.fvalue(pv, l358);
8950     l129.fvalue(pv, l357);
8951     l129.fvalue(pv, l356);
8952     l129.fvalue(pv, l355);
8953     l129.fvalue(pv, l354);
8954     l129.fvalue(pv, l353);
8955     l129.fvalue(pv, l352);
8956     l129.fvalue(pv, l351);
8957     l129.fvalue(pv, l350);
8958     l129.fvalue(pv, l349);
8959     l129.fvalue(pv, l348);
8960     l129.fvalue(pv, l347);
8961     l129.fvalue(pv, l346);
8962     l129.fvalue(pv, l345);
8963     l129.fvalue(pv, l344);
8964     l129.fvalue(pv, l343);
8965     l129.fvalue(pv, l342);
8966     l129.fvalue(pv, l341);
8967     l129.fvalue(pv, l340);
8968     l129.fvalue(pv, l339);
8969     l129.fvalue(pv, l338);
8970     l129.fvalue(pv, l337);
8971     l129.fvalue(pv, l336);
8972     l129.fvalue(pv, l335);
8973     l129.fvalue(pv, l333);
8974     l129.fvalue(pv, l332);
8975     l129.fvalue(pv, l331);
8976     l129.fvalue(pv, l330);
8977     l129.fvalue(pv, l329);
8978     l129.fvalue(pv, l328);
8979     l129.fvalue(pv, l327);
8980     l129.fvalue(pv, l326);
8981     l129.fvalue(pv, l325);
8982     l129.fvalue(pv, l324);
8983     l129.fvalue(pv, l323);
8984     l129.fvalue(pv, l322);
8985     l129.fvalue(pv, l321);
8986     l129.fvalue(pv, l320);
8987     l129.fvalue(pv, l319);
8988     l129.fvalue(pv, l318);
8989     l129.fvalue(pv, l317);
8990     l129.fvalue(pv, l316);
8991     l129.fvalue(pv, l315);
8992     l129.fvalue(pv, l314);
8993     l129.fvalue(pv, l313);
8994     l129.fvalue(pv, l312);
8995     l129.fvalue(pv, l311);
8996     l129.fvalue(pv, l310);
8997     l129.fvalue(pv, l309);
8998     l129.fvalue(pv, l308);
8999     l129.fvalue(pv, l307);
9000     l129.fvalue(pv, l306);
9001     l129.fvalue(pv, l305);
9002     l129.fvalue(pv, l304);
9003     l129.fvalue(pv, l303);
9004     l129.fvalue(pv, l302);
9005     l129.fvalue(pv, l301);
9006     l129.fvalue(pv, l300);
9007     l129.fvalue(pv, l299);
9008     l129.fvalue(pv, l298);
9009     l129.fvalue(pv, l297);
9010     l129.fvalue(pv, l296);
9011     l129.fvalue(pv, l295);
9012     l129.fvalue(pv, l294);
9013     l129.fvalue(pv, l293);
9014     l129.fvalue(pv, l292);
9015     l129.fvalue(pv, l291);
9016     l129.fvalue(pv, l290);
9017     l129.fvalue(pv, l289);
9018     l129.fvalue(pv, l288);
9019     l129.fvalue(pv, l287);
9020     l129.fvalue(pv, l286);
9021     l129.fvalue(pv, l285);
9022     l129.fvalue(pv, l284);
9023     l129.fvalue(pv, l283);
9024     l129.fvalue(pv, l282);
9025     l129.fvalue(pv, l281);
9026     l129.fvalue(pv, l280);
9027     l129.fvalue(pv, l279);
9028     l129.fvalue(pv, l278);
9029     l129.fvalue(pv, l277);
9030     l129.fvalue(pv, l276);
9031     l129.fvalue(pv, l275);
9032     l129.fvalue(pv, l274);
9033     l129.fvalue(pv, l273);
9034     l129.fvalue(pv, l272);
9035     l129.fvalue(pv, l271);
9036     l129.fvalue(pv, l270);
9037     l129.fvalue(pv, l269);
9038     l129.fvalue(pv, l268);
9039     l129.fvalue(pv, l267);
9040     l129.fvalue(pv, l266);
9041     l129.fvalue(pv, l265);
9042     l129.fvalue(pv, l264);
9043     l129.fvalue(pv, l263);
9044     l129.fvalue(pv, l262);
9045     l129.fvalue(pv, l261);
9046     l129.fvalue(pv, l260);
9047     l129.fvalue(pv, l259);
9048     l129.fvalue(pv, l258);
9049     l129.fvalue(pv, l257);
9050     l129.fvalue(pv, l256);
9051     l129.fvalue(pv, l255);
9052     l129.fvalue(pv, l254);
9053     l129.fvalue(pv, l253);
9054     l129.fvalue(pv, l252);
9055     l129.fvalue(pv, l251);
9056     l129.fvalue(pv, l250);
9057     l129.fvalue(pv, l249);
9058     l129.fvalue(pv, l248);
9059     l129.fvalue(pv, l247);
9060     l129.fvalue(pv, l246);
9061     l129.fvalue(pv, l245);
9062     l129.fvalue(pv, l244);
9063     l129.fvalue(pv, l243);
9064     l129.fvalue(pv, l242);
9065     l129.fvalue(pv, l241);
9066     l129.fvalue(pv, l240);
9067     l129.fvalue(pv, l239);
9068     l129.fvalue(pv, l238);
9069     l129.fvalue(pv, l237);
9070     l129.fvalue(pv, l236);
9071     l129.fvalue(pv, l235);
9072     l129.fvalue(pv, l234);
9073     l129.fvalue(pv, l233);
9074     l129.fvalue(pv, l232);
9075     l129.fvalue(pv, l231);
9076     l129.fvalue(pv, l230);
9077     l129.fvalue(pv, l229);
9078     l129.fvalue(pv, l228);
9079     l129.fvalue(pv, l227);
9080     l129.fvalue(pv, l226);
9081     l129.fvalue(pv, l225);
9082     l129.fvalue(pv, l224);
9083     l129.fvalue(pv, l223);
9084     l129.fvalue(pv, l222);
9085     l129.fvalue(pv, l221);
9086     l129.fvalue(pv, l220);
9087     l129.fvalue(pv, l219);
9088     l129.fvalue(pv, l217);
9089     l129.fvalue(pv, l216);
9090     l129.fvalue(pv, l215);
9091     l129.fvalue(pv, l214);
9092     l129.fvalue(pv, l213);
9093     l129.fvalue(pv, l212);
9094     l129.fvalue(pv, l211);
9095     l129.fvalue(pv, l210);
9096     l129.fvalue(pv, l209);
9097     l129.fvalue(pv, l208);
9098     l129.fvalue(pv, l207);
9099     l129.fvalue(pv, l206);
9100     l129.fvalue(pv, l205);
9101     l129.fvalue(pv, l204);
9102     l129.fvalue(pv, l203);
9103     l129.fvalue(pv, l202);
9104     l129.fvalue(pv, l201);
9105     l129.fvalue(pv, l200);
9106     l129.fvalue(pv, l199);
9107     l129.fvalue(pv, l198);
9108     l129.fvalue(pv, l197);
9109     l129.fvalue(pv, l196);
9110     l129.fvalue(pv, l195);
9111     l129.fvalue(pv, l194);
9112     l129.fvalue(pv, l193);
9113     l129.fvalue(pv, l192);
9114     l129.fvalue(pv, l191);
9115     l129.fvalue(pv, l190);
9116     l129.fvalue(pv, l189);
9117     l129.fvalue(pv, l188);
9118     l129.fvalue(pv, l187);
9119     l129.fvalue(pv, l186);
9120     l129.fvalue(pv, l185);
9121     l129.fvalue(pv, l184);
9122     l129.fvalue(pv, l183);
9123     l129.fvalue(pv, l182);
9124     l129.fvalue(pv, l181);
9125     l129.fvalue(pv, l180);
9126     l129.fvalue(pv, l179);
9127     l129.fvalue(pv, l178);
9128     l129.fvalue(pv, l177);
9129     l129.fvalue(pv, l176);
9130     l129.fvalue(pv, l175);
9131     l129.fvalue(pv, l174);
9132     l129.fvalue(pv, l173);
9133     l129.fvalue(pv, l172);
9134     l129.fvalue(pv, l171);
9135     l129.fvalue(pv, l170);
9136     l129.fvalue(pv, l169);
9137     l129.fvalue(pv, l168);
9138     l129.fvalue(pv, l167);
9139     l129.fvalue(pv, l166);
9140     l129.fvalue(pv, l165);
9141     l129.fvalue(pv, l164);
9142     l129.fvalue(pv, l163);
9143     l129.fvalue(pv, l162);
9144     l129.fvalue(pv, l161);
9145     l129.fvalue(pv, l160);
9146     l129.fvalue(pv, l159);
9147     l129.fvalue(pv, l158);
9148     l129.fvalue(pv, l157);
9149     l129.fvalue(pv, l156);
9150     l129.fvalue(pv, l155);
9151     l129.fvalue(pv, l154);
9152     l129.fvalue(pv, l153);
9153     l129.fvalue(pv, l152);
9154     l129.fvalue(pv, l151);
9155     l129.fvalue(pv, l150);
9156     l129.fvalue(pv, l149);
9157     l129.fvalue(pv, l148);
9158     l129.fvalue(pv, l147);
9159     l129.fvalue(pv, l146);
9160     l129.fvalue(pv, l145);
9161     l129.fvalue(pv, l144);
9162     l129.fvalue(pv, l143);
9163     l129.fvalue(pv, l142);
9164     l129.fvalue(pv, l141);
9165     l129.fvalue(pv, l140);
9166     l129.fvalue(pv, l139);
9167     l129.fvalue(pv, l138);
9168     l129.fvalue(pv, l137);
9169     l129.fvalue(pv, l136);
9170     l129.fvalue(pv, l135);
9171     l129.fvalue(pv, l134);
9172     l129.fvalue(pv, l133);
9173     l129.fvalue(pv, l132);
9174     l129.fvalue(pv, l131);
9175     l129.fvalue(pv, l130);
9176     l129.fvalue(pv, l129);
9177     l129.fvalue(pv, l128);
9178     l129.fvalue(pv, l127);
9179     l129.fvalue(pv, l126);
9180     l129.fvalue(pv, l125);
9181     l129.fvalue(pv, l124);
9182     l129.fvalue(pv, l123);
9183     l129.fvalue(pv, l122);
9184     l129.fvalue(pv, l121);
9185     l129.fvalue(pv, l120);
9186     l129.fvalue(pv, l119);
9187     l129.fvalue(pv, l118);
9188     l129.fvalue(pv, l117);
9189     l129.fvalue(pv, l116);
9190     l129.fvalue(pv, l115);
9191     l129.fvalue(pv, l114);
9192     l129.fvalue(pv, l113);
9193     l129.fvalue(pv, l112);
9194     l129.fvalue(pv, l111);
9195     l129.fvalue(pv, l110);
9196     l129.fvalue(pv, l109);
9197     l129.fvalue(pv, l108);
9198     l129.fvalue(pv, l107);
9199     l129.fvalue(pv, l106);
9200     l129.fvalue(pv, l105);
9201     l129.fvalue(pv, l104);
9202     l129.fvalue(pv, l103);
9203     l129.fvalue(pv, l102);
9204     l129.fvalue(pv, l101);
9205     l129.fvalue(pv, l100);
9206     l129.fvalue(pv, l99);
9207     l129.fvalue(pv, l98);
9208     l129.fvalue(pv, l97);
9209     l129.fvalue(pv, l96);
9210     l129.fvalue(pv, l95);
9211     l129.fvalue(pv, l94);
9212     l129.fvalue(pv, l93);
9213     l129.fvalue(pv, l92);
9214     l129.fvalue(pv, l91);
9215     l129.fvalue(pv, l90);
9216     l129.fvalue(pv, l89);
9217     l129.fvalue(pv, l88);
9218     l129.fvalue(pv, l87);
9219     l129.fvalue(pv, l86);
9220     l129.fvalue(pv, l85);
9221     l129.fvalue(pv, l84);
9222     l129.fvalue(pv, l83);
9223     l129.fvalue(pv, l82);
9224     l129.fvalue(pv, l81);
9225     l129.fvalue(pv, l80);
9226     l129.fvalue(pv, l79);
9227     l129.fvalue(pv, l78);
9228     l129.fvalue(pv, l77);
9229     l129.fvalue(pv, l76);
9230     l129.fvalue(pv, l75);
9231     l129.fvalue(pv, l74);
9232     l129.fvalue(pv, l73);
9233     l129.fvalue(pv, l72);
9234     l129.fvalue(pv, l71);
9235     l129.fvalue(pv, l70);
9236     l129.fvalue(pv, l69);
9237     l129.fvalue(pv, l68);
9238     l129.fvalue(pv, l67);
9239     l129.fvalue(pv, l66);
9240     l129.fvalue(pv, l65);
9241     l129.fvalue(pv, l64);
9242     l129.fvalue(pv, l63);
9243     l129.fvalue(pv, l62);
9244     l129.fvalue(pv, l61);
9245     l129.fvalue(pv, l60);
9246     l129.fvalue(pv, l59);
9247     l129.fvalue(pv, l58);
9248     l129.fvalue(pv, l57);
9249     l129.fvalue(pv, l56);
9250     l129.fvalue(pv, l55);
9251     l129.fvalue(pv, l54);
9252     l129.fvalue(pv, l53);
9253     l129.fvalue(pv, l52);
9254     l129.fvalue(pv, l51);
9255     l129.fvalue(pv, l50);
9256     l129.fvalue(pv, l49);
9257     l129.fvalue(pv, l48);
9258     l129.fvalue(pv, l47);
9259     l129.fvalue(pv, l46);
9260     l129.fvalue(pv, l45);
9261     l129.fvalue(pv, l44);
9262     l129.fvalue(pv, l43);
9263     l129.fvalue(pv, l42);
9264     l129.fvalue(pv, l41);
9265     l129.fvalue(pv, l40);
9266     l129.fvalue(pv, l39);
9267     l129.fvalue(pv, l38);
9268     l129.fvalue(pv, l37);
9269     l129.fvalue(pv, l36);
9270     l129.fvalue(pv, l35);
9271     l129.fvalue(pv, l34);
9272     l129.fvalue(pv, l33);
9273     l129.fvalue(pv, l32);
9274     l129.fvalue(pv, l31);
9275     l129.fvalue(pv, l30);
9276     l129.fvalue(pv, l29);
9277     l129.fvalue(pv, l28);
9278     l129.fvalue(pv, l27);
9279     l129.fvalue(pv, l26);
9280     l129.fvalue(pv, l25);
9281     l129.fvalue(pv, l24);
9282     l129.fvalue(pv, l23);
9283     l129.fvalue(pv, l22);
9284     l129.fvalue(pv, l21);
9285     l129.fvalue(pv, l20);
9286     l129.fvalue(pv, l19);
9287     l129.fvalue(pv, l18);
9288     l129.fvalue(pv, l17);
9289     l129.fvalue(pv, l16);
9290     l129.fvalue(pv, l15);
9291     l129.fvalue(pv, l14);
9292     l129.fvalue(pv, l13);
9293     l129.fvalue(pv, l12);
9294     l129.fvalue(pv, l11);
9295     l129.fvalue(pv, l10);
9296     l129.fvalue(pv, l9);
9297     l129.fvalue(pv, l8);
9298     l129.fvalue(pv, l7);
9299     l129.fvalue(pv, l6);
9300     l129.fvalue(pv, l5);
9301     l129.fvalue(pv, l4);
9302     l129.fvalue(pv, l3);
9303     l129.fvalue(pv, l2);
9304     l129.fvalue(pv, l1);
9305     ((l240).value = l374);
9306     ((l194).value = 909);
9307     ((l16).value = 233);
9308     return ((l262).value = 302);
9309 })();
9310 ((l241).value = 374);