ecmalisp.js

   1 var nil;
   2
   3 function pv (x) { return x==undefined? nil: x; }
   4
   5 function mv(){
   6     var r = [];
   7     r['multiple-value'] = true;
   8     for (var i=0; i<arguments.length; i++)
   9         r.push(arguments[i]);
  10     return r;
  11 }
  12
  13 function forcemv (x) {
  14     return typeof x == 'object' && 'multiple-value' in x? x: mv(x);
  15 }
  16
  17 // NOTE: Define VALUES to be MV for toplevel forms. It is because
  18 // `eval' compiles the forms and execute the Javascript code at
  19 // toplevel with `js-eval', so it is necessary to return multiple
  20 // values from the eval function.
  21 var values = mv;
  22
  23 function checkArgsAtLeast(args, n){
  24     if (args.length < n) throw 'too few arguments';
  25 }
  26
  27 function checkArgsAtMost(args, n){
  28     if (args.length > n) throw 'too many arguments';
  29 }
  30
  31 function checkArgs(args, n){
  32     checkArgsAtLeast(args, n);
  33     checkArgsAtMost(args, n);
  34 }
  35
  36 // Improper list constructor (like LIST*)
  37 function QIList(){
  38     if (arguments.length == 1)
  39         return arguments[0];
  40     else {
  41         var i = arguments.length-1;
  42         var r = arguments[i--];
  43         for (; i>=0; i--){
  44             r = {car: arguments[i], cdr: r};
  45         }
  46         return r;
  47     }
  48 }
  49 var l1 = {name: "DEFMACRO"};
  50 l1;
  51 var l2 = {name: "DECLAIM"};
  52 l2;
  53 var l3 = {name: "NIL"};
  54 ((l3).value = l3);
  55 (nil = l3.value);
  56 var l4 = {name: "T"};
  57 ((l4).value = l4);
  58 var l5 = {name: "LAMBDA"};
  59 l5;
  60 var l6 = {name: "WHEN"};
  61 l6;
  62 var l7 = {name: "UNLESS"};
  63 l7;
  64 var l8 = {name: "DEFVAR"};
  65 l8;
  66 var l9 = {name: "DEFPARAMETER"};
  67 l9;
  68 var l10 = {name: "NAMED-LAMBDA"};
  69 l10;
  70 var l11 = {name: "DEFUN"};
  71 l11;
  72 var l12 = {name: "NULL"};
  73 (function(){
  74     (l12).fvalue = (function(v2){
  75         ((v2)["fname"] = "NULL");
  76         return v2;
  77     })((function (values,v1){
  78         checkArgs(arguments, 2);
  79         return (function(){
  80             return ((v1 === l3.value)?l4.value: l3.value);
  81         })();
  82     }));
  83     return l12;
  84 })();
  85 var l13 = {name: "RETURN"};
  86 l13;
  87 var l14 = {name: "WHILE"};
  88 l14;
  89 var l15 = {name: "*GENSYM-COUNTER*"};
  90 (function(){
  91     (((l15.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l15).value = 0));
  92     return l15;
  93 })();
  94 var l16 = {name: "GENSYM"};
  95 var l17 = {name: "INTEGER-TO-STRING"};
  96 (function(){
  97     (l16).fvalue = (function(v4){
  98         ((v4)["fname"] = "GENSYM");
  99         return v4;
 100     })((function (values,v3){
 101         checkArgsAtMost(arguments, 2);
 102         switch(arguments.length-1){
 103         case 0:
 104         v3="G";
 105         default: break;
 106         }
 107         return (function(){
 108             ((l15).value = (function(){
 109                 var x1 = (function(){
 110                     var symbol = l15;
 111                     var value = symbol.value;
 112                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 113                     return value;
 114                 })();
 115                 if (typeof x1 !== 'number') throw 'Not a number!';
 116                 var x2 = 1;
 117                 if (typeof x2 !== 'number') throw 'Not a number!';
 118                 return x1+x2;
 119             })());
 120             return (function(){
 121                 var name = (function(){
 122                     var string1 = v3;
 123                     var string2 = l17.fvalue(pv, (function(){
 124                         var symbol = l15;
 125                         var value = symbol.value;
 126                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 127                         return value;
 128                     })());
 129                     if (typeof string1 != 'string')
 130                         throw 'The value ' + string1 + ' is not a type string.';
 131                     if (typeof string2 != 'string')
 132                         throw 'The value ' + string2 + ' is not a type string.';
 133                     return string1.concat(string2);
 134                 })();
 135                 if (typeof name != 'string')
 136                     throw 'The value ' + name + ' is not a type string.';
 137                 return ({name: name});
 138             })();
 139         })();
 140     }));
 141     return l16;
 142 })();
 143 var l18 = {name: "BOUNDP"};
 144 (function(){
 145     (l18).fvalue = (function(v6){
 146         ((v6)["fname"] = "BOUNDP");
 147         return v6;
 148     })((function (values,v5){
 149         checkArgs(arguments, 2);
 150         return (function(){
 151             return ((v5.value !== undefined)?l4.value: l3.value);
 152         })();
 153     }));
 154     return l18;
 155 })();
 156 var l19 = {name: "="};
 157 (function(){
 158     (l19).fvalue = (function(v9){
 159         ((v9)["fname"] = "=");
 160         return v9;
 161     })((function (values,v7,v8){
 162         checkArgs(arguments, 3);
 163         return (function(){
 164             return (function(){
 165                 var x1 = v7;
 166                 if (typeof x1 !== 'number') throw 'Not a number!';
 167                 var x2 = v8;
 168                 if (typeof x2 !== 'number') throw 'Not a number!';
 169                 return (x1==x2?l4.value: l3.value);
 170             })();
 171         })();
 172     }));
 173     return l19;
 174 })();
 175 var l20 = {name: "*"};
 176 (function(){
 177     (l20).fvalue = (function(v12){
 178         ((v12)["fname"] = "*");
 179         return v12;
 180     })((function (values,v10,v11){
 181         checkArgs(arguments, 3);
 182         return (function(){
 183             return (function(){
 184                 var x1 = v10;
 185                 if (typeof x1 !== 'number') throw 'Not a number!';
 186                 var x2 = v11;
 187                 if (typeof x2 !== 'number') throw 'Not a number!';
 188                 return x1*x2;
 189             })();
 190         })();
 191     }));
 192     return l20;
 193 })();
 194 var l21 = {name: "/"};
 195 (function(){
 196     (l21).fvalue = (function(v15){
 197         ((v15)["fname"] = "/");
 198         return v15;
 199     })((function (values,v13,v14){
 200         checkArgs(arguments, 3);
 201         return (function(){
 202             return (function(){
 203                 var x1 = v13;
 204                 if (typeof x1 !== 'number') throw 'Not a number!';
 205                 var x2 = v14;
 206                 if (typeof x2 !== 'number') throw 'Not a number!';
 207                 return x1/x2;
 208             })();
 209         })();
 210     }));
 211     return l21;
 212 })();
 213 var l22 = {name: "1+"};
 214 (function(){
 215     (l22).fvalue = (function(v17){
 216         ((v17)["fname"] = "1+");
 217         return v17;
 218     })((function (values,v16){
 219         checkArgs(arguments, 2);
 220         return (function(){
 221             return (function(){
 222                 var x1 = v16;
 223                 if (typeof x1 !== 'number') throw 'Not a number!';
 224                 var x2 = 1;
 225                 if (typeof x2 !== 'number') throw 'Not a number!';
 226                 return x1+x2;
 227             })();
 228         })();
 229     }));
 230     return l22;
 231 })();
 232 var l23 = {name: "1-"};
 233 (function(){
 234     (l23).fvalue = (function(v19){
 235         ((v19)["fname"] = "1-");
 236         return v19;
 237     })((function (values,v18){
 238         checkArgs(arguments, 2);
 239         return (function(){
 240             return (function(){
 241                 var x1 = v18;
 242                 if (typeof x1 !== 'number') throw 'Not a number!';
 243                 var x2 = 1;
 244                 if (typeof x2 !== 'number') throw 'Not a number!';
 245                 return x1-x2;
 246             })();
 247         })();
 248     }));
 249     return l23;
 250 })();
 251 var l24 = {name: "ZEROP"};
 252 (function(){
 253     (l24).fvalue = (function(v21){
 254         ((v21)["fname"] = "ZEROP");
 255         return v21;
 256     })((function (values,v20){
 257         checkArgs(arguments, 2);
 258         return (function(){
 259             return (function(){
 260                 var x1 = v20;
 261                 if (typeof x1 !== 'number') throw 'Not a number!';
 262                 var x2 = 0;
 263                 if (typeof x2 !== 'number') throw 'Not a number!';
 264                 return (x1==x2?l4.value: l3.value);
 265             })();
 266         })();
 267     }));
 268     return l24;
 269 })();
 270 var l25 = {name: "TRUNCATE"};
 271 (function(){
 272     (l25).fvalue = (function(v24){
 273         ((v24)["fname"] = "TRUNCATE");
 274         return v24;
 275     })((function (values,v22,v23){
 276         checkArgs(arguments, 3);
 277         return (function(){
 278             return (function(){
 279                 var x = (function(){
 280                     var x1 = v22;
 281                     if (typeof x1 !== 'number') throw 'Not a number!';
 282                     var x2 = v23;
 283                     if (typeof x2 !== 'number') throw 'Not a number!';
 284                     return x1/x2;
 285                 })();
 286                 if (typeof x != 'number')
 287                     throw 'The value ' + x + ' is not a type number.';
 288                 return Math.floor(x);
 289             })();
 290         })();
 291     }));
 292     return l25;
 293 })();
 294 var l26 = {name: "EQL"};
 295 (function(){
 296     (l26).fvalue = (function(v27){
 297         ((v27)["fname"] = "EQL");
 298         return v27;
 299     })((function (values,v25,v26){
 300         checkArgs(arguments, 3);
 301         return (function(){
 302             return ((v25 === v26)?l4.value: l3.value);
 303         })();
 304     }));
 305     return l26;
 306 })();
 307 var l27 = {name: "NOT"};
 308 (function(){
 309     (l27).fvalue = (function(v29){
 310         ((v29)["fname"] = "NOT");
 311         return v29;
 312     })((function (values,v28){
 313         checkArgs(arguments, 2);
 314         return (function(){
 315             return (v28 !== l3.value ? l3.value : l4.value);
 316         })();
 317     }));
 318     return l27;
 319 })();
 320 var l28 = {name: "CONS"};
 321 (function(){
 322     (l28).fvalue = (function(v32){
 323         ((v32)["fname"] = "CONS");
 324         return v32;
 325     })((function (values,v30,v31){
 326         checkArgs(arguments, 3);
 327         return (function(){
 328             return ({car: v30, cdr: v31});
 329         })();
 330     }));
 331     return l28;
 332 })();
 333 var l29 = {name: "CONSP"};
 334 (function(){
 335     (l29).fvalue = (function(v34){
 336         ((v34)["fname"] = "CONSP");
 337         return v34;
 338     })((function (values,v33){
 339         checkArgs(arguments, 2);
 340         return (function(){
 341             return ((function(){
 342                 var tmp = v33;
 343                 return (typeof tmp == 'object' && 'car' in tmp);
 344             })()?l4.value: l3.value);
 345         })();
 346     }));
 347     return l29;
 348 })();
 349 var l30 = {name: "CAR"};
 350 (function(){
 351     (l30).fvalue = (function(v36){
 352         ((v36)["fname"] = "CAR");
 353         return v36;
 354     })((function(){
 355         var func = (function (values,v35){
 356             checkArgs(arguments, 2);
 357             return (function(){
 358                 return (function(){
 359                     var tmp = v35;
 360                     return tmp === l3.value? l3.value: tmp.car;
 361                 })();
 362             })();
 363         });
 364         func.docstring = 'Return the CAR part of a cons, or NIL if X is null.';
 365         return func;
 366     })());
 367     return l30;
 368 })();
 369 var l31 = {name: "CDR"};
 370 (function(){
 371     (l31).fvalue = (function(v38){
 372         ((v38)["fname"] = "CDR");
 373         return v38;
 374     })((function (values,v37){
 375         checkArgs(arguments, 2);
 376         return (function(){
 377             return (function(){
 378                 var tmp = v37;
 379                 return tmp === l3.value? l3.value: tmp.cdr;
 380             })();
 381         })();
 382     }));
 383     return l31;
 384 })();
 385 var l32 = {name: "CAAR"};
 386 (function(){
 387     (l32).fvalue = (function(v40){
 388         ((v40)["fname"] = "CAAR");
 389         return v40;
 390     })((function (values,v39){
 391         checkArgs(arguments, 2);
 392         return (function(){
 393             return (function(){
 394                 var tmp = (function(){
 395                     var tmp = v39;
 396                     return tmp === l3.value? l3.value: tmp.car;
 397                 })();
 398                 return tmp === l3.value? l3.value: tmp.car;
 399             })();
 400         })();
 401     }));
 402     return l32;
 403 })();
 404 var l33 = {name: "CADR"};
 405 (function(){
 406     (l33).fvalue = (function(v42){
 407         ((v42)["fname"] = "CADR");
 408         return v42;
 409     })((function (values,v41){
 410         checkArgs(arguments, 2);
 411         return (function(){
 412             return (function(){
 413                 var tmp = (function(){
 414                     var tmp = v41;
 415                     return tmp === l3.value? l3.value: tmp.cdr;
 416                 })();
 417                 return tmp === l3.value? l3.value: tmp.car;
 418             })();
 419         })();
 420     }));
 421     return l33;
 422 })();
 423 var l34 = {name: "CDAR"};
 424 (function(){
 425     (l34).fvalue = (function(v44){
 426         ((v44)["fname"] = "CDAR");
 427         return v44;
 428     })((function (values,v43){
 429         checkArgs(arguments, 2);
 430         return (function(){
 431             return (function(){
 432                 var tmp = (function(){
 433                     var tmp = v43;
 434                     return tmp === l3.value? l3.value: tmp.car;
 435                 })();
 436                 return tmp === l3.value? l3.value: tmp.cdr;
 437             })();
 438         })();
 439     }));
 440     return l34;
 441 })();
 442 var l35 = {name: "CDDR"};
 443 (function(){
 444     (l35).fvalue = (function(v46){
 445         ((v46)["fname"] = "CDDR");
 446         return v46;
 447     })((function (values,v45){
 448         checkArgs(arguments, 2);
 449         return (function(){
 450             return (function(){
 451                 var tmp = (function(){
 452                     var tmp = v45;
 453                     return tmp === l3.value? l3.value: tmp.cdr;
 454                 })();
 455                 return tmp === l3.value? l3.value: tmp.cdr;
 456             })();
 457         })();
 458     }));
 459     return l35;
 460 })();
 461 var l36 = {name: "CADDR"};
 462 (function(){
 463     (l36).fvalue = (function(v48){
 464         ((v48)["fname"] = "CADDR");
 465         return v48;
 466     })((function (values,v47){
 467         checkArgs(arguments, 2);
 468         return (function(){
 469             return (function(){
 470                 var tmp = (function(){
 471                     var tmp = (function(){
 472                         var tmp = v47;
 473                         return tmp === l3.value? l3.value: tmp.cdr;
 474                     })();
 475                     return tmp === l3.value? l3.value: tmp.cdr;
 476                 })();
 477                 return tmp === l3.value? l3.value: tmp.car;
 478             })();
 479         })();
 480     }));
 481     return l36;
 482 })();
 483 var l37 = {name: "CDDDR"};
 484 (function(){
 485     (l37).fvalue = (function(v50){
 486         ((v50)["fname"] = "CDDDR");
 487         return v50;
 488     })((function (values,v49){
 489         checkArgs(arguments, 2);
 490         return (function(){
 491             return (function(){
 492                 var tmp = (function(){
 493                     var tmp = (function(){
 494                         var tmp = v49;
 495                         return tmp === l3.value? l3.value: tmp.cdr;
 496                     })();
 497                     return tmp === l3.value? l3.value: tmp.cdr;
 498                 })();
 499                 return tmp === l3.value? l3.value: tmp.cdr;
 500             })();
 501         })();
 502     }));
 503     return l37;
 504 })();
 505 var l38 = {name: "CADDDR"};
 506 (function(){
 507     (l38).fvalue = (function(v52){
 508         ((v52)["fname"] = "CADDDR");
 509         return v52;
 510     })((function (values,v51){
 511         checkArgs(arguments, 2);
 512         return (function(){
 513             return (function(){
 514                 var tmp = (function(){
 515                     var tmp = (function(){
 516                         var tmp = (function(){
 517                             var tmp = v51;
 518                             return tmp === l3.value? l3.value: tmp.cdr;
 519                         })();
 520                         return tmp === l3.value? l3.value: tmp.cdr;
 521                     })();
 522                     return tmp === l3.value? l3.value: tmp.cdr;
 523                 })();
 524                 return tmp === l3.value? l3.value: tmp.car;
 525             })();
 526         })();
 527     }));
 528     return l38;
 529 })();
 530 var l39 = {name: "FIRST"};
 531 (function(){
 532     (l39).fvalue = (function(v54){
 533         ((v54)["fname"] = "FIRST");
 534         return v54;
 535     })((function (values,v53){
 536         checkArgs(arguments, 2);
 537         return (function(){
 538             return (function(){
 539                 var tmp = v53;
 540                 return tmp === l3.value? l3.value: tmp.car;
 541             })();
 542         })();
 543     }));
 544     return l39;
 545 })();
 546 var l40 = {name: "SECOND"};
 547 (function(){
 548     (l40).fvalue = (function(v56){
 549         ((v56)["fname"] = "SECOND");
 550         return v56;
 551     })((function (values,v55){
 552         checkArgs(arguments, 2);
 553         return (function(){
 554             return l33.fvalue(values, v55);
 555         })();
 556     }));
 557     return l40;
 558 })();
 559 var l41 = {name: "THIRD"};
 560 (function(){
 561     (l41).fvalue = (function(v58){
 562         ((v58)["fname"] = "THIRD");
 563         return v58;
 564     })((function (values,v57){
 565         checkArgs(arguments, 2);
 566         return (function(){
 567             return l36.fvalue(values, v57);
 568         })();
 569     }));
 570     return l41;
 571 })();
 572 var l42 = {name: "FOURTH"};
 573 (function(){
 574     (l42).fvalue = (function(v60){
 575         ((v60)["fname"] = "FOURTH");
 576         return v60;
 577     })((function (values,v59){
 578         checkArgs(arguments, 2);
 579         return (function(){
 580             return l38.fvalue(values, v59);
 581         })();
 582     }));
 583     return l42;
 584 })();
 585 var l43 = {name: "REST"};
 586 (function(){
 587     (l43).fvalue = (function(v62){
 588         ((v62)["fname"] = "REST");
 589         return v62;
 590     })((function (values,v61){
 591         checkArgs(arguments, 2);
 592         return (function(){
 593             return (function(){
 594                 var tmp = v61;
 595                 return tmp === l3.value? l3.value: tmp.cdr;
 596             })();
 597         })();
 598     }));
 599     return l43;
 600 })();
 601 var l44 = {name: "LIST"};
 602 (function(){
 603     (l44).fvalue = (function(v64){
 604         ((v64)["fname"] = "LIST");
 605         return v64;
 606     })((function (values){
 607         var v63= l3.value;
 608         for (var i = arguments.length-1; i>=1; i--)
 609             v63 = {car: arguments[i], cdr:
 610         v63};
 611         return (function(){
 612             return v63;
 613         })();
 614     }));
 615     return l44;
 616 })();
 617 var l45 = {name: "ATOM"};
 618 (function(){
 619     (l45).fvalue = (function(v66){
 620         ((v66)["fname"] = "ATOM");
 621         return v66;
 622     })((function (values,v65){
 623         checkArgs(arguments, 2);
 624         return (function(){
 625             return l27.fvalue(values, ((function(){
 626                 var tmp = v65;
 627                 return (typeof tmp == 'object' && 'car' in tmp);
 628             })()?l4.value: l3.value));
 629         })();
 630     }));
 631     return l45;
 632 })();
 633 var l46 = {name: "INCF"};
 634 l46;
 635 var l47 = {name: "DECF"};
 636 l47;
 637 var l48 = {name: "PUSH"};
 638 l48;
 639 var l49 = {name: "DOLIST"};
 640 l49;
 641 var l50 = {name: "DOTIMES"};
 642 l50;
 643 var l51 = {name: "COND"};
 644 l51;
 645 var l52 = {name: "CASE"};
 646 l52;
 647 var l53 = {name: "ECASE"};
 648 l53;
 649 var l54 = {name: "AND"};
 650 l54;
 651 var l55 = {name: "OR"};
 652 l55;
 653 var l56 = {name: "PROG1"};
 654 l56;
 655 var l57 = {name: "PROG2"};
 656 l57;
 657 var l58 = {name: "ENSURE-LIST"};
 658 var l59 = {name: "LISTP"};
 659 (function(){
 660     (l58).fvalue = (function(v68){
 661         ((v68)["fname"] = "ENSURE-LIST");
 662         return v68;
 663     })((function (values,v67){
 664         checkArgs(arguments, 2);
 665         return (function(){
 666             return (l59.fvalue(pv, v67) !== l3.value ? v67 : l44.fvalue(values, v67));
 667         })();
 668     }));
 669     return l58;
 670 })();
 671 var l60 = {name: "!REDUCE"};
 672 (function(){
 673     (l60).fvalue = (function(v72){
 674         ((v72)["fname"] = "!REDUCE");
 675         return v72;
 676     })((function (values,v69,v70,v71){
 677         checkArgs(arguments, 4);
 678         return (function(){
 679             return (l12.fvalue(pv, v70) !== l3.value ? v71 : l60.fvalue(values, v69, (function(){
 680                 var tmp = v70;
 681                 return tmp === l3.value? l3.value: tmp.cdr;
 682             })(), (v69)(pv, v71, (function(){
 683                 var tmp = v70;
 684                 return tmp === l3.value? l3.value: tmp.car;
 685             })())));
 686         })();
 687     }));
 688     return l60;
 689 })();
 690 var l61 = {name: "+"};
 691 (function(){
 692     (l61).fvalue = (function(v77){
 693         ((v77)["fname"] = "+");
 694         return v77;
 695     })((function (values){
 696         var v73= l3.value;
 697         for (var i = arguments.length-1; i>=1; i--)
 698             v73 = {car: arguments[i], cdr:
 699         v73};
 700         return (function(){
 701             return (function(v74){
 702                 return (function(){
 703                     return (function(v75,v76){
 704                         (function(){
 705                             while(v75 !== l3.value){
 706                                 (v76 = (function(){
 707                                     var tmp = v75;
 708                                     return tmp === l3.value? l3.value: tmp.car;
 709                                 })());
 710                                 (function(){
 711                                     (v74 = (function(){
 712                                         var x1 = v74;
 713                                         if (typeof x1 !== 'number') throw 'Not a number!';
 714                                         var x2 = v76;
 715                                         if (typeof x2 !== 'number') throw 'Not a number!';
 716                                         return x1+x2;
 717                                     })());
 718                                     return l3.value;
 719                                 })();
 720                                 (v75 = (function(){
 721                                     var tmp = v75;
 722                                     return tmp === l3.value? l3.value: tmp.cdr;
 723                                 })());
 724                             }return l3.value;
 725                         })();
 726                         return v74;
 727                     })(v73,l3.value);
 728                 })();
 729             })(0);
 730         })();
 731     }));
 732     return l61;
 733 })();
 734 var l62 = {name: "-"};
 735 (function(){
 736     (l62).fvalue = (function(v83){
 737         ((v83)["fname"] = "-");
 738         return v83;
 739     })((function (values,v79){
 740         checkArgsAtLeast(arguments, 2);
 741         var v78= l3.value;
 742         for (var i = arguments.length-1; i>=2; i--)
 743             v78 = {car: arguments[i], cdr:
 744         v78};
 745         return (function(){
 746             return (l12.fvalue(pv, v78) !== l3.value ? (function(){
 747                 var x1 = v79;
 748                 if (typeof x1 !== 'number') throw 'Not a number!';
 749                 return -x1;
 750             })() : (function(v80){
 751                 return (function(){
 752                     return (function(v81,v82){
 753                         (function(){
 754                             while(v81 !== l3.value){
 755                                 (v82 = (function(){
 756                                     var tmp = v81;
 757                                     return tmp === l3.value? l3.value: tmp.car;
 758                                 })());
 759                                 (function(){
 760                                     (v80 = (function(){
 761                                         var x1 = v80;
 762                                         if (typeof x1 !== 'number') throw 'Not a number!';
 763                                         var x2 = v82;
 764                                         if (typeof x2 !== 'number') throw 'Not a number!';
 765                                         return x1-x2;
 766                                     })());
 767                                     return l3.value;
 768                                 })();
 769                                 (v81 = (function(){
 770                                     var tmp = v81;
 771                                     return tmp === l3.value? l3.value: tmp.cdr;
 772                                 })());
 773                             }return l3.value;
 774                         })();
 775                         return v80;
 776                     })(v78,l3.value);
 777                 })();
 778             })(v79));
 779         })();
 780     }));
 781     return l62;
 782 })();
 783 var l63 = {name: "APPEND-TWO"};
 784 var l64 = {name: "APPEND"};
 785 (function(){
 786     (l63).fvalue = (function(v86){
 787         ((v86)["fname"] = "APPEND-TWO");
 788         return v86;
 789     })((function (values,v84,v85){
 790         checkArgs(arguments, 3);
 791         return (function(){
 792             return (l12.fvalue(pv, v84) !== l3.value ? v85 : ({car: (function(){
 793                 var tmp = v84;
 794                 return tmp === l3.value? l3.value: tmp.car;
 795             })(), cdr: l64.fvalue(pv, (function(){
 796                 var tmp = v84;
 797                 return tmp === l3.value? l3.value: tmp.cdr;
 798             })(), v85)}));
 799         })();
 800     }));
 801     return l63;
 802 })();
 803 (function(){
 804     (l64).fvalue = (function(v88){
 805         ((v88)["fname"] = "APPEND");
 806         return v88;
 807     })((function (values){
 808         var v87= l3.value;
 809         for (var i = arguments.length-1; i>=1; i--)
 810             v87 = {car: arguments[i], cdr:
 811         v87};
 812         return (function(){
 813             return l60.fvalue(values, (function(){
 814                 var symbol = l63;
 815                 var func = symbol.fvalue;
 816                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
 817                 return func;
 818             })(), v87, l3);
 819         })();
 820     }));
 821     return l64;
 822 })();
 823 var l65 = {name: "REVAPPEND"};
 824 (function(){
 825     (l65).fvalue = (function(v91){
 826         ((v91)["fname"] = "REVAPPEND");
 827         return v91;
 828     })((function (values,v89,v90){
 829         checkArgs(arguments, 3);
 830         return (function(){
 831             (function(){
 832                 return (function(){
 833                     while(v89 !== l3.value){
 834                         (v90 = ({car: (function(){
 835                             var tmp = v89;
 836                             return tmp === l3.value? l3.value: tmp.car;
 837                         })(), cdr: v90}));
 838                         (v89 = (function(){
 839                             var tmp = v89;
 840                             return tmp === l3.value? l3.value: tmp.cdr;
 841                         })());
 842                     }return l3.value;
 843                 })();
 844             })();
 845             return v90;
 846         })();
 847     }));
 848     return l65;
 849 })();
 850 var l66 = {name: "REVERSE"};
 851 (function(){
 852     (l66).fvalue = (function(v93){
 853         ((v93)["fname"] = "REVERSE");
 854         return v93;
 855     })((function (values,v92){
 856         checkArgs(arguments, 2);
 857         return (function(){
 858             return l65.fvalue(values, v92, l3);
 859         })();
 860     }));
 861     return l66;
 862 })();
 863 var l67 = {name: "PSETQ"};
 864 l67;
 865 var l68 = {name: "DO"};
 866 l68;
 867 var l69 = {name: "DO*"};
 868 l69;
 869 var l70 = {name: "LIST-LENGTH"};
 870 (function(){
 871     (l70).fvalue = (function(v96){
 872         ((v96)["fname"] = "LIST-LENGTH");
 873         return v96;
 874     })((function (values,v94){
 875         checkArgs(arguments, 2);
 876         return (function(){
 877             return (function(v95){
 878                 (function(){
 879                     return (function(){
 880                         while(l27.fvalue(pv, l12.fvalue(pv, v94)) !== l3.value){
 881                             (v95 = (function(){
 882                                 var x1 = v95;
 883                                 if (typeof x1 !== 'number') throw 'Not a number!';
 884                                 var x2 = 1;
 885                                 if (typeof x2 !== 'number') throw 'Not a number!';
 886                                 return x1+x2;
 887                             })());
 888                             (v94 = (function(){
 889                                 var tmp = v94;
 890                                 return tmp === l3.value? l3.value: tmp.cdr;
 891                             })());
 892                         }return l3.value;
 893                     })();
 894                 })();
 895                 return v95;
 896             })(0);
 897         })();
 898     }));
 899     return l70;
 900 })();
 901 var l71 = {name: "LENGTH"};
 902 (function(){
 903     (l71).fvalue = (function(v98){
 904         ((v98)["fname"] = "LENGTH");
 905         return v98;
 906     })((function (values,v97){
 907         checkArgs(arguments, 2);
 908         return (function(){
 909             return (((typeof(v97) == "string")?l4.value: l3.value) !== l3.value ? (function(){
 910                 var x = v97;
 911                 if (typeof x != 'string')
 912                     throw 'The value ' + x + ' is not a type string.';
 913                 return x.length;
 914             })() : (((function(){
 915                 var x = v97;
 916                 return typeof x === 'object' && 'length' in x;
 917             })()?l4.value: l3.value) !== l3.value ? (function(){
 918                 var tmp = (v97)["length"];
 919                 return tmp == undefined? l3.value: tmp ;
 920             })() : (l59.fvalue(pv, v97) !== l3.value ? l70.fvalue(values, v97) : l3.value)));
 921         })();
 922     }));
 923     return l71;
 924 })();
 925 var l72 = {name: "CONCAT-TWO"};
 926 (function(){
 927     (l72).fvalue = (function(v101){
 928         ((v101)["fname"] = "CONCAT-TWO");
 929         return v101;
 930     })((function (values,v99,v100){
 931         checkArgs(arguments, 3);
 932         return (function(){
 933             return (function(){
 934                 var string1 = v99;
 935                 var string2 = v100;
 936                 if (typeof string1 != 'string')
 937                     throw 'The value ' + string1 + ' is not a type string.';
 938                 if (typeof string2 != 'string')
 939                     throw 'The value ' + string2 + ' is not a type string.';
 940                 return string1.concat(string2);
 941             })();
 942         })();
 943     }));
 944     return l72;
 945 })();
 946 var l73 = {name: "MAPCAR"};
 947 (function(){
 948     (l73).fvalue = (function(v104){
 949         ((v104)["fname"] = "MAPCAR");
 950         return v104;
 951     })((function (values,v102,v103){
 952         checkArgs(arguments, 3);
 953         return (function(){
 954             return (l12.fvalue(pv, v103) !== l3.value ? l3 : ({car: (v102)(pv, (function(){
 955                 var tmp = v103;
 956                 return tmp === l3.value? l3.value: tmp.car;
 957             })()), cdr: l73.fvalue(pv, v102, (function(){
 958                 var tmp = v103;
 959                 return tmp === l3.value? l3.value: tmp.cdr;
 960             })())}));
 961         })();
 962     }));
 963     return l73;
 964 })();
 965 var l74 = {name: "IDENTITY"};
 966 (function(){
 967     (l74).fvalue = (function(v106){
 968         ((v106)["fname"] = "IDENTITY");
 969         return v106;
 970     })((function (values,v105){
 971         checkArgs(arguments, 2);
 972         return (function(){
 973             return v105;
 974         })();
 975     }));
 976     return l74;
 977 })();
 978 var l75 = {name: "COPY-LIST"};
 979 (function(){
 980     (l75).fvalue = (function(v108){
 981         ((v108)["fname"] = "COPY-LIST");
 982         return v108;
 983     })((function (values,v107){
 984         checkArgs(arguments, 2);
 985         return (function(){
 986             return l73.fvalue(values, (function(){
 987                 var symbol = l74;
 988                 var func = symbol.fvalue;
 989                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
 990                 return func;
 991             })(), v107);
 992         })();
 993     }));
 994     return l75;
 995 })();
 996 var l76 = {name: "CODE-CHAR"};
 997 (function(){
 998     (l76).fvalue = (function(v110){
 999         ((v110)["fname"] = "CODE-CHAR");
1000         return v110;
1001     })((function (values,v109){
1002         checkArgs(arguments, 2);
1003         return (function(){
1004             return v109;
1005         })();
1006     }));
1007     return l76;
1008 })();
1009 var l77 = {name: "CHAR-CODE"};
1010 (function(){
1011     (l77).fvalue = (function(v112){
1012         ((v112)["fname"] = "CHAR-CODE");
1013         return v112;
1014     })((function (values,v111){
1015         checkArgs(arguments, 2);
1016         return (function(){
1017             return v111;
1018         })();
1019     }));
1020     return l77;
1021 })();
1022 var l78 = {name: "CHAR="};
1023 (function(){
1024     (l78).fvalue = (function(v115){
1025         ((v115)["fname"] = "CHAR=");
1026         return v115;
1027     })((function (values,v113,v114){
1028         checkArgs(arguments, 3);
1029         return (function(){
1030             return (function(){
1031                 var x1 = v113;
1032                 if (typeof x1 !== 'number') throw 'Not a number!';
1033                 var x2 = v114;
1034                 if (typeof x2 !== 'number') throw 'Not a number!';
1035                 return (x1==x2?l4.value: l3.value);
1036             })();
1037         })();
1038     }));
1039     return l78;
1040 })();
1041 var l79 = {name: "INTEGERP"};
1042 (function(){
1043     (l79).fvalue = (function(v117){
1044         ((v117)["fname"] = "INTEGERP");
1045         return v117;
1046     })((function (values,v116){
1047         checkArgs(arguments, 2);
1048         return (function(){
1049             return (((typeof (v116) == "number")?l4.value: l3.value) !== l3.value ? (function(){
1050                 var x1 = (function(){
1051                     var x = v116;
1052                     if (typeof x != 'number')
1053                         throw 'The value ' + x + ' is not a type number.';
1054                     return Math.floor(x);
1055                 })();
1056                 if (typeof x1 !== 'number') throw 'Not a number!';
1057                 var x2 = v116;
1058                 if (typeof x2 !== 'number') throw 'Not a number!';
1059                 return (x1==x2?l4.value: l3.value);
1060             })() : l3.value);
1061         })();
1062     }));
1063     return l79;
1064 })();
1065 var l80 = {name: "PLUSP"};
1066 (function(){
1067     (l80).fvalue = (function(v119){
1068         ((v119)["fname"] = "PLUSP");
1069         return v119;
1070     })((function (values,v118){
1071         checkArgs(arguments, 2);
1072         return (function(){
1073             return (function(){
1074                 var x1 = 0;
1075                 if (typeof x1 !== 'number') throw 'Not a number!';
1076                 var x2 = v118;
1077                 if (typeof x2 !== 'number') throw 'Not a number!';
1078                 return (x1<x2?l4.value: l3.value);
1079             })();
1080         })();
1081     }));
1082     return l80;
1083 })();
1084 var l81 = {name: "MINUSP"};
1085 (function(){
1086     (l81).fvalue = (function(v121){
1087         ((v121)["fname"] = "MINUSP");
1088         return v121;
1089     })((function (values,v120){
1090         checkArgs(arguments, 2);
1091         return (function(){
1092             return (function(){
1093                 var x1 = v120;
1094                 if (typeof x1 !== 'number') throw 'Not a number!';
1095                 var x2 = 0;
1096                 if (typeof x2 !== 'number') throw 'Not a number!';
1097                 return (x1<x2?l4.value: l3.value);
1098             })();
1099         })();
1100     }));
1101     return l81;
1102 })();
1103 (function(){
1104     (l59).fvalue = (function(v124){
1105         ((v124)["fname"] = "LISTP");
1106         return v124;
1107     })((function (values,v122){
1108         checkArgs(arguments, 2);
1109         return (function(){
1110             return (function(v123){
1111                 return (v123 !== l3.value ? v123 : l12.fvalue(values, v122));
1112             })(((function(){
1113                 var tmp = v122;
1114                 return (typeof tmp == 'object' && 'car' in tmp);
1115             })()?l4.value: l3.value));
1116         })();
1117     }));
1118     return l59;
1119 })();
1120 var l82 = {name: "NTHCDR"};
1121 (function(){
1122     (l82).fvalue = (function(v127){
1123         ((v127)["fname"] = "NTHCDR");
1124         return v127;
1125     })((function (values,v125,v126){
1126         checkArgs(arguments, 3);
1127         return (function(){
1128             (function(){
1129                 return (function(){
1130                     while((l80.fvalue(pv, v125) !== l3.value ? v126 : l3.value) !== l3.value){
1131                         (v125 = l23.fvalue(pv, v125));
1132                         (v126 = (function(){
1133                             var tmp = v126;
1134                             return tmp === l3.value? l3.value: tmp.cdr;
1135                         })());
1136                     }return l3.value;
1137                 })();
1138             })();
1139             return v126;
1140         })();
1141     }));
1142     return l82;
1143 })();
1144 var l83 = {name: "NTH"};
1145 (function(){
1146     (l83).fvalue = (function(v130){
1147         ((v130)["fname"] = "NTH");
1148         return v130;
1149     })((function (values,v128,v129){
1150         checkArgs(arguments, 3);
1151         return (function(){
1152             return (function(){
1153                 var tmp = l82.fvalue(pv, v128, v129);
1154                 return tmp === l3.value? l3.value: tmp.car;
1155             })();
1156         })();
1157     }));
1158     return l83;
1159 })();
1160 var l84 = {name: "LAST"};
1161 (function(){
1162     (l84).fvalue = (function(v132){
1163         ((v132)["fname"] = "LAST");
1164         return v132;
1165     })((function (values,v131){
1166         checkArgs(arguments, 2);
1167         return (function(){
1168             (function(){
1169                 return (function(){
1170                     while(((function(){
1171                         var tmp = (function(){
1172                             var tmp = v131;
1173                             return tmp === l3.value? l3.value: tmp.cdr;
1174                         })();
1175                         return (typeof tmp == 'object' && 'car' in tmp);
1176                     })()?l4.value: l3.value) !== l3.value){
1177                         (v131 = (function(){
1178                             var tmp = v131;
1179                             return tmp === l3.value? l3.value: tmp.cdr;
1180                         })());
1181                     }return l3.value;
1182                 })();
1183             })();
1184             return v131;
1185         })();
1186     }));
1187     return l84;
1188 })();
1189 var l85 = {name: "BUTLAST"};
1190 (function(){
1191     (l85).fvalue = (function(v134){
1192         ((v134)["fname"] = "BUTLAST");
1193         return v134;
1194     })((function (values,v133){
1195         checkArgs(arguments, 2);
1196         return (function(){
1197             return (((function(){
1198                 var tmp = (function(){
1199                     var tmp = v133;
1200                     return tmp === l3.value? l3.value: tmp.cdr;
1201                 })();
1202                 return (typeof tmp == 'object' && 'car' in tmp);
1203             })()?l4.value: l3.value) !== l3.value ? ({car: (function(){
1204                 var tmp = v133;
1205                 return tmp === l3.value? l3.value: tmp.car;
1206             })(), cdr: l85.fvalue(pv, (function(){
1207                 var tmp = v133;
1208                 return tmp === l3.value? l3.value: tmp.cdr;
1209             })())}) : l3.value);
1210         })();
1211     }));
1212     return l85;
1213 })();
1214 var l86 = {name: "MEMBER"};
1215 (function(){
1216     (l86).fvalue = (function(v137){
1217         ((v137)["fname"] = "MEMBER");
1218         return v137;
1219     })((function (values,v135,v136){
1220         checkArgs(arguments, 3);
1221         return (function(){
1222             return (function(){
1223                 try {
1224                     return (function(){
1225                         while(v136 !== l3.value){
1226                             (l26.fvalue(pv, v135, (function(){
1227                                 var tmp = v136;
1228                                 return tmp === l3.value? l3.value: tmp.car;
1229                             })()) !== l3.value ? (function(){
1230                                 var values = mv;
1231                                 throw ({type: 'block', id: 63, values: v136, message: 'Return from unknown block NIL.'})
1232                             })() : l3.value);
1233                             (v136 = (function(){
1234                                 var tmp = v136;
1235                                 return tmp === l3.value? l3.value: tmp.cdr;
1236                             })());
1237                         }return l3.value;
1238                     })();
1239                 }
1240                 catch (cf){
1241                     if (cf.type == 'block' && cf.id == 63)
1242                         return values.apply(this, forcemv(cf.values));
1243                     else
1244                         throw cf;
1245                 }
1246             })();
1247         })();
1248     }));
1249     return l86;
1250 })();
1251 var l87 = {name: "REMOVE"};
1252 (function(){
1253     (l87).fvalue = (function(v140){
1254         ((v140)["fname"] = "REMOVE");
1255         return v140;
1256     })((function (values,v138,v139){
1257         checkArgs(arguments, 3);
1258         return (function(){
1259             return (l12.fvalue(pv, v139) !== l3.value ? l3.value : (l26.fvalue(pv, v138, (function(){
1260                 var tmp = v139;
1261                 return tmp === l3.value? l3.value: tmp.car;
1262             })()) !== l3.value ? l87.fvalue(values, v138, (function(){
1263                 var tmp = v139;
1264                 return tmp === l3.value? l3.value: tmp.cdr;
1265             })()) : ({car: (function(){
1266                 var tmp = v139;
1267                 return tmp === l3.value? l3.value: tmp.car;
1268             })(), cdr: l87.fvalue(pv, v138, (function(){
1269                 var tmp = v139;
1270                 return tmp === l3.value? l3.value: tmp.cdr;
1271             })())})));
1272         })();
1273     }));
1274     return l87;
1275 })();
1276 var l88 = {name: "REMOVE-IF"};
1277 (function(){
1278     (l88).fvalue = (function(v143){
1279         ((v143)["fname"] = "REMOVE-IF");
1280         return v143;
1281     })((function (values,v141,v142){
1282         checkArgs(arguments, 3);
1283         return (function(){
1284             return (l12.fvalue(pv, v142) !== l3.value ? l3.value : ((v141)(pv, (function(){
1285                 var tmp = v142;
1286                 return tmp === l3.value? l3.value: tmp.car;
1287             })()) !== l3.value ? l88.fvalue(values, v141, (function(){
1288                 var tmp = v142;
1289                 return tmp === l3.value? l3.value: tmp.cdr;
1290             })()) : ({car: (function(){
1291                 var tmp = v142;
1292                 return tmp === l3.value? l3.value: tmp.car;
1293             })(), cdr: l88.fvalue(pv, v141, (function(){
1294                 var tmp = v142;
1295                 return tmp === l3.value? l3.value: tmp.cdr;
1296             })())})));
1297         })();
1298     }));
1299     return l88;
1300 })();
1301 var l89 = {name: "REMOVE-IF-NOT"};
1302 (function(){
1303     (l89).fvalue = (function(v146){
1304         ((v146)["fname"] = "REMOVE-IF-NOT");
1305         return v146;
1306     })((function (values,v144,v145){
1307         checkArgs(arguments, 3);
1308         return (function(){
1309             return (l12.fvalue(pv, v145) !== l3.value ? l3.value : ((v144)(pv, (function(){
1310                 var tmp = v145;
1311                 return tmp === l3.value? l3.value: tmp.car;
1312             })()) !== l3.value ? ({car: (function(){
1313                 var tmp = v145;
1314                 return tmp === l3.value? l3.value: tmp.car;
1315             })(), cdr: l89.fvalue(pv, v144, (function(){
1316                 var tmp = v145;
1317                 return tmp === l3.value? l3.value: tmp.cdr;
1318             })())}) : l89.fvalue(values, v144, (function(){
1319                 var tmp = v145;
1320                 return tmp === l3.value? l3.value: tmp.cdr;
1321             })())));
1322         })();
1323     }));
1324     return l89;
1325 })();
1326 var l90 = {name: "DIGIT-CHAR-P"};
1327 (function(){
1328     (l90).fvalue = (function(v148){
1329         ((v148)["fname"] = "DIGIT-CHAR-P");
1330         return v148;
1331     })((function (values,v147){
1332         checkArgs(arguments, 2);
1333         return (function(){
1334             return (((function(){
1335                 var x1 = 48;
1336                 if (typeof x1 !== 'number') throw 'Not a number!';
1337                 var x2 = v147;
1338                 if (typeof x2 !== 'number') throw 'Not a number!';
1339                 return (x1<=x2?l4.value: l3.value);
1340             })() !== l3.value ? (function(){
1341                 var x1 = v147;
1342                 if (typeof x1 !== 'number') throw 'Not a number!';
1343                 var x2 = 57;
1344                 if (typeof x2 !== 'number') throw 'Not a number!';
1345                 return (x1<=x2?l4.value: l3.value);
1346             })() : l3.value) !== l3.value ? (function(){
1347                 var x1 = v147;
1348                 if (typeof x1 !== 'number') throw 'Not a number!';
1349                 var x2 = 48;
1350                 if (typeof x2 !== 'number') throw 'Not a number!';
1351                 return x1-x2;
1352             })() : l3.value);
1353         })();
1354     }));
1355     return l90;
1356 })();
1357 var l91 = {name: "DIGIT-CHAR"};
1358 (function(){
1359     (l91).fvalue = (function(v150){
1360         ((v150)["fname"] = "DIGIT-CHAR");
1361         return v150;
1362     })((function (values,v149){
1363         checkArgs(arguments, 2);
1364         return (function(){
1365             return ((function(){
1366                 var x1 = 0;
1367                 if (typeof x1 !== 'number') throw 'Not a number!';
1368                 var x2 = v149;
1369                 if (typeof x2 !== 'number') throw 'Not a number!';
1370                 var x3 = 9;
1371                 if (typeof x3 !== 'number') throw 'Not a number!';
1372                 return (x1<=x2 && x2<=x3?l4.value: l3.value);
1373             })() !== l3.value ? (function(){
1374                 var string = "0123456789";
1375                 var index = v149;
1376                 if (typeof string != 'string')
1377                     throw 'The value ' + string + ' is not a type string.';
1378                 if (typeof index != 'number')
1379                     throw 'The value ' + index + ' is not a type number.';
1380                 return string.charCodeAt(index);
1381             })() : l3.value);
1382         })();
1383     }));
1384     return l91;
1385 })();
1386 var l92 = {name: "SUBSEQ"};
1387 (function(){
1388     (l92).fvalue = (function(v154){
1389         ((v154)["fname"] = "SUBSEQ");
1390         return v154;
1391     })((function (values,v151,v152,v153){
1392         checkArgsAtLeast(arguments, 3);
1393         checkArgsAtMost(arguments, 4);
1394         switch(arguments.length-1){
1395         case 2:
1396         v153=l3.value;
1397         default: break;
1398         }
1399         return (function(){
1400             return (((typeof(v151) == "string")?l4.value: l3.value) !== l3.value ? (v153 !== l3.value ? (function(){
1401                 var str = v151;
1402                 var a = v152;
1403                 var b;
1404                 b = v153;
1405                 return str.slice(a,b);
1406             })() : (function(){
1407                 var str = v151;
1408                 var a = v152;
1409                 var b;
1410                 return str.slice(a,b);
1411             })()) : (function(){
1412                 throw "Unsupported argument.";
1413             })());
1414         })();
1415     }));
1416     return l92;
1417 })();
1418 var l93 = {name: "SOME"};
1419 (function(){
1420     (l93).fvalue = (function(v161){
1421         ((v161)["fname"] = "SOME");
1422         return v161;
1423     })((function (values,v155,v156){
1424         checkArgs(arguments, 3);
1425         return (function(){
1426             try {
1427                 return (((typeof(v156) == "string")?l4.value: l3.value) !== l3.value ? (function(v157,v158){
1428                     (function(){
1429                         return (function(){
1430                             while((function(){
1431                                 var x1 = v157;
1432                                 if (typeof x1 !== 'number') throw 'Not a number!';
1433                                 var x2 = v158;
1434                                 if (typeof x2 !== 'number') throw 'Not a number!';
1435                                 return (x1<x2?l4.value: l3.value);
1436                             })() !== l3.value){
1437                                 ((v155)(pv, (function(){
1438                                     var string = v156;
1439                                     var index = v157;
1440                                     if (typeof string != 'string')
1441                                         throw 'The value ' + string + ' is not a type string.';
1442                                     if (typeof index != 'number')
1443                                         throw 'The value ' + index + ' is not a type number.';
1444                                     return string.charCodeAt(index);
1445                                 })()) !== l3.value ? (function(){
1446                                     var values = mv;
1447                                     throw ({type: 'block', id: 70, values: l4.value, message: 'Return from unknown block SOME.'})
1448                                 })() : l3.value);
1449                                 (v157 = (function(){
1450                                     var x1 = v157;
1451                                     if (typeof x1 !== 'number') throw 'Not a number!';
1452                                     var x2 = 1;
1453                                     if (typeof x2 !== 'number') throw 'Not a number!';
1454                                     return x1+x2;
1455                                 })());
1456                             }return l3.value;
1457                         })();
1458                     })();
1459                     return l3.value;
1460                 })(0,l71.fvalue(pv, v156)) : (l59.fvalue(pv, v156) !== l3.value ? (function(){
1461                     try {
1462                         return (function(v159,v160){
1463                             (function(){
1464                                 while(v159 !== l3.value){
1465                                     (v160 = (function(){
1466                                         var tmp = v159;
1467                                         return tmp === l3.value? l3.value: tmp.car;
1468                                     })());
1469                                     (function(){
1470                                         ((v155)(pv, v160) !== l3.value ? (function(){
1471                                             var values = mv;
1472                                             throw ({type: 'block', id: 72, values: l4.value, message: 'Return from unknown block NIL.'})
1473                                         })() : l3.value);
1474                                         return l3.value;
1475                                     })();
1476                                     (v159 = (function(){
1477                                         var tmp = v159;
1478                                         return tmp === l3.value? l3.value: tmp.cdr;
1479                                     })());
1480                                 }return l3.value;
1481                             })();
1482                             return l3.value;
1483                         })(v156,l3.value);
1484                     }
1485                     catch (cf){
1486                         if (cf.type == 'block' && cf.id == 72)
1487                             return values.apply(this, forcemv(cf.values));
1488                         else
1489                             throw cf;
1490                     }
1491                 })() : (function(){
1492                     throw "Unknown sequence.";
1493                 })()));
1494             }
1495             catch (cf){
1496                 if (cf.type == 'block' && cf.id == 70)
1497                     return values.apply(this, forcemv(cf.values));
1498                 else
1499                     throw cf;
1500             }
1501         })();
1502     }));
1503     return l93;
1504 })();
1505 var l94 = {name: "EVERY"};
1506 (function(){
1507     (l94).fvalue = (function(v168){
1508         ((v168)["fname"] = "EVERY");
1509         return v168;
1510     })((function (values,v162,v163){
1511         checkArgs(arguments, 3);
1512         return (function(){
1513             try {
1514                 return (((typeof(v163) == "string")?l4.value: l3.value) !== l3.value ? (function(v164,v165){
1515                     (function(){
1516                         return (function(){
1517                             while((function(){
1518                                 var x1 = v164;
1519                                 if (typeof x1 !== 'number') throw 'Not a number!';
1520                                 var x2 = v165;
1521                                 if (typeof x2 !== 'number') throw 'Not a number!';
1522                                 return (x1<x2?l4.value: l3.value);
1523                             })() !== l3.value){
1524                                 ((v162)(pv, (function(){
1525                                     var string = v163;
1526                                     var index = v164;
1527                                     if (typeof string != 'string')
1528                                         throw 'The value ' + string + ' is not a type string.';
1529                                     if (typeof index != 'number')
1530                                         throw 'The value ' + index + ' is not a type number.';
1531                                     return string.charCodeAt(index);
1532                                 })()) !== l3.value ? l3.value : (function(){
1533                                     var values = mv;
1534                                     throw ({type: 'block', id: 73, values: l3.value, message: 'Return from unknown block EVERY.'})
1535                                 })());
1536                                 (v164 = (function(){
1537                                     var x1 = v164;
1538                                     if (typeof x1 !== 'number') throw 'Not a number!';
1539                                     var x2 = 1;
1540                                     if (typeof x2 !== 'number') throw 'Not a number!';
1541                                     return x1+x2;
1542                                 })());
1543                             }return l3.value;
1544                         })();
1545                     })();
1546                     return l4.value;
1547                 })(0,l71.fvalue(pv, v163)) : (l59.fvalue(pv, v163) !== l3.value ? (function(){
1548                     try {
1549                         return (function(v166,v167){
1550                             (function(){
1551                                 while(v166 !== l3.value){
1552                                     (v167 = (function(){
1553                                         var tmp = v166;
1554                                         return tmp === l3.value? l3.value: tmp.car;
1555                                     })());
1556                                     (function(){
1557                                         ((v162)(pv, v167) !== l3.value ? l3.value : (function(){
1558                                             var values = mv;
1559                                             throw ({type: 'block', id: 75, values: l3.value, message: 'Return from unknown block NIL.'})
1560                                         })());
1561                                         return l3.value;
1562                                     })();
1563                                     (v166 = (function(){
1564                                         var tmp = v166;
1565                                         return tmp === l3.value? l3.value: tmp.cdr;
1566                                     })());
1567                                 }return l3.value;
1568                             })();
1569                             return l4.value;
1570                         })(v163,l3.value);
1571                     }
1572                     catch (cf){
1573                         if (cf.type == 'block' && cf.id == 75)
1574                             return values.apply(this, forcemv(cf.values));
1575                         else
1576                             throw cf;
1577                     }
1578                 })() : (function(){
1579                     throw "Unknown sequence.";
1580                 })()));
1581             }
1582             catch (cf){
1583                 if (cf.type == 'block' && cf.id == 73)
1584                     return values.apply(this, forcemv(cf.values));
1585                 else
1586                     throw cf;
1587             }
1588         })();
1589     }));
1590     return l94;
1591 })();
1592 var l95 = {name: "ASSOC"};
1593 (function(){
1594     (l95).fvalue = (function(v171){
1595         ((v171)["fname"] = "ASSOC");
1596         return v171;
1597     })((function (values,v169,v170){
1598         checkArgs(arguments, 3);
1599         return (function(){
1600             (function(){
1601                 try {
1602                     return (function(){
1603                         while(v170 !== l3.value){
1604                             (l26.fvalue(pv, v169, l32.fvalue(pv, v170)) !== l3.value ? (function(){
1605                                 throw ({type: 'block', id: 77, values: l3.value, message: 'Return from unknown block NIL.'})
1606                             })() : (v170 = (function(){
1607                                 var tmp = v170;
1608                                 return tmp === l3.value? l3.value: tmp.cdr;
1609                             })()));
1610                         }return l3.value;
1611                     })();
1612                 }
1613                 catch (cf){
1614                     if (cf.type == 'block' && cf.id == 77)
1615                         return cf.values;
1616                     else
1617                         throw cf;
1618                 }
1619             })();
1620             return (function(){
1621                 var tmp = v170;
1622                 return tmp === l3.value? l3.value: tmp.car;
1623             })();
1624         })();
1625     }));
1626     return l95;
1627 })();
1628 var l96 = {name: "STRING"};
1629 (function(){
1630     (l96).fvalue = (function(v173){
1631         ((v173)["fname"] = "STRING");
1632         return v173;
1633     })((function (values,v172){
1634         checkArgs(arguments, 2);
1635         return (function(){
1636             return (((typeof(v172) == "string")?l4.value: l3.value) !== l3.value ? v172 : (((function(){
1637                 var tmp = v172;
1638                 return (typeof tmp == 'object' && 'name' in tmp);
1639             })()?l4.value: l3.value) !== l3.value ? (v172).name : (function(){
1640                 var x = v172;
1641                 if (typeof x != 'number')
1642                     throw 'The value ' + x + ' is not a type number.';
1643                 return String.fromCharCode(x);
1644             })()));
1645         })();
1646     }));
1647     return l96;
1648 })();
1649 var l97 = {name: "STRING="};
1650 (function(){
1651     (l97).fvalue = (function(v176){
1652         ((v176)["fname"] = "STRING=");
1653         return v176;
1654     })((function (values,v174,v175){
1655         checkArgs(arguments, 3);
1656         return (function(){
1657             return ((v174 == v175)?l4.value: l3.value);
1658         })();
1659     }));
1660     return l97;
1661 })();
1662 var l98 = {name: "FDEFINITION"};
1663 (function(){
1664     (l98).fvalue = (function(v178){
1665         ((v178)["fname"] = "FDEFINITION");
1666         return v178;
1667     })((function (values,v177){
1668         checkArgs(arguments, 2);
1669         return (function(){
1670             return (((typeof v177 == 'function')?l4.value: l3.value) !== l3.value ? v177 : (((function(){
1671                 var tmp = v177;
1672                 return (typeof tmp == 'object' && 'name' in tmp);
1673             })()?l4.value: l3.value) !== l3.value ? (function(){
1674                 var symbol = v177;
1675                 var func = symbol.fvalue;
1676                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1677                 return func;
1678             })() : (function(){
1679                 throw "Invalid function";
1680             })()));
1681         })();
1682     }));
1683     return l98;
1684 })();
1685 var l99 = {name: "DISASSEMBLE"};
1686 var l100 = {name: "WRITE-LINE"};
1687 (function(){
1688     (l99).fvalue = (function(v180){
1689         ((v180)["fname"] = "DISASSEMBLE");
1690         return v180;
1691     })((function (values,v179){
1692         checkArgs(arguments, 2);
1693         return (function(){
1694             l100.fvalue(pv, (l98.fvalue(pv, v179)).toString());
1695             return l3.value;
1696         })();
1697     }));
1698     return l99;
1699 })();
1700 var l101 = {name: "DOCUMENTATION"};
1701 var l102 = {name: "FUNCTION"};
1702 var l103 = {name: "VARIABLE"};
1703 (function(){
1704     (l101).fvalue = (function(v185){
1705         ((v185)["fname"] = "DOCUMENTATION");
1706         return v185;
1707     })((function(){
1708         var func = (function (values,v181,v182){
1709             checkArgs(arguments, 3);
1710             return (function(){
1711                 return (function(v183){
1712                     return (l26.fvalue(pv, v183, l102) !== l3.value ? (function(v184){
1713                         return (function(){
1714                             var tmp = (v184)["docstring"];
1715                             return tmp == undefined? l3.value: tmp ;
1716                         })();
1717                     })(l98.fvalue(pv, v181)) : (l26.fvalue(pv, v183, l103) !== l3.value ? (function(){
1718                         (((function(){
1719                             var tmp = v181;
1720                             return (typeof tmp == 'object' && 'name' in tmp);
1721                         })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
1722                             throw "Wrong argument type! it should be a symbol";
1723                         })());
1724                         return (function(){
1725                             var tmp = (v181)["vardoc"];
1726                             return tmp == undefined? l3.value: tmp ;
1727                         })();
1728                     })() : (function(){
1729                         throw "ECASE expression failed.";
1730                     })()));
1731                 })(v182);
1732             })();
1733         });
1734         func.docstring = 'Return the documentation of X. TYPE must be the symbol VARIABLE or FUNCTION.';
1735         return func;
1736     })());
1737     return l101;
1738 })();
1739 var l104 = {name: "MULTIPLE-VALUE-BIND"};
1740 l104;
1741 var l105 = {name: "MULTIPLE-VALUE-LIST"};
1742 l105;
1743 var l106 = {name: "*PACKAGE-LIST*"};
1744 (function(){
1745     (((l106.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l106).value = l3.value));
1746     return l106;
1747 })();
1748 var l107 = {name: "LIST-ALL-PACKAGES"};
1749 (function(){
1750     (l107).fvalue = (function(v186){
1751         ((v186)["fname"] = "LIST-ALL-PACKAGES");
1752         return v186;
1753     })((function (values){
1754         checkArgsAtMost(arguments, 1);
1755         return (function(){
1756             return (function(){
1757                 var symbol = l106;
1758                 var value = symbol.value;
1759                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1760                 return value;
1761             })();
1762         })();
1763     }));
1764     return l107;
1765 })();
1766 var l108 = {name: "MAKE-PACKAGE"};
1767 var l109 = {name: "FIND-PACKAGE-OR-FAIL"};
1768 (function(){
1769     (l108).fvalue = (function(v191){
1770         ((v191)["fname"] = "MAKE-PACKAGE");
1771         return v191;
1772     })((function (values,v187,v188){
1773         checkArgsAtLeast(arguments, 2);
1774         checkArgsAtMost(arguments, 3);
1775         switch(arguments.length-1){
1776         case 1:
1777         v188=l3.value;
1778         default: break;
1779         }
1780         return (function(){
1781             return (function(v189,v190){
1782                 ((v189)["packageName"] = v187);
1783                 ((v189)["symbols"] = {});
1784                 ((v189)["exports"] = {});
1785                 ((v189)["use"] = v190);
1786                 ((l106).value = ({car: v189, cdr: (function(){
1787                     var symbol = l106;
1788                     var value = symbol.value;
1789                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1790                     return value;
1791                 })()}));
1792                 return v189;
1793             })({},l73.fvalue(pv, (function(){
1794                 var symbol = l109;
1795                 var func = symbol.fvalue;
1796                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1797                 return func;
1798             })(), v188));
1799         })();
1800     }));
1801     return l108;
1802 })();
1803 var l110 = {name: "PACKAGEP"};
1804 (function(){
1805     (l110).fvalue = (function(v193){
1806         ((v193)["fname"] = "PACKAGEP");
1807         return v193;
1808     })((function (values,v192){
1809         checkArgs(arguments, 2);
1810         return (function(){
1811             return (((typeof (v192) === 'object')?l4.value: l3.value) !== l3.value ? ((("symbols") in (v192))?l4.value: l3.value) : l3.value);
1812         })();
1813     }));
1814     return l110;
1815 })();
1816 var l111 = {name: "FIND-PACKAGE"};
1817 var l112 = {name: "PACKAGE-NAME"};
1818 (function(){
1819     (l111).fvalue = (function(v198){
1820         ((v198)["fname"] = "FIND-PACKAGE");
1821         return v198;
1822     })((function (values,v194){
1823         checkArgs(arguments, 2);
1824         return (function(){
1825             try {
1826                 (l110.fvalue(pv, v194) !== l3.value ? (function(){
1827                     var values = mv;
1828                     throw ({type: 'block', id: 86, values: v194, message: 'Return from unknown block FIND-PACKAGE.'})
1829                 })() : l3.value);
1830                 return (function(v195){
1831                     return (function(){
1832                         try {
1833                             return (function(v196,v197){
1834                                 (function(){
1835                                     while(v196 !== l3.value){
1836                                         (v197 = (function(){
1837                                             var tmp = v196;
1838                                             return tmp === l3.value? l3.value: tmp.car;
1839                                         })());
1840                                         (function(){
1841                                             (l97.fvalue(pv, l112.fvalue(pv, v197), v195) !== l3.value ? (function(){
1842                                                 var values = mv;
1843                                                 throw ({type: 'block', id: 87, values: v197, message: 'Return from unknown block NIL.'})
1844                                             })() : l3.value);
1845                                             return l3.value;
1846                                         })();
1847                                         (v196 = (function(){
1848                                             var tmp = v196;
1849                                             return tmp === l3.value? l3.value: tmp.cdr;
1850                                         })());
1851                                     }return l3.value;
1852                                 })();
1853                                 return l3.value;
1854                             })((function(){
1855                                 var symbol = l106;
1856                                 var value = symbol.value;
1857                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1858                                 return value;
1859                             })(),l3.value);
1860                         }
1861                         catch (cf){
1862                             if (cf.type == 'block' && cf.id == 87)
1863                                 return values.apply(this, forcemv(cf.values));
1864                             else
1865                                 throw cf;
1866                         }
1867                     })();
1868                 })(l96.fvalue(pv, v194));
1869             }
1870             catch (cf){
1871                 if (cf.type == 'block' && cf.id == 86)
1872                     return values.apply(this, forcemv(cf.values));
1873                 else
1874                     throw cf;
1875             }
1876         })();
1877     }));
1878     return l111;
1879 })();
1880 (function(){
1881     (l109).fvalue = (function(v201){
1882         ((v201)["fname"] = "FIND-PACKAGE-OR-FAIL");
1883         return v201;
1884     })((function (values,v199){
1885         checkArgs(arguments, 2);
1886         return (function(){
1887             return (function(v200){
1888                 return (v200 !== l3.value ? v200 : (function(){
1889                     throw "Package unknown.";
1890                 })());
1891             })(l111.fvalue(pv, v199));
1892         })();
1893     }));
1894     return l109;
1895 })();
1896 (function(){
1897     (l112).fvalue = (function(v204){
1898         ((v204)["fname"] = "PACKAGE-NAME");
1899         return v204;
1900     })((function (values,v202){
1901         checkArgs(arguments, 2);
1902         return (function(){
1903             return (function(v203){
1904                 return (function(){
1905                     var tmp = (v203)["packageName"];
1906                     return tmp == undefined? l3.value: tmp ;
1907                 })();
1908             })(l109.fvalue(pv, v202));
1909         })();
1910     }));
1911     return l112;
1912 })();
1913 var l113 = {name: "%PACKAGE-SYMBOLS"};
1914 (function(){
1915     (l113).fvalue = (function(v207){
1916         ((v207)["fname"] = "%PACKAGE-SYMBOLS");
1917         return v207;
1918     })((function (values,v205){
1919         checkArgs(arguments, 2);
1920         return (function(){
1921             return (function(v206){
1922                 return (function(){
1923                     var tmp = (v206)["symbols"];
1924                     return tmp == undefined? l3.value: tmp ;
1925                 })();
1926             })(l109.fvalue(pv, v205));
1927         })();
1928     }));
1929     return l113;
1930 })();
1931 var l114 = {name: "PACKAGE-USE-LIST"};
1932 (function(){
1933     (l114).fvalue = (function(v210){
1934         ((v210)["fname"] = "PACKAGE-USE-LIST");
1935         return v210;
1936     })((function (values,v208){
1937         checkArgs(arguments, 2);
1938         return (function(){
1939             return (function(v209){
1940                 return (function(){
1941                     var tmp = (v209)["use"];
1942                     return tmp == undefined? l3.value: tmp ;
1943                 })();
1944             })(l109.fvalue(pv, v208));
1945         })();
1946     }));
1947     return l114;
1948 })();
1949 var l115 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
1950 (function(){
1951     (l115).fvalue = (function(v213){
1952         ((v213)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
1953         return v213;
1954     })((function (values,v211){
1955         checkArgs(arguments, 2);
1956         return (function(){
1957             return (function(v212){
1958                 return (function(){
1959                     var tmp = (v212)["exports"];
1960                     return tmp == undefined? l3.value: tmp ;
1961                 })();
1962             })(l109.fvalue(pv, v211));
1963         })();
1964     }));
1965     return l115;
1966 })();
1967 var l116 = {name: "*COMMON-LISP-PACKAGE*"};
1968 (function(){
1969     (((l116.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l116).value = l108.fvalue(pv, "CL")));
1970     return l116;
1971 })();
1972 var l117 = {name: "*USER-PACKAGE*"};
1973 (function(){
1974     (((l117.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l117).value = l108.fvalue(pv, "CL-USER", l44.fvalue(pv, (function(){
1975         var symbol = l116;
1976         var value = symbol.value;
1977         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1978         return value;
1979     })()))));
1980     return l117;
1981 })();
1982 var l118 = {name: "*KEYWORD-PACKAGE*"};
1983 (function(){
1984     (((l118.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l118).value = l108.fvalue(pv, "KEYWORD")));
1985     return l118;
1986 })();
1987 var l119 = {name: "KEYWORDP"};
1988 var l120 = {name: "SYMBOL-PACKAGE"};
1989 (function(){
1990     (l119).fvalue = (function(v215){
1991         ((v215)["fname"] = "KEYWORDP");
1992         return v215;
1993     })((function (values,v214){
1994         checkArgs(arguments, 2);
1995         return (function(){
1996             return (((function(){
1997                 var tmp = v214;
1998                 return (typeof tmp == 'object' && 'name' in tmp);
1999             })()?l4.value: l3.value) !== l3.value ? ((l120.fvalue(pv, v214) === (function(){
2000                 var symbol = l118;
2001                 var value = symbol.value;
2002                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2003                 return value;
2004             })())?l4.value: l3.value) : l3.value);
2005         })();
2006     }));
2007     return l119;
2008 })();
2009 var l121 = {name: "*PACKAGE*"};
2010 (function(){
2011     (((l121.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l121).value = (function(){
2012         var symbol = l116;
2013         var value = symbol.value;
2014         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2015         return value;
2016     })()));
2017     return l121;
2018 })();
2019 var l122 = {name: "IN-PACKAGE"};
2020 l122;
2021 var l123 = {name: "%INTERN-SYMBOL"};
2022 (function(){
2023     (l123).fvalue = (function(v219){
2024         ((v219)["fname"] = "%INTERN-SYMBOL");
2025         return v219;
2026     })((function (values,v216){
2027         checkArgs(arguments, 2);
2028         return (function(){
2029             return (function(){
2030                 var v217 = (((("package") in (v216))?l4.value: l3.value) !== l3.value ? l109.fvalue(pv, (function(){
2031                     var tmp = (v216)["package"];
2032                     return tmp == undefined? l3.value: tmp ;
2033                 })()) : (function(){
2034                     var symbol = l116;
2035                     var value = symbol.value;
2036                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2037                     return value;
2038                 })());
2039                 var v218 = l113.fvalue(pv, v217);
2040                 ((v216)["package"] = v217);
2041                 (((v217 === (function(){
2042                     var symbol = l118;
2043                     var value = symbol.value;
2044                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2045                     return value;
2046                 })())?l4.value: l3.value) !== l3.value ? ((v216)["value"] = v216) : l3.value);
2047                 return ((v218)[(v216).name] = v216);
2048             })();
2049         })();
2050     }));
2051     return l123;
2052 })();
2053 var l124 = {name: "FIND-SYMBOL"};
2054 var l125 = {name: "EXTERNAL", 'package': 'KEYWORD'};
2055 var l126 = {name: "INTERNAL", 'package': 'KEYWORD'};
2056 var l127 = {name: "INHERIT", 'package': 'KEYWORD'};
2057 (function(){
2058     (l124).fvalue = (function(v228){
2059         ((v228)["fname"] = "FIND-SYMBOL");
2060         return v228;
2061     })((function (values,v220,v221){
2062         checkArgsAtLeast(arguments, 2);
2063         checkArgsAtMost(arguments, 3);
2064         switch(arguments.length-1){
2065         case 1:
2066         v221=(function(){
2067             var symbol = l121;
2068             var value = symbol.value;
2069             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2070             return value;
2071         })();
2072         default: break;
2073         }
2074         return (function(){
2075             return (function(){
2076                 var v222 = l109.fvalue(pv, v221);
2077                 var v223 = l115.fvalue(pv, v222);
2078                 var v224 = l113.fvalue(pv, v222);
2079                 return ((((v220) in (v223))?l4.value: l3.value) !== l3.value ? values((function(){
2080                     var tmp = (v223)[v220];
2081                     return tmp == undefined? l3.value: tmp ;
2082                 })(), l125.value) : ((((v220) in (v224))?l4.value: l3.value) !== l3.value ? values((function(){
2083                     var tmp = (v224)[v220];
2084                     return tmp == undefined? l3.value: tmp ;
2085                 })(), l126.value) : (function(){
2086                     try {
2087                         return (function(v225,v226){
2088                             (function(){
2089                                 while(v225 !== l3.value){
2090                                     (v226 = (function(){
2091                                         var tmp = v225;
2092                                         return tmp === l3.value? l3.value: tmp.car;
2093                                     })());
2094                                     (function(){
2095                                         (function(v227){
2096                                             return ((((v220) in (v227))?l4.value: l3.value) !== l3.value ? (function(){
2097                                                 var values = mv;
2098                                                 throw ({type: 'block', id: 96, values: values((function(){
2099                                                     var tmp = (v227)[v220];
2100                                                     return tmp == undefined? l3.value: tmp ;
2101                                                 })(), l127.value), message: 'Return from unknown block NIL.'})
2102                                             })() : l3.value);
2103                                         })(l115.fvalue(pv, v226));
2104                                         return l3.value;
2105                                     })();
2106                                     (v225 = (function(){
2107                                         var tmp = v225;
2108                                         return tmp === l3.value? l3.value: tmp.cdr;
2109                                     })());
2110                                 }return l3.value;
2111                             })();
2112                             return values(l3.value, l3.value);
2113                         })(l114.fvalue(pv, v222),l3.value);
2114                     }
2115                     catch (cf){
2116                         if (cf.type == 'block' && cf.id == 96)
2117                             return values.apply(this, forcemv(cf.values));
2118                         else
2119                             throw cf;
2120                     }
2121                 })()));
2122             })();
2123         })();
2124     }));
2125     return l124;
2126 })();
2127 var l128 = {name: "INTERN"};
2128 var l129 = {name: "EXPORT"};
2129 (function(){
2130     (l128).fvalue = (function(v237){
2131         ((v237)["fname"] = "INTERN");
2132         return v237;
2133     })((function (values,v229,v230){
2134         checkArgsAtLeast(arguments, 2);
2135         checkArgsAtMost(arguments, 3);
2136         switch(arguments.length-1){
2137         case 1:
2138         v230=(function(){
2139             var symbol = l121;
2140             var value = symbol.value;
2141             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2142             return value;
2143         })();
2144         default: break;
2145         }
2146         return (function(){
2147             return (function(v231){
2148                 return (function(){
2149                     var func = (function (values,v233,v234){
2150                         switch(arguments.length-1){
2151                         case 0:
2152                         v233=l3.value;
2153                         case 1:
2154                         v234=l3.value;
2155                         default: break;
2156                         }
2157                         var v232= l3.value;
2158                         for (var i = arguments.length-1; i>=3; i--)
2159                             v232 = {car: arguments[i], cdr:
2160                         v232};
2161                         return (v234 !== l3.value ? values(v233, v234) : (function(v235){
2162                             (function(){
2163                                 var tmp = (v235)[v229];
2164                                 return tmp == undefined? l3.value: tmp ;
2165                             })();
2166                             return (function(v236){
2167                                 ((v236)["package"] = v231);
2168                                 (((v231 === (function(){
2169                                     var symbol = l118;
2170                                     var value = symbol.value;
2171                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2172                                     return value;
2173                                 })())?l4.value: l3.value) !== l3.value ? (function(){
2174                                     ((v236)["value"] = v236);
2175                                     return l129.fvalue(pv, l44.fvalue(pv, v236), v231);
2176                                 })() : l3.value);
2177                                 ((v235)[v229] = v236);
2178                                 return values(v236, l3.value);
2179                             })((function(){
2180                                 var name = v229;
2181                                 if (typeof name != 'string')
2182                                     throw 'The value ' + name + ' is not a type string.';
2183                                 return ({name: name});
2184                             })());
2185                         })(l113.fvalue(pv, v231)));
2186                     });
2187                     var args = [values];
2188                     return (function(){
2189                         var values = mv;
2190                         var vs;
2191                         vs = l124.fvalue(values, v229, v231);
2192                         if (typeof vs === 'object' && 'multiple-value' in vs)
2193                             args = args.concat(vs);
2194                         else
2195                             args.push(vs);
2196                         return func.apply(window, args);
2197                     })();
2198                 })();
2199             })(l109.fvalue(pv, v230));
2200         })();
2201     }));
2202     return l128;
2203 })();
2204 (function(){
2205     (l120).fvalue = (function(v239){
2206         ((v239)["fname"] = "SYMBOL-PACKAGE");
2207         return v239;
2208     })((function (values,v238){
2209         checkArgs(arguments, 2);
2210         return (function(){
2211             (((function(){
2212                 var tmp = v238;
2213                 return (typeof tmp == 'object' && 'name' in tmp);
2214             })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
2215                 throw "it is not a symbol";
2216             })());
2217             return (function(){
2218                 var tmp = (v238)["package"];
2219                 return tmp == undefined? l3.value: tmp ;
2220             })();
2221         })();
2222     }));
2223     return l120;
2224 })();
2225 (function(){
2226     (l129).fvalue = (function(v245){
2227         ((v245)["fname"] = "EXPORT");
2228         return v245;
2229     })((function (values,v240,v241){
2230         checkArgsAtLeast(arguments, 2);
2231         checkArgsAtMost(arguments, 3);
2232         switch(arguments.length-1){
2233         case 1:
2234         v241=(function(){
2235             var symbol = l121;
2236             var value = symbol.value;
2237             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2238             return value;
2239         })();
2240         default: break;
2241         }
2242         return (function(){
2243             return (function(v242){
2244                 return (function(){
2245                     return (function(v243,v244){
2246                         (function(){
2247                             while(v243 !== l3.value){
2248                                 (v244 = (function(){
2249                                     var tmp = v243;
2250                                     return tmp === l3.value? l3.value: tmp.car;
2251                                 })());
2252                                 (function(){
2253                                     ((v242)[(v244).name] = v244);
2254                                     return l3.value;
2255                                 })();
2256                                 (v243 = (function(){
2257                                     var tmp = v243;
2258                                     return tmp === l3.value? l3.value: tmp.cdr;
2259                                 })());
2260                             }return l3.value;
2261                         })();
2262                         return l4.value;
2263                     })(v240,l3.value);
2264                 })();
2265             })(l115.fvalue(pv, v241));
2266         })();
2267     }));
2268     return l129;
2269 })();
2270 var l130 = {name: "GET-UNIVERSAL-TIME"};
2271 (function(){
2272     (l130).fvalue = (function(v246){
2273         ((v246)["fname"] = "GET-UNIVERSAL-TIME");
2274         return v246;
2275     })((function (values){
2276         checkArgsAtMost(arguments, 1);
2277         return (function(){
2278             return (function(){
2279                 var x1 = (Math.round(new Date() / 1000));
2280                 if (typeof x1 !== 'number') throw 'Not a number!';
2281                 var x2 = 2208988800;
2282                 if (typeof x2 !== 'number') throw 'Not a number!';
2283                 return x1+x2;
2284             })();
2285         })();
2286     }));
2287     return l130;
2288 })();
2289 var l131 = {name: "*NEWLINE*"};
2290 (function(){
2291     (((l131.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l131).value = l96.fvalue(pv, l76.fvalue(pv, 10))));
2292     return l131;
2293 })();
2294 var l132 = {name: "CONCAT"};
2295 (function(){
2296     (l132).fvalue = (function(v248){
2297         ((v248)["fname"] = "CONCAT");
2298         return v248;
2299     })((function (values){
2300         var v247= l3.value;
2301         for (var i = arguments.length-1; i>=1; i--)
2302             v247 = {car: arguments[i], cdr:
2303         v247};
2304         return (function(){
2305             return l60.fvalue(values, (function(){
2306                 var symbol = l72;
2307                 var func = symbol.fvalue;
2308                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2309                 return func;
2310             })(), v247, "");
2311         })();
2312     }));
2313     return l132;
2314 })();
2315 var l133 = {name: "CONCATF"};
2316 l133;
2317 var l134 = {name: "JOIN"};
2318 (function(){
2319     (l134).fvalue = (function(v251){
2320         ((v251)["fname"] = "JOIN");
2321         return v251;
2322     })((function (values,v249,v250){
2323         checkArgsAtLeast(arguments, 2);
2324         checkArgsAtMost(arguments, 3);
2325         switch(arguments.length-1){
2326         case 1:
2327         v250="";
2328         default: break;
2329         }
2330         return (function(){
2331             return (l12.fvalue(pv, v249) !== l3.value ? "" : (l12.fvalue(pv, (function(){
2332                 var tmp = v249;
2333                 return tmp === l3.value? l3.value: tmp.cdr;
2334             })()) !== l3.value ? (function(){
2335                 var tmp = v249;
2336                 return tmp === l3.value? l3.value: tmp.car;
2337             })() : l132.fvalue(values, (function(){
2338                 var tmp = v249;
2339                 return tmp === l3.value? l3.value: tmp.car;
2340             })(), v250, l134.fvalue(pv, (function(){
2341                 var tmp = v249;
2342                 return tmp === l3.value? l3.value: tmp.cdr;
2343             })(), v250))));
2344         })();
2345     }));
2346     return l134;
2347 })();
2348 var l135 = {name: "JOIN-TRAILING"};
2349 (function(){
2350     (l135).fvalue = (function(v254){
2351         ((v254)["fname"] = "JOIN-TRAILING");
2352         return v254;
2353     })((function (values,v252,v253){
2354         checkArgsAtLeast(arguments, 2);
2355         checkArgsAtMost(arguments, 3);
2356         switch(arguments.length-1){
2357         case 1:
2358         v253="";
2359         default: break;
2360         }
2361         return (function(){
2362             return (l12.fvalue(pv, v252) !== l3.value ? "" : l132.fvalue(values, (function(){
2363                 var tmp = v252;
2364                 return tmp === l3.value? l3.value: tmp.car;
2365             })(), v253, l135.fvalue(pv, (function(){
2366                 var tmp = v252;
2367                 return tmp === l3.value? l3.value: tmp.cdr;
2368             })(), v253)));
2369         })();
2370     }));
2371     return l135;
2372 })();
2373 var l136 = {name: "MAPCONCAT"};
2374 (function(){
2375     (l136).fvalue = (function(v257){
2376         ((v257)["fname"] = "MAPCONCAT");
2377         return v257;
2378     })((function (values,v255,v256){
2379         checkArgs(arguments, 3);
2380         return (function(){
2381             return l134.fvalue(values, l73.fvalue(pv, v255, v256));
2382         })();
2383     }));
2384     return l136;
2385 })();
2386 var l137 = {name: "VECTOR-TO-LIST"};
2387 (function(){
2388     (l137).fvalue = (function(v263){
2389         ((v263)["fname"] = "VECTOR-TO-LIST");
2390         return v263;
2391     })((function (values,v258){
2392         checkArgs(arguments, 2);
2393         return (function(){
2394             return (function(v259,v260){
2395                 return (function(){
2396                     return (function(v261,v262){
2397                         (function(){
2398                             while((function(){
2399                                 var x1 = v261;
2400                                 if (typeof x1 !== 'number') throw 'Not a number!';
2401                                 var x2 = v262;
2402                                 if (typeof x2 !== 'number') throw 'Not a number!';
2403                                 return (x1<x2?l4.value: l3.value);
2404                             })() !== l3.value){
2405                                 (function(){
2406                                     (v259 = ({car: (function(){
2407                                         var x = (v258)[v261];
2408                                         if (x === undefined) throw 'Out of range';
2409                                         return x;
2410                                     })(), cdr: v259}));
2411                                     return l3.value;
2412                                 })();
2413                                 (v261 = (function(){
2414                                     var x1 = v261;
2415                                     if (typeof x1 !== 'number') throw 'Not a number!';
2416                                     var x2 = 1;
2417                                     if (typeof x2 !== 'number') throw 'Not a number!';
2418                                     return x1+x2;
2419                                 })());
2420                             }return l3.value;
2421                         })();
2422                         return l66.fvalue(values, v259);
2423                     })(0,v260);
2424                 })();
2425             })(l3.value,l71.fvalue(pv, v258));
2426         })();
2427     }));
2428     return l137;
2429 })();
2430 var l138 = {name: "LIST-TO-VECTOR"};
2431 (function(){
2432     (l138).fvalue = (function(v269){
2433         ((v269)["fname"] = "LIST-TO-VECTOR");
2434         return v269;
2435     })((function (values,v264){
2436         checkArgs(arguments, 2);
2437         return (function(){
2438             return (function(v265,v266){
2439                 return (function(){
2440                     return (function(v267,v268){
2441                         (function(){
2442                             while(v267 !== l3.value){
2443                                 (v268 = (function(){
2444                                     var tmp = v267;
2445                                     return tmp === l3.value? l3.value: tmp.car;
2446                                 })());
2447                                 (function(){
2448                                     (function(){
2449                                         var x = v265;
2450                                         var i = v266;
2451                                         if (i < 0 || i >= x.length) throw 'Out of range';
2452                                         return x[i] = v268;
2453                                     })();
2454                                     (v266 = (function(){
2455                                         var x1 = v266;
2456                                         if (typeof x1 !== 'number') throw 'Not a number!';
2457                                         var x2 = 1;
2458                                         if (typeof x2 !== 'number') throw 'Not a number!';
2459                                         return x1+x2;
2460                                     })());
2461                                     return l3.value;
2462                                 })();
2463                                 (v267 = (function(){
2464                                     var tmp = v267;
2465                                     return tmp === l3.value? l3.value: tmp.cdr;
2466                                 })());
2467                             }return l3.value;
2468                         })();
2469                         return v265;
2470                     })(v264,l3.value);
2471                 })();
2472             })((function(){
2473                 var r = [];
2474                 for (var i = 0; i < l71.fvalue(pv, v264); i++)
2475                     r.push(l3.value);
2476                 return r;
2477             })(),0);
2478         })();
2479     }));
2480     return l138;
2481 })();
2482 var l139 = {name: "VALUES-LIST"};
2483 (function(){
2484     (l139).fvalue = (function(v271){
2485         ((v271)["fname"] = "VALUES-LIST");
2486         return v271;
2487     })((function (values,v270){
2488         checkArgs(arguments, 2);
2489         return (function(){
2490             return values.apply(this, l138.fvalue(pv, v270));
2491         })();
2492     }));
2493     return l139;
2494 })();
2495 var l140 = {name: "VALUES"};
2496 (function(){
2497     (l140).fvalue = (function(v273){
2498         ((v273)["fname"] = "VALUES");
2499         return v273;
2500     })((function (values){
2501         var v272= l3.value;
2502         for (var i = arguments.length-1; i>=1; i--)
2503             v272 = {car: arguments[i], cdr:
2504         v272};
2505         return (function(){
2506             return l139.fvalue(values, v272);
2507         })();
2508     }));
2509     return l140;
2510 })();
2511 var l141 = {name: "INDENT"};
2512 (function(){
2513     (l141).fvalue = (function(v280){
2514         ((v280)["fname"] = "INDENT");
2515         return v280;
2516     })((function (values){
2517         var v274= l3.value;
2518         for (var i = arguments.length-1; i>=1; i--)
2519             v274 = {car: arguments[i], cdr:
2520         v274};
2521         return (function(){
2522             return (function(v275){
2523                 return (function(v276,v277,v278){
2524                     (l80.fvalue(pv, l71.fvalue(pv, v275)) !== l3.value ? (v276 = l132.fvalue(pv, v276, "    ")) : l3.value);
2525                     (function(){
2526                         return (function(){
2527                             while((function(){
2528                                 var x1 = v277;
2529                                 if (typeof x1 !== 'number') throw 'Not a number!';
2530                                 var x2 = v278;
2531                                 if (typeof x2 !== 'number') throw 'Not a number!';
2532                                 return (x1<x2?l4.value: l3.value);
2533                             })() !== l3.value){
2534                                 (function(v279){
2535                                     return (v276 = l132.fvalue(pv, v276, v279));
2536                                 })(((l78.fvalue(pv, (function(){
2537                                     var string = v275;
2538                                     var index = v277;
2539                                     if (typeof string != 'string')
2540                                         throw 'The value ' + string + ' is not a type string.';
2541                                     if (typeof index != 'number')
2542                                         throw 'The value ' + index + ' is not a type number.';
2543                                     return string.charCodeAt(index);
2544                                 })(), 10) !== l3.value ? ((function(){
2545                                     var x1 = v277;
2546                                     if (typeof x1 !== 'number') throw 'Not a number!';
2547                                     var x2 = l23.fvalue(pv, v278);
2548                                     if (typeof x2 !== 'number') throw 'Not a number!';
2549                                     return (x1<x2?l4.value: l3.value);
2550                                 })() !== l3.value ? l27.fvalue(pv, l78.fvalue(pv, (function(){
2551                                     var string = v275;
2552                                     var index = l22.fvalue(pv, v277);
2553                                     if (typeof string != 'string')
2554                                         throw 'The value ' + string + ' is not a type string.';
2555                                     if (typeof index != 'number')
2556                                         throw 'The value ' + index + ' is not a type number.';
2557                                     return string.charCodeAt(index);
2558                                 })(), 10)) : l3.value) : l3.value) !== l3.value ? l132.fvalue(pv, l96.fvalue(pv, 10), "    ") : l96.fvalue(pv, (function(){
2559                                     var string = v275;
2560                                     var index = v277;
2561                                     if (typeof string != 'string')
2562                                         throw 'The value ' + string + ' is not a type string.';
2563                                     if (typeof index != 'number')
2564                                         throw 'The value ' + index + ' is not a type number.';
2565                                     return string.charCodeAt(index);
2566                                 })())));
2567                                 (v277 = (function(){
2568                                     var x1 = v277;
2569                                     if (typeof x1 !== 'number') throw 'Not a number!';
2570                                     var x2 = 1;
2571                                     if (typeof x2 !== 'number') throw 'Not a number!';
2572                                     return x1+x2;
2573                                 })());
2574                             }return l3.value;
2575                         })();
2576                     })();
2577                     return v276;
2578                 })("",0,l71.fvalue(pv, v275));
2579             })(l134.fvalue(pv, v274));
2580         })();
2581     }));
2582     return l141;
2583 })();
2584 (function(){
2585     (l17).fvalue = (function(v284){
2586         ((v284)["fname"] = "INTEGER-TO-STRING");
2587         return v284;
2588     })((function (values,v281){
2589         checkArgs(arguments, 2);
2590         return (function(){
2591             return (l24.fvalue(pv, v281) !== l3.value ? "0" : (l81.fvalue(pv, v281) !== l3.value ? l132.fvalue(values, "-", l17.fvalue(pv, (function(){
2592                 var x1 = 0;
2593                 if (typeof x1 !== 'number') throw 'Not a number!';
2594                 var x2 = v281;
2595                 if (typeof x2 !== 'number') throw 'Not a number!';
2596                 return x1-x2;
2597             })())) : (function(v282){
2598                 (function(){
2599                     return (function(){
2600                         while(l27.fvalue(pv, l24.fvalue(pv, v281)) !== l3.value){
2601                             (v282 = ({car: (function(){
2602                                 var x = v281;
2603                                 var y = 10;
2604                                 if (typeof x != 'number')
2605                                     throw 'The value ' + x + ' is not a type number.';
2606                                 if (typeof y != 'number')
2607                                     throw 'The value ' + y + ' is not a type number.';
2608                                 return x%y;
2609                             })(), cdr: v282}));
2610                             (v281 = l25.fvalue(pv, v281, 10));
2611                         }return l3.value;
2612                     })();
2613                 })();
2614                 return l136.fvalue(values, (function (values,v283){
2615                     checkArgs(arguments, 2);
2616                     return l96.fvalue(values, l91.fvalue(pv, v283));
2617                 }), v282);
2618             })(l3.value)));
2619         })();
2620     }));
2621     return l17;
2622 })();
2623 var l142 = {name: "JS!BOOL"};
2624 var l143 = {name: "LS-COMPILE"};
2625 (function(){
2626     (l142).fvalue = (function(v286){
2627         ((v286)["fname"] = "JS!BOOL");
2628         return v286;
2629     })((function (values,v285){
2630         checkArgs(arguments, 2);
2631         return (function(){
2632             return l132.fvalue(values, "(", v285, "?", l143.fvalue(pv, l4.value), ": ", l143.fvalue(pv, l3.value), ")");
2633         })();
2634     }));
2635     return l142;
2636 })();
2637 var l144 = {name: "JS!SELFCALL"};
2638 l144;
2639 var l145 = {name: "PRIN1-TO-STRING"};
2640 var l146 = {name: "ESCAPE-STRING"};
2641 (function(){
2642     (l145).fvalue = (function(v295){
2643         ((v295)["fname"] = "PRIN1-TO-STRING");
2644         return v295;
2645     })((function (values,v287){
2646         checkArgs(arguments, 2);
2647         return (function(){
2648             return (((function(){
2649                 var tmp = v287;
2650                 return (typeof tmp == 'object' && 'name' in tmp);
2651             })()?l4.value: l3.value) !== l3.value ? (function(){
2652                 var func = (function (values,v289,v290){
2653                     switch(arguments.length-1){
2654                     case 0:
2655                     v289=l3.value;
2656                     case 1:
2657                     v290=l3.value;
2658                     default: break;
2659                     }
2660                     var v288= l3.value;
2661                     for (var i = arguments.length-1; i>=3; i--)
2662                         v288 = {car: arguments[i], cdr:
2663                     v288};
2664                     return ((v290 !== l3.value ? ((v289 === v287)?l4.value: l3.value) : l3.value) !== l3.value ? (v287).name : (function(v291,v292){
2665                         return l132.fvalue(values, (l12.fvalue(pv, v291) !== l3.value ? "#" : (((v291 === l111.fvalue(pv, "KEYWORD"))?l4.value: l3.value) !== l3.value ? "" : l112.fvalue(pv, v291))), ":", v292);
2666                     })(l120.fvalue(pv, v287),(v287).name));
2667                 });
2668                 var args = [values];
2669                 return (function(){
2670                     var values = mv;
2671                     var vs;
2672                     vs = l124.fvalue(values, (v287).name, (function(){
2673                         var symbol = l121;
2674                         var value = symbol.value;
2675                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2676                         return value;
2677                     })());
2678                     if (typeof vs === 'object' && 'multiple-value' in vs)
2679                         args = args.concat(vs);
2680                     else
2681                         args.push(vs);
2682                     return func.apply(window, args);
2683                 })();
2684             })() : (l79.fvalue(pv, v287) !== l3.value ? l17.fvalue(values, v287) : (((typeof(v287) == "string")?l4.value: l3.value) !== l3.value ? l132.fvalue(values, "\"", l146.fvalue(pv, v287), "\"") : (((typeof v287 == 'function')?l4.value: l3.value) !== l3.value ? (function(v293){
2685                 return (v293 !== l3.value ? l132.fvalue(values, "#<FUNCTION ", v293, ">") : l132.fvalue(values, "#<FUNCTION>"));
2686             })((function(){
2687                 var tmp = (v287)["fname"];
2688                 return tmp == undefined? l3.value: tmp ;
2689             })()) : (l59.fvalue(pv, v287) !== l3.value ? l132.fvalue(values, "(", l135.fvalue(pv, l73.fvalue(pv, (function(){
2690                 var symbol = l145;
2691                 var func = symbol.fvalue;
2692                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2693                 return func;
2694             })(), l85.fvalue(pv, v287)), " "), (function(v294){
2695                 return (l12.fvalue(pv, (function(){
2696                     var tmp = v294;
2697                     return tmp === l3.value? l3.value: tmp.cdr;
2698                 })()) !== l3.value ? l145.fvalue(pv, (function(){
2699                     var tmp = v294;
2700                     return tmp === l3.value? l3.value: tmp.car;
2701                 })()) : l132.fvalue(pv, l145.fvalue(pv, (function(){
2702                     var tmp = v294;
2703                     return tmp === l3.value? l3.value: tmp.car;
2704                 })()), " . ", l145.fvalue(pv, (function(){
2705                     var tmp = v294;
2706                     return tmp === l3.value? l3.value: tmp.cdr;
2707                 })())));
2708             })(l84.fvalue(pv, v287)), ")") : (((function(){
2709                 var x = v287;
2710                 return typeof x === 'object' && 'length' in x;
2711             })()?l4.value: l3.value) !== l3.value ? l132.fvalue(values, "#", l145.fvalue(pv, l137.fvalue(pv, v287))) : (l110.fvalue(pv, v287) !== l3.value ? l132.fvalue(values, "#<PACKAGE ", l112.fvalue(pv, v287), ">") : l3.value)))))));
2712         })();
2713     }));
2714     return l145;
2715 })();
2716 (function(){
2717     (l100).fvalue = (function(v297){
2718         ((v297)["fname"] = "WRITE-LINE");
2719         return v297;
2720     })((function (values,v296){
2721         checkArgs(arguments, 2);
2722         return (function(){
2723             (function(){
2724                 var x = v296;
2725                 if (typeof x != 'string')
2726                     throw 'The value ' + x + ' is not a type string.';
2727                 return lisp.write(x);
2728             })();
2729             (function(){
2730                 var x = (function(){
2731                     var symbol = l131;
2732                     var value = symbol.value;
2733                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2734                     return value;
2735                 })();
2736                 if (typeof x != 'string')
2737                     throw 'The value ' + x + ' is not a type string.';
2738                 return lisp.write(x);
2739             })();
2740             return v296;
2741         })();
2742     }));
2743     return l100;
2744 })();
2745 var l147 = {name: "WARN"};
2746 (function(){
2747     (l147).fvalue = (function(v299){
2748         ((v299)["fname"] = "WARN");
2749         return v299;
2750     })((function (values,v298){
2751         checkArgs(arguments, 2);
2752         return (function(){
2753             (function(){
2754                 var x = "WARNING: ";
2755                 if (typeof x != 'string')
2756                     throw 'The value ' + x + ' is not a type string.';
2757                 return lisp.write(x);
2758             })();
2759             return l100.fvalue(values, v298);
2760         })();
2761     }));
2762     return l147;
2763 })();
2764 var l148 = {name: "PRINT"};
2765 (function(){
2766     (l148).fvalue = (function(v301){
2767         ((v301)["fname"] = "PRINT");
2768         return v301;
2769     })((function (values,v300){
2770         checkArgs(arguments, 2);
2771         return (function(){
2772             l100.fvalue(pv, l145.fvalue(pv, v300));
2773             return v300;
2774         })();
2775     }));
2776     return l148;
2777 })();
2778 var l149 = {name: "MAKE-STRING-STREAM"};
2779 (function(){
2780     (l149).fvalue = (function(v303){
2781         ((v303)["fname"] = "MAKE-STRING-STREAM");
2782         return v303;
2783     })((function (values,v302){
2784         checkArgs(arguments, 2);
2785         return (function(){
2786             return ({car: v302, cdr: 0});
2787         })();
2788     }));
2789     return l149;
2790 })();
2791 var l150 = {name: "%PEEK-CHAR"};
2792 (function(){
2793     (l150).fvalue = (function(v305){
2794         ((v305)["fname"] = "%PEEK-CHAR");
2795         return v305;
2796     })((function (values,v304){
2797         checkArgs(arguments, 2);
2798         return (function(){
2799             return ((function(){
2800                 var x1 = (function(){
2801                     var tmp = v304;
2802                     return tmp === l3.value? l3.value: tmp.cdr;
2803                 })();
2804                 if (typeof x1 !== 'number') throw 'Not a number!';
2805                 var x2 = l71.fvalue(pv, (function(){
2806                     var tmp = v304;
2807                     return tmp === l3.value? l3.value: tmp.car;
2808                 })());
2809                 if (typeof x2 !== 'number') throw 'Not a number!';
2810                 return (x1<x2?l4.value: l3.value);
2811             })() !== l3.value ? (function(){
2812                 var string = (function(){
2813                     var tmp = v304;
2814                     return tmp === l3.value? l3.value: tmp.car;
2815                 })();
2816                 var index = (function(){
2817                     var tmp = v304;
2818                     return tmp === l3.value? l3.value: tmp.cdr;
2819                 })();
2820                 if (typeof string != 'string')
2821                     throw 'The value ' + string + ' is not a type string.';
2822                 if (typeof index != 'number')
2823                     throw 'The value ' + index + ' is not a type number.';
2824                 return string.charCodeAt(index);
2825             })() : l3.value);
2826         })();
2827     }));
2828     return l150;
2829 })();
2830 var l151 = {name: "%READ-CHAR"};
2831 (function(){
2832     (l151).fvalue = (function(v308){
2833         ((v308)["fname"] = "%READ-CHAR");
2834         return v308;
2835     })((function (values,v306){
2836         checkArgs(arguments, 2);
2837         return (function(){
2838             return ((function(){
2839                 var x1 = (function(){
2840                     var tmp = v306;
2841                     return tmp === l3.value? l3.value: tmp.cdr;
2842                 })();
2843                 if (typeof x1 !== 'number') throw 'Not a number!';
2844                 var x2 = l71.fvalue(pv, (function(){
2845                     var tmp = v306;
2846                     return tmp === l3.value? l3.value: tmp.car;
2847                 })());
2848                 if (typeof x2 !== 'number') throw 'Not a number!';
2849                 return (x1<x2?l4.value: l3.value);
2850             })() !== l3.value ? (function(v307){
2851                 (function(){
2852                     var x = v306;
2853                     if (typeof x != 'object')
2854                         throw 'The value ' + x + ' is not a type object.';
2855                     return (x.cdr = l22.fvalue(pv, (function(){
2856                         var tmp = v306;
2857                         return tmp === l3.value? l3.value: tmp.cdr;
2858                     })()), x);
2859                 })();
2860                 return v307;
2861             })((function(){
2862                 var string = (function(){
2863                     var tmp = v306;
2864                     return tmp === l3.value? l3.value: tmp.car;
2865                 })();
2866                 var index = (function(){
2867                     var tmp = v306;
2868                     return tmp === l3.value? l3.value: tmp.cdr;
2869                 })();
2870                 if (typeof string != 'string')
2871                     throw 'The value ' + string + ' is not a type string.';
2872                 if (typeof index != 'number')
2873                     throw 'The value ' + index + ' is not a type number.';
2874                 return string.charCodeAt(index);
2875             })()) : l3.value);
2876         })();
2877     }));
2878     return l151;
2879 })();
2880 var l152 = {name: "WHITESPACEP"};
2881 (function(){
2882     (l152).fvalue = (function(v312){
2883         ((v312)["fname"] = "WHITESPACEP");
2884         return v312;
2885     })((function (values,v309){
2886         checkArgs(arguments, 2);
2887         return (function(){
2888             return (function(v310){
2889                 return (v310 !== l3.value ? v310 : (function(v311){
2890                     return (v311 !== l3.value ? v311 : l78.fvalue(values, v309, 9));
2891                 })(l78.fvalue(pv, v309, 10)));
2892             })(l78.fvalue(pv, v309, 32));
2893         })();
2894     }));
2895     return l152;
2896 })();
2897 var l153 = {name: "SKIP-WHITESPACES"};
2898 (function(){
2899     (l153).fvalue = (function(v315){
2900         ((v315)["fname"] = "SKIP-WHITESPACES");
2901         return v315;
2902     })((function (values,v313){
2903         checkArgs(arguments, 2);
2904         return (function(){
2905             return (function(v314){
2906                 (v314 = l150.fvalue(pv, v313));
2907                 return (function(){
2908                     return (function(){
2909                         while((v314 !== l3.value ? l152.fvalue(pv, v314) : l3.value) !== l3.value){
2910                             l151.fvalue(pv, v313);
2911                             (v314 = l150.fvalue(pv, v313));
2912                         }return l3.value;
2913                     })();
2914                 })();
2915             })(l3.value);
2916         })();
2917     }));
2918     return l153;
2919 })();
2920 var l154 = {name: "TERMINALP"};
2921 (function(){
2922     (l154).fvalue = (function(v320){
2923         ((v320)["fname"] = "TERMINALP");
2924         return v320;
2925     })((function (values,v316){
2926         checkArgs(arguments, 2);
2927         return (function(){
2928             return (function(v317){
2929                 return (v317 !== l3.value ? v317 : (function(v318){
2930                     return (v318 !== l3.value ? v318 : (function(v319){
2931                         return (v319 !== l3.value ? v319 : l78.fvalue(values, 40, v316));
2932                     })(l78.fvalue(pv, 41, v316)));
2933                 })(l152.fvalue(pv, v316)));
2934             })(l12.fvalue(pv, v316));
2935         })();
2936     }));
2937     return l154;
2938 })();
2939 var l155 = {name: "READ-UNTIL"};
2940 (function(){
2941     (l155).fvalue = (function(v325){
2942         ((v325)["fname"] = "READ-UNTIL");
2943         return v325;
2944     })((function (values,v321,v322){
2945         checkArgs(arguments, 3);
2946         return (function(){
2947             return (function(v323,v324){
2948                 (v324 = l150.fvalue(pv, v321));
2949                 (function(){
2950                     return (function(){
2951                         while((v324 !== l3.value ? l27.fvalue(pv, (v322)(pv, v324)) : l3.value) !== l3.value){
2952                             (v323 = l132.fvalue(pv, v323, l96.fvalue(pv, v324)));
2953                             l151.fvalue(pv, v321);
2954                             (v324 = l150.fvalue(pv, v321));
2955                         }return l3.value;
2956                     })();
2957                 })();
2958                 return v323;
2959             })("",l3.value);
2960         })();
2961     }));
2962     return l155;
2963 })();
2964 var l156 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
2965 (function(){
2966     (l156).fvalue = (function(v329){
2967         ((v329)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
2968         return v329;
2969     })((function (values,v326){
2970         checkArgs(arguments, 2);
2971         return (function(){
2972             return (function(v327){
2973                 l153.fvalue(pv, v326);
2974                 (v327 = l150.fvalue(pv, v326));
2975                 return (function(){
2976                     return (function(){
2977                         while((v327 !== l3.value ? l78.fvalue(pv, v327, 59) : l3.value) !== l3.value){
2978                             l155.fvalue(pv, v326, (function (values,v328){
2979                                 checkArgs(arguments, 2);
2980                                 return l78.fvalue(values, v328, 10);
2981                             }));
2982                             l153.fvalue(pv, v326);
2983                             (v327 = l150.fvalue(pv, v326));
2984                         }return l3.value;
2985                     })();
2986                 })();
2987             })(l3.value);
2988         })();
2989     }));
2990     return l156;
2991 })();
2992 var l157 = {name: "%READ-LIST"};
2993 var l158 = {name: "LS-READ"};
2994 (function(){
2995     (l157).fvalue = (function(v333){
2996         ((v333)["fname"] = "%READ-LIST");
2997         return v333;
2998     })((function (values,v330){
2999         checkArgs(arguments, 2);
3000         return (function(){
3001             l156.fvalue(pv, v330);
3002             return (function(v331){
3003                 return (l12.fvalue(pv, v331) !== l3.value ? (function(){
3004                     throw "Unspected EOF";
3005                 })() : (l78.fvalue(pv, v331, 41) !== l3.value ? (function(){
3006                     l151.fvalue(pv, v330);
3007                     return l3.value;
3008                 })() : (l78.fvalue(pv, v331, 46) !== l3.value ? (function(){
3009                     l151.fvalue(pv, v330);
3010                     return (function(v332){
3011                         l156.fvalue(pv, v330);
3012                         (l78.fvalue(pv, l151.fvalue(pv, v330), 41) !== l3.value ? l3.value : (function(){
3013                             throw "')' was expected.";
3014                         })());
3015                         return v332;
3016                     })(l158.fvalue(pv, v330));
3017                 })() : ({car: l158.fvalue(pv, v330), cdr: l157.fvalue(pv, v330)}))));
3018             })(l150.fvalue(pv, v330));
3019         })();
3020     }));
3021     return l157;
3022 })();
3023 var l159 = {name: "READ-STRING"};
3024 (function(){
3025     (l159).fvalue = (function(v337){
3026         ((v337)["fname"] = "READ-STRING");
3027         return v337;
3028     })((function (values,v334){
3029         checkArgs(arguments, 2);
3030         return (function(){
3031             return (function(v335,v336){
3032                 (v336 = l151.fvalue(pv, v334));
3033                 (function(){
3034                     return (function(){
3035                         while(l27.fvalue(pv, l26.fvalue(pv, v336, 34)) !== l3.value){
3036                             (l12.fvalue(pv, v336) !== l3.value ? (function(){
3037                                 throw "Unexpected EOF";
3038                             })() : l3.value);
3039                             (l26.fvalue(pv, v336, 92) !== l3.value ? (v336 = l151.fvalue(pv, v334)) : l3.value);
3040                             (v335 = l132.fvalue(pv, v335, l96.fvalue(pv, v336)));
3041                             (v336 = l151.fvalue(pv, v334));
3042                         }return l3.value;
3043                     })();
3044                 })();
3045                 return v335;
3046             })("",l3.value);
3047         })();
3048     }));
3049     return l159;
3050 })();
3051 var l160 = {name: "READ-SHARP"};
3052 (function(){
3053     (l160).fvalue = (function(v342){
3054         ((v342)["fname"] = "READ-SHARP");
3055         return v342;
3056     })((function (values,v338){
3057         checkArgs(arguments, 2);
3058         return (function(){
3059             l151.fvalue(pv, v338);
3060             return (function(v339){
3061                 return (l26.fvalue(pv, v339, 39) !== l3.value ? l44.fvalue(values, l102, l158.fvalue(pv, v338)) : (l26.fvalue(pv, v339, 40) !== l3.value ? l138.fvalue(values, l157.fvalue(pv, v338)) : (l26.fvalue(pv, v339, 58) !== l3.value ? (function(){
3062                     var name = (function(){
3063                         var x = l155.fvalue(pv, v338, (function(){
3064                             var symbol = l154;
3065                             var func = symbol.fvalue;
3066                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3067                             return func;
3068                         })());
3069                         if (typeof x != 'string')
3070                             throw 'The value ' + x + ' is not a type string.';
3071                         return x.toUpperCase();
3072                     })();
3073                     if (typeof name != 'string')
3074                         throw 'The value ' + name + ' is not a type string.';
3075                     return ({name: name});
3076                 })() : (l26.fvalue(pv, v339, 92) !== l3.value ? (function(v340){
3077                     return (l97.fvalue(pv, v340, "space") !== l3.value ? l77.fvalue(values, 32) : (l97.fvalue(pv, v340, "tab") !== l3.value ? l77.fvalue(values, 9) : (l97.fvalue(pv, v340, "newline") !== l3.value ? l77.fvalue(values, 10) : l77.fvalue(values, (function(){
3078                         var string = v340;
3079                         var index = 0;
3080                         if (typeof string != 'string')
3081                             throw 'The value ' + string + ' is not a type string.';
3082                         if (typeof index != 'number')
3083                             throw 'The value ' + index + ' is not a type number.';
3084                         return string.charCodeAt(index);
3085                     })()))));
3086                 })(l132.fvalue(pv, l96.fvalue(pv, l151.fvalue(pv, v338)), l155.fvalue(pv, v338, (function(){
3087                     var symbol = l154;
3088                     var func = symbol.fvalue;
3089                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3090                     return func;
3091                 })()))) : (l26.fvalue(pv, v339, 43) !== l3.value ? (function(v341){
3092                     return (l97.fvalue(pv, v341, "common-lisp") !== l3.value ? (function(){
3093                         l158.fvalue(pv, v338);
3094                         return l158.fvalue(values, v338);
3095                     })() : (l97.fvalue(pv, v341, "ecmalisp") !== l3.value ? l158.fvalue(values, v338) : (function(){
3096                         throw "Unknown reader form.";
3097                     })()));
3098                 })(l155.fvalue(pv, v338, (function(){
3099                     var symbol = l154;
3100                     var func = symbol.fvalue;
3101                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3102                     return func;
3103                 })())) : (function(){
3104                     throw "ECASE expression failed.";
3105                 })())))));
3106             })(l151.fvalue(pv, v338));
3107         })();
3108     }));
3109     return l160;
3110 })();
3111 var l161 = {name: "READ-SYMBOL"};
3112 (function(){
3113     (l161).fvalue = (function(v350){
3114         ((v350)["fname"] = "READ-SYMBOL");
3115         return v350;
3116     })((function (values,v343){
3117         checkArgs(arguments, 2);
3118         return (function(){
3119             return (function(v344,v345,v346,v347,v348){
3120                 (v348 = 0);
3121                 (function(){
3122                     return (function(){
3123                         while(((function(){
3124                             var x1 = v348;
3125                             if (typeof x1 !== 'number') throw 'Not a number!';
3126                             var x2 = v344;
3127                             if (typeof x2 !== 'number') throw 'Not a number!';
3128                             return (x1<x2?l4.value: l3.value);
3129                         })() !== l3.value ? l27.fvalue(pv, l78.fvalue(pv, (function(){
3130                             var string = v343;
3131                             var index = v348;
3132                             if (typeof string != 'string')
3133                                 throw 'The value ' + string + ' is not a type string.';
3134                             if (typeof index != 'number')
3135                                 throw 'The value ' + index + ' is not a type number.';
3136                             return string.charCodeAt(index);
3137                         })(), 58)) : l3.value) !== l3.value){
3138                             (v348 = (function(){
3139                                 var x1 = v348;
3140                                 if (typeof x1 !== 'number') throw 'Not a number!';
3141                                 var x2 = 1;
3142                                 if (typeof x2 !== 'number') throw 'Not a number!';
3143                                 return x1+x2;
3144                             })());
3145                         }return l3.value;
3146                     })();
3147                 })();
3148                 ((function(){
3149                     var x1 = v348;
3150                     if (typeof x1 !== 'number') throw 'Not a number!';
3151                     var x2 = v344;
3152                     if (typeof x2 !== 'number') throw 'Not a number!';
3153                     return (x1==x2?l4.value: l3.value);
3154                 })() !== l3.value ? (function(){
3155                     (v346 = v343);
3156                     (v345 = (function(){
3157                         var symbol = l121;
3158                         var value = symbol.value;
3159                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3160                         return value;
3161                     })());
3162                     return (v347 = l4.value);
3163                 })() : (function(){
3164                     (l24.fvalue(pv, v348) !== l3.value ? (v345 = "KEYWORD") : (v345 = (function(){
3165                         var x = l92.fvalue(pv, v343, 0, v348);
3166                         if (typeof x != 'string')
3167                             throw 'The value ' + x + ' is not a type string.';
3168                         return x.toUpperCase();
3169                     })()));
3170                     (v348 = (function(){
3171                         var x1 = v348;
3172                         if (typeof x1 !== 'number') throw 'Not a number!';
3173                         var x2 = 1;
3174                         if (typeof x2 !== 'number') throw 'Not a number!';
3175                         return x1+x2;
3176                     })());
3177                     (l78.fvalue(pv, (function(){
3178                         var string = v343;
3179                         var index = v348;
3180                         if (typeof string != 'string')
3181                             throw 'The value ' + string + ' is not a type string.';
3182                         if (typeof index != 'number')
3183                             throw 'The value ' + index + ' is not a type number.';
3184                         return string.charCodeAt(index);
3185                     })(), 58) !== l3.value ? (function(){
3186                         (v347 = l4.value);
3187                         return (v348 = (function(){
3188                             var x1 = v348;
3189                             if (typeof x1 !== 'number') throw 'Not a number!';
3190                             var x2 = 1;
3191                             if (typeof x2 !== 'number') throw 'Not a number!';
3192                             return x1+x2;
3193                         })());
3194                     })() : l3.value);
3195                     return (v346 = l92.fvalue(pv, v343, v348));
3196                 })());
3197                 (v346 = (function(){
3198                     var x = v346;
3199                     if (typeof x != 'string')
3200                         throw 'The value ' + x + ' is not a type string.';
3201                     return x.toUpperCase();
3202                 })());
3203                 (v345 = l111.fvalue(pv, v345));
3204                 return ((function(v349){
3205                     return (v349 !== l3.value ? v349 : ((v345 === l111.fvalue(pv, "KEYWORD"))?l4.value: l3.value));
3206                 })(v347) !== l3.value ? l128.fvalue(values, v346, v345) : l124.fvalue(values, v346, v345));
3207             })(l71.fvalue(pv, v343),l3.value,l3.value,l3.value,l3.value);
3208         })();
3209     }));
3210     return l161;
3211 })();
3212 var l162 = {name: "!PARSE-INTEGER"};
3213 (function(){
3214     (l162).fvalue = (function(v361){
3215         ((v361)["fname"] = "!PARSE-INTEGER");
3216         return v361;
3217     })((function (values,v351,v352){
3218         checkArgs(arguments, 3);
3219         return (function(){
3220             return (function(){
3221                 try {
3222                     return (function(v353,v354,v355,v356){
3223                         (l24.fvalue(pv, v355) !== l3.value ? (function(){
3224                             var values = mv;
3225                             throw ({type: 'block', id: 139, values: values(l3.value, 0), message: 'Return from unknown block NIL.'})
3226                         })() : l3.value);
3227                         (function(v357){
3228                             return (l26.fvalue(pv, v357, 43) !== l3.value ? (v354 = (function(){
3229                                 var x1 = v354;
3230                                 if (typeof x1 !== 'number') throw 'Not a number!';
3231                                 var x2 = 1;
3232                                 if (typeof x2 !== 'number') throw 'Not a number!';
3233                                 return x1+x2;
3234                             })()) : (l26.fvalue(pv, v357, 45) !== l3.value ? (function(){
3235                                 (v356 = -1);
3236                                 return (v354 = (function(){
3237                                     var x1 = v354;
3238                                     if (typeof x1 !== 'number') throw 'Not a number!';
3239                                     var x2 = 1;
3240                                     if (typeof x2 !== 'number') throw 'Not a number!';
3241                                     return x1+x2;
3242                                 })());
3243                             })() : l3.value));
3244                         })((function(){
3245                             var string = v351;
3246                             var index = 0;
3247                             if (typeof string != 'string')
3248                                 throw 'The value ' + string + ' is not a type string.';
3249                             if (typeof index != 'number')
3250                                 throw 'The value ' + index + ' is not a type number.';
3251                             return string.charCodeAt(index);
3252                         })());
3253                         (((function(){
3254                             var x1 = v354;
3255                             if (typeof x1 !== 'number') throw 'Not a number!';
3256                             var x2 = v355;
3257                             if (typeof x2 !== 'number') throw 'Not a number!';
3258                             return (x1<x2?l4.value: l3.value);
3259                         })() !== l3.value ? (v353 = l90.fvalue(pv, (function(){
3260                             var string = v351;
3261                             var index = v354;
3262                             if (typeof string != 'string')
3263                                 throw 'The value ' + string + ' is not a type string.';
3264                             if (typeof index != 'number')
3265                                 throw 'The value ' + index + ' is not a type number.';
3266                             return string.charCodeAt(index);
3267                         })())) : l3.value) !== l3.value ? l3.value : (function(){
3268                             var values = mv;
3269                             throw ({type: 'block', id: 139, values: values(l3.value, v354), message: 'Return from unknown block NIL.'})
3270                         })());
3271                         (v354 = (function(){
3272                             var x1 = v354;
3273                             if (typeof x1 !== 'number') throw 'Not a number!';
3274                             var x2 = 1;
3275                             if (typeof x2 !== 'number') throw 'Not a number!';
3276                             return x1+x2;
3277                         })());
3278                         (function(){
3279                             try {
3280                                 return (function(){
3281                                     while((function(){
3282                                         var x1 = v354;
3283                                         if (typeof x1 !== 'number') throw 'Not a number!';
3284                                         var x2 = v355;
3285                                         if (typeof x2 !== 'number') throw 'Not a number!';
3286                                         return (x1<x2?l4.value: l3.value);
3287                                     })() !== l3.value){
3288                                         (function(v358){
3289                                             (v358 !== l3.value ? l3.value : (function(){
3290                                                 throw ({type: 'block', id: 140, values: l3.value, message: 'Return from unknown block NIL.'})
3291                                             })());
3292                                             (v353 = (function(){
3293                                                 var x1 = (function(){
3294                                                     var x1 = v353;
3295                                                     if (typeof x1 !== 'number') throw 'Not a number!';
3296                                                     var x2 = 10;
3297                                                     if (typeof x2 !== 'number') throw 'Not a number!';
3298                                                     return x1*x2;
3299                                                 })();
3300                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3301                                                 var x2 = v358;
3302                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3303                                                 return x1+x2;
3304                                             })());
3305                                             return (v354 = (function(){
3306                                                 var x1 = v354;
3307                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3308                                                 var x2 = 1;
3309                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3310                                                 return x1+x2;
3311                                             })());
3312                                         })(l90.fvalue(pv, (function(){
3313                                             var string = v351;
3314                                             var index = v354;
3315                                             if (typeof string != 'string')
3316                                                 throw 'The value ' + string + ' is not a type string.';
3317                                             if (typeof index != 'number')
3318                                                 throw 'The value ' + index + ' is not a type number.';
3319                                             return string.charCodeAt(index);
3320                                         })()));
3321                                     }return l3.value;
3322                                 })();
3323                             }
3324                             catch (cf){
3325                                 if (cf.type == 'block' && cf.id == 140)
3326                                     return cf.values;
3327                                 else
3328                                     throw cf;
3329                             }
3330                         })();
3331                         return ((function(v359){
3332                             return (v359 !== l3.value ? v359 : (function(v360){
3333                                 return (v360 !== l3.value ? v360 : l78.fvalue(pv, (function(){
3334                                     var string = v351;
3335                                     var index = v354;
3336                                     if (typeof string != 'string')
3337                                         throw 'The value ' + string + ' is not a type string.';
3338                                     if (typeof index != 'number')
3339                                         throw 'The value ' + index + ' is not a type number.';
3340                                     return string.charCodeAt(index);
3341                                 })(), 32));
3342                             })((function(){
3343                                 var x1 = v354;
3344                                 if (typeof x1 !== 'number') throw 'Not a number!';
3345                                 var x2 = v355;
3346                                 if (typeof x2 !== 'number') throw 'Not a number!';
3347                                 return (x1==x2?l4.value: l3.value);
3348                             })()));
3349                         })(v352) !== l3.value ? values((function(){
3350                             var x1 = v356;
3351                             if (typeof x1 !== 'number') throw 'Not a number!';
3352                             var x2 = v353;
3353                             if (typeof x2 !== 'number') throw 'Not a number!';
3354                             return x1*x2;
3355                         })(), v354) : values(l3.value, v354));
3356                     })(0,0,l71.fvalue(pv, v351),1);
3357                 }
3358                 catch (cf){
3359                     if (cf.type == 'block' && cf.id == 139)
3360                         return values.apply(this, forcemv(cf.values));
3361                     else
3362                         throw cf;
3363                 }
3364             })();
3365         })();
3366     }));
3367     return l162;
3368 })();
3369 var l163 = {name: "PARSE-INTEGER"};
3370 (function(){
3371     (l163).fvalue = (function(v363){
3372         ((v363)["fname"] = "PARSE-INTEGER");
3373         return v363;
3374     })((function (values,v362){
3375         checkArgs(arguments, 2);
3376         return (function(){
3377             return l162.fvalue(values, v362, l3.value);
3378         })();
3379     }));
3380     return l163;
3381 })();
3382 var l164 = {name: "*EOF*"};
3383 (function(){
3384     (((l164.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l164).value = l16.fvalue(pv)));
3385     return l164;
3386 })();
3387 var l165 = {name: "QUOTE"};
3388 var l166 = {name: "BACKQUOTE"};
3389 var l167 = {name: "UNQUOTE-SPLICING"};
3390 var l168 = {name: "UNQUOTE"};
3391 (function(){
3392     (l158).fvalue = (function(v369){
3393         ((v369)["fname"] = "LS-READ");
3394         return v369;
3395     })((function (values,v364){
3396         checkArgs(arguments, 2);
3397         return (function(){
3398             l156.fvalue(pv, v364);
3399             return (function(v365){
3400                 return ((function(v366){
3401                     return (v366 !== l3.value ? v366 : l78.fvalue(pv, v365, 41));
3402                 })(l12.fvalue(pv, v365)) !== l3.value ? (function(){
3403                     var symbol = l164;
3404                     var value = symbol.value;
3405                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3406                     return value;
3407                 })() : (l78.fvalue(pv, v365, 40) !== l3.value ? (function(){
3408                     l151.fvalue(pv, v364);
3409                     return l157.fvalue(values, v364);
3410                 })() : (l78.fvalue(pv, v365, 39) !== l3.value ? (function(){
3411                     l151.fvalue(pv, v364);
3412                     return l44.fvalue(values, l165, l158.fvalue(pv, v364));
3413                 })() : (l78.fvalue(pv, v365, 96) !== l3.value ? (function(){
3414                     l151.fvalue(pv, v364);
3415                     return l44.fvalue(values, l166, l158.fvalue(pv, v364));
3416                 })() : (l78.fvalue(pv, v365, 34) !== l3.value ? (function(){
3417                     l151.fvalue(pv, v364);
3418                     return l159.fvalue(values, v364);
3419                 })() : (l78.fvalue(pv, v365, 44) !== l3.value ? (function(){
3420                     l151.fvalue(pv, v364);
3421                     return (l26.fvalue(pv, l150.fvalue(pv, v364), 64) !== l3.value ? (function(){
3422                         l151.fvalue(pv, v364);
3423                         return l44.fvalue(values, l167, l158.fvalue(pv, v364));
3424                     })() : l44.fvalue(values, l168, l158.fvalue(pv, v364)));
3425                 })() : (l78.fvalue(pv, v365, 35) !== l3.value ? l160.fvalue(values, v364) : (function(v367){
3426                     return (function(v368){
3427                         return (v368 !== l3.value ? v368 : l161.fvalue(values, v367));
3428                     })(pv(l162.fvalue(pv, v367, l3.value)));
3429                 })(l155.fvalue(pv, v364, (function(){
3430                     var symbol = l154;
3431                     var func = symbol.fvalue;
3432                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3433                     return func;
3434                 })())))))))));
3435             })(l150.fvalue(pv, v364));
3436         })();
3437     }));
3438     return l158;
3439 })();
3440 var l169 = {name: "LS-READ-FROM-STRING"};
3441 (function(){
3442     (l169).fvalue = (function(v371){
3443         ((v371)["fname"] = "LS-READ-FROM-STRING");
3444         return v371;
3445     })((function (values,v370){
3446         checkArgs(arguments, 2);
3447         return (function(){
3448             return l158.fvalue(values, l149.fvalue(pv, v370));
3449         })();
3450     }));
3451     return l169;
3452 })();
3453 var l170 = {name: "*MULTIPLE-VALUE-P*"};
3454 (function(){
3455     (((l170.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l170).value = l3.value));
3456     return l170;
3457 })();
3458 var l171 = {name: "MAKE-BINDING"};
3459 (function(){
3460     (l171).fvalue = (function(v376){
3461         ((v376)["fname"] = "MAKE-BINDING");
3462         return v376;
3463     })((function (values,v372,v373,v374,v375){
3464         checkArgsAtLeast(arguments, 4);
3465         checkArgsAtMost(arguments, 5);
3466         switch(arguments.length-1){
3467         case 3:
3468         v375=l3.value;
3469         default: break;
3470         }
3471         return (function(){
3472             return l44.fvalue(values, v372, v373, v374, v375);
3473         })();
3474     }));
3475     return l171;
3476 })();
3477 var l172 = {name: "BINDING-NAME"};
3478 (function(){
3479     (l172).fvalue = (function(v378){
3480         ((v378)["fname"] = "BINDING-NAME");
3481         return v378;
3482     })((function (values,v377){
3483         checkArgs(arguments, 2);
3484         return (function(){
3485             return l39.fvalue(values, v377);
3486         })();
3487     }));
3488     return l172;
3489 })();
3490 var l173 = {name: "BINDING-TYPE"};
3491 (function(){
3492     (l173).fvalue = (function(v380){
3493         ((v380)["fname"] = "BINDING-TYPE");
3494         return v380;
3495     })((function (values,v379){
3496         checkArgs(arguments, 2);
3497         return (function(){
3498             return l40.fvalue(values, v379);
3499         })();
3500     }));
3501     return l173;
3502 })();
3503 var l174 = {name: "BINDING-VALUE"};
3504 (function(){
3505     (l174).fvalue = (function(v382){
3506         ((v382)["fname"] = "BINDING-VALUE");
3507         return v382;
3508     })((function (values,v381){
3509         checkArgs(arguments, 2);
3510         return (function(){
3511             return l41.fvalue(values, v381);
3512         })();
3513     }));
3514     return l174;
3515 })();
3516 var l175 = {name: "BINDING-DECLARATIONS"};
3517 (function(){
3518     (l175).fvalue = (function(v384){
3519         ((v384)["fname"] = "BINDING-DECLARATIONS");
3520         return v384;
3521     })((function (values,v383){
3522         checkArgs(arguments, 2);
3523         return (function(){
3524             return l42.fvalue(values, v383);
3525         })();
3526     }));
3527     return l175;
3528 })();
3529 var l176 = {name: "SET-BINDING-VALUE"};
3530 (function(){
3531     (l176).fvalue = (function(v387){
3532         ((v387)["fname"] = "SET-BINDING-VALUE");
3533         return v387;
3534     })((function (values,v385,v386){
3535         checkArgs(arguments, 3);
3536         return (function(){
3537             return (function(){
3538                 var x = l35.fvalue(pv, v385);
3539                 if (typeof x != 'object')
3540                     throw 'The value ' + x + ' is not a type object.';
3541                 return (x.car = v386, x);
3542             })();
3543         })();
3544     }));
3545     return l176;
3546 })();
3547 var l177 = {name: "SET-BINDING-DECLARATIONS"};
3548 (function(){
3549     (l177).fvalue = (function(v390){
3550         ((v390)["fname"] = "SET-BINDING-DECLARATIONS");
3551         return v390;
3552     })((function (values,v388,v389){
3553         checkArgs(arguments, 3);
3554         return (function(){
3555             return (function(){
3556                 var x = l37.fvalue(pv, v388);
3557                 if (typeof x != 'object')
3558                     throw 'The value ' + x + ' is not a type object.';
3559                 return (x.car = v389, x);
3560             })();
3561         })();
3562     }));
3563     return l177;
3564 })();
3565 var l178 = {name: "PUSH-BINDING-DECLARATION"};
3566 (function(){
3567     (l178).fvalue = (function(v393){
3568         ((v393)["fname"] = "PUSH-BINDING-DECLARATION");
3569         return v393;
3570     })((function (values,v391,v392){
3571         checkArgs(arguments, 3);
3572         return (function(){
3573             return l177.fvalue(values, v392, ({car: v391, cdr: l175.fvalue(pv, v392)}));
3574         })();
3575     }));
3576     return l178;
3577 })();
3578 var l179 = {name: "MAKE-LEXENV"};
3579 (function(){
3580     (l179).fvalue = (function(v394){
3581         ((v394)["fname"] = "MAKE-LEXENV");
3582         return v394;
3583     })((function (values){
3584         checkArgsAtMost(arguments, 1);
3585         return (function(){
3586             return l44.fvalue(values, l3.value, l3.value, l3.value, l3.value);
3587         })();
3588     }));
3589     return l179;
3590 })();
3591 var l180 = {name: "COPY-LEXENV"};
3592 (function(){
3593     (l180).fvalue = (function(v396){
3594         ((v396)["fname"] = "COPY-LEXENV");
3595         return v396;
3596     })((function (values,v395){
3597         checkArgs(arguments, 2);
3598         return (function(){
3599             return l75.fvalue(values, v395);
3600         })();
3601     }));
3602     return l180;
3603 })();
3604 var l181 = {name: "PUSH-TO-LEXENV"};
3605 var l182 = {name: "BLOCK"};
3606 var l183 = {name: "GOTAG"};
3607 (function(){
3608     (l181).fvalue = (function(v401){
3609         ((v401)["fname"] = "PUSH-TO-LEXENV");
3610         return v401;
3611     })((function (values,v397,v398,v399){
3612         checkArgs(arguments, 4);
3613         return (function(){
3614             return (function(v400){
3615                 return (l26.fvalue(pv, v400, l103) !== l3.value ? (function(){
3616                     var x = v398;
3617                     if (typeof x != 'object')
3618                         throw 'The value ' + x + ' is not a type object.';
3619                     return (x.car = ({car: v397, cdr: (function(){
3620                         var tmp = v398;
3621                         return tmp === l3.value? l3.value: tmp.car;
3622                     })()}), x);
3623                 })() : (l26.fvalue(pv, v400, l102) !== l3.value ? (function(){
3624                     var x = (function(){
3625                         var tmp = v398;
3626                         return tmp === l3.value? l3.value: tmp.cdr;
3627                     })();
3628                     if (typeof x != 'object')
3629                         throw 'The value ' + x + ' is not a type object.';
3630                     return (x.car = ({car: v397, cdr: l33.fvalue(pv, v398)}), x);
3631                 })() : (l26.fvalue(pv, v400, l182) !== l3.value ? (function(){
3632                     var x = l35.fvalue(pv, v398);
3633                     if (typeof x != 'object')
3634                         throw 'The value ' + x + ' is not a type object.';
3635                     return (x.car = ({car: v397, cdr: l36.fvalue(pv, v398)}), x);
3636                 })() : (l26.fvalue(pv, v400, l183) !== l3.value ? (function(){
3637                     var x = l37.fvalue(pv, v398);
3638                     if (typeof x != 'object')
3639                         throw 'The value ' + x + ' is not a type object.';
3640                     return (x.car = ({car: v397, cdr: l38.fvalue(pv, v398)}), x);
3641                 })() : (function(){
3642                     throw "ECASE expression failed.";
3643                 })()))));
3644             })(v399);
3645         })();
3646     }));
3647     return l181;
3648 })();
3649 var l184 = {name: "EXTEND-LEXENV"};
3650 (function(){
3651     (l184).fvalue = (function(v408){
3652         ((v408)["fname"] = "EXTEND-LEXENV");
3653         return v408;
3654     })((function (values,v402,v403,v404){
3655         checkArgs(arguments, 4);
3656         return (function(){
3657             return (function(v405){
3658                 return (function(){
3659                     return (function(v406,v407){
3660                         (function(){
3661                             while(v406 !== l3.value){
3662                                 (v407 = (function(){
3663                                     var tmp = v406;
3664                                     return tmp === l3.value? l3.value: tmp.car;
3665                                 })());
3666                                 (function(){
3667                                     l181.fvalue(pv, v407, v405, v404);
3668                                     return l3.value;
3669                                 })();
3670                                 (v406 = (function(){
3671                                     var tmp = v406;
3672                                     return tmp === l3.value? l3.value: tmp.cdr;
3673                                 })());
3674                             }return l3.value;
3675                         })();
3676                         return v405;
3677                     })(l66.fvalue(pv, v402),l3.value);
3678                 })();
3679             })(l180.fvalue(pv, v403));
3680         })();
3681     }));
3682     return l184;
3683 })();
3684 var l185 = {name: "LOOKUP-IN-LEXENV"};
3685 (function(){
3686     (l185).fvalue = (function(v413){
3687         ((v413)["fname"] = "LOOKUP-IN-LEXENV");
3688         return v413;
3689     })((function (values,v409,v410,v411){
3690         checkArgs(arguments, 4);
3691         return (function(){
3692             return l95.fvalue(values, v409, (function(v412){
3693                 return (l26.fvalue(pv, v412, l103) !== l3.value ? l39.fvalue(pv, v410) : (l26.fvalue(pv, v412, l102) !== l3.value ? l40.fvalue(pv, v410) : (l26.fvalue(pv, v412, l182) !== l3.value ? l41.fvalue(pv, v410) : (l26.fvalue(pv, v412, l183) !== l3.value ? l42.fvalue(pv, v410) : (function(){
3694                     throw "ECASE expression failed.";
3695                 })()))));
3696             })(v411));
3697         })();
3698     }));
3699     return l185;
3700 })();
3701 var l186 = {name: "*ENVIRONMENT*"};
3702 (function(){
3703     (((l186.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l186).value = l179.fvalue(pv)));
3704     return l186;
3705 })();
3706 var l187 = {name: "*VARIABLE-COUNTER*"};
3707 (function(){
3708     (((l187.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l187).value = 0));
3709     return l187;
3710 })();
3711 var l188 = {name: "GVARNAME"};
3712 (function(){
3713     (l188).fvalue = (function(v415){
3714         ((v415)["fname"] = "GVARNAME");
3715         return v415;
3716     })((function (values,v414){
3717         checkArgs(arguments, 2);
3718         return (function(){
3719             return l132.fvalue(values, "v", l17.fvalue(pv, ((l187).value = (function(){
3720                 var x1 = (function(){
3721                     var symbol = l187;
3722                     var value = symbol.value;
3723                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3724                     return value;
3725                 })();
3726                 if (typeof x1 !== 'number') throw 'Not a number!';
3727                 var x2 = 1;
3728                 if (typeof x2 !== 'number') throw 'Not a number!';
3729                 return x1+x2;
3730             })())));
3731         })();
3732     }));
3733     return l188;
3734 })();
3735 var l189 = {name: "TRANSLATE-VARIABLE"};
3736 (function(){
3737     (l189).fvalue = (function(v417){
3738         ((v417)["fname"] = "TRANSLATE-VARIABLE");
3739         return v417;
3740     })((function (values,v416){
3741         checkArgs(arguments, 2);
3742         return (function(){
3743             return l174.fvalue(values, l185.fvalue(pv, v416, (function(){
3744                 var symbol = l186;
3745                 var value = symbol.value;
3746                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3747                 return value;
3748             })(), l103));
3749         })();
3750     }));
3751     return l189;
3752 })();
3753 var l190 = {name: "EXTEND-LOCAL-ENV"};
3754 (function(){
3755     (l190).fvalue = (function(v423){
3756         ((v423)["fname"] = "EXTEND-LOCAL-ENV");
3757         return v423;
3758     })((function (values,v418){
3759         checkArgs(arguments, 2);
3760         return (function(){
3761             return (function(v419){
3762                 return (function(){
3763                     return (function(v420,v421){
3764                         (function(){
3765                             while(v420 !== l3.value){
3766                                 (v421 = (function(){
3767                                     var tmp = v420;
3768                                     return tmp === l3.value? l3.value: tmp.car;
3769                                 })());
3770                                 (function(){
3771                                     (function(v422){
3772                                         return l181.fvalue(pv, v422, v419, l103);
3773                                     })(l171.fvalue(pv, v421, l103, l188.fvalue(pv, v421)));
3774                                     return l3.value;
3775                                 })();
3776                                 (v420 = (function(){
3777                                     var tmp = v420;
3778                                     return tmp === l3.value? l3.value: tmp.cdr;
3779                                 })());
3780                             }return l3.value;
3781                         })();
3782                         return v419;
3783                     })(v418,l3.value);
3784                 })();
3785             })(l180.fvalue(pv, (function(){
3786                 var symbol = l186;
3787                 var value = symbol.value;
3788                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3789                 return value;
3790             })()));
3791         })();
3792     }));
3793     return l190;
3794 })();
3795 var l191 = {name: "*TOPLEVEL-COMPILATIONS*"};
3796 (function(){
3797     (((l191.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l191).value = l3.value));
3798     return l191;
3799 })();
3800 var l192 = {name: "TOPLEVEL-COMPILATION"};
3801 (function(){
3802     (l192).fvalue = (function(v425){
3803         ((v425)["fname"] = "TOPLEVEL-COMPILATION");
3804         return v425;
3805     })((function (values,v424){
3806         checkArgs(arguments, 2);
3807         return (function(){
3808             return ((l191).value = ({car: v424, cdr: (function(){
3809                 var symbol = l191;
3810                 var value = symbol.value;
3811                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3812                 return value;
3813             })()}));
3814         })();
3815     }));
3816     return l192;
3817 })();
3818 var l193 = {name: "NULL-OR-EMPTY-P"};
3819 (function(){
3820     (l193).fvalue = (function(v427){
3821         ((v427)["fname"] = "NULL-OR-EMPTY-P");
3822         return v427;
3823     })((function (values,v426){
3824         checkArgs(arguments, 2);
3825         return (function(){
3826             return l24.fvalue(values, l71.fvalue(pv, v426));
3827         })();
3828     }));
3829     return l193;
3830 })();
3831 var l194 = {name: "GET-TOPLEVEL-COMPILATIONS"};
3832 (function(){
3833     (l194).fvalue = (function(v428){
3834         ((v428)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
3835         return v428;
3836     })((function (values){
3837         checkArgsAtMost(arguments, 1);
3838         return (function(){
3839             return l66.fvalue(values, l88.fvalue(pv, (function(){
3840                 var symbol = l193;
3841                 var func = symbol.fvalue;
3842                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3843                 return func;
3844             })(), (function(){
3845                 var symbol = l191;
3846                 var value = symbol.value;
3847                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3848                 return value;
3849             })()));
3850         })();
3851     }));
3852     return l194;
3853 })();
3854 var l195 = {name: "%COMPILE-DEFMACRO"};
3855 var l196 = {name: "MACRO"};
3856 (function(){
3857     (l195).fvalue = (function(v431){
3858         ((v431)["fname"] = "%COMPILE-DEFMACRO");
3859         return v431;
3860     })((function (values,v429,v430){
3861         checkArgs(arguments, 3);
3862         return (function(){
3863             l192.fvalue(pv, l143.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l165), l44.fvalue(pv, v429))));
3864             l181.fvalue(pv, l171.fvalue(pv, v429, l196, v430), (function(){
3865                 var symbol = l186;
3866                 var value = symbol.value;
3867                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3868                 return value;
3869             })(), l102);
3870             return v429;
3871         })();
3872     }));
3873     return l195;
3874 })();
3875 var l197 = {name: "GLOBAL-BINDING"};
3876 (function(){
3877     (l197).fvalue = (function(v437){
3878         ((v437)["fname"] = "GLOBAL-BINDING");
3879         return v437;
3880     })((function (values,v432,v433,v434){
3881         checkArgs(arguments, 4);
3882         return (function(){
3883             return (function(v435){
3884                 return (v435 !== l3.value ? v435 : (function(v436){
3885                     l181.fvalue(pv, v436, (function(){
3886                         var symbol = l186;
3887                         var value = symbol.value;
3888                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3889                         return value;
3890                     })(), v434);
3891                     return v436;
3892                 })(l171.fvalue(pv, v432, v433, l3.value)));
3893             })(l185.fvalue(pv, v432, (function(){
3894                 var symbol = l186;
3895                 var value = symbol.value;
3896                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3897                 return value;
3898             })(), v434));
3899         })();
3900     }));
3901     return l197;
3902 })();
3903 var l198 = {name: "CLAIMP"};
3904 (function(){
3905     (l198).fvalue = (function(v442){
3906         ((v442)["fname"] = "CLAIMP");
3907         return v442;
3908     })((function (values,v438,v439,v440){
3909         checkArgs(arguments, 4);
3910         return (function(){
3911             return (function(v441){
3912                 return (v441 !== l3.value ? l86.fvalue(values, v440, l175.fvalue(pv, v441)) : l3.value);
3913             })(l185.fvalue(pv, v438, (function(){
3914                 var symbol = l186;
3915                 var value = symbol.value;
3916                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3917                 return value;
3918             })(), v439));
3919         })();
3920     }));
3921     return l198;
3922 })();
3923 var l199 = {name: "!PROCLAIM"};
3924 var l200 = {name: "SPECIAL"};
3925 var l201 = {name: "NOTINLINE"};
3926 var l202 = {name: "CONSTANT"};
3927 (function(){
3928     (l199).fvalue = (function(v454){
3929         ((v454)["fname"] = "!PROCLAIM");
3930         return v454;
3931     })((function (values,v443){
3932         checkArgs(arguments, 2);
3933         return (function(){
3934             return (function(v444){
3935                 return (l26.fvalue(pv, v444, l200) !== l3.value ? (function(){
3936                     return (function(v445,v446){
3937                         (function(){
3938                             while(v445 !== l3.value){
3939                                 (v446 = (function(){
3940                                     var tmp = v445;
3941                                     return tmp === l3.value? l3.value: tmp.car;
3942                                 })());
3943                                 (function(){
3944                                     (function(v447){
3945                                         return l178.fvalue(pv, l200, v447);
3946                                     })(l197.fvalue(pv, v446, l103, l103));
3947                                     return l3.value;
3948                                 })();
3949                                 (v445 = (function(){
3950                                     var tmp = v445;
3951                                     return tmp === l3.value? l3.value: tmp.cdr;
3952                                 })());
3953                             }return l3.value;
3954                         })();
3955                         return l3.value;
3956                     })((function(){
3957                         var tmp = v443;
3958                         return tmp === l3.value? l3.value: tmp.cdr;
3959                     })(),l3.value);
3960                 })() : (l26.fvalue(pv, v444, l201) !== l3.value ? (function(){
3961                     return (function(v448,v449){
3962                         (function(){
3963                             while(v448 !== l3.value){
3964                                 (v449 = (function(){
3965                                     var tmp = v448;
3966                                     return tmp === l3.value? l3.value: tmp.car;
3967                                 })());
3968                                 (function(){
3969                                     (function(v450){
3970                                         return l178.fvalue(pv, l201, v450);
3971                                     })(l197.fvalue(pv, v449, l102, l102));
3972                                     return l3.value;
3973                                 })();
3974                                 (v448 = (function(){
3975                                     var tmp = v448;
3976                                     return tmp === l3.value? l3.value: tmp.cdr;
3977                                 })());
3978                             }return l3.value;
3979                         })();
3980                         return l3.value;
3981                     })((function(){
3982                         var tmp = v443;
3983                         return tmp === l3.value? l3.value: tmp.cdr;
3984                     })(),l3.value);
3985                 })() : (l26.fvalue(pv, v444, l202) !== l3.value ? (function(){
3986                     return (function(v451,v452){
3987                         (function(){
3988                             while(v451 !== l3.value){
3989                                 (v452 = (function(){
3990                                     var tmp = v451;
3991                                     return tmp === l3.value? l3.value: tmp.car;
3992                                 })());
3993                                 (function(){
3994                                     (function(v453){
3995                                         return l178.fvalue(pv, l202, v453);
3996                                     })(l197.fvalue(pv, v452, l103, l103));
3997                                     return l3.value;
3998                                 })();
3999                                 (v451 = (function(){
4000                                     var tmp = v451;
4001                                     return tmp === l3.value? l3.value: tmp.cdr;
4002                                 })());
4003                             }return l3.value;
4004                         })();
4005                         return l3.value;
4006                     })((function(){
4007                         var tmp = v443;
4008                         return tmp === l3.value? l3.value: tmp.cdr;
4009                     })(),l3.value);
4010                 })() : l3.value)));
4011             })((function(){
4012                 var tmp = v443;
4013                 return tmp === l3.value? l3.value: tmp.car;
4014             })());
4015         })();
4016     }));
4017     return l199;
4018 })();
4019 var l203 = {name: "PROCLAIM"};
4020 (l203).fvalue = (function(){
4021     var symbol = l199;
4022     var func = symbol.fvalue;
4023     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4024     return func;
4025 })();
4026 var l204 = {name: "*COMPILATIONS*"};
4027 (function(){
4028     (((l204.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l204).value = l3.value));
4029     return l204;
4030 })();
4031 var l205 = {name: "DEFINE-COMPILATION"};
4032 l205;
4033 var l206 = {name: "IF"};
4034 ((l204).value = ({car: l44.fvalue(pv, l206, (function (values,v455,v456,v457){
4035     checkArgs(arguments, 4);
4036     return (function(){
4037         return l132.fvalue(values, "(", l143.fvalue(pv, v455), " !== ", l143.fvalue(pv, l3.value), " ? ", l143.fvalue(pv, v456, (function(){
4038             var symbol = l170;
4039             var value = symbol.value;
4040             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4041             return value;
4042         })()), " : ", l143.fvalue(pv, v457, (function(){
4043             var symbol = l170;
4044             var value = symbol.value;
4045             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4046             return value;
4047         })()), ")");
4048     })();
4049 })), cdr: (function(){
4050     var symbol = l204;
4051     var value = symbol.value;
4052     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4053     return value;
4054 })()}));
4055 var l207 = {name: "*LAMBDA-LIST-KEYWORDS*"};
4056 var l208 = {name: "&OPTIONAL"};
4057 var l209 = {name: "&REST"};
4058 var l210 = QIList(l208,l209,l3);
4059 (function(){
4060     (((l207.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l207).value = l210));
4061     return l207;
4062 })();
4063 var l211 = {name: "LIST-UNTIL-KEYWORD"};
4064 (function(){
4065     (l211).fvalue = (function(v460){
4066         ((v460)["fname"] = "LIST-UNTIL-KEYWORD");
4067         return v460;
4068     })((function (values,v458){
4069         checkArgs(arguments, 2);
4070         return (function(){
4071             return ((function(v459){
4072                 return (v459 !== l3.value ? v459 : l86.fvalue(pv, (function(){
4073                     var tmp = v458;
4074                     return tmp === l3.value? l3.value: tmp.car;
4075                 })(), (function(){
4076                     var symbol = l207;
4077                     var value = symbol.value;
4078                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4079                     return value;
4080                 })()));
4081             })(l12.fvalue(pv, v458)) !== l3.value ? l3.value : ({car: (function(){
4082                 var tmp = v458;
4083                 return tmp === l3.value? l3.value: tmp.car;
4084             })(), cdr: l211.fvalue(pv, (function(){
4085                 var tmp = v458;
4086                 return tmp === l3.value? l3.value: tmp.cdr;
4087             })())}));
4088         })();
4089     }));
4090     return l211;
4091 })();
4092 var l212 = {name: "LAMBDA-LIST-REQUIRED-ARGUMENTS"};
4093 (function(){
4094     (l212).fvalue = (function(v462){
4095         ((v462)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
4096         return v462;
4097     })((function (values,v461){
4098         checkArgs(arguments, 2);
4099         return (function(){
4100             return l211.fvalue(values, v461);
4101         })();
4102     }));
4103     return l212;
4104 })();
4105 var l213 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"};
4106 (function(){
4107     (l213).fvalue = (function(v464){
4108         ((v464)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
4109         return v464;
4110     })((function (values,v463){
4111         checkArgs(arguments, 2);
4112         return (function(){
4113             return l73.fvalue(values, (function(){
4114                 var symbol = l58;
4115                 var func = symbol.fvalue;
4116                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4117                 return func;
4118             })(), l211.fvalue(pv, (function(){
4119                 var tmp = l86.fvalue(pv, l208, v463);
4120                 return tmp === l3.value? l3.value: tmp.cdr;
4121             })()));
4122         })();
4123     }));
4124     return l213;
4125 })();
4126 var l214 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS"};
4127 (function(){
4128     (l214).fvalue = (function(v466){
4129         ((v466)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
4130         return v466;
4131     })((function (values,v465){
4132         checkArgs(arguments, 2);
4133         return (function(){
4134             return l73.fvalue(values, (function(){
4135                 var symbol = l30;
4136                 var func = symbol.fvalue;
4137                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4138                 return func;
4139             })(), l213.fvalue(pv, v465));
4140         })();
4141     }));
4142     return l214;
4143 })();
4144 var l215 = {name: "LAMBDA-LIST-REST-ARGUMENT"};
4145 (function(){
4146     (l215).fvalue = (function(v469){
4147         ((v469)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
4148         return v469;
4149     })((function (values,v467){
4150         checkArgs(arguments, 2);
4151         return (function(){
4152             return (function(v468){
4153                 ((function(){
4154                     var tmp = v468;
4155                     return tmp === l3.value? l3.value: tmp.cdr;
4156                 })() !== l3.value ? (function(){
4157                     throw "Bad lambda-list";
4158                 })() : l3.value);
4159                 return (function(){
4160                     var tmp = v468;
4161                     return tmp === l3.value? l3.value: tmp.car;
4162                 })();
4163             })(l211.fvalue(pv, (function(){
4164                 var tmp = l86.fvalue(pv, l209, v467);
4165                 return tmp === l3.value? l3.value: tmp.cdr;
4166             })()));
4167         })();
4168     }));
4169     return l215;
4170 })();
4171 var l216 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
4172 (function(){
4173     (l216).fvalue = (function(v472){
4174         ((v472)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
4175         return v472;
4176     })((function (values,v471){
4177         checkArgsAtLeast(arguments, 2);
4178         var v470= l3.value;
4179         for (var i = arguments.length-1; i>=2; i--)
4180             v470 = {car: arguments[i], cdr:
4181         v470};
4182         return (function(){
4183             return (v471 !== l3.value ? l132.fvalue(values, "(function(){", (function(){
4184                 var symbol = l131;
4185                 var value = symbol.value;
4186                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4187                 return value;
4188             })(), l141.fvalue(pv, "var func = ", l134.fvalue(pv, v470), ";", (function(){
4189                 var symbol = l131;
4190                 var value = symbol.value;
4191                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4192                 return value;
4193             })(), "func.docstring = '", v471, "';", (function(){
4194                 var symbol = l131;
4195                 var value = symbol.value;
4196                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4197                 return value;
4198             })(), "return func;", (function(){
4199                 var symbol = l131;
4200                 var value = symbol.value;
4201                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4202                 return value;
4203             })()), "})()") : l134.fvalue(values, v470));
4204         })();
4205     }));
4206     return l216;
4207 })();
4208 var l217 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"};
4209 var l218 = {name: "N/A"};
4210 (function(){
4211     (l217).fvalue = (function(v478){
4212         ((v478)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT");
4213         return v478;
4214     })((function (values,v473,v474,v475){
4215         checkArgs(arguments, 4);
4216         return (function(){
4217             return (function(v476,v477){
4218                 return (function(){
4219                     try {
4220                         (((function(){
4221                             var x1 = 1;
4222                             if (typeof x1 !== 'number') throw 'Not a number!';
4223                             var x2 = v476;
4224                             if (typeof x2 !== 'number') throw 'Not a number!';
4225                             return (x1<x2?l4.value: l3.value);
4226                         })() !== l3.value ? l26.fvalue(pv, v476, v477) : l3.value) !== l3.value ? (function(){
4227                             var values = mv;
4228                             throw ({type: 'block', id: 180, values: l132.fvalue(values, "checkArgs(arguments, ", l17.fvalue(pv, v476), ");", (function(){
4229                                 var symbol = l131;
4230                                 var value = symbol.value;
4231                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4232                                 return value;
4233                             })()), message: 'Return from unknown block NIL.'})
4234                         })() : l3.value);
4235                         return l132.fvalue(values, ((function(){
4236                             var x1 = 1;
4237                             if (typeof x1 !== 'number') throw 'Not a number!';
4238                             var x2 = v476;
4239                             if (typeof x2 !== 'number') throw 'Not a number!';
4240                             return (x1<x2?l4.value: l3.value);
4241                         })() !== l3.value ? l132.fvalue(pv, "checkArgsAtLeast(arguments, ", l17.fvalue(pv, v476), ");", (function(){
4242                             var symbol = l131;
4243                             var value = symbol.value;
4244                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4245                             return value;
4246                         })()) : ""), (((typeof (v477) == "number")?l4.value: l3.value) !== l3.value ? l132.fvalue(pv, "checkArgsAtMost(arguments, ", l17.fvalue(pv, v477), ");", (function(){
4247                             var symbol = l131;
4248                             var value = symbol.value;
4249                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4250                             return value;
4251                         })()) : ""));
4252                     }
4253                     catch (cf){
4254                         if (cf.type == 'block' && cf.id == 180)
4255                             return values.apply(this, forcemv(cf.values));
4256                         else
4257                             throw cf;
4258                     }
4259                 })();
4260             })(l22.fvalue(pv, v473),(v475 !== l3.value ? l218 : (function(){
4261                 var x1 = 1;
4262                 if (typeof x1 !== 'number') throw 'Not a number!';
4263                 var x2 = v473;
4264                 if (typeof x2 !== 'number') throw 'Not a number!';
4265                 var x3 = v474;
4266                 if (typeof x3 !== 'number') throw 'Not a number!';
4267                 return x1+x2+x3;
4268             })()));
4269         })();
4270     }));
4271     return l217;
4272 })();
4273 var l219 = {name: "COMPILE-LAMBDA"};
4274 var l220 = {name: "LS-COMPILE-BLOCK"};
4275 (function(){
4276     (l219).fvalue = (function(v494){
4277         ((v494)["fname"] = "COMPILE-LAMBDA");
4278         return v494;
4279     })((function (values,v479,v480){
4280         checkArgs(arguments, 3);
4281         return (function(){
4282             return (function(v481,v482,v483,v484){
4283                 ((((typeof((function(){
4284                     var tmp = v480;
4285                     return tmp === l3.value? l3.value: tmp.car;
4286                 })()) == "string")?l4.value: l3.value) !== l3.value ? l27.fvalue(pv, l12.fvalue(pv, (function(){
4287                     var tmp = v480;
4288                     return tmp === l3.value? l3.value: tmp.cdr;
4289                 })())) : l3.value) !== l3.value ? (function(){
4290                     (v484 = (function(){
4291                         var tmp = v480;
4292                         return tmp === l3.value? l3.value: tmp.car;
4293                     })());
4294                     return (v480 = (function(){
4295                         var tmp = v480;
4296                         return tmp === l3.value? l3.value: tmp.cdr;
4297                     })());
4298                 })() : l3.value);
4299                 return (function(v485,v486,v487){
4300                     try {
4301                         var tmp;
4302                         tmp = l186.value;
4303                         l186.value = v487;
4304                         v487 = tmp;
4305                         return l216.fvalue(values, v484, "(function (", l134.fvalue(pv, ({car: "values", cdr: l73.fvalue(pv, (function(){
4306                             var symbol = l189;
4307                             var func = symbol.fvalue;
4308                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4309                             return func;
4310                         })(), l64.fvalue(pv, v481, v482))}), ","), "){", (function(){
4311                             var symbol = l131;
4312                             var value = symbol.value;
4313                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4314                             return value;
4315                         })(), l141.fvalue(pv, l217.fvalue(pv, v485, v486, v483), (v482 !== l3.value ? l132.fvalue(pv, "switch(arguments.length-1){", (function(){
4316                             var symbol = l131;
4317                             var value = symbol.value;
4318                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4319                             return value;
4320                         })(), (function(v488,v489,v490){
4321                             return (function(){
4322                                 (function(){
4323                                     return (function(){
4324                                         while((function(){
4325                                             var x1 = v490;
4326                                             if (typeof x1 !== 'number') throw 'Not a number!';
4327                                             var x2 = v486;
4328                                             if (typeof x2 !== 'number') throw 'Not a number!';
4329                                             return (x1<x2?l4.value: l3.value);
4330                                         })() !== l3.value){
4331                                             (function(v491){
4332                                                 (v489 = ({car: l132.fvalue(pv, "case ", l17.fvalue(pv, (function(){
4333                                                     var x1 = v490;
4334                                                     if (typeof x1 !== 'number') throw 'Not a number!';
4335                                                     var x2 = v485;
4336                                                     if (typeof x2 !== 'number') throw 'Not a number!';
4337                                                     return x1+x2;
4338                                                 })()), ":", (function(){
4339                                                     var symbol = l131;
4340                                                     var value = symbol.value;
4341                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4342                                                     return value;
4343                                                 })(), l189.fvalue(pv, (function(){
4344                                                     var tmp = v491;
4345                                                     return tmp === l3.value? l3.value: tmp.car;
4346                                                 })()), "=", l143.fvalue(pv, l33.fvalue(pv, v491)), ";", (function(){
4347                                                     var symbol = l131;
4348                                                     var value = symbol.value;
4349                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4350                                                     return value;
4351                                                 })()), cdr: v489}));
4352                                                 return (v490 = (function(){
4353                                                     var x1 = v490;
4354                                                     if (typeof x1 !== 'number') throw 'Not a number!';
4355                                                     var x2 = 1;
4356                                                     if (typeof x2 !== 'number') throw 'Not a number!';
4357                                                     return x1+x2;
4358                                                 })());
4359                                             })(l83.fvalue(pv, v490, v488));
4360                                         }return l3.value;
4361                                     })();
4362                                 })();
4363                                 (v489 = ({car: l132.fvalue(pv, "default: break;", (function(){
4364                                     var symbol = l131;
4365                                     var value = symbol.value;
4366                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4367                                     return value;
4368                                 })()), cdr: v489}));
4369                                 return l134.fvalue(pv, l66.fvalue(pv, v489));
4370                             })();
4371                         })(l213.fvalue(pv, v479),l3.value,0), "}", (function(){
4372                             var symbol = l131;
4373                             var value = symbol.value;
4374                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4375                             return value;
4376                         })()) : ""), (v483 !== l3.value ? (function(v492){
4377                             return l132.fvalue(pv, "var ", v492, "= ", l143.fvalue(pv, l3.value), ";", (function(){
4378                                 var symbol = l131;
4379                                 var value = symbol.value;
4380                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4381                                 return value;
4382                             })(), "for (var i = arguments.length-1; i>=", l17.fvalue(pv, (function(){
4383                                 var x1 = 1;
4384                                 if (typeof x1 !== 'number') throw 'Not a number!';
4385                                 var x2 = v485;
4386                                 if (typeof x2 !== 'number') throw 'Not a number!';
4387                                 var x3 = v486;
4388                                 if (typeof x3 !== 'number') throw 'Not a number!';
4389                                 return x1+x2+x3;
4390                             })()), "; i--)", (function(){
4391                                 var symbol = l131;
4392                                 var value = symbol.value;
4393                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4394                                 return value;
4395                             })(), l141.fvalue(pv, v492, " = ", "{car: arguments[i], cdr: "), v492, "};", (function(){
4396                                 var symbol = l131;
4397                                 var value = symbol.value;
4398                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4399                                 return value;
4400                             })());
4401                         })(l189.fvalue(pv, v483)) : ""), (function(v493){
4402                             try {
4403                                 var tmp;
4404                                 tmp = l170.value;
4405                                 l170.value = v493;
4406                                 v493 = tmp;
4407                                 return l220.fvalue(pv, v480, l4.value);
4408                             }
4409                             finally {
4410                                 l170.value = v493;
4411                             }
4412                         })(l4.value)), "})");
4413                     }
4414                     finally {
4415                         l186.value = v487;
4416                     }
4417                 })(l71.fvalue(pv, v481),l71.fvalue(pv, v482),l190.fvalue(pv, l64.fvalue(pv, l58.fvalue(pv, v483), v481, v482)));
4418             })(l212.fvalue(pv, v479),l214.fvalue(pv, v479),l215.fvalue(pv, v479),l3.value);
4419         })();
4420     }));
4421     return l219;
4422 })();
4423 var l221 = {name: "SETQ-PAIR"};
4424 var l222 = {name: "SET"};
4425 (function(){
4426     (l221).fvalue = (function(v498){
4427         ((v498)["fname"] = "SETQ-PAIR");
4428         return v498;
4429     })((function (values,v495,v496){
4430         checkArgs(arguments, 3);
4431         return (function(){
4432             return (function(v497){
4433                 return ((((l173.fvalue(pv, v497) === l103)?l4.value: l3.value) !== l3.value ? (l27.fvalue(pv, l86.fvalue(pv, l200, l175.fvalue(pv, v497))) !== l3.value ? l27.fvalue(pv, l86.fvalue(pv, l202, l175.fvalue(pv, v497))) : l3.value) : l3.value) !== l3.value ? l132.fvalue(values, l174.fvalue(pv, v497), " = ", l143.fvalue(pv, v496)) : l143.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l222), l44.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l165), l44.fvalue(pv, v495))), l44.fvalue(pv, v496))));
4434             })(l185.fvalue(pv, v495, (function(){
4435                 var symbol = l186;
4436                 var value = symbol.value;
4437                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4438                 return value;
4439             })(), l103));
4440         })();
4441     }));
4442     return l221;
4443 })();
4444 var l223 = {name: "SETQ"};
4445 ((l204).value = ({car: l44.fvalue(pv, l223, (function (values){
4446     var v499= l3.value;
4447     for (var i = arguments.length-1; i>=1; i--)
4448         v499 = {car: arguments[i], cdr:
4449     v499};
4450     return (function(){
4451         return (function(v500){
4452             (function(){
4453                 try {
4454                     return (function(){
4455                         while(l4.value !== l3.value){
4456                             (l12.fvalue(pv, v499) !== l3.value ? (function(){
4457                                 throw ({type: 'block', id: 185, values: l3.value, message: 'Return from unknown block NIL.'})
4458                             })() : (l12.fvalue(pv, (function(){
4459                                 var tmp = v499;
4460                                 return tmp === l3.value? l3.value: tmp.cdr;
4461                             })()) !== l3.value ? (function(){
4462                                 throw "Odd paris in SETQ";
4463                             })() : (function(){
4464                                 (v500 = l132.fvalue(pv, v500, l132.fvalue(pv, l221.fvalue(pv, (function(){
4465                                     var tmp = v499;
4466                                     return tmp === l3.value? l3.value: tmp.car;
4467                                 })(), l33.fvalue(pv, v499)), (l12.fvalue(pv, l35.fvalue(pv, v499)) !== l3.value ? "" : ", "))));
4468                                 return (v499 = l35.fvalue(pv, v499));
4469                             })()));
4470                         }return l3.value;
4471                     })();
4472                 }
4473                 catch (cf){
4474                     if (cf.type == 'block' && cf.id == 185)
4475                         return cf.values;
4476                     else
4477                         throw cf;
4478                 }
4479             })();
4480             return l132.fvalue(values, "(", v500, ")");
4481         })("");
4482     })();
4483 })), cdr: (function(){
4484     var symbol = l204;
4485     var value = symbol.value;
4486     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4487     return value;
4488 })()}));
4489 var l224 = {name: "JS-VREF"};
4490 ((l204).value = ({car: l44.fvalue(pv, l224, (function (values,v501){
4491     checkArgs(arguments, 2);
4492     return (function(){
4493         return v501;
4494     })();
4495 })), cdr: (function(){
4496     var symbol = l204;
4497     var value = symbol.value;
4498     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4499     return value;
4500 })()}));
4501 var l225 = {name: "JS-VSET"};
4502 ((l204).value = ({car: l44.fvalue(pv, l225, (function (values,v502,v503){
4503     checkArgs(arguments, 3);
4504     return (function(){
4505         return l132.fvalue(values, "(", v502, " = ", l143.fvalue(pv, v503), ")");
4506     })();
4507 })), cdr: (function(){
4508     var symbol = l204;
4509     var value = symbol.value;
4510     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4511     return value;
4512 })()}));
4513 (function(){
4514     (l146).fvalue = (function(v510){
4515         ((v510)["fname"] = "ESCAPE-STRING");
4516         return v510;
4517     })((function (values,v504){
4518         checkArgs(arguments, 2);
4519         return (function(){
4520             return (function(v505,v506,v507){
4521                 (function(){
4522                     return (function(){
4523                         while((function(){
4524                             var x1 = v506;
4525                             if (typeof x1 !== 'number') throw 'Not a number!';
4526                             var x2 = v507;
4527                             if (typeof x2 !== 'number') throw 'Not a number!';
4528                             return (x1<x2?l4.value: l3.value);
4529                         })() !== l3.value){
4530                             (function(v508){
4531                                 ((function(v509){
4532                                     return (v509 !== l3.value ? v509 : l78.fvalue(pv, v508, 92));
4533                                 })(l78.fvalue(pv, v508, 34)) !== l3.value ? (v505 = l132.fvalue(pv, v505, "\\")) : l3.value);
4534                                 (l78.fvalue(pv, v508, 10) !== l3.value ? (function(){
4535                                     (v505 = l132.fvalue(pv, v505, "\\"));
4536                                     return (v508 = 110);
4537                                 })() : l3.value);
4538                                 return (v505 = l132.fvalue(pv, v505, l96.fvalue(pv, v508)));
4539                             })((function(){
4540                                 var string = v504;
4541                                 var index = v506;
4542                                 if (typeof string != 'string')
4543                                     throw 'The value ' + string + ' is not a type string.';
4544                                 if (typeof index != 'number')
4545                                     throw 'The value ' + index + ' is not a type number.';
4546                                 return string.charCodeAt(index);
4547                             })());
4548                             (v506 = (function(){
4549                                 var x1 = v506;
4550                                 if (typeof x1 !== 'number') throw 'Not a number!';
4551                                 var x2 = 1;
4552                                 if (typeof x2 !== 'number') throw 'Not a number!';
4553                                 return x1+x2;
4554                             })());
4555                         }return l3.value;
4556                     })();
4557                 })();
4558                 return v505;
4559             })("",0,l71.fvalue(pv, v504));
4560         })();
4561     }));
4562     return l146;
4563 })();
4564 var l226 = {name: "*LITERAL-SYMBOLS*"};
4565 (function(){
4566     (((l226.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l226).value = l3.value));
4567     return l226;
4568 })();
4569 var l227 = {name: "*LITERAL-COUNTER*"};
4570 (function(){
4571     (((l227.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l227).value = 0));
4572     return l227;
4573 })();
4574 var l228 = {name: "GENLIT"};
4575 (function(){
4576     (l228).fvalue = (function(v511){
4577         ((v511)["fname"] = "GENLIT");
4578         return v511;
4579     })((function (values){
4580         checkArgsAtMost(arguments, 1);
4581         return (function(){
4582             return l132.fvalue(values, "l", l17.fvalue(pv, ((l227).value = (function(){
4583                 var x1 = (function(){
4584                     var symbol = l227;
4585                     var value = symbol.value;
4586                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4587                     return value;
4588                 })();
4589                 if (typeof x1 !== 'number') throw 'Not a number!';
4590                 var x2 = 1;
4591                 if (typeof x2 !== 'number') throw 'Not a number!';
4592                 return x1+x2;
4593             })())));
4594         })();
4595     }));
4596     return l228;
4597 })();
4598 var l229 = {name: "LITERAL"};
4599 (function(){
4600     (l229).fvalue = (function(v526){
4601         ((v526)["fname"] = "LITERAL");
4602         return v526;
4603     })((function (values,v512,v513){
4604         checkArgsAtLeast(arguments, 2);
4605         checkArgsAtMost(arguments, 3);
4606         switch(arguments.length-1){
4607         case 1:
4608         v513=l3.value;
4609         default: break;
4610         }
4611         return (function(){
4612             return (l79.fvalue(pv, v512) !== l3.value ? l17.fvalue(values, v512) : (((typeof(v512) == "string")?l4.value: l3.value) !== l3.value ? l132.fvalue(values, "\"", l146.fvalue(pv, v512), "\"") : (((function(){
4613                 var tmp = v512;
4614                 return (typeof tmp == 'object' && 'name' in tmp);
4615             })()?l4.value: l3.value) !== l3.value ? (function(v514){
4616                 return (v514 !== l3.value ? v514 : (function(v516,v517){
4617                     ((l226).value = ({car: ({car: v512, cdr: v516}), cdr: (function(){
4618                         var symbol = l226;
4619                         var value = symbol.value;
4620                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4621                         return value;
4622                     })()}));
4623                     l192.fvalue(pv, l132.fvalue(pv, "var ", v516, " = ", v517));
4624                     return v516;
4625                 })(l228.fvalue(pv),(function(v515){
4626                     return (l12.fvalue(pv, v515) !== l3.value ? l132.fvalue(pv, "{name: \"", l146.fvalue(pv, (v512).name), "\"}") : l143.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l128), l44.fvalue(pv, (v512).name), l44.fvalue(pv, l112.fvalue(pv, v515)))));
4627                 })(l120.fvalue(pv, v512))));
4628             })((function(){
4629                 var tmp = l95.fvalue(pv, v512, (function(){
4630                     var symbol = l226;
4631                     var value = symbol.value;
4632                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4633                     return value;
4634                 })());
4635                 return tmp === l3.value? l3.value: tmp.cdr;
4636             })()) : (((function(){
4637                 var tmp = v512;
4638                 return (typeof tmp == 'object' && 'car' in tmp);
4639             })()?l4.value: l3.value) !== l3.value ? (function(){
4640                 var v518 = l85.fvalue(pv, v512);
4641                 var v519 = l84.fvalue(pv, v512);
4642                 var v520 = l132.fvalue(pv, "QIList(", l135.fvalue(pv, l73.fvalue(pv, (function (values,v521){
4643                     checkArgs(arguments, 2);
4644                     return l229.fvalue(values, v521, l4.value);
4645                 }), v518), ","), l229.fvalue(pv, (function(){
4646                     var tmp = v519;
4647                     return tmp === l3.value? l3.value: tmp.car;
4648                 })(), l4.value), ",", l229.fvalue(pv, (function(){
4649                     var tmp = v519;
4650                     return tmp === l3.value? l3.value: tmp.cdr;
4651                 })(), l4.value), ")");
4652                 return (v513 !== l3.value ? v520 : (function(v522){
4653                     l192.fvalue(pv, l132.fvalue(pv, "var ", v522, " = ", v520));
4654                     return v522;
4655                 })(l228.fvalue(pv)));
4656             })() : (((function(){
4657                 var x = v512;
4658                 return typeof x === 'object' && 'length' in x;
4659             })()?l4.value: l3.value) !== l3.value ? (function(v523){
4660                 return (function(v524){
4661                     return (v513 !== l3.value ? v524 : (function(v525){
4662                         l192.fvalue(pv, l132.fvalue(pv, "var ", v525, " = ", v524));
4663                         return v525;
4664                     })(l228.fvalue(pv)));
4665                 })(l132.fvalue(pv, "[", l134.fvalue(pv, l73.fvalue(pv, (function(){
4666                     var symbol = l229;
4667                     var func = symbol.fvalue;
4668                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4669                     return func;
4670                 })(), v523), ", "), "]"));
4671             })(l137.fvalue(pv, v512)) : l3.value)))));
4672         })();
4673     }));
4674     return l229;
4675 })();
4676 ((l204).value = ({car: l44.fvalue(pv, l165, (function (values,v527){
4677     checkArgs(arguments, 2);
4678     return (function(){
4679         return l229.fvalue(values, v527);
4680     })();
4681 })), cdr: (function(){
4682     var symbol = l204;
4683     var value = symbol.value;
4684     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4685     return value;
4686 })()}));
4687 var l230 = {name: "%WHILE"};
4688 ((l204).value = ({car: l44.fvalue(pv, l230, (function (values,v529){
4689     checkArgsAtLeast(arguments, 2);
4690     var v528= l3.value;
4691     for (var i = arguments.length-1; i>=2; i--)
4692         v528 = {car: arguments[i], cdr:
4693     v528};
4694     return (function(){
4695         return l132.fvalue(values, "(function(){", (function(){
4696             var symbol = l131;
4697             var value = symbol.value;
4698             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4699             return value;
4700         })(), l141.fvalue(pv, "while(", l143.fvalue(pv, v529), " !== ", l143.fvalue(pv, l3.value), "){", (function(){
4701             var symbol = l131;
4702             var value = symbol.value;
4703             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4704             return value;
4705         })(), l141.fvalue(pv, l220.fvalue(pv, v528)), "}", "return ", l143.fvalue(pv, l3.value), ";", (function(){
4706             var symbol = l131;
4707             var value = symbol.value;
4708             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4709             return value;
4710         })()), "})()");
4711     })();
4712 })), cdr: (function(){
4713     var symbol = l204;
4714     var value = symbol.value;
4715     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4716     return value;
4717 })()}));
4718 var l231 = {name: "SYMBOL-FUNCTION"};
4719 ((l204).value = ({car: l44.fvalue(pv, l102, (function (values,v530){
4720     checkArgs(arguments, 2);
4721     return (function(){
4722         return ((l59.fvalue(pv, v530) !== l3.value ? (((function(){
4723             var tmp = v530;
4724             return tmp === l3.value? l3.value: tmp.car;
4725         })() === l5)?l4.value: l3.value) : l3.value) !== l3.value ? l219.fvalue(values, l33.fvalue(pv, v530), l35.fvalue(pv, v530)) : (((function(){
4726             var tmp = v530;
4727             return (typeof tmp == 'object' && 'name' in tmp);
4728         })()?l4.value: l3.value) !== l3.value ? (function(v531){
4729             return (v531 !== l3.value ? l174.fvalue(values, v531) : l143.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l231), l44.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l165), l44.fvalue(pv, v530))))));
4730         })(l185.fvalue(pv, v530, (function(){
4731             var symbol = l186;
4732             var value = symbol.value;
4733             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4734             return value;
4735         })(), l102)) : l3.value));
4736     })();
4737 })), cdr: (function(){
4738     var symbol = l204;
4739     var value = symbol.value;
4740     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4741     return value;
4742 })()}));
4743 var l232 = {name: "MAKE-FUNCTION-BINDING"};
4744 (function(){
4745     (l232).fvalue = (function(v533){
4746         ((v533)["fname"] = "MAKE-FUNCTION-BINDING");
4747         return v533;
4748     })((function (values,v532){
4749         checkArgs(arguments, 2);
4750         return (function(){
4751             return l171.fvalue(values, v532, l102, l188.fvalue(pv, v532));
4752         })();
4753     }));
4754     return l232;
4755 })();
4756 var l233 = {name: "COMPILE-FUNCTION-DEFINITION"};
4757 (function(){
4758     (l233).fvalue = (function(v535){
4759         ((v535)["fname"] = "COMPILE-FUNCTION-DEFINITION");
4760         return v535;
4761     })((function (values,v534){
4762         checkArgs(arguments, 2);
4763         return (function(){
4764             return l219.fvalue(values, (function(){
4765                 var tmp = v534;
4766                 return tmp === l3.value? l3.value: tmp.car;
4767             })(), (function(){
4768                 var tmp = v534;
4769                 return tmp === l3.value? l3.value: tmp.cdr;
4770             })());
4771         })();
4772     }));
4773     return l233;
4774 })();
4775 var l234 = {name: "TRANSLATE-FUNCTION"};
4776 (function(){
4777     (l234).fvalue = (function(v538){
4778         ((v538)["fname"] = "TRANSLATE-FUNCTION");
4779         return v538;
4780     })((function (values,v536){
4781         checkArgs(arguments, 2);
4782         return (function(){
4783             return (function(v537){
4784                 return l174.fvalue(values, v537);
4785             })(l185.fvalue(pv, v536, (function(){
4786                 var symbol = l186;
4787                 var value = symbol.value;
4788                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4789                 return value;
4790             })(), l102));
4791         })();
4792     }));
4793     return l234;
4794 })();
4795 var l235 = {name: "FLET"};
4796 ((l204).value = ({car: l44.fvalue(pv, l235, (function (values,v540){
4797     checkArgsAtLeast(arguments, 2);
4798     var v539= l3.value;
4799     for (var i = arguments.length-1; i>=2; i--)
4800         v539 = {car: arguments[i], cdr:
4801     v539};
4802     return (function(){
4803         return (function(){
4804             try {
4805                 var v545 = l186.value;
4806                 var v541 = l73.fvalue(pv, (function(){
4807                     var symbol = l30;
4808                     var func = symbol.fvalue;
4809                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4810                     return func;
4811                 })(), v540);
4812                 var v542 = l73.fvalue(pv, (function(){
4813                     var symbol = l31;
4814                     var func = symbol.fvalue;
4815                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4816                     return func;
4817                 })(), v540);
4818                 var v543 = l73.fvalue(pv, (function(){
4819                     var symbol = l233;
4820                     var func = symbol.fvalue;
4821                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4822                     return func;
4823                 })(), v542);
4824                 ((l186).value = l184.fvalue(pv, l73.fvalue(pv, (function(){
4825                     var symbol = l232;
4826                     var func = symbol.fvalue;
4827                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4828                     return func;
4829                 })(), v541), (function(){
4830                     var symbol = l186;
4831                     var value = symbol.value;
4832                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4833                     return value;
4834                 })(), l102));
4835                 return l132.fvalue(values, "(function(", l134.fvalue(pv, l73.fvalue(pv, (function(){
4836                     var symbol = l234;
4837                     var func = symbol.fvalue;
4838                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4839                     return func;
4840                 })(), v541), ","), "){", (function(){
4841                     var symbol = l131;
4842                     var value = symbol.value;
4843                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4844                     return value;
4845                 })(), (function(v544){
4846                     return l141.fvalue(pv, v544);
4847                 })(l220.fvalue(pv, v539, l4.value)), "})(", l134.fvalue(pv, v543, ","), ")");
4848             }
4849             finally {
4850                 l186.value = v545;
4851             }
4852         })();
4853     })();
4854 })), cdr: (function(){
4855     var symbol = l204;
4856     var value = symbol.value;
4857     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4858     return value;
4859 })()}));
4860 var l236 = {name: "LABELS"};
4861 ((l204).value = ({car: l44.fvalue(pv, l236, (function (values,v547){
4862     checkArgsAtLeast(arguments, 2);
4863     var v546= l3.value;
4864     for (var i = arguments.length-1; i>=2; i--)
4865         v546 = {car: arguments[i], cdr:
4866     v546};
4867     return (function(){
4868         return (function(){
4869             try {
4870                 var v550 = l186.value;
4871                 var v548 = l73.fvalue(pv, (function(){
4872                     var symbol = l30;
4873                     var func = symbol.fvalue;
4874                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4875                     return func;
4876                 })(), v547);
4877                 ((l186).value = l184.fvalue(pv, l73.fvalue(pv, (function(){
4878                     var symbol = l232;
4879                     var func = symbol.fvalue;
4880                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4881                     return func;
4882                 })(), v548), (function(){
4883                     var symbol = l186;
4884                     var value = symbol.value;
4885                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4886                     return value;
4887                 })(), l102));
4888                 return l132.fvalue(values, "(function(){", (function(){
4889                     var symbol = l131;
4890                     var value = symbol.value;
4891                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4892                     return value;
4893                 })(), l141.fvalue(pv, l136.fvalue(pv, (function (values,v549){
4894                     checkArgs(arguments, 2);
4895                     return l132.fvalue(values, "var ", l234.fvalue(pv, (function(){
4896                         var tmp = v549;
4897                         return tmp === l3.value? l3.value: tmp.car;
4898                     })()), " = ", l219.fvalue(pv, l33.fvalue(pv, v549), l35.fvalue(pv, v549)), ";", (function(){
4899                         var symbol = l131;
4900                         var value = symbol.value;
4901                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4902                         return value;
4903                     })());
4904                 }), v547), l220.fvalue(pv, v546, l4.value)), "})()");
4905             }
4906             finally {
4907                 l186.value = v550;
4908             }
4909         })();
4910     })();
4911 })), cdr: (function(){
4912     var symbol = l204;
4913     var value = symbol.value;
4914     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4915     return value;
4916 })()}));
4917 var l237 = {name: "*COMPILING-FILE*"};
4918 (function(){
4919     (((l237.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l237).value = l3.value));
4920     return l237;
4921 })();
4922 var l238 = {name: "EVAL-WHEN-COMPILE"};
4923 var l239 = {name: "PROGN"};
4924 var l240 = {name: "EVAL"};
4925 ((l204).value = ({car: l44.fvalue(pv, l238, (function (values){
4926     var v551= l3.value;
4927     for (var i = arguments.length-1; i>=1; i--)
4928         v551 = {car: arguments[i], cdr:
4929     v551};
4930     return (function(){
4931         return ((function(){
4932             var symbol = l237;
4933             var value = symbol.value;
4934             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4935             return value;
4936         })() !== l3.value ? (function(){
4937             l240.fvalue(pv, ({car: l239, cdr: v551}));
4938             return l3.value;
4939         })() : l143.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l239), v551)));
4940     })();
4941 })), cdr: (function(){
4942     var symbol = l204;
4943     var value = symbol.value;
4944     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4945     return value;
4946 })()}));
4947 var l241 = {name: "DEFINE-TRANSFORMATION"};
4948 l241;
4949 ((l204).value = ({car: l44.fvalue(pv, l239, (function (values){
4950     var v552= l3.value;
4951     for (var i = arguments.length-1; i>=1; i--)
4952         v552 = {car: arguments[i], cdr:
4953     v552};
4954     return (function(){
4955         return (l12.fvalue(pv, (function(){
4956             var tmp = v552;
4957             return tmp === l3.value? l3.value: tmp.cdr;
4958         })()) !== l3.value ? l143.fvalue(values, (function(){
4959             var tmp = v552;
4960             return tmp === l3.value? l3.value: tmp.car;
4961         })(), (function(){
4962             var symbol = l170;
4963             var value = symbol.value;
4964             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4965             return value;
4966         })()) : l132.fvalue(values, "(function(){", (function(){
4967             var symbol = l131;
4968             var value = symbol.value;
4969             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4970             return value;
4971         })(), l141.fvalue(pv, l220.fvalue(pv, v552, l4.value)), "})()"));
4972     })();
4973 })), cdr: (function(){
4974     var symbol = l204;
4975     var value = symbol.value;
4976     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4977     return value;
4978 })()}));
4979 var l242 = {name: "SPECIAL-VARIABLE-P"};
4980 (function(){
4981     (l242).fvalue = (function(v554){
4982         ((v554)["fname"] = "SPECIAL-VARIABLE-P");
4983         return v554;
4984     })((function (values,v553){
4985         checkArgs(arguments, 2);
4986         return (function(){
4987             return (l198.fvalue(pv, v553, l103, l200) !== l3.value ? l4.value : l3.value);
4988         })();
4989     }));
4990     return l242;
4991 })();
4992 var l243 = {name: "LET-BINDING-WRAPPER"};
4993 (function(){
4994     (l243).fvalue = (function(v561){
4995         ((v561)["fname"] = "LET-BINDING-WRAPPER");
4996         return v561;
4997     })((function (values,v555,v556){
4998         checkArgs(arguments, 3);
4999         return (function(){
5000             try {
5001                 (l12.fvalue(pv, v555) !== l3.value ? (function(){
5002                     var values = mv;
5003                     throw ({type: 'block', id: 203, values: v556, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
5004                 })() : l3.value);
5005                 return l132.fvalue(values, "try {", (function(){
5006                     var symbol = l131;
5007                     var value = symbol.value;
5008                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5009                     return value;
5010                 })(), l141.fvalue(pv, "var tmp;", (function(){
5011                     var symbol = l131;
5012                     var value = symbol.value;
5013                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5014                     return value;
5015                 })(), l136.fvalue(pv, (function (values,v557){
5016                     checkArgs(arguments, 2);
5017                     return (function(v558){
5018                         return l132.fvalue(values, "tmp = ", v558, ".value;", (function(){
5019                             var symbol = l131;
5020                             var value = symbol.value;
5021                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5022                             return value;
5023                         })(), v558, ".value = ", (function(){
5024                             var tmp = v557;
5025                             return tmp === l3.value? l3.value: tmp.cdr;
5026                         })(), ";", (function(){
5027                             var symbol = l131;
5028                             var value = symbol.value;
5029                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5030                             return value;
5031                         })(), (function(){
5032                             var tmp = v557;
5033                             return tmp === l3.value? l3.value: tmp.cdr;
5034                         })(), " = tmp;", (function(){
5035                             var symbol = l131;
5036                             var value = symbol.value;
5037                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5038                             return value;
5039                         })());
5040                     })(l143.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l165), l44.fvalue(pv, (function(){
5041                         var tmp = v557;
5042                         return tmp === l3.value? l3.value: tmp.car;
5043                     })()))));
5044                 }), v555), v556, (function(){
5045                     var symbol = l131;
5046                     var value = symbol.value;
5047                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5048                     return value;
5049                 })()), "}", (function(){
5050                     var symbol = l131;
5051                     var value = symbol.value;
5052                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5053                     return value;
5054                 })(), "finally {", (function(){
5055                     var symbol = l131;
5056                     var value = symbol.value;
5057                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5058                     return value;
5059                 })(), l141.fvalue(pv, l136.fvalue(pv, (function (values,v559){
5060                     checkArgs(arguments, 2);
5061                     return (function(v560){
5062                         return l132.fvalue(values, v560, ".value", " = ", (function(){
5063                             var tmp = v559;
5064                             return tmp === l3.value? l3.value: tmp.cdr;
5065                         })(), ";", (function(){
5066                             var symbol = l131;
5067                             var value = symbol.value;
5068                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5069                             return value;
5070                         })());
5071                     })(l143.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l165), l44.fvalue(pv, (function(){
5072                         var tmp = v559;
5073                         return tmp === l3.value? l3.value: tmp.car;
5074                     })()))));
5075                 }), v555)), "}", (function(){
5076                     var symbol = l131;
5077                     var value = symbol.value;
5078                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5079                     return value;
5080                 })());
5081             }
5082             catch (cf){
5083                 if (cf.type == 'block' && cf.id == 203)
5084                     return values.apply(this, forcemv(cf.values));
5085                 else
5086                     throw cf;
5087             }
5088         })();
5089     }));
5090     return l243;
5091 })();
5092 var l244 = {name: "LET"};
5093 ((l204).value = ({car: l44.fvalue(pv, l244, (function (values,v563){
5094     checkArgsAtLeast(arguments, 2);
5095     var v562= l3.value;
5096     for (var i = arguments.length-1; i>=2; i--)
5097         v562 = {car: arguments[i], cdr:
5098     v562};
5099     return (function(){
5100         return (function(){
5101             try {
5102                 var v571 = l186.value;
5103                 var v564 = l73.fvalue(pv, (function(){
5104                     var symbol = l58;
5105                     var func = symbol.fvalue;
5106                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5107                     return func;
5108                 })(), v563);
5109                 var v565 = l73.fvalue(pv, (function(){
5110                     var symbol = l39;
5111                     var func = symbol.fvalue;
5112                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5113                     return func;
5114                 })(), v564);
5115                 var v566 = l73.fvalue(pv, (function(){
5116                     var symbol = l143;
5117                     var func = symbol.fvalue;
5118                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5119                     return func;
5120                 })(), l73.fvalue(pv, (function(){
5121                     var symbol = l40;
5122                     var func = symbol.fvalue;
5123                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5124                     return func;
5125                 })(), v564));
5126                 ((l186).value = l190.fvalue(pv, l88.fvalue(pv, (function(){
5127                     var symbol = l242;
5128                     var func = symbol.fvalue;
5129                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5130                     return func;
5131                 })(), v565)));
5132                 var v567 = l3.value;
5133                 return l132.fvalue(values, "(function(", l134.fvalue(pv, l73.fvalue(pv, (function (values,v568){
5134                     checkArgs(arguments, 2);
5135                     return (l242.fvalue(pv, v568) !== l3.value ? (function(v569){
5136                         (v567 = ({car: ({car: v568, cdr: v569}), cdr: v567}));
5137                         return v569;
5138                     })(l188.fvalue(pv, v568)) : l189.fvalue(values, v568));
5139                 }), v565), ","), "){", (function(){
5140                     var symbol = l131;
5141                     var value = symbol.value;
5142                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5143                     return value;
5144                 })(), (function(v570){
5145                     return l141.fvalue(pv, l243.fvalue(pv, v567, v570));
5146                 })(l220.fvalue(pv, v562, l4.value)), "})(", l134.fvalue(pv, v566, ","), ")");
5147             }
5148             finally {
5149                 l186.value = v571;
5150             }
5151         })();
5152     })();
5153 })), cdr: (function(){
5154     var symbol = l204;
5155     var value = symbol.value;
5156     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5157     return value;
5158 })()}));
5159 var l245 = {name: "LET*-INITIALIZE-VALUE"};
5160 (function(){
5161     (l245).fvalue = (function(v578){
5162         ((v578)["fname"] = "LET*-INITIALIZE-VALUE");
5163         return v578;
5164     })((function (values,v572){
5165         checkArgs(arguments, 2);
5166         return (function(){
5167             return (function(v573,v574){
5168                 return (l242.fvalue(pv, v573) !== l3.value ? l132.fvalue(values, l143.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l223), l44.fvalue(pv, v573), l44.fvalue(pv, v574))), ";", (function(){
5169                     var symbol = l131;
5170                     var value = symbol.value;
5171                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5172                     return value;
5173                 })()) : (function(){
5174                     var v575 = l188.fvalue(pv, v573);
5175                     var v576 = l171.fvalue(pv, v573, l103, v575);
5176                     return (function(v577){
5177                         l181.fvalue(pv, v576, (function(){
5178                             var symbol = l186;
5179                             var value = symbol.value;
5180                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5181                             return value;
5182                         })(), l103);
5183                         return v577;
5184                     })(l132.fvalue(pv, "var ", v575, " = ", l143.fvalue(pv, v574), ";", (function(){
5185                         var symbol = l131;
5186                         var value = symbol.value;
5187                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5188                         return value;
5189                     })()));
5190                 })());
5191             })(l39.fvalue(pv, v572),l40.fvalue(pv, v572));
5192         })();
5193     }));
5194     return l245;
5195 })();
5196 var l246 = {name: "LET*-BINDING-WRAPPER"};
5197 (function(){
5198     (l246).fvalue = (function(v587){
5199         ((v587)["fname"] = "LET*-BINDING-WRAPPER");
5200         return v587;
5201     })((function (values,v579,v580){
5202         checkArgs(arguments, 3);
5203         return (function(){
5204             try {
5205                 (l12.fvalue(pv, v579) !== l3.value ? (function(){
5206                     var values = mv;
5207                     throw ({type: 'block', id: 206, values: v580, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
5208                 })() : l3.value);
5209                 return (function(v582){
5210                     return l132.fvalue(values, "try {", (function(){
5211                         var symbol = l131;
5212                         var value = symbol.value;
5213                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5214                         return value;
5215                     })(), l141.fvalue(pv, l136.fvalue(pv, (function (values,v583){
5216                         checkArgs(arguments, 2);
5217                         return (function(v584){
5218                             return l132.fvalue(values, "var ", (function(){
5219                                 var tmp = v583;
5220                                 return tmp === l3.value? l3.value: tmp.cdr;
5221                             })(), " = ", v584, ".value;", (function(){
5222                                 var symbol = l131;
5223                                 var value = symbol.value;
5224                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5225                                 return value;
5226                             })());
5227                         })(l143.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l165), l44.fvalue(pv, (function(){
5228                             var tmp = v583;
5229                             return tmp === l3.value? l3.value: tmp.car;
5230                         })()))));
5231                     }), v582), v580), "}", (function(){
5232                         var symbol = l131;
5233                         var value = symbol.value;
5234                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5235                         return value;
5236                     })(), "finally {", (function(){
5237                         var symbol = l131;
5238                         var value = symbol.value;
5239                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5240                         return value;
5241                     })(), l141.fvalue(pv, l136.fvalue(pv, (function (values,v585){
5242                         checkArgs(arguments, 2);
5243                         return (function(v586){
5244                             return l132.fvalue(values, v586, ".value", " = ", (function(){
5245                                 var tmp = v585;
5246                                 return tmp === l3.value? l3.value: tmp.cdr;
5247                             })(), ";", (function(){
5248                                 var symbol = l131;
5249                                 var value = symbol.value;
5250                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5251                                 return value;
5252                             })());
5253                         })(l143.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l165), l44.fvalue(pv, (function(){
5254                             var tmp = v585;
5255                             return tmp === l3.value? l3.value: tmp.car;
5256                         })()))));
5257                     }), v582)), "}", (function(){
5258                         var symbol = l131;
5259                         var value = symbol.value;
5260                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5261                         return value;
5262                     })());
5263                 })(l73.fvalue(pv, (function (values,v581){
5264                     checkArgs(arguments, 2);
5265                     return ({car: v581, cdr: l188.fvalue(pv, v581)});
5266                 }), l89.fvalue(pv, (function(){
5267                     var symbol = l242;
5268                     var func = symbol.fvalue;
5269                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5270                     return func;
5271                 })(), v579)));
5272             }
5273             catch (cf){
5274                 if (cf.type == 'block' && cf.id == 206)
5275                     return values.apply(this, forcemv(cf.values));
5276                 else
5277                     throw cf;
5278             }
5279         })();
5280     }));
5281     return l246;
5282 })();
5283 var l247 = {name: "LET*"};
5284 ((l204).value = ({car: l44.fvalue(pv, l247, (function (values,v589){
5285     checkArgsAtLeast(arguments, 2);
5286     var v588= l3.value;
5287     for (var i = arguments.length-1; i>=2; i--)
5288         v588 = {car: arguments[i], cdr:
5289     v588};
5290     return (function(){
5291         return (function(v590,v591){
5292             try {
5293                 var tmp;
5294                 tmp = l186.value;
5295                 l186.value = v591;
5296                 v591 = tmp;
5297                 return l132.fvalue(values, "(function(){", (function(){
5298                     var symbol = l131;
5299                     var value = symbol.value;
5300                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5301                     return value;
5302                 })(), l141.fvalue(pv, (function(v592,v593){
5303                     return l246.fvalue(pv, v592, v593);
5304                 })(l89.fvalue(pv, (function(){
5305                     var symbol = l242;
5306                     var func = symbol.fvalue;
5307                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5308                     return func;
5309                 })(), l73.fvalue(pv, (function(){
5310                     var symbol = l39;
5311                     var func = symbol.fvalue;
5312                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5313                     return func;
5314                 })(), v590)),l132.fvalue(pv, l136.fvalue(pv, (function(){
5315                     var symbol = l245;
5316                     var func = symbol.fvalue;
5317                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5318                     return func;
5319                 })(), v590), l220.fvalue(pv, v588, l4.value)))), "})()");
5320             }
5321             finally {
5322                 l186.value = v591;
5323             }
5324         })(l73.fvalue(pv, (function(){
5325             var symbol = l58;
5326             var func = symbol.fvalue;
5327             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5328             return func;
5329         })(), v589),l180.fvalue(pv, (function(){
5330             var symbol = l186;
5331             var value = symbol.value;
5332             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5333             return value;
5334         })()));
5335     })();
5336 })), cdr: (function(){
5337     var symbol = l204;
5338     var value = symbol.value;
5339     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5340     return value;
5341 })()}));
5342 var l248 = {name: "*BLOCK-COUNTER*"};
5343 (function(){
5344     (((l248.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l248).value = 0));
5345     return l248;
5346 })();
5347 var l249 = {name: "MULTIPLE-VALUE"};
5348 var l250 = {name: "USED"};
5349 ((l204).value = ({car: l44.fvalue(pv, l182, (function (values,v595){
5350     checkArgsAtLeast(arguments, 2);
5351     var v594= l3.value;
5352     for (var i = arguments.length-1; i>=2; i--)
5353         v594 = {car: arguments[i], cdr:
5354     v594};
5355     return (function(){
5356         return (function(){
5357             var v596 = l17.fvalue(pv, ((l248).value = (function(){
5358                 var x1 = (function(){
5359                     var symbol = l248;
5360                     var value = symbol.value;
5361                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5362                     return value;
5363                 })();
5364                 if (typeof x1 !== 'number') throw 'Not a number!';
5365                 var x2 = 1;
5366                 if (typeof x2 !== 'number') throw 'Not a number!';
5367                 return x1+x2;
5368             })()));
5369             var v597 = l171.fvalue(pv, v595, l182, v596);
5370             ((function(){
5371                 var symbol = l170;
5372                 var value = symbol.value;
5373                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5374                 return value;
5375             })() !== l3.value ? l178.fvalue(pv, l249, v597) : l3.value);
5376             return (function(){
5377                 try {
5378                     var v599 = l186.value;
5379                     ((l186).value = l184.fvalue(pv, l44.fvalue(pv, v597), (function(){
5380                         var symbol = l186;
5381                         var value = symbol.value;
5382                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5383                         return value;
5384                     })(), l182));
5385                     var v598 = l220.fvalue(pv, v594, l4.value);
5386                     return (l86.fvalue(pv, l250, l175.fvalue(pv, v597)) !== l3.value ? l132.fvalue(values, "(function(){", (function(){
5387                         var symbol = l131;
5388                         var value = symbol.value;
5389                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5390                         return value;
5391                     })(), l141.fvalue(pv, "try {", (function(){
5392                         var symbol = l131;
5393                         var value = symbol.value;
5394                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5395                         return value;
5396                     })(), l141.fvalue(pv, v598), "}", (function(){
5397                         var symbol = l131;
5398                         var value = symbol.value;
5399                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5400                         return value;
5401                     })(), "catch (cf){", (function(){
5402                         var symbol = l131;
5403                         var value = symbol.value;
5404                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5405                         return value;
5406                     })(), "    if (cf.type == 'block' && cf.id == ", v596, ")", (function(){
5407                         var symbol = l131;
5408                         var value = symbol.value;
5409                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5410                         return value;
5411                     })(), ((function(){
5412                         var symbol = l170;
5413                         var value = symbol.value;
5414                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5415                         return value;
5416                     })() !== l3.value ? "        return values.apply(this, forcemv(cf.values));" : "        return cf.values;"), (function(){
5417                         var symbol = l131;
5418                         var value = symbol.value;
5419                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5420                         return value;
5421                     })(), "    else", (function(){
5422                         var symbol = l131;
5423                         var value = symbol.value;
5424                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5425                         return value;
5426                     })(), "        throw cf;", (function(){
5427                         var symbol = l131;
5428                         var value = symbol.value;
5429                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5430                         return value;
5431                     })(), "}", (function(){
5432                         var symbol = l131;
5433                         var value = symbol.value;
5434                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5435                         return value;
5436                     })()), "})()") : l132.fvalue(values, "(function(){", (function(){
5437                         var symbol = l131;
5438                         var value = symbol.value;
5439                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5440                         return value;
5441                     })(), l141.fvalue(pv, v598), "})()"));
5442                 }
5443                 finally {
5444                     l186.value = v599;
5445                 }
5446             })();
5447         })();
5448     })();
5449 })), cdr: (function(){
5450     var symbol = l204;
5451     var value = symbol.value;
5452     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5453     return value;
5454 })()}));
5455 var l251 = {name: "RETURN-FROM"};
5456 ((l204).value = ({car: l44.fvalue(pv, l251, (function (values,v600,v601){
5457     checkArgsAtLeast(arguments, 2);
5458     checkArgsAtMost(arguments, 3);
5459     switch(arguments.length-1){
5460     case 1:
5461     v601=l3.value;
5462     default: break;
5463     }
5464     return (function(){
5465         return (function(){
5466             var v602 = l185.fvalue(pv, v600, (function(){
5467                 var symbol = l186;
5468                 var value = symbol.value;
5469                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5470                 return value;
5471             })(), l182);
5472             var v603 = l86.fvalue(pv, l249, l175.fvalue(pv, v602));
5473             (l12.fvalue(pv, v602) !== l3.value ? (function(){
5474                 throw l132.fvalue(pv, "Unknown block `", (v600).name, "'.");
5475             })() : l3.value);
5476             l178.fvalue(pv, l250, v602);
5477             return l132.fvalue(values, "(function(){", (function(){
5478                 var symbol = l131;
5479                 var value = symbol.value;
5480                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5481                 return value;
5482             })(), l141.fvalue(pv, (v603 !== l3.value ? l132.fvalue(pv, "var values = mv;", (function(){
5483                 var symbol = l131;
5484                 var value = symbol.value;
5485                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5486                 return value;
5487             })()) : ""), "throw ({", "type: 'block', ", "id: ", l174.fvalue(pv, v602), ", ", "values: ", l143.fvalue(pv, v601, v603), ", ", "message: 'Return from unknown block ", (v600).name, ".'", "})"), "})()");
5488         })();
5489     })();
5490 })), cdr: (function(){
5491     var symbol = l204;
5492     var value = symbol.value;
5493     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5494     return value;
5495 })()}));
5496 var l252 = {name: "CATCH"};
5497 ((l204).value = ({car: l44.fvalue(pv, l252, (function (values,v605){
5498     checkArgsAtLeast(arguments, 2);
5499     var v604= l3.value;
5500     for (var i = arguments.length-1; i>=2; i--)
5501         v604 = {car: arguments[i], cdr:
5502     v604};
5503     return (function(){
5504         return l132.fvalue(values, "(function(){", (function(){
5505             var symbol = l131;
5506             var value = symbol.value;
5507             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5508             return value;
5509         })(), l141.fvalue(pv, "var id = ", l143.fvalue(pv, v605), ";", (function(){
5510             var symbol = l131;
5511             var value = symbol.value;
5512             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5513             return value;
5514         })(), "try {", (function(){
5515             var symbol = l131;
5516             var value = symbol.value;
5517             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5518             return value;
5519         })(), l141.fvalue(pv, l220.fvalue(pv, v604, l4.value)), (function(){
5520             var symbol = l131;
5521             var value = symbol.value;
5522             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5523             return value;
5524         })(), "}", (function(){
5525             var symbol = l131;
5526             var value = symbol.value;
5527             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5528             return value;
5529         })(), "catch (cf){", (function(){
5530             var symbol = l131;
5531             var value = symbol.value;
5532             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5533             return value;
5534         })(), "    if (cf.type == 'catch' && cf.id == id)", (function(){
5535             var symbol = l131;
5536             var value = symbol.value;
5537             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5538             return value;
5539         })(), ((function(){
5540             var symbol = l170;
5541             var value = symbol.value;
5542             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5543             return value;
5544         })() !== l3.value ? "        return values.apply(this, forcemv(cf.values));" : "        return pv.apply(this, forcemv(cf.values));"), (function(){
5545             var symbol = l131;
5546             var value = symbol.value;
5547             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5548             return value;
5549         })(), "    else", (function(){
5550             var symbol = l131;
5551             var value = symbol.value;
5552             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5553             return value;
5554         })(), "        throw cf;", (function(){
5555             var symbol = l131;
5556             var value = symbol.value;
5557             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5558             return value;
5559         })(), "}", (function(){
5560             var symbol = l131;
5561             var value = symbol.value;
5562             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5563             return value;
5564         })()), "})()");
5565     })();
5566 })), cdr: (function(){
5567     var symbol = l204;
5568     var value = symbol.value;
5569     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5570     return value;
5571 })()}));
5572 var l253 = {name: "THROW"};
5573 ((l204).value = ({car: l44.fvalue(pv, l253, (function (values,v606,v607){
5574     checkArgs(arguments, 3);
5575     return (function(){
5576         return l132.fvalue(values, "(function(){", (function(){
5577             var symbol = l131;
5578             var value = symbol.value;
5579             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5580             return value;
5581         })(), l141.fvalue(pv, "var values = mv;", (function(){
5582             var symbol = l131;
5583             var value = symbol.value;
5584             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5585             return value;
5586         })(), "throw ({", "type: 'catch', ", "id: ", l143.fvalue(pv, v606), ", ", "values: ", l143.fvalue(pv, v607, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
5587     })();
5588 })), cdr: (function(){
5589     var symbol = l204;
5590     var value = symbol.value;
5591     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5592     return value;
5593 })()}));
5594 var l254 = {name: "*TAGBODY-COUNTER*"};
5595 (function(){
5596     (((l254.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l254).value = 0));
5597     return l254;
5598 })();
5599 var l255 = {name: "*GO-TAG-COUNTER*"};
5600 (function(){
5601     (((l255.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l255).value = 0));
5602     return l255;
5603 })();
5604 var l256 = {name: "GO-TAG-P"};
5605 (function(){
5606     (l256).fvalue = (function(v610){
5607         ((v610)["fname"] = "GO-TAG-P");
5608         return v610;
5609     })((function (values,v608){
5610         checkArgs(arguments, 2);
5611         return (function(){
5612             return (function(v609){
5613                 return (v609 !== l3.value ? v609 : ((function(){
5614                     var tmp = v608;
5615                     return (typeof tmp == 'object' && 'name' in tmp);
5616                 })()?l4.value: l3.value));
5617             })(l79.fvalue(pv, v608));
5618         })();
5619     }));
5620     return l256;
5621 })();
5622 var l257 = {name: "DECLARE-TAGBODY-TAGS"};
5623 (function(){
5624     (l257).fvalue = (function(v616){
5625         ((v616)["fname"] = "DECLARE-TAGBODY-TAGS");
5626         return v616;
5627     })((function (values,v611,v612){
5628         checkArgs(arguments, 3);
5629         return (function(){
5630             return (function(v615){
5631                 return l184.fvalue(values, v615, (function(){
5632                     var symbol = l186;
5633                     var value = symbol.value;
5634                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5635                     return value;
5636                 })(), l183);
5637             })(l73.fvalue(pv, (function (values,v613){
5638                 checkArgs(arguments, 2);
5639                 return (function(v614){
5640                     return l171.fvalue(values, v613, l183, l44.fvalue(pv, v611, v614));
5641                 })(l17.fvalue(pv, ((l255).value = (function(){
5642                     var x1 = (function(){
5643                         var symbol = l255;
5644                         var value = symbol.value;
5645                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5646                         return value;
5647                     })();
5648                     if (typeof x1 !== 'number') throw 'Not a number!';
5649                     var x2 = 1;
5650                     if (typeof x2 !== 'number') throw 'Not a number!';
5651                     return x1+x2;
5652                 })())));
5653             }), l89.fvalue(pv, (function(){
5654                 var symbol = l256;
5655                 var func = symbol.fvalue;
5656                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5657                 return func;
5658             })(), v612)));
5659         })();
5660     }));
5661     return l257;
5662 })();
5663 var l258 = {name: "TAGBODY"};
5664 ((l204).value = ({car: l44.fvalue(pv, l258, (function (values){
5665     var v617= l3.value;
5666     for (var i = arguments.length-1; i>=1; i--)
5667         v617 = {car: arguments[i], cdr:
5668     v617};
5669     return (function(){
5670         try {
5671             (l93.fvalue(pv, (function(){
5672                 var symbol = l256;
5673                 var func = symbol.fvalue;
5674                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5675                 return func;
5676             })(), v617) !== l3.value ? l3.value : (function(){
5677                 var values = mv;
5678                 throw ({type: 'block', id: 214, values: l143.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l239), v617, l44.fvalue(pv, l3))), message: 'Return from unknown block TAGBODY.'})
5679             })());
5680             (l256.fvalue(pv, (function(){
5681                 var tmp = v617;
5682                 return tmp === l3.value? l3.value: tmp.car;
5683             })()) !== l3.value ? l3.value : (v617 = ({car: l16.fvalue(pv, "START"), cdr: v617})));
5684             return (function(v618){
5685                 return (function(v620,v619){
5686                     try {
5687                         var tmp;
5688                         tmp = l186.value;
5689                         l186.value = v620;
5690                         v620 = tmp;
5691                         (function(v621){
5692                             return (v619 = l40.fvalue(pv, l174.fvalue(pv, v621)));
5693                         })(l185.fvalue(pv, l39.fvalue(pv, v617), (function(){
5694                             var symbol = l186;
5695                             var value = symbol.value;
5696                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5697                             return value;
5698                         })(), l183));
5699                         return l132.fvalue(values, "(function(){", (function(){
5700                             var symbol = l131;
5701                             var value = symbol.value;
5702                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5703                             return value;
5704                         })(), l141.fvalue(pv, "var tagbody_", v618, " = ", v619, ";", (function(){
5705                             var symbol = l131;
5706                             var value = symbol.value;
5707                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5708                             return value;
5709                         })(), "tbloop:", (function(){
5710                             var symbol = l131;
5711                             var value = symbol.value;
5712                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5713                             return value;
5714                         })(), "while (true) {", (function(){
5715                             var symbol = l131;
5716                             var value = symbol.value;
5717                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5718                             return value;
5719                         })(), l141.fvalue(pv, "try {", (function(){
5720                             var symbol = l131;
5721                             var value = symbol.value;
5722                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5723                             return value;
5724                         })(), l141.fvalue(pv, (function(v622){
5725                             return l132.fvalue(pv, "switch(tagbody_", v618, "){", (function(){
5726                                 var symbol = l131;
5727                                 var value = symbol.value;
5728                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5729                                 return value;
5730                             })(), "case ", v619, ":", (function(){
5731                                 var symbol = l131;
5732                                 var value = symbol.value;
5733                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5734                                 return value;
5735                             })(), (function(){
5736                                 return (function(v623,v624){
5737                                     (function(){
5738                                         while(v623 !== l3.value){
5739                                             (v624 = (function(){
5740                                                 var tmp = v623;
5741                                                 return tmp === l3.value? l3.value: tmp.car;
5742                                             })());
5743                                             (function(){
5744                                                 (v622 = l132.fvalue(pv, v622, (l27.fvalue(pv, l256.fvalue(pv, v624)) !== l3.value ? l141.fvalue(pv, l143.fvalue(pv, v624), ";", (function(){
5745                                                     var symbol = l131;
5746                                                     var value = symbol.value;
5747                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5748                                                     return value;
5749                                                 })()) : (function(v625){
5750                                                     return l132.fvalue(pv, "case ", l40.fvalue(pv, l174.fvalue(pv, v625)), ":", (function(){
5751                                                         var symbol = l131;
5752                                                         var value = symbol.value;
5753                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5754                                                         return value;
5755                                                     })());
5756                                                 })(l185.fvalue(pv, v624, (function(){
5757                                                     var symbol = l186;
5758                                                     var value = symbol.value;
5759                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5760                                                     return value;
5761                                                 })(), l183)))));
5762                                                 return l3.value;
5763                                             })();
5764                                             (v623 = (function(){
5765                                                 var tmp = v623;
5766                                                 return tmp === l3.value? l3.value: tmp.cdr;
5767                                             })());
5768                                         }return l3.value;
5769                                     })();
5770                                     return v622;
5771                                 })((function(){
5772                                     var tmp = v617;
5773                                     return tmp === l3.value? l3.value: tmp.cdr;
5774                                 })(),l3.value);
5775                             })(), "default:", (function(){
5776                                 var symbol = l131;
5777                                 var value = symbol.value;
5778                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5779                                 return value;
5780                             })(), "    break tbloop;", (function(){
5781                                 var symbol = l131;
5782                                 var value = symbol.value;
5783                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5784                                 return value;
5785                             })(), "}", (function(){
5786                                 var symbol = l131;
5787                                 var value = symbol.value;
5788                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5789                                 return value;
5790                             })());
5791                         })("")), "}", (function(){
5792                             var symbol = l131;
5793                             var value = symbol.value;
5794                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5795                             return value;
5796                         })(), "catch (jump) {", (function(){
5797                             var symbol = l131;
5798                             var value = symbol.value;
5799                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5800                             return value;
5801                         })(), "    if (jump.type == 'tagbody' && jump.id == ", v618, ")", (function(){
5802                             var symbol = l131;
5803                             var value = symbol.value;
5804                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5805                             return value;
5806                         })(), "        tagbody_", v618, " = jump.label;", (function(){
5807                             var symbol = l131;
5808                             var value = symbol.value;
5809                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5810                             return value;
5811                         })(), "    else", (function(){
5812                             var symbol = l131;
5813                             var value = symbol.value;
5814                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5815                             return value;
5816                         })(), "        throw(jump);", (function(){
5817                             var symbol = l131;
5818                             var value = symbol.value;
5819                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5820                             return value;
5821                         })(), "}", (function(){
5822                             var symbol = l131;
5823                             var value = symbol.value;
5824                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5825                             return value;
5826                         })()), "}", (function(){
5827                             var symbol = l131;
5828                             var value = symbol.value;
5829                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5830                             return value;
5831                         })(), "return ", l143.fvalue(pv, l3.value), ";", (function(){
5832                             var symbol = l131;
5833                             var value = symbol.value;
5834                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5835                             return value;
5836                         })()), "})()");
5837                     }
5838                     finally {
5839                         l186.value = v620;
5840                     }
5841                 })(l257.fvalue(pv, v618, v617),l3.value);
5842             })(l17.fvalue(pv, (function(){
5843                 var symbol = l254;
5844                 var value = symbol.value;
5845                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5846                 return value;
5847             })()));
5848         }
5849         catch (cf){
5850             if (cf.type == 'block' && cf.id == 214)
5851                 return values.apply(this, forcemv(cf.values));
5852             else
5853                 throw cf;
5854         }
5855     })();
5856 })), cdr: (function(){
5857     var symbol = l204;
5858     var value = symbol.value;
5859     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5860     return value;
5861 })()}));
5862 var l259 = {name: "GO"};
5863 ((l204).value = ({car: l44.fvalue(pv, l259, (function (values,v626){
5864     checkArgs(arguments, 2);
5865     return (function(){
5866         return (function(v627,v628){
5867             return (v627 !== l3.value ? l132.fvalue(values, "(function(){", (function(){
5868                 var symbol = l131;
5869                 var value = symbol.value;
5870                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5871                 return value;
5872             })(), l141.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l39.fvalue(pv, l174.fvalue(pv, v627)), ", ", "label: ", l40.fvalue(pv, l174.fvalue(pv, v627)), ", ", "message: 'Attempt to GO to non-existing tag ", v628, "'", "})", (function(){
5873                 var symbol = l131;
5874                 var value = symbol.value;
5875                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5876                 return value;
5877             })()), "})()") : (function(){
5878                 throw l132.fvalue(pv, "Unknown tag `", v628, "'.");
5879             })());
5880         })(l185.fvalue(pv, v626, (function(){
5881             var symbol = l186;
5882             var value = symbol.value;
5883             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5884             return value;
5885         })(), l183),(((function(){
5886             var tmp = v626;
5887             return (typeof tmp == 'object' && 'name' in tmp);
5888         })()?l4.value: l3.value) !== l3.value ? (v626).name : (l79.fvalue(pv, v626) !== l3.value ? l17.fvalue(pv, v626) : l3.value)));
5889     })();
5890 })), cdr: (function(){
5891     var symbol = l204;
5892     var value = symbol.value;
5893     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5894     return value;
5895 })()}));
5896 var l260 = {name: "UNWIND-PROTECT"};
5897 ((l204).value = ({car: l44.fvalue(pv, l260, (function (values,v630){
5898     checkArgsAtLeast(arguments, 2);
5899     var v629= l3.value;
5900     for (var i = arguments.length-1; i>=2; i--)
5901         v629 = {car: arguments[i], cdr:
5902     v629};
5903     return (function(){
5904         return l132.fvalue(values, "(function(){", (function(){
5905             var symbol = l131;
5906             var value = symbol.value;
5907             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5908             return value;
5909         })(), l141.fvalue(pv, "var ret = ", l143.fvalue(pv, l3.value), ";", (function(){
5910             var symbol = l131;
5911             var value = symbol.value;
5912             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5913             return value;
5914         })(), "try {", (function(){
5915             var symbol = l131;
5916             var value = symbol.value;
5917             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5918             return value;
5919         })(), l141.fvalue(pv, "ret = ", l143.fvalue(pv, v630), ";", (function(){
5920             var symbol = l131;
5921             var value = symbol.value;
5922             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5923             return value;
5924         })()), "} finally {", (function(){
5925             var symbol = l131;
5926             var value = symbol.value;
5927             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5928             return value;
5929         })(), l141.fvalue(pv, l220.fvalue(pv, v629)), "}", (function(){
5930             var symbol = l131;
5931             var value = symbol.value;
5932             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5933             return value;
5934         })(), "return ret;", (function(){
5935             var symbol = l131;
5936             var value = symbol.value;
5937             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5938             return value;
5939         })()), "})()");
5940     })();
5941 })), cdr: (function(){
5942     var symbol = l204;
5943     var value = symbol.value;
5944     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5945     return value;
5946 })()}));
5947 var l261 = {name: "MULTIPLE-VALUE-CALL"};
5948 ((l204).value = ({car: l44.fvalue(pv, l261, (function (values,v632){
5949     checkArgsAtLeast(arguments, 2);
5950     var v631= l3.value;
5951     for (var i = arguments.length-1; i>=2; i--)
5952         v631 = {car: arguments[i], cdr:
5953     v631};
5954     return (function(){
5955         return l132.fvalue(values, "(function(){", (function(){
5956             var symbol = l131;
5957             var value = symbol.value;
5958             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5959             return value;
5960         })(), l141.fvalue(pv, "var func = ", l143.fvalue(pv, v632), ";", (function(){
5961             var symbol = l131;
5962             var value = symbol.value;
5963             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5964             return value;
5965         })(), "var args = [", ((function(){
5966             var symbol = l170;
5967             var value = symbol.value;
5968             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5969             return value;
5970         })() !== l3.value ? "values" : "pv"), "];", (function(){
5971             var symbol = l131;
5972             var value = symbol.value;
5973             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5974             return value;
5975         })(), "return ", l132.fvalue(pv, "(function(){", (function(){
5976             var symbol = l131;
5977             var value = symbol.value;
5978             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5979             return value;
5980         })(), l141.fvalue(pv, "var values = mv;", (function(){
5981             var symbol = l131;
5982             var value = symbol.value;
5983             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5984             return value;
5985         })(), "var vs;", (function(){
5986             var symbol = l131;
5987             var value = symbol.value;
5988             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5989             return value;
5990         })(), l136.fvalue(pv, (function (values,v633){
5991             checkArgs(arguments, 2);
5992             return l132.fvalue(values, "vs = ", l143.fvalue(pv, v633, l4.value), ";", (function(){
5993                 var symbol = l131;
5994                 var value = symbol.value;
5995                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5996                 return value;
5997             })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){
5998                 var symbol = l131;
5999                 var value = symbol.value;
6000                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6001                 return value;
6002             })(), l141.fvalue(pv, "args = args.concat(vs);", (function(){
6003                 var symbol = l131;
6004                 var value = symbol.value;
6005                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6006                 return value;
6007             })()), "else", (function(){
6008                 var symbol = l131;
6009                 var value = symbol.value;
6010                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6011                 return value;
6012             })(), l141.fvalue(pv, "args.push(vs);", (function(){
6013                 var symbol = l131;
6014                 var value = symbol.value;
6015                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6016                 return value;
6017             })()));
6018         }), v631), "return func.apply(window, args);", (function(){
6019             var symbol = l131;
6020             var value = symbol.value;
6021             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6022             return value;
6023         })()), "})()"), ";", (function(){
6024             var symbol = l131;
6025             var value = symbol.value;
6026             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6027             return value;
6028         })()), "})()");
6029     })();
6030 })), cdr: (function(){
6031     var symbol = l204;
6032     var value = symbol.value;
6033     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6034     return value;
6035 })()}));
6036 var l262 = {name: "MULTIPLE-VALUE-PROG1"};
6037 ((l204).value = ({car: l44.fvalue(pv, l262, (function (values,v635){
6038     checkArgsAtLeast(arguments, 2);
6039     var v634= l3.value;
6040     for (var i = arguments.length-1; i>=2; i--)
6041         v634 = {car: arguments[i], cdr:
6042     v634};
6043     return (function(){
6044         return l132.fvalue(values, "(function(){", (function(){
6045             var symbol = l131;
6046             var value = symbol.value;
6047             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6048             return value;
6049         })(), l141.fvalue(pv, "var args = ", l143.fvalue(pv, v635, (function(){
6050             var symbol = l170;
6051             var value = symbol.value;
6052             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6053             return value;
6054         })()), ";", (function(){
6055             var symbol = l131;
6056             var value = symbol.value;
6057             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6058             return value;
6059         })(), l220.fvalue(pv, v634), "return args;", (function(){
6060             var symbol = l131;
6061             var value = symbol.value;
6062             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6063             return value;
6064         })()), "})()");
6065     })();
6066 })), cdr: (function(){
6067     var symbol = l204;
6068     var value = symbol.value;
6069     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6070     return value;
6071 })()}));
6072 var l263 = {name: "BACKQUOTE-EXPAND-1"};
6073 (function(){
6074     (l263).fvalue = (function(v638){
6075         ((v638)["fname"] = "BACKQUOTE-EXPAND-1");
6076         return v638;
6077     })((function (values,v636){
6078         checkArgs(arguments, 2);
6079         return (function(){
6080             return (((function(){
6081                 var tmp = v636;
6082                 return (typeof tmp == 'object' && 'name' in tmp);
6083             })()?l4.value: l3.value) !== l3.value ? l44.fvalue(values, l165, v636) : (l45.fvalue(pv, v636) !== l3.value ? v636 : ((((function(){
6084                 var tmp = v636;
6085                 return tmp === l3.value? l3.value: tmp.car;
6086             })() === l168)?l4.value: l3.value) !== l3.value ? (function(){
6087                 var tmp = v636;
6088                 return tmp === l3.value? l3.value: tmp.car;
6089             })() : ((((function(){
6090                 var tmp = v636;
6091                 return tmp === l3.value? l3.value: tmp.car;
6092             })() === l166)?l4.value: l3.value) !== l3.value ? l263.fvalue(values, l263.fvalue(pv, l33.fvalue(pv, v636))) : ({car: l64, cdr: l73.fvalue(pv, (function (values,v637){
6093                 checkArgs(arguments, 2);
6094                 return ((l59.fvalue(pv, v637) !== l3.value ? (((function(){
6095                     var tmp = v637;
6096                     return tmp === l3.value? l3.value: tmp.car;
6097                 })() === l168)?l4.value: l3.value) : l3.value) !== l3.value ? l44.fvalue(values, l44, l33.fvalue(pv, v637)) : ((l59.fvalue(pv, v637) !== l3.value ? (((function(){
6098                     var tmp = v637;
6099                     return tmp === l3.value? l3.value: tmp.car;
6100                 })() === l167)?l4.value: l3.value) : l3.value) !== l3.value ? l33.fvalue(values, v637) : l44.fvalue(values, l44, l263.fvalue(pv, v637))));
6101             }), v636)})))));
6102         })();
6103     }));
6104     return l263;
6105 })();
6106 var l264 = {name: "BACKQUOTE-EXPAND"};
6107 (function(){
6108     (l264).fvalue = (function(v640){
6109         ((v640)["fname"] = "BACKQUOTE-EXPAND");
6110         return v640;
6111     })((function (values,v639){
6112         checkArgs(arguments, 2);
6113         return (function(){
6114             return ((l59.fvalue(pv, v639) !== l3.value ? (((function(){
6115                 var tmp = v639;
6116                 return tmp === l3.value? l3.value: tmp.car;
6117             })() === l166)?l4.value: l3.value) : l3.value) !== l3.value ? l263.fvalue(values, l33.fvalue(pv, v639)) : v639);
6118         })();
6119     }));
6120     return l264;
6121 })();
6122 l166;
6123 ((l204).value = ({car: l44.fvalue(pv, l166, (function (values,v641){
6124     checkArgs(arguments, 2);
6125     return (function(){
6126         return l143.fvalue(values, l263.fvalue(pv, v641));
6127     })();
6128 })), cdr: (function(){
6129     var symbol = l204;
6130     var value = symbol.value;
6131     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6132     return value;
6133 })()}));
6134 var l265 = {name: "*BUILTINS*"};
6135 (function(){
6136     (((l265.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l265).value = l3.value));
6137     return l265;
6138 })();
6139 var l266 = {name: "DEFINE-RAW-BUILTIN"};
6140 l266;
6141 var l267 = {name: "DEFINE-BUILTIN"};
6142 l267;
6143 var l268 = {name: "TYPE-CHECK"};
6144 l268;
6145 var l269 = {name: "VARIABLE-ARITY-CALL"};
6146 (function(){
6147     (l269).fvalue = (function(v650){
6148         ((v650)["fname"] = "VARIABLE-ARITY-CALL");
6149         return v650;
6150     })((function (values,v642,v643){
6151         checkArgs(arguments, 3);
6152         return (function(){
6153             (((function(){
6154                 var tmp = v642;
6155                 return (typeof tmp == 'object' && 'car' in tmp);
6156             })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
6157                 throw "ARGS must be a non-empty list";
6158             })());
6159             return (function(v644,v645,v646){
6160                 (function(){
6161                     return (function(v647,v648){
6162                         (function(){
6163                             while(v647 !== l3.value){
6164                                 (v648 = (function(){
6165                                     var tmp = v647;
6166                                     return tmp === l3.value? l3.value: tmp.car;
6167                                 })());
6168                                 (function(){
6169                                     (function(v649){
6170                                         (v645 = ({car: v649, cdr: v645}));
6171                                         return (v646 = l132.fvalue(pv, v646, l132.fvalue(pv, "var ", v649, " = ", l143.fvalue(pv, v648), ";", (function(){
6172                                             var symbol = l131;
6173                                             var value = symbol.value;
6174                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6175                                             return value;
6176                                         })(), "if (typeof ", v649, " !== 'number') throw 'Not a number!';", (function(){
6177                                             var symbol = l131;
6178                                             var value = symbol.value;
6179                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6180                                             return value;
6181                                         })())));
6182                                     })(l132.fvalue(pv, "x", l17.fvalue(pv, (v644 = (function(){
6183                                         var x1 = v644;
6184                                         if (typeof x1 !== 'number') throw 'Not a number!';
6185                                         var x2 = 1;
6186                                         if (typeof x2 !== 'number') throw 'Not a number!';
6187                                         return x1+x2;
6188                                     })()))));
6189                                     return l3.value;
6190                                 })();
6191                                 (v647 = (function(){
6192                                     var tmp = v647;
6193                                     return tmp === l3.value? l3.value: tmp.cdr;
6194                                 })());
6195                             }return l3.value;
6196                         })();
6197                         return l3.value;
6198                     })(v642,l3.value);
6199                 })();
6200                 return l132.fvalue(values, "(function(){", (function(){
6201                     var symbol = l131;
6202                     var value = symbol.value;
6203                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6204                     return value;
6205                 })(), l141.fvalue(pv, v646, (v643)(pv, l66.fvalue(pv, v645))), "})()");
6206             })(0,l3,"");
6207         })();
6208     }));
6209     return l269;
6210 })();
6211 var l270 = {name: "VARIABLE-ARITY"};
6212 l270;
6213 var l271 = {name: "NUM-OP-NUM"};
6214 (function(){
6215     (l271).fvalue = (function(v654){
6216         ((v654)["fname"] = "NUM-OP-NUM");
6217         return v654;
6218     })((function (values,v651,v652,v653){
6219         checkArgs(arguments, 4);
6220         return (function(){
6221             return l132.fvalue(values, "(function(){", (function(){
6222                 var symbol = l131;
6223                 var value = symbol.value;
6224                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6225                 return value;
6226             })(), l141.fvalue(pv, l132.fvalue(pv, "var ", "x", " = ", v651, ";", (function(){
6227                 var symbol = l131;
6228                 var value = symbol.value;
6229                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6230                 return value;
6231             })()), l132.fvalue(pv, "var ", "y", " = ", v653, ";", (function(){
6232                 var symbol = l131;
6233                 var value = symbol.value;
6234                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6235                 return value;
6236             })()), l132.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6237                 var symbol = l131;
6238                 var value = symbol.value;
6239                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6240                 return value;
6241             })(), l141.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6242                 var symbol = l131;
6243                 var value = symbol.value;
6244                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6245                 return value;
6246             })())), l132.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
6247                 var symbol = l131;
6248                 var value = symbol.value;
6249                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6250                 return value;
6251             })(), l141.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
6252                 var symbol = l131;
6253                 var value = symbol.value;
6254                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6255                 return value;
6256             })())), l132.fvalue(pv, "return ", l132.fvalue(pv, "x", v652, "y"), ";", (function(){
6257                 var symbol = l131;
6258                 var value = symbol.value;
6259                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6260                 return value;
6261             })())), "})()");
6262         })();
6263     }));
6264     return l271;
6265 })();
6266 ((l265).value = ({car: l44.fvalue(pv, l61, (function (values){
6267     var v655= l3.value;
6268     for (var i = arguments.length-1; i>=1; i--)
6269         v655 = {car: arguments[i], cdr:
6270     v655};
6271     return (function(){
6272         return (l12.fvalue(pv, v655) !== l3.value ? "0" : l269.fvalue(values, v655, (function (values,v656){
6273             checkArgs(arguments, 2);
6274             return l132.fvalue(values, "return ", l134.fvalue(pv, v656, "+"), ";", (function(){
6275                 var symbol = l131;
6276                 var value = symbol.value;
6277                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6278                 return value;
6279             })());
6280         })));
6281     })();
6282 })), cdr: (function(){
6283     var symbol = l265;
6284     var value = symbol.value;
6285     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6286     return value;
6287 })()}));
6288 ((l265).value = ({car: l44.fvalue(pv, l62, (function (values,v658){
6289     checkArgsAtLeast(arguments, 2);
6290     var v657= l3.value;
6291     for (var i = arguments.length-1; i>=2; i--)
6292         v657 = {car: arguments[i], cdr:
6293     v657};
6294     return (function(){
6295         return (function(v659){
6296             return l269.fvalue(values, v659, (function (values,v660){
6297                 checkArgs(arguments, 2);
6298                 return l132.fvalue(values, "return ", (l12.fvalue(pv, v657) !== l3.value ? l132.fvalue(pv, "-", (function(){
6299                     var tmp = v660;
6300                     return tmp === l3.value? l3.value: tmp.car;
6301                 })()) : l134.fvalue(pv, v660, "-")), ";", (function(){
6302                     var symbol = l131;
6303                     var value = symbol.value;
6304                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6305                     return value;
6306                 })());
6307             }));
6308         })(({car: v658, cdr: v657}));
6309     })();
6310 })), cdr: (function(){
6311     var symbol = l265;
6312     var value = symbol.value;
6313     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6314     return value;
6315 })()}));
6316 ((l265).value = ({car: l44.fvalue(pv, l20, (function (values){
6317     var v661= l3.value;
6318     for (var i = arguments.length-1; i>=1; i--)
6319         v661 = {car: arguments[i], cdr:
6320     v661};
6321     return (function(){
6322         return (l12.fvalue(pv, v661) !== l3.value ? "1" : l269.fvalue(values, v661, (function (values,v662){
6323             checkArgs(arguments, 2);
6324             return l132.fvalue(values, "return ", l134.fvalue(pv, v662, "*"), ";", (function(){
6325                 var symbol = l131;
6326                 var value = symbol.value;
6327                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6328                 return value;
6329             })());
6330         })));
6331     })();
6332 })), cdr: (function(){
6333     var symbol = l265;
6334     var value = symbol.value;
6335     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6336     return value;
6337 })()}));
6338 ((l265).value = ({car: l44.fvalue(pv, l21, (function (values,v664){
6339     checkArgsAtLeast(arguments, 2);
6340     var v663= l3.value;
6341     for (var i = arguments.length-1; i>=2; i--)
6342         v663 = {car: arguments[i], cdr:
6343     v663};
6344     return (function(){
6345         return (function(v665){
6346             return l269.fvalue(values, v665, (function (values,v666){
6347                 checkArgs(arguments, 2);
6348                 return l132.fvalue(values, "return ", (l12.fvalue(pv, v663) !== l3.value ? l132.fvalue(pv, "1 /", (function(){
6349                     var tmp = v666;
6350                     return tmp === l3.value? l3.value: tmp.car;
6351                 })()) : l134.fvalue(pv, v666, "/")), ";", (function(){
6352                     var symbol = l131;
6353                     var value = symbol.value;
6354                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6355                     return value;
6356                 })());
6357             }));
6358         })(({car: v664, cdr: v663}));
6359     })();
6360 })), cdr: (function(){
6361     var symbol = l265;
6362     var value = symbol.value;
6363     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6364     return value;
6365 })()}));
6366 var l272 = {name: "MOD"};
6367 ((l265).value = ({car: l44.fvalue(pv, l272, (function (values,v667,v668){
6368     checkArgs(arguments, 3);
6369     return (function(){
6370         return (function(v669,v670){
6371             return l271.fvalue(values, v669, "%", v670);
6372         })(l143.fvalue(pv, v667),l143.fvalue(pv, v668));
6373     })();
6374 })), cdr: (function(){
6375     var symbol = l265;
6376     var value = symbol.value;
6377     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6378     return value;
6379 })()}));
6380 var l273 = {name: "COMPARISON-CONJUNTION"};
6381 (function(){
6382     (l273).fvalue = (function(v673){
6383         ((v673)["fname"] = "COMPARISON-CONJUNTION");
6384         return v673;
6385     })((function (values,v671,v672){
6386         checkArgs(arguments, 3);
6387         return (function(){
6388             return (l12.fvalue(pv, (function(){
6389                 var tmp = v671;
6390                 return tmp === l3.value? l3.value: tmp.cdr;
6391             })()) !== l3.value ? "true" : (l12.fvalue(pv, l35.fvalue(pv, v671)) !== l3.value ? l132.fvalue(values, (function(){
6392                 var tmp = v671;
6393                 return tmp === l3.value? l3.value: tmp.car;
6394             })(), v672, l33.fvalue(pv, v671)) : l132.fvalue(values, (function(){
6395                 var tmp = v671;
6396                 return tmp === l3.value? l3.value: tmp.car;
6397             })(), v672, l33.fvalue(pv, v671), " && ", l273.fvalue(pv, (function(){
6398                 var tmp = v671;
6399                 return tmp === l3.value? l3.value: tmp.cdr;
6400             })(), v672))));
6401         })();
6402     }));
6403     return l273;
6404 })();
6405 var l274 = {name: "DEFINE-BUILTIN-COMPARISON"};
6406 l274;
6407 var l275 = {name: ">"};
6408 ((l265).value = ({car: l44.fvalue(pv, l275, (function (values,v675){
6409     checkArgsAtLeast(arguments, 2);
6410     var v674= l3.value;
6411     for (var i = arguments.length-1; i>=2; i--)
6412         v674 = {car: arguments[i], cdr:
6413     v674};
6414     return (function(){
6415         return (function(v676){
6416             return l269.fvalue(values, v676, (function (values,v677){
6417                 checkArgs(arguments, 2);
6418                 return l132.fvalue(values, "return ", l142.fvalue(pv, l273.fvalue(pv, v677, ">")), ";", (function(){
6419                     var symbol = l131;
6420                     var value = symbol.value;
6421                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6422                     return value;
6423                 })());
6424             }));
6425         })(({car: v675, cdr: v674}));
6426     })();
6427 })), cdr: (function(){
6428     var symbol = l265;
6429     var value = symbol.value;
6430     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6431     return value;
6432 })()}));
6433 var l276 = {name: "<"};
6434 ((l265).value = ({car: l44.fvalue(pv, l276, (function (values,v679){
6435     checkArgsAtLeast(arguments, 2);
6436     var v678= l3.value;
6437     for (var i = arguments.length-1; i>=2; i--)
6438         v678 = {car: arguments[i], cdr:
6439     v678};
6440     return (function(){
6441         return (function(v680){
6442             return l269.fvalue(values, v680, (function (values,v681){
6443                 checkArgs(arguments, 2);
6444                 return l132.fvalue(values, "return ", l142.fvalue(pv, l273.fvalue(pv, v681, "<")), ";", (function(){
6445                     var symbol = l131;
6446                     var value = symbol.value;
6447                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6448                     return value;
6449                 })());
6450             }));
6451         })(({car: v679, cdr: v678}));
6452     })();
6453 })), cdr: (function(){
6454     var symbol = l265;
6455     var value = symbol.value;
6456     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6457     return value;
6458 })()}));
6459 var l277 = {name: ">="};
6460 ((l265).value = ({car: l44.fvalue(pv, l277, (function (values,v683){
6461     checkArgsAtLeast(arguments, 2);
6462     var v682= l3.value;
6463     for (var i = arguments.length-1; i>=2; i--)
6464         v682 = {car: arguments[i], cdr:
6465     v682};
6466     return (function(){
6467         return (function(v684){
6468             return l269.fvalue(values, v684, (function (values,v685){
6469                 checkArgs(arguments, 2);
6470                 return l132.fvalue(values, "return ", l142.fvalue(pv, l273.fvalue(pv, v685, ">=")), ";", (function(){
6471                     var symbol = l131;
6472                     var value = symbol.value;
6473                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6474                     return value;
6475                 })());
6476             }));
6477         })(({car: v683, cdr: v682}));
6478     })();
6479 })), cdr: (function(){
6480     var symbol = l265;
6481     var value = symbol.value;
6482     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6483     return value;
6484 })()}));
6485 var l278 = {name: "<="};
6486 ((l265).value = ({car: l44.fvalue(pv, l278, (function (values,v687){
6487     checkArgsAtLeast(arguments, 2);
6488     var v686= l3.value;
6489     for (var i = arguments.length-1; i>=2; i--)
6490         v686 = {car: arguments[i], cdr:
6491     v686};
6492     return (function(){
6493         return (function(v688){
6494             return l269.fvalue(values, v688, (function (values,v689){
6495                 checkArgs(arguments, 2);
6496                 return l132.fvalue(values, "return ", l142.fvalue(pv, l273.fvalue(pv, v689, "<=")), ";", (function(){
6497                     var symbol = l131;
6498                     var value = symbol.value;
6499                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6500                     return value;
6501                 })());
6502             }));
6503         })(({car: v687, cdr: v686}));
6504     })();
6505 })), cdr: (function(){
6506     var symbol = l265;
6507     var value = symbol.value;
6508     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6509     return value;
6510 })()}));
6511 ((l265).value = ({car: l44.fvalue(pv, l19, (function (values,v691){
6512     checkArgsAtLeast(arguments, 2);
6513     var v690= l3.value;
6514     for (var i = arguments.length-1; i>=2; i--)
6515         v690 = {car: arguments[i], cdr:
6516     v690};
6517     return (function(){
6518         return (function(v692){
6519             return l269.fvalue(values, v692, (function (values,v693){
6520                 checkArgs(arguments, 2);
6521                 return l132.fvalue(values, "return ", l142.fvalue(pv, l273.fvalue(pv, v693, "==")), ";", (function(){
6522                     var symbol = l131;
6523                     var value = symbol.value;
6524                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6525                     return value;
6526                 })());
6527             }));
6528         })(({car: v691, cdr: v690}));
6529     })();
6530 })), cdr: (function(){
6531     var symbol = l265;
6532     var value = symbol.value;
6533     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6534     return value;
6535 })()}));
6536 var l279 = {name: "NUMBERP"};
6537 ((l265).value = ({car: l44.fvalue(pv, l279, (function (values,v694){
6538     checkArgs(arguments, 2);
6539     return (function(){
6540         return (function(v695){
6541             return l142.fvalue(values, l132.fvalue(pv, "(typeof (", v695, ") == \"number\")"));
6542         })(l143.fvalue(pv, v694));
6543     })();
6544 })), cdr: (function(){
6545     var symbol = l265;
6546     var value = symbol.value;
6547     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6548     return value;
6549 })()}));
6550 var l280 = {name: "FLOOR"};
6551 ((l265).value = ({car: l44.fvalue(pv, l280, (function (values,v696){
6552     checkArgs(arguments, 2);
6553     return (function(){
6554         return (function(v697){
6555             return l132.fvalue(values, "(function(){", (function(){
6556                 var symbol = l131;
6557                 var value = symbol.value;
6558                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6559                 return value;
6560             })(), l141.fvalue(pv, l132.fvalue(pv, "var ", "x", " = ", v697, ";", (function(){
6561                 var symbol = l131;
6562                 var value = symbol.value;
6563                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6564                 return value;
6565             })()), l132.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6566                 var symbol = l131;
6567                 var value = symbol.value;
6568                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6569                 return value;
6570             })(), l141.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6571                 var symbol = l131;
6572                 var value = symbol.value;
6573                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6574                 return value;
6575             })())), l132.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){
6576                 var symbol = l131;
6577                 var value = symbol.value;
6578                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6579                 return value;
6580             })())), "})()");
6581         })(l143.fvalue(pv, v696));
6582     })();
6583 })), cdr: (function(){
6584     var symbol = l265;
6585     var value = symbol.value;
6586     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6587     return value;
6588 })()}));
6589 ((l265).value = ({car: l44.fvalue(pv, l28, (function (values,v698,v699){
6590     checkArgs(arguments, 3);
6591     return (function(){
6592         return (function(v700,v701){
6593             return l132.fvalue(values, "({car: ", v700, ", cdr: ", v701, "})");
6594         })(l143.fvalue(pv, v698),l143.fvalue(pv, v699));
6595     })();
6596 })), cdr: (function(){
6597     var symbol = l265;
6598     var value = symbol.value;
6599     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6600     return value;
6601 })()}));
6602 ((l265).value = ({car: l44.fvalue(pv, l29, (function (values,v702){
6603     checkArgs(arguments, 2);
6604     return (function(){
6605         return (function(v703){
6606             return l142.fvalue(values, l132.fvalue(pv, "(function(){", (function(){
6607                 var symbol = l131;
6608                 var value = symbol.value;
6609                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6610                 return value;
6611             })(), l141.fvalue(pv, "var tmp = ", v703, ";", (function(){
6612                 var symbol = l131;
6613                 var value = symbol.value;
6614                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6615                 return value;
6616             })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
6617                 var symbol = l131;
6618                 var value = symbol.value;
6619                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6620                 return value;
6621             })()), "})()"));
6622         })(l143.fvalue(pv, v702));
6623     })();
6624 })), cdr: (function(){
6625     var symbol = l265;
6626     var value = symbol.value;
6627     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6628     return value;
6629 })()}));
6630 ((l265).value = ({car: l44.fvalue(pv, l30, (function (values,v704){
6631     checkArgs(arguments, 2);
6632     return (function(){
6633         return (function(v705){
6634             return l132.fvalue(values, "(function(){", (function(){
6635                 var symbol = l131;
6636                 var value = symbol.value;
6637                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6638                 return value;
6639             })(), l141.fvalue(pv, "var tmp = ", v705, ";", (function(){
6640                 var symbol = l131;
6641                 var value = symbol.value;
6642                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6643                 return value;
6644             })(), "return tmp === ", l143.fvalue(pv, l3.value), "? ", l143.fvalue(pv, l3.value), ": tmp.car;", (function(){
6645                 var symbol = l131;
6646                 var value = symbol.value;
6647                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6648                 return value;
6649             })()), "})()");
6650         })(l143.fvalue(pv, v704));
6651     })();
6652 })), cdr: (function(){
6653     var symbol = l265;
6654     var value = symbol.value;
6655     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6656     return value;
6657 })()}));
6658 ((l265).value = ({car: l44.fvalue(pv, l31, (function (values,v706){
6659     checkArgs(arguments, 2);
6660     return (function(){
6661         return (function(v707){
6662             return l132.fvalue(values, "(function(){", (function(){
6663                 var symbol = l131;
6664                 var value = symbol.value;
6665                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6666                 return value;
6667             })(), l141.fvalue(pv, "var tmp = ", v707, ";", (function(){
6668                 var symbol = l131;
6669                 var value = symbol.value;
6670                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6671                 return value;
6672             })(), "return tmp === ", l143.fvalue(pv, l3.value), "? ", l143.fvalue(pv, l3.value), ": tmp.cdr;", (function(){
6673                 var symbol = l131;
6674                 var value = symbol.value;
6675                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6676                 return value;
6677             })()), "})()");
6678         })(l143.fvalue(pv, v706));
6679     })();
6680 })), cdr: (function(){
6681     var symbol = l265;
6682     var value = symbol.value;
6683     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6684     return value;
6685 })()}));
6686 var l281 = {name: "RPLACA"};
6687 ((l265).value = ({car: l44.fvalue(pv, l281, (function (values,v708,v709){
6688     checkArgs(arguments, 3);
6689     return (function(){
6690         return (function(v710,v711){
6691             return l132.fvalue(values, "(function(){", (function(){
6692                 var symbol = l131;
6693                 var value = symbol.value;
6694                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6695                 return value;
6696             })(), l141.fvalue(pv, l132.fvalue(pv, "var ", "x", " = ", v710, ";", (function(){
6697                 var symbol = l131;
6698                 var value = symbol.value;
6699                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6700                 return value;
6701             })()), l132.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
6702                 var symbol = l131;
6703                 var value = symbol.value;
6704                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6705                 return value;
6706             })(), l141.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
6707                 var symbol = l131;
6708                 var value = symbol.value;
6709                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6710                 return value;
6711             })())), l132.fvalue(pv, "return ", l132.fvalue(pv, "(x.car = ", v711, ", x)"), ";", (function(){
6712                 var symbol = l131;
6713                 var value = symbol.value;
6714                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6715                 return value;
6716             })())), "})()");
6717         })(l143.fvalue(pv, v708),l143.fvalue(pv, v709));
6718     })();
6719 })), cdr: (function(){
6720     var symbol = l265;
6721     var value = symbol.value;
6722     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6723     return value;
6724 })()}));
6725 var l282 = {name: "RPLACD"};
6726 ((l265).value = ({car: l44.fvalue(pv, l282, (function (values,v712,v713){
6727     checkArgs(arguments, 3);
6728     return (function(){
6729         return (function(v714,v715){
6730             return l132.fvalue(values, "(function(){", (function(){
6731                 var symbol = l131;
6732                 var value = symbol.value;
6733                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6734                 return value;
6735             })(), l141.fvalue(pv, l132.fvalue(pv, "var ", "x", " = ", v714, ";", (function(){
6736                 var symbol = l131;
6737                 var value = symbol.value;
6738                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6739                 return value;
6740             })()), l132.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
6741                 var symbol = l131;
6742                 var value = symbol.value;
6743                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6744                 return value;
6745             })(), l141.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
6746                 var symbol = l131;
6747                 var value = symbol.value;
6748                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6749                 return value;
6750             })())), l132.fvalue(pv, "return ", l132.fvalue(pv, "(x.cdr = ", v715, ", x)"), ";", (function(){
6751                 var symbol = l131;
6752                 var value = symbol.value;
6753                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6754                 return value;
6755             })())), "})()");
6756         })(l143.fvalue(pv, v712),l143.fvalue(pv, v713));
6757     })();
6758 })), cdr: (function(){
6759     var symbol = l265;
6760     var value = symbol.value;
6761     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6762     return value;
6763 })()}));
6764 var l283 = {name: "SYMBOLP"};
6765 ((l265).value = ({car: l44.fvalue(pv, l283, (function (values,v716){
6766     checkArgs(arguments, 2);
6767     return (function(){
6768         return (function(v717){
6769             return l142.fvalue(values, l132.fvalue(pv, "(function(){", (function(){
6770                 var symbol = l131;
6771                 var value = symbol.value;
6772                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6773                 return value;
6774             })(), l141.fvalue(pv, "var tmp = ", v717, ";", (function(){
6775                 var symbol = l131;
6776                 var value = symbol.value;
6777                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6778                 return value;
6779             })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
6780                 var symbol = l131;
6781                 var value = symbol.value;
6782                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6783                 return value;
6784             })()), "})()"));
6785         })(l143.fvalue(pv, v716));
6786     })();
6787 })), cdr: (function(){
6788     var symbol = l265;
6789     var value = symbol.value;
6790     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6791     return value;
6792 })()}));
6793 var l284 = {name: "MAKE-SYMBOL"};
6794 ((l265).value = ({car: l44.fvalue(pv, l284, (function (values,v718){
6795     checkArgs(arguments, 2);
6796     return (function(){
6797         return (function(v719){
6798             return l132.fvalue(values, "(function(){", (function(){
6799                 var symbol = l131;
6800                 var value = symbol.value;
6801                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6802                 return value;
6803             })(), l141.fvalue(pv, l132.fvalue(pv, "var ", "name", " = ", v719, ";", (function(){
6804                 var symbol = l131;
6805                 var value = symbol.value;
6806                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6807                 return value;
6808             })()), l132.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){
6809                 var symbol = l131;
6810                 var value = symbol.value;
6811                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6812                 return value;
6813             })(), l141.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
6814                 var symbol = l131;
6815                 var value = symbol.value;
6816                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6817                 return value;
6818             })())), l132.fvalue(pv, "return ", "({name: name})", ";", (function(){
6819                 var symbol = l131;
6820                 var value = symbol.value;
6821                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6822                 return value;
6823             })())), "})()");
6824         })(l143.fvalue(pv, v718));
6825     })();
6826 })), cdr: (function(){
6827     var symbol = l265;
6828     var value = symbol.value;
6829     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6830     return value;
6831 })()}));
6832 var l285 = {name: "SYMBOL-NAME"};
6833 ((l265).value = ({car: l44.fvalue(pv, l285, (function (values,v720){
6834     checkArgs(arguments, 2);
6835     return (function(){
6836         return (function(v721){
6837             return l132.fvalue(values, "(", v721, ").name");
6838         })(l143.fvalue(pv, v720));
6839     })();
6840 })), cdr: (function(){
6841     var symbol = l265;
6842     var value = symbol.value;
6843     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6844     return value;
6845 })()}));
6846 ((l265).value = ({car: l44.fvalue(pv, l222, (function (values,v722,v723){
6847     checkArgs(arguments, 3);
6848     return (function(){
6849         return (function(v724,v725){
6850             return l132.fvalue(values, "(", v724, ").value = ", v725);
6851         })(l143.fvalue(pv, v722),l143.fvalue(pv, v723));
6852     })();
6853 })), cdr: (function(){
6854     var symbol = l265;
6855     var value = symbol.value;
6856     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6857     return value;
6858 })()}));
6859 var l286 = {name: "FSET"};
6860 ((l265).value = ({car: l44.fvalue(pv, l286, (function (values,v726,v727){
6861     checkArgs(arguments, 3);
6862     return (function(){
6863         return (function(v728,v729){
6864             return l132.fvalue(values, "(", v728, ").fvalue = ", v729);
6865         })(l143.fvalue(pv, v726),l143.fvalue(pv, v727));
6866     })();
6867 })), cdr: (function(){
6868     var symbol = l265;
6869     var value = symbol.value;
6870     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6871     return value;
6872 })()}));
6873 ((l265).value = ({car: l44.fvalue(pv, l18, (function (values,v730){
6874     checkArgs(arguments, 2);
6875     return (function(){
6876         return (function(v731){
6877             return l142.fvalue(values, l132.fvalue(pv, "(", v731, ".value !== undefined)"));
6878         })(l143.fvalue(pv, v730));
6879     })();
6880 })), cdr: (function(){
6881     var symbol = l265;
6882     var value = symbol.value;
6883     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6884     return value;
6885 })()}));
6886 var l287 = {name: "SYMBOL-VALUE"};
6887 ((l265).value = ({car: l44.fvalue(pv, l287, (function (values,v732){
6888     checkArgs(arguments, 2);
6889     return (function(){
6890         return (function(v733){
6891             return l132.fvalue(values, "(function(){", (function(){
6892                 var symbol = l131;
6893                 var value = symbol.value;
6894                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6895                 return value;
6896             })(), l141.fvalue(pv, "var symbol = ", v733, ";", (function(){
6897                 var symbol = l131;
6898                 var value = symbol.value;
6899                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6900                 return value;
6901             })(), "var value = symbol.value;", (function(){
6902                 var symbol = l131;
6903                 var value = symbol.value;
6904                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6905                 return value;
6906             })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
6907                 var symbol = l131;
6908                 var value = symbol.value;
6909                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6910                 return value;
6911             })(), "return value;", (function(){
6912                 var symbol = l131;
6913                 var value = symbol.value;
6914                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6915                 return value;
6916             })()), "})()");
6917         })(l143.fvalue(pv, v732));
6918     })();
6919 })), cdr: (function(){
6920     var symbol = l265;
6921     var value = symbol.value;
6922     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6923     return value;
6924 })()}));
6925 ((l265).value = ({car: l44.fvalue(pv, l231, (function (values,v734){
6926     checkArgs(arguments, 2);
6927     return (function(){
6928         return (function(v735){
6929             return l132.fvalue(values, "(function(){", (function(){
6930                 var symbol = l131;
6931                 var value = symbol.value;
6932                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6933                 return value;
6934             })(), l141.fvalue(pv, "var symbol = ", v735, ";", (function(){
6935                 var symbol = l131;
6936                 var value = symbol.value;
6937                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6938                 return value;
6939             })(), "var func = symbol.fvalue;", (function(){
6940                 var symbol = l131;
6941                 var value = symbol.value;
6942                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6943                 return value;
6944             })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
6945                 var symbol = l131;
6946                 var value = symbol.value;
6947                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6948                 return value;
6949             })(), "return func;", (function(){
6950                 var symbol = l131;
6951                 var value = symbol.value;
6952                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6953                 return value;
6954             })()), "})()");
6955         })(l143.fvalue(pv, v734));
6956     })();
6957 })), cdr: (function(){
6958     var symbol = l265;
6959     var value = symbol.value;
6960     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6961     return value;
6962 })()}));
6963 var l288 = {name: "SYMBOL-PLIST"};
6964 ((l265).value = ({car: l44.fvalue(pv, l288, (function (values,v736){
6965     checkArgs(arguments, 2);
6966     return (function(){
6967         return (function(v737){
6968             return l132.fvalue(values, "((", v737, ").plist || ", l143.fvalue(pv, l3.value), ")");
6969         })(l143.fvalue(pv, v736));
6970     })();
6971 })), cdr: (function(){
6972     var symbol = l265;
6973     var value = symbol.value;
6974     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6975     return value;
6976 })()}));
6977 var l289 = {name: "LAMBDA-CODE"};
6978 ((l265).value = ({car: l44.fvalue(pv, l289, (function (values,v738){
6979     checkArgs(arguments, 2);
6980     return (function(){
6981         return (function(v739){
6982             return l132.fvalue(values, "(", v739, ").toString()");
6983         })(l143.fvalue(pv, v738));
6984     })();
6985 })), cdr: (function(){
6986     var symbol = l265;
6987     var value = symbol.value;
6988     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6989     return value;
6990 })()}));
6991 var l290 = {name: "EQ"};
6992 ((l265).value = ({car: l44.fvalue(pv, l290, (function (values,v740,v741){
6993     checkArgs(arguments, 3);
6994     return (function(){
6995         return (function(v742,v743){
6996             return l142.fvalue(values, l132.fvalue(pv, "(", v742, " === ", v743, ")"));
6997         })(l143.fvalue(pv, v740),l143.fvalue(pv, v741));
6998     })();
6999 })), cdr: (function(){
7000     var symbol = l265;
7001     var value = symbol.value;
7002     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7003     return value;
7004 })()}));
7005 var l291 = {name: "EQUAL"};
7006 ((l265).value = ({car: l44.fvalue(pv, l291, (function (values,v744,v745){
7007     checkArgs(arguments, 3);
7008     return (function(){
7009         return (function(v746,v747){
7010             return l142.fvalue(values, l132.fvalue(pv, "(", v746, " == ", v747, ")"));
7011         })(l143.fvalue(pv, v744),l143.fvalue(pv, v745));
7012     })();
7013 })), cdr: (function(){
7014     var symbol = l265;
7015     var value = symbol.value;
7016     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7017     return value;
7018 })()}));
7019 var l292 = {name: "CHAR-TO-STRING"};
7020 ((l265).value = ({car: l44.fvalue(pv, l292, (function (values,v748){
7021     checkArgs(arguments, 2);
7022     return (function(){
7023         return (function(v749){
7024             return l132.fvalue(values, "(function(){", (function(){
7025                 var symbol = l131;
7026                 var value = symbol.value;
7027                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7028                 return value;
7029             })(), l141.fvalue(pv, l132.fvalue(pv, "var ", "x", " = ", v749, ";", (function(){
7030                 var symbol = l131;
7031                 var value = symbol.value;
7032                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7033                 return value;
7034             })()), l132.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7035                 var symbol = l131;
7036                 var value = symbol.value;
7037                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7038                 return value;
7039             })(), l141.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7040                 var symbol = l131;
7041                 var value = symbol.value;
7042                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7043                 return value;
7044             })())), l132.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){
7045                 var symbol = l131;
7046                 var value = symbol.value;
7047                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7048                 return value;
7049             })())), "})()");
7050         })(l143.fvalue(pv, v748));
7051     })();
7052 })), cdr: (function(){
7053     var symbol = l265;
7054     var value = symbol.value;
7055     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7056     return value;
7057 })()}));
7058 var l293 = {name: "STRINGP"};
7059 ((l265).value = ({car: l44.fvalue(pv, l293, (function (values,v750){
7060     checkArgs(arguments, 2);
7061     return (function(){
7062         return (function(v751){
7063             return l142.fvalue(values, l132.fvalue(pv, "(typeof(", v751, ") == \"string\")"));
7064         })(l143.fvalue(pv, v750));
7065     })();
7066 })), cdr: (function(){
7067     var symbol = l265;
7068     var value = symbol.value;
7069     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7070     return value;
7071 })()}));
7072 var l294 = {name: "STRING-UPCASE"};
7073 ((l265).value = ({car: l44.fvalue(pv, l294, (function (values,v752){
7074     checkArgs(arguments, 2);
7075     return (function(){
7076         return (function(v753){
7077             return l132.fvalue(values, "(function(){", (function(){
7078                 var symbol = l131;
7079                 var value = symbol.value;
7080                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7081                 return value;
7082             })(), l141.fvalue(pv, l132.fvalue(pv, "var ", "x", " = ", v753, ";", (function(){
7083                 var symbol = l131;
7084                 var value = symbol.value;
7085                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7086                 return value;
7087             })()), l132.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7088                 var symbol = l131;
7089                 var value = symbol.value;
7090                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7091                 return value;
7092             })(), l141.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7093                 var symbol = l131;
7094                 var value = symbol.value;
7095                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7096                 return value;
7097             })())), l132.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){
7098                 var symbol = l131;
7099                 var value = symbol.value;
7100                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7101                 return value;
7102             })())), "})()");
7103         })(l143.fvalue(pv, v752));
7104     })();
7105 })), cdr: (function(){
7106     var symbol = l265;
7107     var value = symbol.value;
7108     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7109     return value;
7110 })()}));
7111 var l295 = {name: "STRING-LENGTH"};
7112 ((l265).value = ({car: l44.fvalue(pv, l295, (function (values,v754){
7113     checkArgs(arguments, 2);
7114     return (function(){
7115         return (function(v755){
7116             return l132.fvalue(values, "(function(){", (function(){
7117                 var symbol = l131;
7118                 var value = symbol.value;
7119                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7120                 return value;
7121             })(), l141.fvalue(pv, l132.fvalue(pv, "var ", "x", " = ", v755, ";", (function(){
7122                 var symbol = l131;
7123                 var value = symbol.value;
7124                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7125                 return value;
7126             })()), l132.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7127                 var symbol = l131;
7128                 var value = symbol.value;
7129                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7130                 return value;
7131             })(), l141.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7132                 var symbol = l131;
7133                 var value = symbol.value;
7134                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7135                 return value;
7136             })())), l132.fvalue(pv, "return ", "x.length", ";", (function(){
7137                 var symbol = l131;
7138                 var value = symbol.value;
7139                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7140                 return value;
7141             })())), "})()");
7142         })(l143.fvalue(pv, v754));
7143     })();
7144 })), cdr: (function(){
7145     var symbol = l265;
7146     var value = symbol.value;
7147     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7148     return value;
7149 })()}));
7150 var l296 = {name: "SLICE"};
7151 ((l265).value = ({car: l44.fvalue(pv, l296, (function (values,v756,v757,v758){
7152     checkArgsAtLeast(arguments, 3);
7153     checkArgsAtMost(arguments, 4);
7154     switch(arguments.length-1){
7155     case 2:
7156     v758=l3.value;
7157     default: break;
7158     }
7159     return (function(){
7160         return l132.fvalue(values, "(function(){", (function(){
7161             var symbol = l131;
7162             var value = symbol.value;
7163             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7164             return value;
7165         })(), l141.fvalue(pv, "var str = ", l143.fvalue(pv, v756), ";", (function(){
7166             var symbol = l131;
7167             var value = symbol.value;
7168             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7169             return value;
7170         })(), "var a = ", l143.fvalue(pv, v757), ";", (function(){
7171             var symbol = l131;
7172             var value = symbol.value;
7173             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7174             return value;
7175         })(), "var b;", (function(){
7176             var symbol = l131;
7177             var value = symbol.value;
7178             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7179             return value;
7180         })(), (v758 !== l3.value ? l132.fvalue(pv, "b = ", l143.fvalue(pv, v758), ";", (function(){
7181             var symbol = l131;
7182             var value = symbol.value;
7183             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7184             return value;
7185         })()) : ""), "return str.slice(a,b);", (function(){
7186             var symbol = l131;
7187             var value = symbol.value;
7188             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7189             return value;
7190         })()), "})()");
7191     })();
7192 })), cdr: (function(){
7193     var symbol = l265;
7194     var value = symbol.value;
7195     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7196     return value;
7197 })()}));
7198 var l297 = {name: "CHAR"};
7199 ((l265).value = ({car: l44.fvalue(pv, l297, (function (values,v759,v760){
7200     checkArgs(arguments, 3);
7201     return (function(){
7202         return (function(v761,v762){
7203             return l132.fvalue(values, "(function(){", (function(){
7204                 var symbol = l131;
7205                 var value = symbol.value;
7206                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7207                 return value;
7208             })(), l141.fvalue(pv, l132.fvalue(pv, "var ", "string", " = ", v761, ";", (function(){
7209                 var symbol = l131;
7210                 var value = symbol.value;
7211                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7212                 return value;
7213             })()), l132.fvalue(pv, "var ", "index", " = ", v762, ";", (function(){
7214                 var symbol = l131;
7215                 var value = symbol.value;
7216                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7217                 return value;
7218             })()), l132.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7219                 var symbol = l131;
7220                 var value = symbol.value;
7221                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7222                 return value;
7223             })(), l141.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7224                 var symbol = l131;
7225                 var value = symbol.value;
7226                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7227                 return value;
7228             })())), l132.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){
7229                 var symbol = l131;
7230                 var value = symbol.value;
7231                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7232                 return value;
7233             })(), l141.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
7234                 var symbol = l131;
7235                 var value = symbol.value;
7236                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7237                 return value;
7238             })())), l132.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){
7239                 var symbol = l131;
7240                 var value = symbol.value;
7241                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7242                 return value;
7243             })())), "})()");
7244         })(l143.fvalue(pv, v759),l143.fvalue(pv, v760));
7245     })();
7246 })), cdr: (function(){
7247     var symbol = l265;
7248     var value = symbol.value;
7249     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7250     return value;
7251 })()}));
7252 ((l265).value = ({car: l44.fvalue(pv, l72, (function (values,v763,v764){
7253     checkArgs(arguments, 3);
7254     return (function(){
7255         return (function(v765,v766){
7256             return l132.fvalue(values, "(function(){", (function(){
7257                 var symbol = l131;
7258                 var value = symbol.value;
7259                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7260                 return value;
7261             })(), l141.fvalue(pv, l132.fvalue(pv, "var ", "string1", " = ", v765, ";", (function(){
7262                 var symbol = l131;
7263                 var value = symbol.value;
7264                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7265                 return value;
7266             })()), l132.fvalue(pv, "var ", "string2", " = ", v766, ";", (function(){
7267                 var symbol = l131;
7268                 var value = symbol.value;
7269                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7270                 return value;
7271             })()), l132.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){
7272                 var symbol = l131;
7273                 var value = symbol.value;
7274                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7275                 return value;
7276             })(), l141.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
7277                 var symbol = l131;
7278                 var value = symbol.value;
7279                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7280                 return value;
7281             })())), l132.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){
7282                 var symbol = l131;
7283                 var value = symbol.value;
7284                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7285                 return value;
7286             })(), l141.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
7287                 var symbol = l131;
7288                 var value = symbol.value;
7289                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7290                 return value;
7291             })())), l132.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){
7292                 var symbol = l131;
7293                 var value = symbol.value;
7294                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7295                 return value;
7296             })())), "})()");
7297         })(l143.fvalue(pv, v763),l143.fvalue(pv, v764));
7298     })();
7299 })), cdr: (function(){
7300     var symbol = l265;
7301     var value = symbol.value;
7302     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7303     return value;
7304 })()}));
7305 var l298 = {name: "FUNCALL"};
7306 ((l265).value = ({car: l44.fvalue(pv, l298, (function (values,v768){
7307     checkArgsAtLeast(arguments, 2);
7308     var v767= l3.value;
7309     for (var i = arguments.length-1; i>=2; i--)
7310         v767 = {car: arguments[i], cdr:
7311     v767};
7312     return (function(){
7313         return l132.fvalue(values, "(", l143.fvalue(pv, v768), ")(", l134.fvalue(pv, ({car: ((function(){
7314             var symbol = l170;
7315             var value = symbol.value;
7316             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7317             return value;
7318         })() !== l3.value ? "values" : "pv"), cdr: l73.fvalue(pv, (function(){
7319             var symbol = l143;
7320             var func = symbol.fvalue;
7321             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7322             return func;
7323         })(), v767)}), ", "), ")");
7324     })();
7325 })), cdr: (function(){
7326     var symbol = l265;
7327     var value = symbol.value;
7328     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7329     return value;
7330 })()}));
7331 var l299 = {name: "APPLY"};
7332 ((l265).value = ({car: l44.fvalue(pv, l299, (function (values,v770){
7333     checkArgsAtLeast(arguments, 2);
7334     var v769= l3.value;
7335     for (var i = arguments.length-1; i>=2; i--)
7336         v769 = {car: arguments[i], cdr:
7337     v769};
7338     return (function(){
7339         return (l12.fvalue(pv, v769) !== l3.value ? l132.fvalue(values, "(", l143.fvalue(pv, v770), ")()") : (function(v771,v772){
7340             return l132.fvalue(values, "(function(){", (function(){
7341                 var symbol = l131;
7342                 var value = symbol.value;
7343                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7344                 return value;
7345             })(), l141.fvalue(pv, "var f = ", l143.fvalue(pv, v770), ";", (function(){
7346                 var symbol = l131;
7347                 var value = symbol.value;
7348                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7349                 return value;
7350             })(), "var args = [", l134.fvalue(pv, ({car: ((function(){
7351                 var symbol = l170;
7352                 var value = symbol.value;
7353                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7354                 return value;
7355             })() !== l3.value ? "values" : "pv"), cdr: l73.fvalue(pv, (function(){
7356                 var symbol = l143;
7357                 var func = symbol.fvalue;
7358                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7359                 return func;
7360             })(), v771)}), ", "), "];", (function(){
7361                 var symbol = l131;
7362                 var value = symbol.value;
7363                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7364                 return value;
7365             })(), "var tail = (", l143.fvalue(pv, v772), ");", (function(){
7366                 var symbol = l131;
7367                 var value = symbol.value;
7368                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7369                 return value;
7370             })(), "while (tail != ", l143.fvalue(pv, l3.value), "){", (function(){
7371                 var symbol = l131;
7372                 var value = symbol.value;
7373                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7374                 return value;
7375             })(), "    args.push(tail.car);", (function(){
7376                 var symbol = l131;
7377                 var value = symbol.value;
7378                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7379                 return value;
7380             })(), "    tail = tail.cdr;", (function(){
7381                 var symbol = l131;
7382                 var value = symbol.value;
7383                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7384                 return value;
7385             })(), "}", (function(){
7386                 var symbol = l131;
7387                 var value = symbol.value;
7388                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7389                 return value;
7390             })(), "return f.apply(this, args);", (function(){
7391                 var symbol = l131;
7392                 var value = symbol.value;
7393                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7394                 return value;
7395             })()), "})()");
7396         })(l85.fvalue(pv, v769),(function(){
7397             var tmp = l84.fvalue(pv, v769);
7398             return tmp === l3.value? l3.value: tmp.car;
7399         })()));
7400     })();
7401 })), cdr: (function(){
7402     var symbol = l265;
7403     var value = symbol.value;
7404     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7405     return value;
7406 })()}));
7407 var l300 = {name: "JS-EVAL"};
7408 ((l265).value = ({car: l44.fvalue(pv, l300, (function (values,v773){
7409     checkArgs(arguments, 2);
7410     return (function(){
7411         return (function(v774){
7412             return l132.fvalue(values, "(function(){", (function(){
7413                 var symbol = l131;
7414                 var value = symbol.value;
7415                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7416                 return value;
7417             })(), l141.fvalue(pv, l132.fvalue(pv, "var ", "string", " = ", v774, ";", (function(){
7418                 var symbol = l131;
7419                 var value = symbol.value;
7420                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7421                 return value;
7422             })()), l132.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7423                 var symbol = l131;
7424                 var value = symbol.value;
7425                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7426                 return value;
7427             })(), l141.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7428                 var symbol = l131;
7429                 var value = symbol.value;
7430                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7431                 return value;
7432             })())), l132.fvalue(pv, "return ", ((function(){
7433                 var symbol = l170;
7434                 var value = symbol.value;
7435                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7436                 return value;
7437             })() !== l3.value ? l132.fvalue(pv, "(function(){", (function(){
7438                 var symbol = l131;
7439                 var value = symbol.value;
7440                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7441                 return value;
7442             })(), l141.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){
7443                 var symbol = l131;
7444                 var value = symbol.value;
7445                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7446                 return value;
7447             })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){
7448                 var symbol = l131;
7449                 var value = symbol.value;
7450                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7451                 return value;
7452             })(), l141.fvalue(pv, "v = [v];", (function(){
7453                 var symbol = l131;
7454                 var value = symbol.value;
7455                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7456                 return value;
7457             })(), "v['multiple-value'] = true;", (function(){
7458                 var symbol = l131;
7459                 var value = symbol.value;
7460                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7461                 return value;
7462             })()), "}", (function(){
7463                 var symbol = l131;
7464                 var value = symbol.value;
7465                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7466                 return value;
7467             })(), "return values.apply(this, v);", (function(){
7468                 var symbol = l131;
7469                 var value = symbol.value;
7470                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7471                 return value;
7472             })()), "})()") : "eval.apply(window, [string])"), ";", (function(){
7473                 var symbol = l131;
7474                 var value = symbol.value;
7475                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7476                 return value;
7477             })())), "})()");
7478         })(l143.fvalue(pv, v773));
7479     })();
7480 })), cdr: (function(){
7481     var symbol = l265;
7482     var value = symbol.value;
7483     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7484     return value;
7485 })()}));
7486 var l301 = {name: "ERROR"};
7487 ((l265).value = ({car: l44.fvalue(pv, l301, (function (values,v775){
7488     checkArgs(arguments, 2);
7489     return (function(){
7490         return (function(v776){
7491             return l132.fvalue(values, "(function(){", (function(){
7492                 var symbol = l131;
7493                 var value = symbol.value;
7494                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7495                 return value;
7496             })(), l141.fvalue(pv, "throw ", v776, ";", (function(){
7497                 var symbol = l131;
7498                 var value = symbol.value;
7499                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7500                 return value;
7501             })()), "})()");
7502         })(l143.fvalue(pv, v775));
7503     })();
7504 })), cdr: (function(){
7505     var symbol = l265;
7506     var value = symbol.value;
7507     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7508     return value;
7509 })()}));
7510 var l302 = {name: "NEW"};
7511 ((l265).value = ({car: l44.fvalue(pv, l302, (function (values){
7512     checkArgsAtMost(arguments, 1);
7513     return (function(){
7514         return (function(){
7515             return "{}";
7516         })();
7517     })();
7518 })), cdr: (function(){
7519     var symbol = l265;
7520     var value = symbol.value;
7521     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7522     return value;
7523 })()}));
7524 var l303 = {name: "OBJECTP"};
7525 ((l265).value = ({car: l44.fvalue(pv, l303, (function (values,v777){
7526     checkArgs(arguments, 2);
7527     return (function(){
7528         return (function(v778){
7529             return l142.fvalue(values, l132.fvalue(pv, "(typeof (", v778, ") === 'object')"));
7530         })(l143.fvalue(pv, v777));
7531     })();
7532 })), cdr: (function(){
7533     var symbol = l265;
7534     var value = symbol.value;
7535     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7536     return value;
7537 })()}));
7538 var l304 = {name: "OGET"};
7539 ((l265).value = ({car: l44.fvalue(pv, l304, (function (values,v779,v780){
7540     checkArgs(arguments, 3);
7541     return (function(){
7542         return (function(v781,v782){
7543             return l132.fvalue(values, "(function(){", (function(){
7544                 var symbol = l131;
7545                 var value = symbol.value;
7546                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7547                 return value;
7548             })(), l141.fvalue(pv, "var tmp = ", "(", v781, ")[", v782, "];", (function(){
7549                 var symbol = l131;
7550                 var value = symbol.value;
7551                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7552                 return value;
7553             })(), "return tmp == undefined? ", l143.fvalue(pv, l3.value), ": tmp ;", (function(){
7554                 var symbol = l131;
7555                 var value = symbol.value;
7556                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7557                 return value;
7558             })()), "})()");
7559         })(l143.fvalue(pv, v779),l143.fvalue(pv, v780));
7560     })();
7561 })), cdr: (function(){
7562     var symbol = l265;
7563     var value = symbol.value;
7564     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7565     return value;
7566 })()}));
7567 var l305 = {name: "OSET"};
7568 ((l265).value = ({car: l44.fvalue(pv, l305, (function (values,v783,v784,v785){
7569     checkArgs(arguments, 4);
7570     return (function(){
7571         return (function(v786,v787,v788){
7572             return l132.fvalue(values, "((", v786, ")[", v787, "] = ", v788, ")");
7573         })(l143.fvalue(pv, v783),l143.fvalue(pv, v784),l143.fvalue(pv, v785));
7574     })();
7575 })), cdr: (function(){
7576     var symbol = l265;
7577     var value = symbol.value;
7578     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7579     return value;
7580 })()}));
7581 var l306 = {name: "IN"};
7582 ((l265).value = ({car: l44.fvalue(pv, l306, (function (values,v789,v790){
7583     checkArgs(arguments, 3);
7584     return (function(){
7585         return (function(v791,v792){
7586             return l142.fvalue(values, l132.fvalue(pv, "((", v791, ") in (", v792, "))"));
7587         })(l143.fvalue(pv, v789),l143.fvalue(pv, v790));
7588     })();
7589 })), cdr: (function(){
7590     var symbol = l265;
7591     var value = symbol.value;
7592     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7593     return value;
7594 })()}));
7595 var l307 = {name: "FUNCTIONP"};
7596 ((l265).value = ({car: l44.fvalue(pv, l307, (function (values,v793){
7597     checkArgs(arguments, 2);
7598     return (function(){
7599         return (function(v794){
7600             return l142.fvalue(values, l132.fvalue(pv, "(typeof ", v794, " == 'function')"));
7601         })(l143.fvalue(pv, v793));
7602     })();
7603 })), cdr: (function(){
7604     var symbol = l265;
7605     var value = symbol.value;
7606     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7607     return value;
7608 })()}));
7609 var l308 = {name: "WRITE-STRING"};
7610 ((l265).value = ({car: l44.fvalue(pv, l308, (function (values,v795){
7611     checkArgs(arguments, 2);
7612     return (function(){
7613         return (function(v796){
7614             return l132.fvalue(values, "(function(){", (function(){
7615                 var symbol = l131;
7616                 var value = symbol.value;
7617                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7618                 return value;
7619             })(), l141.fvalue(pv, l132.fvalue(pv, "var ", "x", " = ", v796, ";", (function(){
7620                 var symbol = l131;
7621                 var value = symbol.value;
7622                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7623                 return value;
7624             })()), l132.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7625                 var symbol = l131;
7626                 var value = symbol.value;
7627                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7628                 return value;
7629             })(), l141.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7630                 var symbol = l131;
7631                 var value = symbol.value;
7632                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7633                 return value;
7634             })())), l132.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){
7635                 var symbol = l131;
7636                 var value = symbol.value;
7637                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7638                 return value;
7639             })())), "})()");
7640         })(l143.fvalue(pv, v795));
7641     })();
7642 })), cdr: (function(){
7643     var symbol = l265;
7644     var value = symbol.value;
7645     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7646     return value;
7647 })()}));
7648 var l309 = {name: "MAKE-ARRAY"};
7649 ((l265).value = ({car: l44.fvalue(pv, l309, (function (values,v797){
7650     checkArgs(arguments, 2);
7651     return (function(){
7652         return (function(v798){
7653             return l132.fvalue(values, "(function(){", (function(){
7654                 var symbol = l131;
7655                 var value = symbol.value;
7656                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7657                 return value;
7658             })(), l141.fvalue(pv, "var r = [];", (function(){
7659                 var symbol = l131;
7660                 var value = symbol.value;
7661                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7662                 return value;
7663             })(), "for (var i = 0; i < ", v798, "; i++)", (function(){
7664                 var symbol = l131;
7665                 var value = symbol.value;
7666                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7667                 return value;
7668             })(), l141.fvalue(pv, "r.push(", l143.fvalue(pv, l3.value), ");", (function(){
7669                 var symbol = l131;
7670                 var value = symbol.value;
7671                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7672                 return value;
7673             })()), "return r;", (function(){
7674                 var symbol = l131;
7675                 var value = symbol.value;
7676                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7677                 return value;
7678             })()), "})()");
7679         })(l143.fvalue(pv, v797));
7680     })();
7681 })), cdr: (function(){
7682     var symbol = l265;
7683     var value = symbol.value;
7684     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7685     return value;
7686 })()}));
7687 var l310 = {name: "ARRAYP"};
7688 ((l265).value = ({car: l44.fvalue(pv, l310, (function (values,v799){
7689     checkArgs(arguments, 2);
7690     return (function(){
7691         return (function(v800){
7692             return l142.fvalue(values, l132.fvalue(pv, "(function(){", (function(){
7693                 var symbol = l131;
7694                 var value = symbol.value;
7695                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7696                 return value;
7697             })(), l141.fvalue(pv, "var x = ", v800, ";", (function(){
7698                 var symbol = l131;
7699                 var value = symbol.value;
7700                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7701                 return value;
7702             })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
7703         })(l143.fvalue(pv, v799));
7704     })();
7705 })), cdr: (function(){
7706     var symbol = l265;
7707     var value = symbol.value;
7708     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7709     return value;
7710 })()}));
7711 var l311 = {name: "AREF"};
7712 ((l265).value = ({car: l44.fvalue(pv, l311, (function (values,v801,v802){
7713     checkArgs(arguments, 3);
7714     return (function(){
7715         return (function(v803,v804){
7716             return l132.fvalue(values, "(function(){", (function(){
7717                 var symbol = l131;
7718                 var value = symbol.value;
7719                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7720                 return value;
7721             })(), l141.fvalue(pv, "var x = ", "(", v803, ")[", v804, "];", (function(){
7722                 var symbol = l131;
7723                 var value = symbol.value;
7724                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7725                 return value;
7726             })(), "if (x === undefined) throw 'Out of range';", (function(){
7727                 var symbol = l131;
7728                 var value = symbol.value;
7729                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7730                 return value;
7731             })(), "return x;", (function(){
7732                 var symbol = l131;
7733                 var value = symbol.value;
7734                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7735                 return value;
7736             })()), "})()");
7737         })(l143.fvalue(pv, v801),l143.fvalue(pv, v802));
7738     })();
7739 })), cdr: (function(){
7740     var symbol = l265;
7741     var value = symbol.value;
7742     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7743     return value;
7744 })()}));
7745 var l312 = {name: "ASET"};
7746 ((l265).value = ({car: l44.fvalue(pv, l312, (function (values,v805,v806,v807){
7747     checkArgs(arguments, 4);
7748     return (function(){
7749         return (function(v808,v809,v810){
7750             return l132.fvalue(values, "(function(){", (function(){
7751                 var symbol = l131;
7752                 var value = symbol.value;
7753                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7754                 return value;
7755             })(), l141.fvalue(pv, "var x = ", v808, ";", (function(){
7756                 var symbol = l131;
7757                 var value = symbol.value;
7758                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7759                 return value;
7760             })(), "var i = ", v809, ";", (function(){
7761                 var symbol = l131;
7762                 var value = symbol.value;
7763                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7764                 return value;
7765             })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
7766                 var symbol = l131;
7767                 var value = symbol.value;
7768                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7769                 return value;
7770             })(), "return x[i] = ", v810, ";", (function(){
7771                 var symbol = l131;
7772                 var value = symbol.value;
7773                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7774                 return value;
7775             })()), "})()");
7776         })(l143.fvalue(pv, v805),l143.fvalue(pv, v806),l143.fvalue(pv, v807));
7777     })();
7778 })), cdr: (function(){
7779     var symbol = l265;
7780     var value = symbol.value;
7781     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7782     return value;
7783 })()}));
7784 var l313 = {name: "GET-UNIX-TIME"};
7785 ((l265).value = ({car: l44.fvalue(pv, l313, (function (values){
7786     checkArgsAtMost(arguments, 1);
7787     return (function(){
7788         return (function(){
7789             return l132.fvalue(values, "(Math.round(new Date() / 1000))");
7790         })();
7791     })();
7792 })), cdr: (function(){
7793     var symbol = l265;
7794     var value = symbol.value;
7795     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7796     return value;
7797 })()}));
7798 var l314 = {name: "VALUES-ARRAY"};
7799 ((l265).value = ({car: l44.fvalue(pv, l314, (function (values,v811){
7800     checkArgs(arguments, 2);
7801     return (function(){
7802         return (function(v812){
7803             return ((function(){
7804                 var symbol = l170;
7805                 var value = symbol.value;
7806                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7807                 return value;
7808             })() !== l3.value ? l132.fvalue(values, "values.apply(this, ", v812, ")") : l132.fvalue(values, "pv.apply(this, ", v812, ")"));
7809         })(l143.fvalue(pv, v811));
7810     })();
7811 })), cdr: (function(){
7812     var symbol = l265;
7813     var value = symbol.value;
7814     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7815     return value;
7816 })()}));
7817 ((l265).value = ({car: l44.fvalue(pv, l140, (function (values){
7818     var v813= l3.value;
7819     for (var i = arguments.length-1; i>=1; i--)
7820         v813 = {car: arguments[i], cdr:
7821     v813};
7822     return (function(){
7823         return ((function(){
7824             var symbol = l170;
7825             var value = symbol.value;
7826             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7827             return value;
7828         })() !== l3.value ? l132.fvalue(values, "values(", l134.fvalue(pv, l73.fvalue(pv, (function(){
7829             var symbol = l143;
7830             var func = symbol.fvalue;
7831             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7832             return func;
7833         })(), v813), ", "), ")") : l132.fvalue(values, "pv(", l134.fvalue(pv, l73.fvalue(pv, (function(){
7834             var symbol = l143;
7835             var func = symbol.fvalue;
7836             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7837             return func;
7838         })(), v813), ", "), ")"));
7839     })();
7840 })), cdr: (function(){
7841     var symbol = l265;
7842     var value = symbol.value;
7843     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7844     return value;
7845 })()}));
7846 (function(){
7847     (l196).fvalue = (function(v816){
7848         ((v816)["fname"] = "MACRO");
7849         return v816;
7850     })((function (values,v814){
7851         checkArgs(arguments, 2);
7852         return (function(){
7853             return (((function(){
7854                 var tmp = v814;
7855                 return (typeof tmp == 'object' && 'name' in tmp);
7856             })()?l4.value: l3.value) !== l3.value ? (function(v815){
7857                 return (((l173.fvalue(pv, v815) === l196)?l4.value: l3.value) !== l3.value ? v815 : l3.value);
7858             })(l185.fvalue(pv, v814, (function(){
7859                 var symbol = l186;
7860                 var value = symbol.value;
7861                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7862                 return value;
7863             })(), l102)) : l3.value);
7864         })();
7865     }));
7866     return l196;
7867 })();
7868 var l315 = {name: "LS-MACROEXPAND-1"};
7869 (function(){
7870     (l315).fvalue = (function(v821){
7871         ((v821)["fname"] = "LS-MACROEXPAND-1");
7872         return v821;
7873     })((function (values,v817){
7874         checkArgs(arguments, 2);
7875         return (function(){
7876             return (function(v818){
7877                 return (v818 !== l3.value ? (function(v819){
7878                     (l59.fvalue(pv, v819) !== l3.value ? (function(v820){
7879                         l176.fvalue(pv, v818, v820);
7880                         return (v819 = v820);
7881                     })(l240.fvalue(pv, v819)) : l3.value);
7882                     return (function(){
7883                         var f = v819;
7884                         var args = [values];
7885                         var tail = ((function(){
7886                             var tmp = v817;
7887                             return tmp === l3.value? l3.value: tmp.cdr;
7888                         })());
7889                         while (tail != l3.value){
7890                             args.push(tail.car);
7891                             tail = tail.cdr;
7892                         }
7893                         return f.apply(this, args);
7894                     })();
7895                 })(l174.fvalue(pv, v818)) : v817);
7896             })(l196.fvalue(pv, (function(){
7897                 var tmp = v817;
7898                 return tmp === l3.value? l3.value: tmp.car;
7899             })()));
7900         })();
7901     }));
7902     return l315;
7903 })();
7904 var l316 = {name: "COMPILE-FUNCALL"};
7905 var l317 = {name: "G796"};
7906 (function(){
7907     (l316).fvalue = (function(v826){
7908         ((v826)["fname"] = "COMPILE-FUNCALL");
7909         return v826;
7910     })((function (values,v822,v823){
7911         checkArgs(arguments, 3);
7912         return (function(){
7913             return (function(){
7914                 var v824 = ((function(){
7915                     var symbol = l170;
7916                     var value = symbol.value;
7917                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7918                     return value;
7919                 })() !== l3.value ? "values" : "pv");
7920                 var v825 = l132.fvalue(pv, "(", l134.fvalue(pv, ({car: v824, cdr: l73.fvalue(pv, (function(){
7921                     var symbol = l143;
7922                     var func = symbol.fvalue;
7923                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7924                     return func;
7925                 })(), v823)}), ", "), ")");
7926                 return (l234.fvalue(pv, v822) !== l3.value ? l132.fvalue(values, l234.fvalue(pv, v822), v825) : ((((function(){
7927                     var tmp = v822;
7928                     return (typeof tmp == 'object' && 'name' in tmp);
7929                 })()?l4.value: l3.value) !== l3.value ? (((l120.fvalue(pv, v822) === l111.fvalue(pv, "COMMON-LISP"))?l4.value: l3.value) !== l3.value ? (function(){
7930                     var symbol = l317;
7931                     var value = symbol.value;
7932                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7933                     return value;
7934                 })() : l3.value) : l3.value) !== l3.value ? l132.fvalue(values, l143.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l165), l44.fvalue(pv, v822))), ".fvalue", v825) : l132.fvalue(values, l143.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l102), l44.fvalue(pv, v822))), v825)));
7935             })();
7936         })();
7937     }));
7938     return l316;
7939 })();
7940 (function(){
7941     (l220).fvalue = (function(v829){
7942         ((v829)["fname"] = "LS-COMPILE-BLOCK");
7943         return v829;
7944     })((function (values,v827,v828){
7945         checkArgsAtLeast(arguments, 2);
7946         checkArgsAtMost(arguments, 3);
7947         switch(arguments.length-1){
7948         case 1:
7949         v828=l3.value;
7950         default: break;
7951         }
7952         return (function(){
7953             return (v828 !== l3.value ? l132.fvalue(values, l220.fvalue(pv, l85.fvalue(pv, v827)), "return ", l143.fvalue(pv, (function(){
7954                 var tmp = l84.fvalue(pv, v827);
7955                 return tmp === l3.value? l3.value: tmp.car;
7956             })(), (function(){
7957                 var symbol = l170;
7958                 var value = symbol.value;
7959                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7960                 return value;
7961             })()), ";") : l135.fvalue(values, l88.fvalue(pv, (function(){
7962                 var symbol = l193;
7963                 var func = symbol.fvalue;
7964                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7965                 return func;
7966             })(), l73.fvalue(pv, (function(){
7967                 var symbol = l143;
7968                 var func = symbol.fvalue;
7969                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7970                 return func;
7971             })(), v827)), l132.fvalue(pv, ";", (function(){
7972                 var symbol = l131;
7973                 var value = symbol.value;
7974                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7975                 return value;
7976             })())));
7977         })();
7978     }));
7979     return l220;
7980 })();
7981 (function(){
7982     (l143).fvalue = (function(v839){
7983         ((v839)["fname"] = "LS-COMPILE");
7984         return v839;
7985     })((function (values,v830,v831){
7986         checkArgsAtLeast(arguments, 2);
7987         checkArgsAtMost(arguments, 3);
7988         switch(arguments.length-1){
7989         case 1:
7990         v831=l3.value;
7991         default: break;
7992         }
7993         return (function(){
7994             return (function(v832){
7995                 try {
7996                     var tmp;
7997                     tmp = l170.value;
7998                     l170.value = v832;
7999                     v832 = tmp;
8000                     return (((function(){
8001                         var tmp = v830;
8002                         return (typeof tmp == 'object' && 'name' in tmp);
8003                     })()?l4.value: l3.value) !== l3.value ? (function(v833){
8004                         return ((v833 !== l3.value ? l27.fvalue(pv, l86.fvalue(pv, l200, l175.fvalue(pv, v833))) : l3.value) !== l3.value ? l174.fvalue(values, v833) : ((function(v834){
8005                             return (v834 !== l3.value ? v834 : l86.fvalue(pv, l202, l175.fvalue(pv, v833)));
8006                         })(l119.fvalue(pv, v830)) !== l3.value ? l132.fvalue(values, l143.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l165), l44.fvalue(pv, v830))), ".value") : l143.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l287), l44.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l165), l44.fvalue(pv, v830)))))));
8007                     })(l185.fvalue(pv, v830, (function(){
8008                         var symbol = l186;
8009                         var value = symbol.value;
8010                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8011                         return value;
8012                     })(), l103)) : (l79.fvalue(pv, v830) !== l3.value ? l17.fvalue(values, v830) : (((typeof(v830) == "string")?l4.value: l3.value) !== l3.value ? l132.fvalue(values, "\"", l146.fvalue(pv, v830), "\"") : (((function(){
8013                         var x = v830;
8014                         return typeof x === 'object' && 'length' in x;
8015                     })()?l4.value: l3.value) !== l3.value ? l229.fvalue(values, v830) : (l59.fvalue(pv, v830) !== l3.value ? (function(v835,v836){
8016                         return (l95.fvalue(pv, v835, (function(){
8017                             var symbol = l204;
8018                             var value = symbol.value;
8019                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8020                             return value;
8021                         })()) !== l3.value ? (function(v837){
8022                             return (function(){
8023                                 var f = v837;
8024                                 var args = [values];
8025                                 var tail = (v836);
8026                                 while (tail != l3.value){
8027                                     args.push(tail.car);
8028                                     tail = tail.cdr;
8029                                 }
8030                                 return f.apply(this, args);
8031                             })();
8032                         })(l40.fvalue(pv, l95.fvalue(pv, v835, (function(){
8033                             var symbol = l204;
8034                             var value = symbol.value;
8035                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8036                             return value;
8037                         })()))) : ((l95.fvalue(pv, v835, (function(){
8038                             var symbol = l265;
8039                             var value = symbol.value;
8040                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8041                             return value;
8042                         })()) !== l3.value ? l27.fvalue(pv, l198.fvalue(pv, v835, l102, l201)) : l3.value) !== l3.value ? (function(v838){
8043                             return (function(){
8044                                 var f = v838;
8045                                 var args = [values];
8046                                 var tail = (v836);
8047                                 while (tail != l3.value){
8048                                     args.push(tail.car);
8049                                     tail = tail.cdr;
8050                                 }
8051                                 return f.apply(this, args);
8052                             })();
8053                         })(l40.fvalue(pv, l95.fvalue(pv, v835, (function(){
8054                             var symbol = l265;
8055                             var value = symbol.value;
8056                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8057                             return value;
8058                         })()))) : (l196.fvalue(pv, v835) !== l3.value ? l143.fvalue(values, l315.fvalue(pv, v830), v831) : l316.fvalue(values, v835, v836))));
8059                     })((function(){
8060                         var tmp = v830;
8061                         return tmp === l3.value? l3.value: tmp.car;
8062                     })(),(function(){
8063                         var tmp = v830;
8064                         return tmp === l3.value? l3.value: tmp.cdr;
8065                     })()) : (function(){
8066                         throw "How should I compile this?";
8067                     })())))));
8068                 }
8069                 finally {
8070                     l170.value = v832;
8071                 }
8072             })(v831);
8073         })();
8074     }));
8075     return l143;
8076 })();
8077 var l318 = {name: "LS-COMPILE-TOPLEVEL"};
8078 (function(){
8079     (l318).fvalue = (function(v846){
8080         ((v846)["fname"] = "LS-COMPILE-TOPLEVEL");
8081         return v846;
8082     })((function (values,v840,v841){
8083         checkArgsAtLeast(arguments, 2);
8084         checkArgsAtMost(arguments, 3);
8085         switch(arguments.length-1){
8086         case 1:
8087         v841=l3.value;
8088         default: break;
8089         }
8090         return (function(){
8091             return (function(v842){
8092                 try {
8093                     var tmp;
8094                     tmp = l191.value;
8095                     l191.value = v842;
8096                     v842 = tmp;
8097                     return ((((function(){
8098                         var tmp = v840;
8099                         return (typeof tmp == 'object' && 'car' in tmp);
8100                     })()?l4.value: l3.value) !== l3.value ? (((function(){
8101                         var tmp = v840;
8102                         return tmp === l3.value? l3.value: tmp.car;
8103                     })() === l239)?l4.value: l3.value) : l3.value) !== l3.value ? (function(v844){
8104                         return l134.fvalue(values, l88.fvalue(pv, (function(){
8105                             var symbol = l193;
8106                             var func = symbol.fvalue;
8107                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8108                             return func;
8109                         })(), v844));
8110                     })(l73.fvalue(pv, (function (values,v843){
8111                         checkArgs(arguments, 2);
8112                         return l318.fvalue(values, v843, l4.value);
8113                     }), (function(){
8114                         var tmp = v840;
8115                         return tmp === l3.value? l3.value: tmp.cdr;
8116                     })())) : (function(v845){
8117                         return l132.fvalue(values, l135.fvalue(pv, l194.fvalue(pv), l132.fvalue(pv, ";", (function(){
8118                             var symbol = l131;
8119                             var value = symbol.value;
8120                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8121                             return value;
8122                         })())), (v845 !== l3.value ? l132.fvalue(pv, v845, ";", (function(){
8123                             var symbol = l131;
8124                             var value = symbol.value;
8125                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8126                             return value;
8127                         })()) : ""));
8128                     })(l143.fvalue(pv, v840, v841)));
8129                 }
8130                 finally {
8131                     l191.value = v842;
8132                 }
8133             })(l3.value);
8134         })();
8135     }));
8136     return l318;
8137 })();
8138 (function(){
8139     (l240).fvalue = (function(v848){
8140         ((v848)["fname"] = "EVAL");
8141         return v848;
8142     })((function (values,v847){
8143         checkArgs(arguments, 2);
8144         return (function(){
8145             return (function(){
8146                 var string = l318.fvalue(pv, v847, l4.value);
8147                 if (typeof string != 'string')
8148                     throw 'The value ' + string + ' is not a type string.';
8149                 return (function(){
8150                     var v = eval.apply(window, [string]);
8151                     if (typeof v !== 'object' || !('multiple-value' in v)){
8152                         v = [v];
8153                         v['multiple-value'] = true;
8154                     }
8155                     return values.apply(this, v);
8156                 })();
8157             })();
8158         })();
8159     }));
8160     return l240;
8161 })();
8162 var l319 = {name: "&BODY"};
8163 var l320 = QIList(l209,l208,l319,l20,l15,l121,l61,l62,l21,l22,l23,l276,l278,l19,l19,l275,l277,l54,l64,l299,l311,l310,l312,l95,l45,l182,l18,l18,l85,l32,l38,l36,l33,l30,l30,l52,l252,l34,l37,l35,l31,l31,l297,l77,l78,l76,l51,l28,l29,l75,l47,l2,l9,l11,l1,l8,l91,l90,l99,l68,l69,l101,l49,l50,l53,l290,l26,l291,l301,l240,l94,l129,l98,l111,l124,l39,l235,l42,l286,l298,l102,l307,l16,l130,l259,l74,l206,l122,l46,l79,l79,l128,l119,l236,l5,l84,l71,l244,l247,l107,l44,l59,l309,l108,l284,l73,l86,l81,l272,l104,l261,l105,l262,l3,l27,l83,l82,l12,l279,l55,l112,l114,l110,l163,l80,l145,l148,l203,l56,l57,l239,l67,l48,l165,l87,l88,l89,l13,l251,l65,l66,l281,l282,l40,l222,l223,l93,l294,l96,l97,l293,l92,l231,l285,l120,l288,l287,l283,l4,l258,l41,l253,l25,l7,l260,l140,l139,l103,l147,l6,l100,l308,l24,l3);
8164 l129.fvalue(values, l320);
8165 ((l121).value = (function(){
8166     var symbol = l117;
8167     var value = symbol.value;
8168     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8169     return value;
8170 })());
8171 (function(){
8172     var string = "var lisp";
8173     if (typeof string != 'string')
8174         throw 'The value ' + string + ' is not a type string.';
8175     return (function(){
8176         var v = eval.apply(window, [string]);
8177         if (typeof v !== 'object' || !('multiple-value' in v)){
8178             v = [v];
8179             v['multiple-value'] = true;
8180         }
8181         return values.apply(this, v);
8182     })();
8183 })();
8184 (lisp = {});
8185 (lisp.read = (function(){
8186     var symbol = l169;
8187     var func = symbol.fvalue;
8188     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8189     return func;
8190 })());
8191 (lisp.print = (function(){
8192     var symbol = l145;
8193     var func = symbol.fvalue;
8194     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8195     return func;
8196 })());
8197 (lisp.eval = (function(){
8198     var symbol = l240;
8199     var func = symbol.fvalue;
8200     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8201     return func;
8202 })());
8203 (lisp.compile = (function (values,v849){
8204     checkArgs(arguments, 2);
8205     return l318.fvalue(values, v849, l4.value);
8206 }));
8207 (lisp.evalString = (function (values,v850){
8208     checkArgs(arguments, 2);
8209     return l240.fvalue(values, l169.fvalue(pv, v850));
8210 }));
8211 (lisp.compileString = (function (values,v851){
8212     checkArgs(arguments, 2);
8213     return l318.fvalue(values, l169.fvalue(pv, v851), l4.value);
8214 }));
8215 var l321 = QIList(QIList(l319,"l319"),QIList(l318,"l318"),QIList(l317,"l317"),QIList(l316,"l316"),QIList(l315,"l315"),QIList(l314,"l314"),QIList(l313,"l313"),QIList(l312,"l312"),QIList(l311,"l311"),QIList(l310,"l310"),QIList(l309,"l309"),QIList(l308,"l308"),QIList(l307,"l307"),QIList(l306,"l306"),QIList(l305,"l305"),QIList(l304,"l304"),QIList(l303,"l303"),QIList(l302,"l302"),QIList(l301,"l301"),QIList(l300,"l300"),QIList(l299,"l299"),QIList(l298,"l298"),QIList(l297,"l297"),QIList(l296,"l296"),QIList(l295,"l295"),QIList(l294,"l294"),QIList(l293,"l293"),QIList(l292,"l292"),QIList(l291,"l291"),QIList(l290,"l290"),QIList(l289,"l289"),QIList(l288,"l288"),QIList(l287,"l287"),QIList(l286,"l286"),QIList(l285,"l285"),QIList(l284,"l284"),QIList(l283,"l283"),QIList(l282,"l282"),QIList(l281,"l281"),QIList(l280,"l280"),QIList(l279,"l279"),QIList(l278,"l278"),QIList(l277,"l277"),QIList(l276,"l276"),QIList(l275,"l275"),QIList(l274,"l274"),QIList(l273,"l273"),QIList(l272,"l272"),QIList(l271,"l271"),QIList(l270,"l270"),QIList(l269,"l269"),QIList(l268,"l268"),QIList(l267,"l267"),QIList(l266,"l266"),QIList(l265,"l265"),QIList(l264,"l264"),QIList(l263,"l263"),QIList(l262,"l262"),QIList(l261,"l261"),QIList(l260,"l260"),QIList(l259,"l259"),QIList(l258,"l258"),QIList(l257,"l257"),QIList(l256,"l256"),QIList(l255,"l255"),QIList(l254,"l254"),QIList(l253,"l253"),QIList(l252,"l252"),QIList(l251,"l251"),QIList(l250,"l250"),QIList(l249,"l249"),QIList(l248,"l248"),QIList(l247,"l247"),QIList(l246,"l246"),QIList(l245,"l245"),QIList(l244,"l244"),QIList(l243,"l243"),QIList(l242,"l242"),QIList(l241,"l241"),QIList(l240,"l240"),QIList(l239,"l239"),QIList(l238,"l238"),QIList(l237,"l237"),QIList(l236,"l236"),QIList(l235,"l235"),QIList(l234,"l234"),QIList(l233,"l233"),QIList(l232,"l232"),QIList(l231,"l231"),QIList(l230,"l230"),QIList(l229,"l229"),QIList(l228,"l228"),QIList(l227,"l227"),QIList(l226,"l226"),QIList(l225,"l225"),QIList(l224,"l224"),QIList(l223,"l223"),QIList(l222,"l222"),QIList(l221,"l221"),QIList(l220,"l220"),QIList(l219,"l219"),QIList(l218,"l218"),QIList(l217,"l217"),QIList(l216,"l216"),QIList(l215,"l215"),QIList(l214,"l214"),QIList(l213,"l213"),QIList(l212,"l212"),QIList(l211,"l211"),QIList(l209,"l209"),QIList(l208,"l208"),QIList(l207,"l207"),QIList(l206,"l206"),QIList(l205,"l205"),QIList(l204,"l204"),QIList(l203,"l203"),QIList(l202,"l202"),QIList(l201,"l201"),QIList(l200,"l200"),QIList(l199,"l199"),QIList(l198,"l198"),QIList(l197,"l197"),QIList(l196,"l196"),QIList(l195,"l195"),QIList(l194,"l194"),QIList(l193,"l193"),QIList(l192,"l192"),QIList(l191,"l191"),QIList(l190,"l190"),QIList(l189,"l189"),QIList(l188,"l188"),QIList(l187,"l187"),QIList(l186,"l186"),QIList(l185,"l185"),QIList(l184,"l184"),QIList(l183,"l183"),QIList(l182,"l182"),QIList(l181,"l181"),QIList(l180,"l180"),QIList(l179,"l179"),QIList(l178,"l178"),QIList(l177,"l177"),QIList(l176,"l176"),QIList(l175,"l175"),QIList(l174,"l174"),QIList(l173,"l173"),QIList(l172,"l172"),QIList(l171,"l171"),QIList(l170,"l170"),QIList(l169,"l169"),QIList(l168,"l168"),QIList(l167,"l167"),QIList(l166,"l166"),QIList(l165,"l165"),QIList(l164,"l164"),QIList(l163,"l163"),QIList(l162,"l162"),QIList(l161,"l161"),QIList(l160,"l160"),QIList(l159,"l159"),QIList(l158,"l158"),QIList(l157,"l157"),QIList(l156,"l156"),QIList(l155,"l155"),QIList(l154,"l154"),QIList(l153,"l153"),QIList(l152,"l152"),QIList(l151,"l151"),QIList(l150,"l150"),QIList(l149,"l149"),QIList(l148,"l148"),QIList(l147,"l147"),QIList(l146,"l146"),QIList(l145,"l145"),QIList(l144,"l144"),QIList(l143,"l143"),QIList(l142,"l142"),QIList(l141,"l141"),QIList(l140,"l140"),QIList(l139,"l139"),QIList(l138,"l138"),QIList(l137,"l137"),QIList(l136,"l136"),QIList(l135,"l135"),QIList(l134,"l134"),QIList(l133,"l133"),QIList(l132,"l132"),QIList(l131,"l131"),QIList(l130,"l130"),QIList(l129,"l129"),QIList(l128,"l128"),QIList(l127,"l127"),QIList(l126,"l126"),QIList(l125,"l125"),QIList(l124,"l124"),QIList(l123,"l123"),QIList(l122,"l122"),QIList(l121,"l121"),QIList(l120,"l120"),QIList(l119,"l119"),QIList(l118,"l118"),QIList(l117,"l117"),QIList(l116,"l116"),QIList(l115,"l115"),QIList(l114,"l114"),QIList(l113,"l113"),QIList(l112,"l112"),QIList(l111,"l111"),QIList(l110,"l110"),QIList(l109,"l109"),QIList(l108,"l108"),QIList(l107,"l107"),QIList(l106,"l106"),QIList(l105,"l105"),QIList(l104,"l104"),QIList(l103,"l103"),QIList(l102,"l102"),QIList(l101,"l101"),QIList(l100,"l100"),QIList(l99,"l99"),QIList(l98,"l98"),QIList(l97,"l97"),QIList(l96,"l96"),QIList(l95,"l95"),QIList(l94,"l94"),QIList(l93,"l93"),QIList(l92,"l92"),QIList(l91,"l91"),QIList(l90,"l90"),QIList(l89,"l89"),QIList(l88,"l88"),QIList(l87,"l87"),QIList(l86,"l86"),QIList(l85,"l85"),QIList(l84,"l84"),QIList(l83,"l83"),QIList(l82,"l82"),QIList(l81,"l81"),QIList(l80,"l80"),QIList(l79,"l79"),QIList(l78,"l78"),QIList(l77,"l77"),QIList(l76,"l76"),QIList(l75,"l75"),QIList(l74,"l74"),QIList(l73,"l73"),QIList(l72,"l72"),QIList(l71,"l71"),QIList(l70,"l70"),QIList(l69,"l69"),QIList(l68,"l68"),QIList(l67,"l67"),QIList(l66,"l66"),QIList(l65,"l65"),QIList(l64,"l64"),QIList(l63,"l63"),QIList(l62,"l62"),QIList(l61,"l61"),QIList(l60,"l60"),QIList(l59,"l59"),QIList(l58,"l58"),QIList(l57,"l57"),QIList(l56,"l56"),QIList(l55,"l55"),QIList(l54,"l54"),QIList(l53,"l53"),QIList(l52,"l52"),QIList(l51,"l51"),QIList(l50,"l50"),QIList(l49,"l49"),QIList(l48,"l48"),QIList(l47,"l47"),QIList(l46,"l46"),QIList(l45,"l45"),QIList(l44,"l44"),QIList(l43,"l43"),QIList(l42,"l42"),QIList(l41,"l41"),QIList(l40,"l40"),QIList(l39,"l39"),QIList(l38,"l38"),QIList(l37,"l37"),QIList(l36,"l36"),QIList(l35,"l35"),QIList(l34,"l34"),QIList(l33,"l33"),QIList(l32,"l32"),QIList(l31,"l31"),QIList(l30,"l30"),QIList(l29,"l29"),QIList(l28,"l28"),QIList(l27,"l27"),QIList(l26,"l26"),QIList(l25,"l25"),QIList(l24,"l24"),QIList(l23,"l23"),QIList(l22,"l22"),QIList(l21,"l21"),QIList(l20,"l20"),QIList(l19,"l19"),QIList(l18,"l18"),QIList(l17,"l17"),QIList(l16,"l16"),QIList(l15,"l15"),QIList(l14,"l14"),QIList(l13,"l13"),QIList(l12,"l12"),QIList(l11,"l11"),QIList(l10,"l10"),QIList(l9,"l9"),QIList(l8,"l8"),QIList(l7,"l7"),QIList(l6,"l6"),QIList(l5,"l5"),QIList(l4,"l4"),QIList(l3,"l3"),QIList(l2,"l2"),QIList(l1,"l1"),l3);
8216 var l322 = {name: "OP"};
8217 var l323 = {name: "SYM"};
8218 var l324 = {name: "X"};
8219 var l325 = {name: "ARGS"};
8220 var l326 = {name: "BODY"};
8221 var l327 = {name: "DECLS"};
8222 var l328 = {name: "DECL"};
8223 var l329 = {name: "NAME"};
8224 var l330 = {name: "ARG"};
8225 var l331 = {name: "FORM"};
8226 var l332 = {name: "PACKAGE-DESIGNATOR"};
8227 var l333 = {name: "VALUE-FROM"};
8228 var l334 = {name: "VARIABLES"};
8229 var l335 = {name: "VARLIST"};
8230 var l336 = {name: "ENDLIST"};
8231 var l337 = {name: "V"};
8232 var l338 = {name: "PAIRS"};
8233 var l339 = {name: "ASSIGNMENTS"};
8234 var l340 = {name: "VALUE"};
8235 var l341 = {name: "FORM1"};
8236 var l342 = {name: "RESULT"};
8237 var l343 = {name: "FORMS"};
8238 var l344 = {name: "G"};
8239 var l345 = {name: "CLAUSULES"};
8240 var l346 = {name: "!FORM"};
8241 var l347 = {name: "CLAUSULE"};
8242 var l348 = {name: "ITER"};
8243 var l349 = {name: "G!TO"};
8244 var l350 = {name: "VAR"};
8245 var l351 = {name: "TO"};
8246 var l352 = {name: "G!LIST"};
8247 var l353 = {name: "PLACE"};
8248 var l354 = {name: "DELTA"};
8249 var l355 = {name: "CONDITION"};
8250 var l356 = {name: "DOCSTRING"};
8251 var l357 = QIList(QIList(QIList(l265,l103,l3,QIList(l200,l3),l3),QIList(l255,l103,l3,QIList(l200,l3),l3),QIList(l254,l103,l3,QIList(l200,l3),l3),QIList(l248,l103,l3,QIList(l200,l3),l3),QIList(l237,l103,l3,QIList(l200,l3),l3),QIList(l227,l103,l3,QIList(l200,l3),l3),QIList(l226,l103,l3,QIList(l200,l3),l3),QIList(l207,l103,l3,QIList(l200,l3),l3),QIList(l204,l103,l3,QIList(l200,l3),l3),QIList(l191,l103,l3,QIList(l200,l3),l3),QIList(l187,l103,l3,QIList(l200,l3),l3),QIList(l186,l103,l3,QIList(l200,l3),l3),QIList(l170,l103,l3,QIList(l200,l3),l3),QIList(l164,l103,l3,QIList(l200,l3),l3),QIList(l131,l103,l3,QIList(l200,l3),l3),QIList(l121,l103,l3,QIList(l200,l3),l3),QIList(l118,l103,l3,QIList(l200,l3),l3),QIList(l117,l103,l3,QIList(l200,l3),l3),QIList(l116,l103,l3,QIList(l200,l3),l3),QIList(l106,l103,l3,QIList(l200,l3),l3),QIList(l15,l103,l3,QIList(l200,l3),l3),QIList(l4,l103,l3,QIList(l200,l202,l3),l3),QIList(l3,l103,l3,QIList(l200,l202,l3),l3),l3),QIList(QIList(l274,l196,QIList(l102,QIList(l5,QIList(l322,l323,l3),QIList(l166,QIList(l266,QIList(l168,l322,l3),QIList(l324,l209,l325,l3),QIList(l244,QIList(QIList(l325,QIList(l28,l324,l325,l3),l3),l3),QIList(l270,l325,QIList(l142,QIList(l273,l325,QIList(l168,l323,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l270,l196,QIList(l102,QIList(l5,QIList(l325,l209,l326,l3),QIList(l7,QIList(l283,l325,l3),QIList(l301,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l3),l3),QIList(l166,QIList(l269,QIList(l168,l325,l3),QIList(l5,QIList(QIList(l168,l325,l3),l3),QIList(l132,"return ",QIList(l167,l326,l3),";",l131,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l268,l196,QIList(l102,QIList(l5,QIList(l327,l209,l326,l3),QIList(l166,QIList(l144,QIList(l167,QIList(l73,QIList(l5,QIList(l328,l3),QIList(l166,QIList(l132,"var ",QIList(l168,QIList(l39,l328,l3),l3)," = ",QIList(l168,QIList(l41,l328,l3),l3),";",l131,l3),l3),l3),l327,l3),l3),QIList(l167,QIList(l73,QIList(l5,QIList(l328,l3),QIList(l166,QIList(l132,"if (typeof ",QIList(l168,QIList(l39,l328,l3),l3)," != '",QIList(l168,QIList(l40,l328,l3),l3),"')",l131,QIList(l141,"throw 'The value ' + ",QIList(l168,QIList(l39,l328,l3),l3)," + ' is not a type ",QIList(l168,QIList(l40,l328,l3),l3),".';",l131,l3),l3),l3),l3),l327,l3),l3),QIList(l132,"return ",QIList(l239,QIList(l167,l326,l3),l3),";",l131,l3),l3),l3),l3),l3),l3,l3),QIList(l267,l196,QIList(l102,QIList(l5,QIList(l329,l325,l209,l326,l3),QIList(l166,QIList(l239,QIList(l266,QIList(l168,l329,l3),QIList(l168,l325,l3),QIList(l244,QIList(l168,QIList(l73,QIList(l5,QIList(l330,l3),QIList(l166,QIList(QIList(l168,l330,l3),QIList(l143,QIList(l168,l330,l3),l3),l3),l3),l3),l325,l3),l3),QIList(l167,l326,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l266,l196,QIList(l102,QIList(l5,QIList(l329,l325,l209,l326,l3),QIList(l166,QIList(l48,QIList(l44,QIList(l165,QIList(l168,l329,l3),l3),QIList(l5,QIList(l168,l325,l3),QIList(l182,QIList(l168,l329,l3),QIList(l167,l326,l3),l3),l3),l3),l265,l3),l3),l3),l3),l3,l3),QIList(l166,l196,QIList(l102,QIList(l5,QIList(l331,l3),QIList(l263,l331,l3),l3),l3),l3,l3),QIList(l241,l196,QIList(l102,QIList(l5,QIList(l329,l325,l331,l3),QIList(l166,QIList(l205,QIList(l168,l329,l3),QIList(l168,l325,l3),QIList(l143,QIList(l168,l331,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l205,l196,QIList(l102,QIList(l5,QIList(l329,l325,l209,l326,l3),QIList(l166,QIList(l48,QIList(l44,QIList(l165,QIList(l168,l329,l3),l3),QIList(l5,QIList(l168,l325,l3),QIList(l182,QIList(l168,l329,l3),QIList(l167,l326,l3),l3),l3),l3),l204,l3),l3),l3),l3),l3,l3),QIList(l144,l196,QIList(l102,QIList(l5,QIList(l209,l326,l3),QIList(l166,QIList(l132,"(function(){",l131,QIList(l141,QIList(l167,l326,l3),l3),"})()",l3),l3),l3),l3),l3,l3),QIList(l133,l196,QIList(l102,QIList(l5,QIList(l103,l209,l331,l3),QIList(l166,QIList(l223,QIList(l168,l103,l3),QIList(l132,QIList(l168,l103,l3),QIList(l239,QIList(l167,l331,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l122,l196,QIList(l102,QIList(l5,QIList(l332,l3),QIList(l166,QIList(l238,QIList(l223,l121,QIList(l109,QIList(l168,l332,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l105,l196,QIList(l102,QIList(l5,QIList(l333,l3),QIList(l166,QIList(l261,QIList(l102,l44,l3),QIList(l168,l333,l3),l3),l3),l3),l3),l3,l3),QIList(l104,l196,QIList(l102,QIList(l5,QIList(l334,l333,l209,l326,l3),QIList(l166,QIList(l261,QIList(l5,QIList(l208,QIList(l167,l334,l3),l209,QIList(l168,QIList(l16,l3),l3),l3),QIList(l167,l326,l3),l3),QIList(l168,l333,l3),l3),l3),l3),l3),l3,l3),QIList(l69,l196,QIList(l102,QIList(l5,QIList(l335,l336,l209,l326,l3),QIList(l166,QIList(l182,l3,QIList(l247,QIList(l168,QIList(l73,QIList(l5,QIList(l324,l3),QIList(l44,QIList(l39,l324,l3),QIList(l40,l324,l3),l3),l3),l335,l3),l3),QIList(l14,l4,QIList(l6,QIList(l168,QIList(l30,l336,l3),l3),QIList(l13,QIList(l239,QIList(l168,QIList(l31,l336,l3),l3),l3),l3),l3),QIList(l258,QIList(l167,l326,l3),l3),QIList(l223,QIList(l167,QIList(l299,QIList(l102,l64,l3),QIList(l73,QIList(l5,QIList(l337,l3),QIList(l54,QIList(l29,QIList(l35,l337,l3),l3),QIList(l44,QIList(l39,l337,l3),QIList(l41,l337,l3),l3),l3),l3),l335,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l68,l196,QIList(l102,QIList(l5,QIList(l335,l336,l209,l326,l3),QIList(l166,QIList(l182,l3,QIList(l244,QIList(l168,QIList(l73,QIList(l5,QIList(l324,l3),QIList(l44,QIList(l39,l324,l3),QIList(l40,l324,l3),l3),l3),l335,l3),l3),QIList(l14,l4,QIList(l6,QIList(l168,QIList(l30,l336,l3),l3),QIList(l13,QIList(l239,QIList(l168,QIList(l31,l336,l3),l3),l3),l3),l3),QIList(l258,QIList(l167,l326,l3),l3),QIList(l67,QIList(l167,QIList(l299,QIList(l102,l64,l3),QIList(l73,QIList(l5,QIList(l337,l3),QIList(l54,QIList(l29,QIList(l35,l337,l3),l3),QIList(l44,QIList(l39,l337,l3),QIList(l41,l337,l3),l3),l3),l3),l335,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l67,l196,QIList(l102,QIList(l5,QIList(l209,l338,l3),QIList(l244,QIList(QIList(l339,QIList(l165,l3,l3),l3),l3),QIList(l14,l4,QIList(l51,QIList(QIList(l12,l338,l3),QIList(l13,l3),l3),QIList(QIList(l12,QIList(l31,l338,l3),l3),QIList(l301,"Odd paris in PSETQ",l3),l3),QIList(l4,QIList(l244,QIList(QIList(l103,QIList(l30,l338,l3),l3),QIList(l340,QIList(l33,l338,l3),l3),l3),QIList(l48,QIList(l166,QIList(QIList(l168,l103,l3),QIList(l168,QIList(l16,l3),l3),QIList(l168,l340,l3),l3),l3),l339,l3),QIList(l223,l338,QIList(l35,l338,l3),l3),l3),l3),l3),l3),QIList(l223,l339,QIList(l66,l339,l3),l3),QIList(l166,QIList(l244,QIList(l168,QIList(l73,QIList(l102,l31,l3),l339,l3),l3),QIList(l223,QIList(l167,QIList(l60,QIList(l102,l64,l3),QIList(l73,QIList(l102,l85,l3),l339,l3),QIList(l165,l3,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l57,l196,QIList(l102,QIList(l5,QIList(l341,l342,l209,l326,l3),QIList(l166,QIList(l56,QIList(l239,QIList(l168,l341,l3),QIList(l168,l342,l3),l3),QIList(l167,l326,l3),l3),l3),l3),l3),l3,l3),QIList(l56,l196,QIList(l102,QIList(l5,QIList(l331,l209,l326,l3),QIList(l244,QIList(QIList(l340,QIList(l16,l3),l3),l3),QIList(l166,QIList(l244,QIList(QIList(QIList(l168,l340,l3),QIList(l168,l331,l3),l3),l3),QIList(l167,l326,l3),QIList(l168,l340,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l55,l196,QIList(l102,QIList(l5,QIList(l209,l343,l3),QIList(l51,QIList(QIList(l12,l343,l3),l3,l3),QIList(QIList(l12,QIList(l31,l343,l3),l3),QIList(l30,l343,l3),l3),QIList(l4,QIList(l244,QIList(QIList(l344,QIList(l16,l3),l3),l3),QIList(l166,QIList(l244,QIList(QIList(QIList(l168,l344,l3),QIList(l168,QIList(l30,l343,l3),l3),l3),l3),QIList(l206,QIList(l168,l344,l3),QIList(l168,l344,l3),QIList(l55,QIList(l167,QIList(l31,l343,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l54,l196,QIList(l102,QIList(l5,QIList(l209,l343,l3),QIList(l51,QIList(QIList(l12,l343,l3),l4,l3),QIList(QIList(l12,QIList(l31,l343,l3),l3),QIList(l30,l343,l3),l3),QIList(l4,QIList(l166,QIList(l206,QIList(l168,QIList(l30,l343,l3),l3),QIList(l54,QIList(l167,QIList(l31,l343,l3),l3),l3),l3,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l53,l196,QIList(l102,QIList(l5,QIList(l331,l209,l345,l3),QIList(l166,QIList(l52,QIList(l168,l331,l3),QIList(l167,QIList(l64,l345,QIList(l166,QIList(QIList(l4,QIList(l301,"ECASE expression failed.",l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l52,l196,QIList(l102,QIList(l5,QIList(l331,l209,l345,l3),QIList(l244,QIList(QIList(l346,QIList(l16,l3),l3),l3),QIList(l166,QIList(l244,QIList(QIList(QIList(l168,l346,l3),QIList(l168,l331,l3),l3),l3),QIList(l51,QIList(l167,QIList(l73,QIList(l5,QIList(l347,l3),QIList(l206,QIList(l290,QIList(l30,l347,l3),l4,l3),l347,QIList(l166,QIList(QIList(l26,QIList(l168,l346,l3),QIList(l165,QIList(l168,QIList(l30,l347,l3),l3),l3),l3),QIList(l167,QIList(l31,l347,l3),l3),l3),l3),l3),l3),l345,l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l51,l196,QIList(l102,QIList(l5,QIList(l209,l345,l3),QIList(l206,QIList(l12,l345,l3),l3,QIList(l206,QIList(l290,QIList(l32,l345,l3),l4,l3),QIList(l166,QIList(l239,QIList(l167,QIList(l34,l345,l3),l3),l3),l3),QIList(l166,QIList(l206,QIList(l168,QIList(l32,l345,l3),l3),QIList(l239,QIList(l167,QIList(l34,l345,l3),l3),l3),QIList(l51,QIList(l167,QIList(l31,l345,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l50,l196,QIList(l102,QIList(l5,QIList(l348,l209,l326,l3),QIList(l244,QIList(QIList(l349,QIList(l16,l3),l3),QIList(l350,QIList(l39,l348,l3),l3),QIList(l351,QIList(l40,l348,l3),l3),QIList(l342,QIList(l41,l348,l3),l3),l3),QIList(l166,QIList(l182,l3,QIList(l244,QIList(QIList(QIList(l168,l350,l3),0,l3),QIList(QIList(l168,l349,l3),QIList(l168,l351,l3),l3),l3),QIList(l230,QIList(l276,QIList(l168,l350,l3),QIList(l168,l349,l3),l3),QIList(l258,QIList(l167,l326,l3),l3),QIList(l46,QIList(l168,l350,l3),l3),l3),QIList(l168,l342,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l49,l196,QIList(l102,QIList(l5,QIList(l348,l209,l326,l3),QIList(l244,QIList(QIList(l350,QIList(l39,l348,l3),l3),QIList(l352,QIList(l16,l3),l3),l3),QIList(l166,QIList(l182,l3,QIList(l244,QIList(QIList(QIList(l168,l352,l3),QIList(l168,QIList(l40,l348,l3),l3),l3),QIList(QIList(l168,l350,l3),l3,l3),l3),QIList(l230,QIList(l168,l352,l3),QIList(l223,QIList(l168,l350,l3),QIList(l30,QIList(l168,l352,l3),l3),l3),QIList(l258,QIList(l167,l326,l3),l3),QIList(l223,QIList(l168,l352,l3),QIList(l31,QIList(l168,l352,l3),l3),l3),l3),QIList(l168,QIList(l41,l348,l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l48,l196,QIList(l102,QIList(l5,QIList(l324,l353,l3),QIList(l166,QIList(l223,QIList(l168,l353,l3),QIList(l28,QIList(l168,l324,l3),QIList(l168,l353,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l47,l196,QIList(l102,QIList(l5,QIList(l324,l208,QIList(l354,1,l3),l3),QIList(l166,QIList(l223,QIList(l168,l324,l3),QIList(l62,QIList(l168,l324,l3),QIList(l168,l354,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l46,l196,QIList(l102,QIList(l5,QIList(l324,l208,QIList(l354,1,l3),l3),QIList(l166,QIList(l223,QIList(l168,l324,l3),QIList(l61,QIList(l168,l324,l3),QIList(l168,l354,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l14,l196,QIList(l102,QIList(l5,QIList(l355,l209,l326,l3),QIList(l166,QIList(l182,l3,QIList(l230,QIList(l168,l355,l3),QIList(l167,l326,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l13,l196,QIList(l102,QIList(l5,QIList(l208,l340,l3),QIList(l166,QIList(l251,l3,QIList(l168,l340,l3),l3),l3),l3),l3),l3,l3),QIList(l11,l196,QIList(l102,QIList(l5,QIList(l329,l325,l209,l326,l3),QIList(l166,QIList(l239,QIList(l286,QIList(l165,QIList(l168,l329,l3),l3),QIList(l10,QIList(l168,QIList(l285,l329,l3),l3),QIList(l168,l325,l3),QIList(l167,QIList(l206,QIList(l54,QIList(l293,QIList(l30,l326,l3),l3),QIList(l27,QIList(l12,QIList(l31,l326,l3),l3),l3),l3),QIList(l166,QIList(QIList(l168,QIList(l30,l326,l3),l3),QIList(l182,QIList(l168,l329,l3),QIList(l167,QIList(l31,l326,l3),l3),l3),l3),l3),QIList(l166,QIList(QIList(l182,QIList(l168,l329,l3),QIList(l167,l326,l3),l3),l3),l3),l3),l3),l3),l3),QIList(l165,QIList(l168,l329,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l10,l196,QIList(l102,QIList(l5,QIList(l329,l325,l209,l326,l3),QIList(l244,QIList(QIList(l324,QIList(l16,"FN",l3),l3),l3),QIList(l166,QIList(l244,QIList(QIList(QIList(l168,l324,l3),QIList(l5,QIList(l168,l325,l3),QIList(l167,l326,l3),l3),l3),l3),QIList(l305,QIList(l168,l324,l3),"fname",QIList(l168,l329,l3),l3),QIList(l168,l324,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l9,l196,QIList(l102,QIList(l5,QIList(l329,l340,l208,l356,l3),QIList(l166,QIList(l239,QIList(l223,QIList(l168,l329,l3),QIList(l168,l340,l3),l3),QIList(l167,QIList(l6,QIList(l293,l356,l3),QIList(l166,QIList(QIList(l305,QIList(l165,QIList(l168,l329,l3),l3),"vardoc",QIList(l168,l356,l3),l3),l3),l3),l3),l3),QIList(l165,QIList(l168,l329,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l8,l196,QIList(l102,QIList(l5,QIList(l329,l340,l208,l356,l3),QIList(l166,QIList(l239,QIList(l2,QIList(l200,QIList(l168,l329,l3),l3),l3),QIList(l7,QIList(l18,QIList(l165,QIList(l168,l329,l3),l3),l3),QIList(l223,QIList(l168,l329,l3),QIList(l168,l340,l3),l3),l3),QIList(l167,QIList(l6,QIList(l293,l356,l3),QIList(l166,QIList(QIList(l305,QIList(l165,QIList(l168,l329,l3),l3),"vardoc",QIList(l168,l356,l3),l3),l3),l3),l3),l3),QIList(l165,QIList(l168,l329,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l7,l196,QIList(l102,QIList(l5,QIList(l355,l209,l326,l3),QIList(l166,QIList(l206,QIList(l168,l355,l3),l3,QIList(l239,QIList(l167,l326,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l6,l196,QIList(l102,QIList(l5,QIList(l355,l209,l326,l3),QIList(l166,QIList(l206,QIList(l168,l355,l3),QIList(l239,QIList(l167,l326,l3),l3),l3,l3),l3),l3),l3),l3,l3),QIList(l5,l196,QIList(l102,QIList(l5,QIList(l325,l209,l326,l3),QIList(l166,QIList(l102,QIList(l5,QIList(l168,l325,l3),QIList(l167,l326,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l2,l196,QIList(l102,QIList(l5,QIList(l209,l327,l3),QIList(l166,QIList(l238,QIList(l167,QIList(l73,QIList(l5,QIList(l328,l3),QIList(l166,QIList(l199,QIList(l165,QIList(l168,l328,l3),l3),l3),l3),l3),l327,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l1,l196,QIList(l102,QIList(l5,QIList(l329,l325,l209,l326,l3),QIList(l166,QIList(l238,QIList(l195,QIList(l165,QIList(l168,l329,l3),l3),QIList(l165,QIList(l102,QIList(l5,QIList(l168,QIList(l73,QIList(l102,QIList(l5,QIList(l324,l3),QIList(l206,QIList(l290,l324,QIList(l165,l319,l3),l3),QIList(l165,l209,l3),l324,l3),l3),l3),l325,l3),l3),QIList(l167,l326,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),l3),l3,l3,l3);
8252 (function(){
8253     l123.fvalue(pv, l319);
8254     l123.fvalue(pv, l318);
8255     l123.fvalue(pv, l317);
8256     l123.fvalue(pv, l316);
8257     l123.fvalue(pv, l315);
8258     l123.fvalue(pv, l314);
8259     l123.fvalue(pv, l313);
8260     l123.fvalue(pv, l312);
8261     l123.fvalue(pv, l311);
8262     l123.fvalue(pv, l310);
8263     l123.fvalue(pv, l309);
8264     l123.fvalue(pv, l308);
8265     l123.fvalue(pv, l307);
8266     l123.fvalue(pv, l306);
8267     l123.fvalue(pv, l305);
8268     l123.fvalue(pv, l304);
8269     l123.fvalue(pv, l303);
8270     l123.fvalue(pv, l302);
8271     l123.fvalue(pv, l301);
8272     l123.fvalue(pv, l300);
8273     l123.fvalue(pv, l299);
8274     l123.fvalue(pv, l298);
8275     l123.fvalue(pv, l297);
8276     l123.fvalue(pv, l296);
8277     l123.fvalue(pv, l295);
8278     l123.fvalue(pv, l294);
8279     l123.fvalue(pv, l293);
8280     l123.fvalue(pv, l292);
8281     l123.fvalue(pv, l291);
8282     l123.fvalue(pv, l290);
8283     l123.fvalue(pv, l289);
8284     l123.fvalue(pv, l288);
8285     l123.fvalue(pv, l287);
8286     l123.fvalue(pv, l286);
8287     l123.fvalue(pv, l285);
8288     l123.fvalue(pv, l284);
8289     l123.fvalue(pv, l283);
8290     l123.fvalue(pv, l282);
8291     l123.fvalue(pv, l281);
8292     l123.fvalue(pv, l280);
8293     l123.fvalue(pv, l279);
8294     l123.fvalue(pv, l278);
8295     l123.fvalue(pv, l277);
8296     l123.fvalue(pv, l276);
8297     l123.fvalue(pv, l275);
8298     l123.fvalue(pv, l274);
8299     l123.fvalue(pv, l273);
8300     l123.fvalue(pv, l272);
8301     l123.fvalue(pv, l271);
8302     l123.fvalue(pv, l270);
8303     l123.fvalue(pv, l269);
8304     l123.fvalue(pv, l268);
8305     l123.fvalue(pv, l267);
8306     l123.fvalue(pv, l266);
8307     l123.fvalue(pv, l265);
8308     l123.fvalue(pv, l264);
8309     l123.fvalue(pv, l263);
8310     l123.fvalue(pv, l262);
8311     l123.fvalue(pv, l261);
8312     l123.fvalue(pv, l260);
8313     l123.fvalue(pv, l259);
8314     l123.fvalue(pv, l258);
8315     l123.fvalue(pv, l257);
8316     l123.fvalue(pv, l256);
8317     l123.fvalue(pv, l255);
8318     l123.fvalue(pv, l254);
8319     l123.fvalue(pv, l253);
8320     l123.fvalue(pv, l252);
8321     l123.fvalue(pv, l251);
8322     l123.fvalue(pv, l250);
8323     l123.fvalue(pv, l249);
8324     l123.fvalue(pv, l248);
8325     l123.fvalue(pv, l247);
8326     l123.fvalue(pv, l246);
8327     l123.fvalue(pv, l245);
8328     l123.fvalue(pv, l244);
8329     l123.fvalue(pv, l243);
8330     l123.fvalue(pv, l242);
8331     l123.fvalue(pv, l241);
8332     l123.fvalue(pv, l240);
8333     l123.fvalue(pv, l239);
8334     l123.fvalue(pv, l238);
8335     l123.fvalue(pv, l237);
8336     l123.fvalue(pv, l236);
8337     l123.fvalue(pv, l235);
8338     l123.fvalue(pv, l234);
8339     l123.fvalue(pv, l233);
8340     l123.fvalue(pv, l232);
8341     l123.fvalue(pv, l231);
8342     l123.fvalue(pv, l230);
8343     l123.fvalue(pv, l229);
8344     l123.fvalue(pv, l228);
8345     l123.fvalue(pv, l227);
8346     l123.fvalue(pv, l226);
8347     l123.fvalue(pv, l225);
8348     l123.fvalue(pv, l224);
8349     l123.fvalue(pv, l223);
8350     l123.fvalue(pv, l222);
8351     l123.fvalue(pv, l221);
8352     l123.fvalue(pv, l220);
8353     l123.fvalue(pv, l219);
8354     l123.fvalue(pv, l218);
8355     l123.fvalue(pv, l217);
8356     l123.fvalue(pv, l216);
8357     l123.fvalue(pv, l215);
8358     l123.fvalue(pv, l214);
8359     l123.fvalue(pv, l213);
8360     l123.fvalue(pv, l212);
8361     l123.fvalue(pv, l211);
8362     l123.fvalue(pv, l209);
8363     l123.fvalue(pv, l208);
8364     l123.fvalue(pv, l207);
8365     l123.fvalue(pv, l206);
8366     l123.fvalue(pv, l205);
8367     l123.fvalue(pv, l204);
8368     l123.fvalue(pv, l203);
8369     l123.fvalue(pv, l202);
8370     l123.fvalue(pv, l201);
8371     l123.fvalue(pv, l200);
8372     l123.fvalue(pv, l199);
8373     l123.fvalue(pv, l198);
8374     l123.fvalue(pv, l197);
8375     l123.fvalue(pv, l196);
8376     l123.fvalue(pv, l195);
8377     l123.fvalue(pv, l194);
8378     l123.fvalue(pv, l193);
8379     l123.fvalue(pv, l192);
8380     l123.fvalue(pv, l191);
8381     l123.fvalue(pv, l190);
8382     l123.fvalue(pv, l189);
8383     l123.fvalue(pv, l188);
8384     l123.fvalue(pv, l187);
8385     l123.fvalue(pv, l186);
8386     l123.fvalue(pv, l185);
8387     l123.fvalue(pv, l184);
8388     l123.fvalue(pv, l183);
8389     l123.fvalue(pv, l182);
8390     l123.fvalue(pv, l181);
8391     l123.fvalue(pv, l180);
8392     l123.fvalue(pv, l179);
8393     l123.fvalue(pv, l178);
8394     l123.fvalue(pv, l177);
8395     l123.fvalue(pv, l176);
8396     l123.fvalue(pv, l175);
8397     l123.fvalue(pv, l174);
8398     l123.fvalue(pv, l173);
8399     l123.fvalue(pv, l172);
8400     l123.fvalue(pv, l171);
8401     l123.fvalue(pv, l170);
8402     l123.fvalue(pv, l169);
8403     l123.fvalue(pv, l168);
8404     l123.fvalue(pv, l167);
8405     l123.fvalue(pv, l166);
8406     l123.fvalue(pv, l165);
8407     l123.fvalue(pv, l164);
8408     l123.fvalue(pv, l163);
8409     l123.fvalue(pv, l162);
8410     l123.fvalue(pv, l161);
8411     l123.fvalue(pv, l160);
8412     l123.fvalue(pv, l159);
8413     l123.fvalue(pv, l158);
8414     l123.fvalue(pv, l157);
8415     l123.fvalue(pv, l156);
8416     l123.fvalue(pv, l155);
8417     l123.fvalue(pv, l154);
8418     l123.fvalue(pv, l153);
8419     l123.fvalue(pv, l152);
8420     l123.fvalue(pv, l151);
8421     l123.fvalue(pv, l150);
8422     l123.fvalue(pv, l149);
8423     l123.fvalue(pv, l148);
8424     l123.fvalue(pv, l147);
8425     l123.fvalue(pv, l146);
8426     l123.fvalue(pv, l145);
8427     l123.fvalue(pv, l144);
8428     l123.fvalue(pv, l143);
8429     l123.fvalue(pv, l142);
8430     l123.fvalue(pv, l141);
8431     l123.fvalue(pv, l140);
8432     l123.fvalue(pv, l139);
8433     l123.fvalue(pv, l138);
8434     l123.fvalue(pv, l137);
8435     l123.fvalue(pv, l136);
8436     l123.fvalue(pv, l135);
8437     l123.fvalue(pv, l134);
8438     l123.fvalue(pv, l133);
8439     l123.fvalue(pv, l132);
8440     l123.fvalue(pv, l131);
8441     l123.fvalue(pv, l130);
8442     l123.fvalue(pv, l129);
8443     l123.fvalue(pv, l128);
8444     l123.fvalue(pv, l127);
8445     l123.fvalue(pv, l126);
8446     l123.fvalue(pv, l125);
8447     l123.fvalue(pv, l124);
8448     l123.fvalue(pv, l123);
8449     l123.fvalue(pv, l122);
8450     l123.fvalue(pv, l121);
8451     l123.fvalue(pv, l120);
8452     l123.fvalue(pv, l119);
8453     l123.fvalue(pv, l118);
8454     l123.fvalue(pv, l117);
8455     l123.fvalue(pv, l116);
8456     l123.fvalue(pv, l115);
8457     l123.fvalue(pv, l114);
8458     l123.fvalue(pv, l113);
8459     l123.fvalue(pv, l112);
8460     l123.fvalue(pv, l111);
8461     l123.fvalue(pv, l110);
8462     l123.fvalue(pv, l109);
8463     l123.fvalue(pv, l108);
8464     l123.fvalue(pv, l107);
8465     l123.fvalue(pv, l106);
8466     l123.fvalue(pv, l105);
8467     l123.fvalue(pv, l104);
8468     l123.fvalue(pv, l103);
8469     l123.fvalue(pv, l102);
8470     l123.fvalue(pv, l101);
8471     l123.fvalue(pv, l100);
8472     l123.fvalue(pv, l99);
8473     l123.fvalue(pv, l98);
8474     l123.fvalue(pv, l97);
8475     l123.fvalue(pv, l96);
8476     l123.fvalue(pv, l95);
8477     l123.fvalue(pv, l94);
8478     l123.fvalue(pv, l93);
8479     l123.fvalue(pv, l92);
8480     l123.fvalue(pv, l91);
8481     l123.fvalue(pv, l90);
8482     l123.fvalue(pv, l89);
8483     l123.fvalue(pv, l88);
8484     l123.fvalue(pv, l87);
8485     l123.fvalue(pv, l86);
8486     l123.fvalue(pv, l85);
8487     l123.fvalue(pv, l84);
8488     l123.fvalue(pv, l83);
8489     l123.fvalue(pv, l82);
8490     l123.fvalue(pv, l81);
8491     l123.fvalue(pv, l80);
8492     l123.fvalue(pv, l79);
8493     l123.fvalue(pv, l78);
8494     l123.fvalue(pv, l77);
8495     l123.fvalue(pv, l76);
8496     l123.fvalue(pv, l75);
8497     l123.fvalue(pv, l74);
8498     l123.fvalue(pv, l73);
8499     l123.fvalue(pv, l72);
8500     l123.fvalue(pv, l71);
8501     l123.fvalue(pv, l70);
8502     l123.fvalue(pv, l69);
8503     l123.fvalue(pv, l68);
8504     l123.fvalue(pv, l67);
8505     l123.fvalue(pv, l66);
8506     l123.fvalue(pv, l65);
8507     l123.fvalue(pv, l64);
8508     l123.fvalue(pv, l63);
8509     l123.fvalue(pv, l62);
8510     l123.fvalue(pv, l61);
8511     l123.fvalue(pv, l60);
8512     l123.fvalue(pv, l59);
8513     l123.fvalue(pv, l58);
8514     l123.fvalue(pv, l57);
8515     l123.fvalue(pv, l56);
8516     l123.fvalue(pv, l55);
8517     l123.fvalue(pv, l54);
8518     l123.fvalue(pv, l53);
8519     l123.fvalue(pv, l52);
8520     l123.fvalue(pv, l51);
8521     l123.fvalue(pv, l50);
8522     l123.fvalue(pv, l49);
8523     l123.fvalue(pv, l48);
8524     l123.fvalue(pv, l47);
8525     l123.fvalue(pv, l46);
8526     l123.fvalue(pv, l45);
8527     l123.fvalue(pv, l44);
8528     l123.fvalue(pv, l43);
8529     l123.fvalue(pv, l42);
8530     l123.fvalue(pv, l41);
8531     l123.fvalue(pv, l40);
8532     l123.fvalue(pv, l39);
8533     l123.fvalue(pv, l38);
8534     l123.fvalue(pv, l37);
8535     l123.fvalue(pv, l36);
8536     l123.fvalue(pv, l35);
8537     l123.fvalue(pv, l34);
8538     l123.fvalue(pv, l33);
8539     l123.fvalue(pv, l32);
8540     l123.fvalue(pv, l31);
8541     l123.fvalue(pv, l30);
8542     l123.fvalue(pv, l29);
8543     l123.fvalue(pv, l28);
8544     l123.fvalue(pv, l27);
8545     l123.fvalue(pv, l26);
8546     l123.fvalue(pv, l25);
8547     l123.fvalue(pv, l24);
8548     l123.fvalue(pv, l23);
8549     l123.fvalue(pv, l22);
8550     l123.fvalue(pv, l21);
8551     l123.fvalue(pv, l20);
8552     l123.fvalue(pv, l19);
8553     l123.fvalue(pv, l18);
8554     l123.fvalue(pv, l17);
8555     l123.fvalue(pv, l16);
8556     l123.fvalue(pv, l15);
8557     l123.fvalue(pv, l14);
8558     l123.fvalue(pv, l13);
8559     l123.fvalue(pv, l12);
8560     l123.fvalue(pv, l11);
8561     l123.fvalue(pv, l10);
8562     l123.fvalue(pv, l9);
8563     l123.fvalue(pv, l8);
8564     l123.fvalue(pv, l7);
8565     l123.fvalue(pv, l6);
8566     l123.fvalue(pv, l5);
8567     l123.fvalue(pv, l4);
8568     l123.fvalue(pv, l3);
8569     l123.fvalue(pv, l2);
8570     l123.fvalue(pv, l1);
8571     ((l226).value = l321);
8572     ((l186).value = l357);
8573     ((l187).value = 851);
8574     ((l15).value = 218);
8575     return ((l248).value = 288);
8576 })();
8577 ((l227).value = 357);