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 var l74 = {name: "SENTINEL"};
 948 (function(){
 949     (l73).fvalue = (function(v107){
 950         ((v107)["fname"] = "MAPCAR");
 951         return v107;
 952     })((function (values,v102,v103){
 953         checkArgs(arguments, 3);
 954         return (function(){
 955             return (function(){
 956                 var v104 = ({car: l74, cdr: l3.value});
 957                 var v105 = v104;
 958                 (function(){
 959                     return (function(){
 960                         while(l27.fvalue(pv, l12.fvalue(pv, v103)) !== l3.value){
 961                             (function(v106){
 962                                 (function(){
 963                                     var x = v105;
 964                                     if (typeof x != 'object')
 965                                         throw 'The value ' + x + ' is not a type object.';
 966                                     return (x.cdr = v106, x);
 967                                 })();
 968                                 return (v105 = v106, v103 = (function(){
 969                                     var tmp = v103;
 970                                     return tmp === l3.value? l3.value: tmp.cdr;
 971                                 })());
 972                             })(({car: (v102)(pv, (function(){
 973                                 var tmp = v103;
 974                                 return tmp === l3.value? l3.value: tmp.car;
 975                             })()), cdr: l3.value}));
 976                         }return l3.value;
 977                     })();
 978                 })();
 979                 return (function(){
 980                     var tmp = v104;
 981                     return tmp === l3.value? l3.value: tmp.cdr;
 982                 })();
 983             })();
 984         })();
 985     }));
 986     return l73;
 987 })();
 988 var l75 = {name: "IDENTITY"};
 989 (function(){
 990     (l75).fvalue = (function(v109){
 991         ((v109)["fname"] = "IDENTITY");
 992         return v109;
 993     })((function (values,v108){
 994         checkArgs(arguments, 2);
 995         return (function(){
 996             return v108;
 997         })();
 998     }));
 999     return l75;
1000 })();
1001 var l76 = {name: "CONSTANTLY"};
1002 (function(){
1003     (l76).fvalue = (function(v112){
1004         ((v112)["fname"] = "CONSTANTLY");
1005         return v112;
1006     })((function (values,v110){
1007         checkArgs(arguments, 2);
1008         return (function(){
1009             return (function (values){
1010                 var v111= l3.value;
1011                 for (var i = arguments.length-1; i>=1; i--)
1012                     v111 = {car: arguments[i], cdr:
1013                 v111};
1014                 return v110;
1015             });
1016         })();
1017     }));
1018     return l76;
1019 })();
1020 var l77 = {name: "COPY-LIST"};
1021 (function(){
1022     (l77).fvalue = (function(v114){
1023         ((v114)["fname"] = "COPY-LIST");
1024         return v114;
1025     })((function (values,v113){
1026         checkArgs(arguments, 2);
1027         return (function(){
1028             return l73.fvalue(values, (function(){
1029                 var symbol = l75;
1030                 var func = symbol.fvalue;
1031                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1032                 return func;
1033             })(), v113);
1034         })();
1035     }));
1036     return l77;
1037 })();
1038 var l78 = {name: "CODE-CHAR"};
1039 (function(){
1040     (l78).fvalue = (function(v116){
1041         ((v116)["fname"] = "CODE-CHAR");
1042         return v116;
1043     })((function (values,v115){
1044         checkArgs(arguments, 2);
1045         return (function(){
1046             return v115;
1047         })();
1048     }));
1049     return l78;
1050 })();
1051 var l79 = {name: "CHAR-CODE"};
1052 (function(){
1053     (l79).fvalue = (function(v118){
1054         ((v118)["fname"] = "CHAR-CODE");
1055         return v118;
1056     })((function (values,v117){
1057         checkArgs(arguments, 2);
1058         return (function(){
1059             return v117;
1060         })();
1061     }));
1062     return l79;
1063 })();
1064 var l80 = {name: "CHAR="};
1065 (function(){
1066     (l80).fvalue = (function(v121){
1067         ((v121)["fname"] = "CHAR=");
1068         return v121;
1069     })((function (values,v119,v120){
1070         checkArgs(arguments, 3);
1071         return (function(){
1072             return (function(){
1073                 var x1 = v119;
1074                 if (typeof x1 !== 'number') throw 'Not a number!';
1075                 var x2 = v120;
1076                 if (typeof x2 !== 'number') throw 'Not a number!';
1077                 return (x1==x2?l4.value: l3.value);
1078             })();
1079         })();
1080     }));
1081     return l80;
1082 })();
1083 var l81 = {name: "INTEGERP"};
1084 (function(){
1085     (l81).fvalue = (function(v123){
1086         ((v123)["fname"] = "INTEGERP");
1087         return v123;
1088     })((function (values,v122){
1089         checkArgs(arguments, 2);
1090         return (function(){
1091             return (((typeof (v122) == "number")?l4.value: l3.value) !== l3.value ? (function(){
1092                 var x1 = (function(){
1093                     var x = v122;
1094                     if (typeof x != 'number')
1095                         throw 'The value ' + x + ' is not a type number.';
1096                     return Math.floor(x);
1097                 })();
1098                 if (typeof x1 !== 'number') throw 'Not a number!';
1099                 var x2 = v122;
1100                 if (typeof x2 !== 'number') throw 'Not a number!';
1101                 return (x1==x2?l4.value: l3.value);
1102             })() : l3.value);
1103         })();
1104     }));
1105     return l81;
1106 })();
1107 var l82 = {name: "PLUSP"};
1108 (function(){
1109     (l82).fvalue = (function(v125){
1110         ((v125)["fname"] = "PLUSP");
1111         return v125;
1112     })((function (values,v124){
1113         checkArgs(arguments, 2);
1114         return (function(){
1115             return (function(){
1116                 var x1 = 0;
1117                 if (typeof x1 !== 'number') throw 'Not a number!';
1118                 var x2 = v124;
1119                 if (typeof x2 !== 'number') throw 'Not a number!';
1120                 return (x1<x2?l4.value: l3.value);
1121             })();
1122         })();
1123     }));
1124     return l82;
1125 })();
1126 var l83 = {name: "MINUSP"};
1127 (function(){
1128     (l83).fvalue = (function(v127){
1129         ((v127)["fname"] = "MINUSP");
1130         return v127;
1131     })((function (values,v126){
1132         checkArgs(arguments, 2);
1133         return (function(){
1134             return (function(){
1135                 var x1 = v126;
1136                 if (typeof x1 !== 'number') throw 'Not a number!';
1137                 var x2 = 0;
1138                 if (typeof x2 !== 'number') throw 'Not a number!';
1139                 return (x1<x2?l4.value: l3.value);
1140             })();
1141         })();
1142     }));
1143     return l83;
1144 })();
1145 (function(){
1146     (l59).fvalue = (function(v130){
1147         ((v130)["fname"] = "LISTP");
1148         return v130;
1149     })((function (values,v128){
1150         checkArgs(arguments, 2);
1151         return (function(){
1152             return (function(v129){
1153                 return (v129 !== l3.value ? v129 : l12.fvalue(values, v128));
1154             })(((function(){
1155                 var tmp = v128;
1156                 return (typeof tmp == 'object' && 'car' in tmp);
1157             })()?l4.value: l3.value));
1158         })();
1159     }));
1160     return l59;
1161 })();
1162 var l84 = {name: "NTHCDR"};
1163 (function(){
1164     (l84).fvalue = (function(v133){
1165         ((v133)["fname"] = "NTHCDR");
1166         return v133;
1167     })((function (values,v131,v132){
1168         checkArgs(arguments, 3);
1169         return (function(){
1170             (function(){
1171                 return (function(){
1172                     while((l82.fvalue(pv, v131) !== l3.value ? v132 : l3.value) !== l3.value){
1173                         (v131 = l23.fvalue(pv, v131));
1174                         (v132 = (function(){
1175                             var tmp = v132;
1176                             return tmp === l3.value? l3.value: tmp.cdr;
1177                         })());
1178                     }return l3.value;
1179                 })();
1180             })();
1181             return v132;
1182         })();
1183     }));
1184     return l84;
1185 })();
1186 var l85 = {name: "NTH"};
1187 (function(){
1188     (l85).fvalue = (function(v136){
1189         ((v136)["fname"] = "NTH");
1190         return v136;
1191     })((function (values,v134,v135){
1192         checkArgs(arguments, 3);
1193         return (function(){
1194             return (function(){
1195                 var tmp = l84.fvalue(pv, v134, v135);
1196                 return tmp === l3.value? l3.value: tmp.car;
1197             })();
1198         })();
1199     }));
1200     return l85;
1201 })();
1202 var l86 = {name: "LAST"};
1203 (function(){
1204     (l86).fvalue = (function(v138){
1205         ((v138)["fname"] = "LAST");
1206         return v138;
1207     })((function (values,v137){
1208         checkArgs(arguments, 2);
1209         return (function(){
1210             (function(){
1211                 return (function(){
1212                     while(((function(){
1213                         var tmp = (function(){
1214                             var tmp = v137;
1215                             return tmp === l3.value? l3.value: tmp.cdr;
1216                         })();
1217                         return (typeof tmp == 'object' && 'car' in tmp);
1218                     })()?l4.value: l3.value) !== l3.value){
1219                         (v137 = (function(){
1220                             var tmp = v137;
1221                             return tmp === l3.value? l3.value: tmp.cdr;
1222                         })());
1223                     }return l3.value;
1224                 })();
1225             })();
1226             return v137;
1227         })();
1228     }));
1229     return l86;
1230 })();
1231 var l87 = {name: "BUTLAST"};
1232 (function(){
1233     (l87).fvalue = (function(v140){
1234         ((v140)["fname"] = "BUTLAST");
1235         return v140;
1236     })((function (values,v139){
1237         checkArgs(arguments, 2);
1238         return (function(){
1239             return (((function(){
1240                 var tmp = (function(){
1241                     var tmp = v139;
1242                     return tmp === l3.value? l3.value: tmp.cdr;
1243                 })();
1244                 return (typeof tmp == 'object' && 'car' in tmp);
1245             })()?l4.value: l3.value) !== l3.value ? ({car: (function(){
1246                 var tmp = v139;
1247                 return tmp === l3.value? l3.value: tmp.car;
1248             })(), cdr: l87.fvalue(pv, (function(){
1249                 var tmp = v139;
1250                 return tmp === l3.value? l3.value: tmp.cdr;
1251             })())}) : l3.value);
1252         })();
1253     }));
1254     return l87;
1255 })();
1256 var l88 = {name: "MEMBER"};
1257 (function(){
1258     (l88).fvalue = (function(v143){
1259         ((v143)["fname"] = "MEMBER");
1260         return v143;
1261     })((function (values,v141,v142){
1262         checkArgs(arguments, 3);
1263         return (function(){
1264             return (function(){
1265                 try {
1266                     return (function(){
1267                         while(v142 !== l3.value){
1268                             (l26.fvalue(pv, v141, (function(){
1269                                 var tmp = v142;
1270                                 return tmp === l3.value? l3.value: tmp.car;
1271                             })()) !== l3.value ? (function(){
1272                                 var values = mv;
1273                                 throw ({type: 'block', id: 65, values: v142, message: 'Return from unknown block NIL.'})
1274                             })() : l3.value);
1275                             (v142 = (function(){
1276                                 var tmp = v142;
1277                                 return tmp === l3.value? l3.value: tmp.cdr;
1278                             })());
1279                         }return l3.value;
1280                     })();
1281                 }
1282                 catch (cf){
1283                     if (cf.type == 'block' && cf.id == 65)
1284                         return values.apply(this, forcemv(cf.values));
1285                     else
1286                         throw cf;
1287                 }
1288             })();
1289         })();
1290     }));
1291     return l88;
1292 })();
1293 var l89 = {name: "REMOVE"};
1294 (function(){
1295     (l89).fvalue = (function(v146){
1296         ((v146)["fname"] = "REMOVE");
1297         return v146;
1298     })((function (values,v144,v145){
1299         checkArgs(arguments, 3);
1300         return (function(){
1301             return (l12.fvalue(pv, v145) !== l3.value ? l3.value : (l26.fvalue(pv, v144, (function(){
1302                 var tmp = v145;
1303                 return tmp === l3.value? l3.value: tmp.car;
1304             })()) !== l3.value ? l89.fvalue(values, v144, (function(){
1305                 var tmp = v145;
1306                 return tmp === l3.value? l3.value: tmp.cdr;
1307             })()) : ({car: (function(){
1308                 var tmp = v145;
1309                 return tmp === l3.value? l3.value: tmp.car;
1310             })(), cdr: l89.fvalue(pv, v144, (function(){
1311                 var tmp = v145;
1312                 return tmp === l3.value? l3.value: tmp.cdr;
1313             })())})));
1314         })();
1315     }));
1316     return l89;
1317 })();
1318 var l90 = {name: "REMOVE-IF"};
1319 (function(){
1320     (l90).fvalue = (function(v149){
1321         ((v149)["fname"] = "REMOVE-IF");
1322         return v149;
1323     })((function (values,v147,v148){
1324         checkArgs(arguments, 3);
1325         return (function(){
1326             return (l12.fvalue(pv, v148) !== l3.value ? l3.value : ((v147)(pv, (function(){
1327                 var tmp = v148;
1328                 return tmp === l3.value? l3.value: tmp.car;
1329             })()) !== l3.value ? l90.fvalue(values, v147, (function(){
1330                 var tmp = v148;
1331                 return tmp === l3.value? l3.value: tmp.cdr;
1332             })()) : ({car: (function(){
1333                 var tmp = v148;
1334                 return tmp === l3.value? l3.value: tmp.car;
1335             })(), cdr: l90.fvalue(pv, v147, (function(){
1336                 var tmp = v148;
1337                 return tmp === l3.value? l3.value: tmp.cdr;
1338             })())})));
1339         })();
1340     }));
1341     return l90;
1342 })();
1343 var l91 = {name: "REMOVE-IF-NOT"};
1344 (function(){
1345     (l91).fvalue = (function(v152){
1346         ((v152)["fname"] = "REMOVE-IF-NOT");
1347         return v152;
1348     })((function (values,v150,v151){
1349         checkArgs(arguments, 3);
1350         return (function(){
1351             return (l12.fvalue(pv, v151) !== l3.value ? l3.value : ((v150)(pv, (function(){
1352                 var tmp = v151;
1353                 return tmp === l3.value? l3.value: tmp.car;
1354             })()) !== l3.value ? ({car: (function(){
1355                 var tmp = v151;
1356                 return tmp === l3.value? l3.value: tmp.car;
1357             })(), cdr: l91.fvalue(pv, v150, (function(){
1358                 var tmp = v151;
1359                 return tmp === l3.value? l3.value: tmp.cdr;
1360             })())}) : l91.fvalue(values, v150, (function(){
1361                 var tmp = v151;
1362                 return tmp === l3.value? l3.value: tmp.cdr;
1363             })())));
1364         })();
1365     }));
1366     return l91;
1367 })();
1368 var l92 = {name: "DIGIT-CHAR-P"};
1369 (function(){
1370     (l92).fvalue = (function(v154){
1371         ((v154)["fname"] = "DIGIT-CHAR-P");
1372         return v154;
1373     })((function (values,v153){
1374         checkArgs(arguments, 2);
1375         return (function(){
1376             return (((function(){
1377                 var x1 = 48;
1378                 if (typeof x1 !== 'number') throw 'Not a number!';
1379                 var x2 = v153;
1380                 if (typeof x2 !== 'number') throw 'Not a number!';
1381                 return (x1<=x2?l4.value: l3.value);
1382             })() !== l3.value ? (function(){
1383                 var x1 = v153;
1384                 if (typeof x1 !== 'number') throw 'Not a number!';
1385                 var x2 = 57;
1386                 if (typeof x2 !== 'number') throw 'Not a number!';
1387                 return (x1<=x2?l4.value: l3.value);
1388             })() : l3.value) !== l3.value ? (function(){
1389                 var x1 = v153;
1390                 if (typeof x1 !== 'number') throw 'Not a number!';
1391                 var x2 = 48;
1392                 if (typeof x2 !== 'number') throw 'Not a number!';
1393                 return x1-x2;
1394             })() : l3.value);
1395         })();
1396     }));
1397     return l92;
1398 })();
1399 var l93 = {name: "DIGIT-CHAR"};
1400 (function(){
1401     (l93).fvalue = (function(v156){
1402         ((v156)["fname"] = "DIGIT-CHAR");
1403         return v156;
1404     })((function (values,v155){
1405         checkArgs(arguments, 2);
1406         return (function(){
1407             return ((function(){
1408                 var x1 = 0;
1409                 if (typeof x1 !== 'number') throw 'Not a number!';
1410                 var x2 = v155;
1411                 if (typeof x2 !== 'number') throw 'Not a number!';
1412                 var x3 = 9;
1413                 if (typeof x3 !== 'number') throw 'Not a number!';
1414                 return (x1<=x2 && x2<=x3?l4.value: l3.value);
1415             })() !== l3.value ? (function(){
1416                 var string = "0123456789";
1417                 var index = v155;
1418                 if (typeof string != 'string')
1419                     throw 'The value ' + string + ' is not a type string.';
1420                 if (typeof index != 'number')
1421                     throw 'The value ' + index + ' is not a type number.';
1422                 return string.charCodeAt(index);
1423             })() : l3.value);
1424         })();
1425     }));
1426     return l93;
1427 })();
1428 var l94 = {name: "SUBSEQ"};
1429 (function(){
1430     (l94).fvalue = (function(v160){
1431         ((v160)["fname"] = "SUBSEQ");
1432         return v160;
1433     })((function (values,v157,v158,v159){
1434         checkArgsAtLeast(arguments, 3);
1435         checkArgsAtMost(arguments, 4);
1436         switch(arguments.length-1){
1437         case 2:
1438         v159=l3.value;
1439         default: break;
1440         }
1441         return (function(){
1442             return (((typeof(v157) == "string")?l4.value: l3.value) !== l3.value ? (v159 !== l3.value ? (function(){
1443                 var str = v157;
1444                 var a = v158;
1445                 var b;
1446                 b = v159;
1447                 return str.slice(a,b);
1448             })() : (function(){
1449                 var str = v157;
1450                 var a = v158;
1451                 var b;
1452                 return str.slice(a,b);
1453             })()) : (function(){
1454                 throw "Unsupported argument.";
1455             })());
1456         })();
1457     }));
1458     return l94;
1459 })();
1460 var l95 = {name: "SOME"};
1461 (function(){
1462     (l95).fvalue = (function(v167){
1463         ((v167)["fname"] = "SOME");
1464         return v167;
1465     })((function (values,v161,v162){
1466         checkArgs(arguments, 3);
1467         return (function(){
1468             try {
1469                 return (((typeof(v162) == "string")?l4.value: l3.value) !== l3.value ? (function(v163,v164){
1470                     (function(){
1471                         return (function(){
1472                             while((function(){
1473                                 var x1 = v163;
1474                                 if (typeof x1 !== 'number') throw 'Not a number!';
1475                                 var x2 = v164;
1476                                 if (typeof x2 !== 'number') throw 'Not a number!';
1477                                 return (x1<x2?l4.value: l3.value);
1478                             })() !== l3.value){
1479                                 ((v161)(pv, (function(){
1480                                     var string = v162;
1481                                     var index = v163;
1482                                     if (typeof string != 'string')
1483                                         throw 'The value ' + string + ' is not a type string.';
1484                                     if (typeof index != 'number')
1485                                         throw 'The value ' + index + ' is not a type number.';
1486                                     return string.charCodeAt(index);
1487                                 })()) !== l3.value ? (function(){
1488                                     var values = mv;
1489                                     throw ({type: 'block', id: 72, values: l4.value, message: 'Return from unknown block SOME.'})
1490                                 })() : l3.value);
1491                                 (v163 = (function(){
1492                                     var x1 = v163;
1493                                     if (typeof x1 !== 'number') throw 'Not a number!';
1494                                     var x2 = 1;
1495                                     if (typeof x2 !== 'number') throw 'Not a number!';
1496                                     return x1+x2;
1497                                 })());
1498                             }return l3.value;
1499                         })();
1500                     })();
1501                     return l3.value;
1502                 })(0,l71.fvalue(pv, v162)) : (l59.fvalue(pv, v162) !== l3.value ? (function(){
1503                     try {
1504                         return (function(v165,v166){
1505                             (function(){
1506                                 while(v165 !== l3.value){
1507                                     (v166 = (function(){
1508                                         var tmp = v165;
1509                                         return tmp === l3.value? l3.value: tmp.car;
1510                                     })());
1511                                     (function(){
1512                                         ((v161)(pv, v166) !== l3.value ? (function(){
1513                                             var values = mv;
1514                                             throw ({type: 'block', id: 74, values: l4.value, message: 'Return from unknown block NIL.'})
1515                                         })() : l3.value);
1516                                         return l3.value;
1517                                     })();
1518                                     (v165 = (function(){
1519                                         var tmp = v165;
1520                                         return tmp === l3.value? l3.value: tmp.cdr;
1521                                     })());
1522                                 }return l3.value;
1523                             })();
1524                             return l3.value;
1525                         })(v162,l3.value);
1526                     }
1527                     catch (cf){
1528                         if (cf.type == 'block' && cf.id == 74)
1529                             return values.apply(this, forcemv(cf.values));
1530                         else
1531                             throw cf;
1532                     }
1533                 })() : (function(){
1534                     throw "Unknown sequence.";
1535                 })()));
1536             }
1537             catch (cf){
1538                 if (cf.type == 'block' && cf.id == 72)
1539                     return values.apply(this, forcemv(cf.values));
1540                 else
1541                     throw cf;
1542             }
1543         })();
1544     }));
1545     return l95;
1546 })();
1547 var l96 = {name: "EVERY"};
1548 (function(){
1549     (l96).fvalue = (function(v174){
1550         ((v174)["fname"] = "EVERY");
1551         return v174;
1552     })((function (values,v168,v169){
1553         checkArgs(arguments, 3);
1554         return (function(){
1555             try {
1556                 return (((typeof(v169) == "string")?l4.value: l3.value) !== l3.value ? (function(v170,v171){
1557                     (function(){
1558                         return (function(){
1559                             while((function(){
1560                                 var x1 = v170;
1561                                 if (typeof x1 !== 'number') throw 'Not a number!';
1562                                 var x2 = v171;
1563                                 if (typeof x2 !== 'number') throw 'Not a number!';
1564                                 return (x1<x2?l4.value: l3.value);
1565                             })() !== l3.value){
1566                                 ((v168)(pv, (function(){
1567                                     var string = v169;
1568                                     var index = v170;
1569                                     if (typeof string != 'string')
1570                                         throw 'The value ' + string + ' is not a type string.';
1571                                     if (typeof index != 'number')
1572                                         throw 'The value ' + index + ' is not a type number.';
1573                                     return string.charCodeAt(index);
1574                                 })()) !== l3.value ? l3.value : (function(){
1575                                     var values = mv;
1576                                     throw ({type: 'block', id: 75, values: l3.value, message: 'Return from unknown block EVERY.'})
1577                                 })());
1578                                 (v170 = (function(){
1579                                     var x1 = v170;
1580                                     if (typeof x1 !== 'number') throw 'Not a number!';
1581                                     var x2 = 1;
1582                                     if (typeof x2 !== 'number') throw 'Not a number!';
1583                                     return x1+x2;
1584                                 })());
1585                             }return l3.value;
1586                         })();
1587                     })();
1588                     return l4.value;
1589                 })(0,l71.fvalue(pv, v169)) : (l59.fvalue(pv, v169) !== l3.value ? (function(){
1590                     try {
1591                         return (function(v172,v173){
1592                             (function(){
1593                                 while(v172 !== l3.value){
1594                                     (v173 = (function(){
1595                                         var tmp = v172;
1596                                         return tmp === l3.value? l3.value: tmp.car;
1597                                     })());
1598                                     (function(){
1599                                         ((v168)(pv, v173) !== l3.value ? l3.value : (function(){
1600                                             var values = mv;
1601                                             throw ({type: 'block', id: 77, values: l3.value, message: 'Return from unknown block NIL.'})
1602                                         })());
1603                                         return l3.value;
1604                                     })();
1605                                     (v172 = (function(){
1606                                         var tmp = v172;
1607                                         return tmp === l3.value? l3.value: tmp.cdr;
1608                                     })());
1609                                 }return l3.value;
1610                             })();
1611                             return l4.value;
1612                         })(v169,l3.value);
1613                     }
1614                     catch (cf){
1615                         if (cf.type == 'block' && cf.id == 77)
1616                             return values.apply(this, forcemv(cf.values));
1617                         else
1618                             throw cf;
1619                     }
1620                 })() : (function(){
1621                     throw "Unknown sequence.";
1622                 })()));
1623             }
1624             catch (cf){
1625                 if (cf.type == 'block' && cf.id == 75)
1626                     return values.apply(this, forcemv(cf.values));
1627                 else
1628                     throw cf;
1629             }
1630         })();
1631     }));
1632     return l96;
1633 })();
1634 var l97 = {name: "ASSOC"};
1635 (function(){
1636     (l97).fvalue = (function(v177){
1637         ((v177)["fname"] = "ASSOC");
1638         return v177;
1639     })((function (values,v175,v176){
1640         checkArgs(arguments, 3);
1641         return (function(){
1642             (function(){
1643                 try {
1644                     return (function(){
1645                         while(v176 !== l3.value){
1646                             (l26.fvalue(pv, v175, l32.fvalue(pv, v176)) !== l3.value ? (function(){
1647                                 throw ({type: 'block', id: 79, values: l3.value, message: 'Return from unknown block NIL.'})
1648                             })() : (v176 = (function(){
1649                                 var tmp = v176;
1650                                 return tmp === l3.value? l3.value: tmp.cdr;
1651                             })()));
1652                         }return l3.value;
1653                     })();
1654                 }
1655                 catch (cf){
1656                     if (cf.type == 'block' && cf.id == 79)
1657                         return cf.values;
1658                     else
1659                         throw cf;
1660                 }
1661             })();
1662             return (function(){
1663                 var tmp = v176;
1664                 return tmp === l3.value? l3.value: tmp.car;
1665             })();
1666         })();
1667     }));
1668     return l97;
1669 })();
1670 var l98 = {name: "STRING"};
1671 (function(){
1672     (l98).fvalue = (function(v179){
1673         ((v179)["fname"] = "STRING");
1674         return v179;
1675     })((function (values,v178){
1676         checkArgs(arguments, 2);
1677         return (function(){
1678             return (((typeof(v178) == "string")?l4.value: l3.value) !== l3.value ? v178 : (((function(){
1679                 var tmp = v178;
1680                 return (typeof tmp == 'object' && 'name' in tmp);
1681             })()?l4.value: l3.value) !== l3.value ? (v178).name : (function(){
1682                 var x = v178;
1683                 if (typeof x != 'number')
1684                     throw 'The value ' + x + ' is not a type number.';
1685                 return String.fromCharCode(x);
1686             })()));
1687         })();
1688     }));
1689     return l98;
1690 })();
1691 var l99 = {name: "STRING="};
1692 (function(){
1693     (l99).fvalue = (function(v182){
1694         ((v182)["fname"] = "STRING=");
1695         return v182;
1696     })((function (values,v180,v181){
1697         checkArgs(arguments, 3);
1698         return (function(){
1699             return ((v180 == v181)?l4.value: l3.value);
1700         })();
1701     }));
1702     return l99;
1703 })();
1704 var l100 = {name: "FDEFINITION"};
1705 (function(){
1706     (l100).fvalue = (function(v184){
1707         ((v184)["fname"] = "FDEFINITION");
1708         return v184;
1709     })((function (values,v183){
1710         checkArgs(arguments, 2);
1711         return (function(){
1712             return (((typeof v183 == 'function')?l4.value: l3.value) !== l3.value ? v183 : (((function(){
1713                 var tmp = v183;
1714                 return (typeof tmp == 'object' && 'name' in tmp);
1715             })()?l4.value: l3.value) !== l3.value ? (function(){
1716                 var symbol = v183;
1717                 var func = symbol.fvalue;
1718                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1719                 return func;
1720             })() : (function(){
1721                 throw "Invalid function";
1722             })()));
1723         })();
1724     }));
1725     return l100;
1726 })();
1727 var l101 = {name: "DISASSEMBLE"};
1728 var l102 = {name: "WRITE-LINE"};
1729 (function(){
1730     (l101).fvalue = (function(v186){
1731         ((v186)["fname"] = "DISASSEMBLE");
1732         return v186;
1733     })((function (values,v185){
1734         checkArgs(arguments, 2);
1735         return (function(){
1736             l102.fvalue(pv, (l100.fvalue(pv, v185)).toString());
1737             return l3.value;
1738         })();
1739     }));
1740     return l101;
1741 })();
1742 var l103 = {name: "DOCUMENTATION"};
1743 var l104 = {name: "FUNCTION"};
1744 var l105 = {name: "VARIABLE"};
1745 (function(){
1746     (l103).fvalue = (function(v191){
1747         ((v191)["fname"] = "DOCUMENTATION");
1748         return v191;
1749     })((function(){
1750         var func = (function (values,v187,v188){
1751             checkArgs(arguments, 3);
1752             return (function(){
1753                 return (function(v189){
1754                     return (l26.fvalue(pv, v189, l104) !== l3.value ? (function(v190){
1755                         return (function(){
1756                             var tmp = (v190)["docstring"];
1757                             return tmp == undefined? l3.value: tmp ;
1758                         })();
1759                     })(l100.fvalue(pv, v187)) : (l26.fvalue(pv, v189, l105) !== l3.value ? (function(){
1760                         (((function(){
1761                             var tmp = v187;
1762                             return (typeof tmp == 'object' && 'name' in tmp);
1763                         })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
1764                             throw "Wrong argument type! it should be a symbol";
1765                         })());
1766                         return (function(){
1767                             var tmp = (v187)["vardoc"];
1768                             return tmp == undefined? l3.value: tmp ;
1769                         })();
1770                     })() : (function(){
1771                         throw "ECASE expression failed.";
1772                     })()));
1773                 })(v188);
1774             })();
1775         });
1776         func.docstring = 'Return the documentation of X. TYPE must be the symbol VARIABLE or FUNCTION.';
1777         return func;
1778     })());
1779     return l103;
1780 })();
1781 var l106 = {name: "MULTIPLE-VALUE-BIND"};
1782 l106;
1783 var l107 = {name: "MULTIPLE-VALUE-LIST"};
1784 l107;
1785 var l108 = {name: "*PACKAGE-LIST*"};
1786 (function(){
1787     (((l108.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l108).value = l3.value));
1788     return l108;
1789 })();
1790 var l109 = {name: "LIST-ALL-PACKAGES"};
1791 (function(){
1792     (l109).fvalue = (function(v192){
1793         ((v192)["fname"] = "LIST-ALL-PACKAGES");
1794         return v192;
1795     })((function (values){
1796         checkArgsAtMost(arguments, 1);
1797         return (function(){
1798             return (function(){
1799                 var symbol = l108;
1800                 var value = symbol.value;
1801                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1802                 return value;
1803             })();
1804         })();
1805     }));
1806     return l109;
1807 })();
1808 var l110 = {name: "MAKE-PACKAGE"};
1809 var l111 = {name: "FIND-PACKAGE-OR-FAIL"};
1810 (function(){
1811     (l110).fvalue = (function(v197){
1812         ((v197)["fname"] = "MAKE-PACKAGE");
1813         return v197;
1814     })((function (values,v193,v194){
1815         checkArgsAtLeast(arguments, 2);
1816         checkArgsAtMost(arguments, 3);
1817         switch(arguments.length-1){
1818         case 1:
1819         v194=l3.value;
1820         default: break;
1821         }
1822         return (function(){
1823             return (function(v195,v196){
1824                 ((v195)["packageName"] = v193);
1825                 ((v195)["symbols"] = {});
1826                 ((v195)["exports"] = {});
1827                 ((v195)["use"] = v196);
1828                 ((l108).value = ({car: v195, cdr: (function(){
1829                     var symbol = l108;
1830                     var value = symbol.value;
1831                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1832                     return value;
1833                 })()}));
1834                 return v195;
1835             })({},l73.fvalue(pv, (function(){
1836                 var symbol = l111;
1837                 var func = symbol.fvalue;
1838                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1839                 return func;
1840             })(), v194));
1841         })();
1842     }));
1843     return l110;
1844 })();
1845 var l112 = {name: "PACKAGEP"};
1846 (function(){
1847     (l112).fvalue = (function(v199){
1848         ((v199)["fname"] = "PACKAGEP");
1849         return v199;
1850     })((function (values,v198){
1851         checkArgs(arguments, 2);
1852         return (function(){
1853             return (((typeof (v198) === 'object')?l4.value: l3.value) !== l3.value ? ((("symbols") in (v198))?l4.value: l3.value) : l3.value);
1854         })();
1855     }));
1856     return l112;
1857 })();
1858 var l113 = {name: "FIND-PACKAGE"};
1859 var l114 = {name: "PACKAGE-NAME"};
1860 (function(){
1861     (l113).fvalue = (function(v204){
1862         ((v204)["fname"] = "FIND-PACKAGE");
1863         return v204;
1864     })((function (values,v200){
1865         checkArgs(arguments, 2);
1866         return (function(){
1867             try {
1868                 (l112.fvalue(pv, v200) !== l3.value ? (function(){
1869                     var values = mv;
1870                     throw ({type: 'block', id: 88, values: v200, message: 'Return from unknown block FIND-PACKAGE.'})
1871                 })() : l3.value);
1872                 return (function(v201){
1873                     return (function(){
1874                         try {
1875                             return (function(v202,v203){
1876                                 (function(){
1877                                     while(v202 !== l3.value){
1878                                         (v203 = (function(){
1879                                             var tmp = v202;
1880                                             return tmp === l3.value? l3.value: tmp.car;
1881                                         })());
1882                                         (function(){
1883                                             (l99.fvalue(pv, l114.fvalue(pv, v203), v201) !== l3.value ? (function(){
1884                                                 var values = mv;
1885                                                 throw ({type: 'block', id: 89, values: v203, message: 'Return from unknown block NIL.'})
1886                                             })() : l3.value);
1887                                             return l3.value;
1888                                         })();
1889                                         (v202 = (function(){
1890                                             var tmp = v202;
1891                                             return tmp === l3.value? l3.value: tmp.cdr;
1892                                         })());
1893                                     }return l3.value;
1894                                 })();
1895                                 return l3.value;
1896                             })((function(){
1897                                 var symbol = l108;
1898                                 var value = symbol.value;
1899                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1900                                 return value;
1901                             })(),l3.value);
1902                         }
1903                         catch (cf){
1904                             if (cf.type == 'block' && cf.id == 89)
1905                                 return values.apply(this, forcemv(cf.values));
1906                             else
1907                                 throw cf;
1908                         }
1909                     })();
1910                 })(l98.fvalue(pv, v200));
1911             }
1912             catch (cf){
1913                 if (cf.type == 'block' && cf.id == 88)
1914                     return values.apply(this, forcemv(cf.values));
1915                 else
1916                     throw cf;
1917             }
1918         })();
1919     }));
1920     return l113;
1921 })();
1922 (function(){
1923     (l111).fvalue = (function(v207){
1924         ((v207)["fname"] = "FIND-PACKAGE-OR-FAIL");
1925         return v207;
1926     })((function (values,v205){
1927         checkArgs(arguments, 2);
1928         return (function(){
1929             return (function(v206){
1930                 return (v206 !== l3.value ? v206 : (function(){
1931                     throw "Package unknown.";
1932                 })());
1933             })(l113.fvalue(pv, v205));
1934         })();
1935     }));
1936     return l111;
1937 })();
1938 (function(){
1939     (l114).fvalue = (function(v210){
1940         ((v210)["fname"] = "PACKAGE-NAME");
1941         return v210;
1942     })((function (values,v208){
1943         checkArgs(arguments, 2);
1944         return (function(){
1945             return (function(v209){
1946                 return (function(){
1947                     var tmp = (v209)["packageName"];
1948                     return tmp == undefined? l3.value: tmp ;
1949                 })();
1950             })(l111.fvalue(pv, v208));
1951         })();
1952     }));
1953     return l114;
1954 })();
1955 var l115 = {name: "%PACKAGE-SYMBOLS"};
1956 (function(){
1957     (l115).fvalue = (function(v213){
1958         ((v213)["fname"] = "%PACKAGE-SYMBOLS");
1959         return v213;
1960     })((function (values,v211){
1961         checkArgs(arguments, 2);
1962         return (function(){
1963             return (function(v212){
1964                 return (function(){
1965                     var tmp = (v212)["symbols"];
1966                     return tmp == undefined? l3.value: tmp ;
1967                 })();
1968             })(l111.fvalue(pv, v211));
1969         })();
1970     }));
1971     return l115;
1972 })();
1973 var l116 = {name: "PACKAGE-USE-LIST"};
1974 (function(){
1975     (l116).fvalue = (function(v216){
1976         ((v216)["fname"] = "PACKAGE-USE-LIST");
1977         return v216;
1978     })((function (values,v214){
1979         checkArgs(arguments, 2);
1980         return (function(){
1981             return (function(v215){
1982                 return (function(){
1983                     var tmp = (v215)["use"];
1984                     return tmp == undefined? l3.value: tmp ;
1985                 })();
1986             })(l111.fvalue(pv, v214));
1987         })();
1988     }));
1989     return l116;
1990 })();
1991 var l117 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
1992 (function(){
1993     (l117).fvalue = (function(v219){
1994         ((v219)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
1995         return v219;
1996     })((function (values,v217){
1997         checkArgs(arguments, 2);
1998         return (function(){
1999             return (function(v218){
2000                 return (function(){
2001                     var tmp = (v218)["exports"];
2002                     return tmp == undefined? l3.value: tmp ;
2003                 })();
2004             })(l111.fvalue(pv, v217));
2005         })();
2006     }));
2007     return l117;
2008 })();
2009 var l118 = {name: "*COMMON-LISP-PACKAGE*"};
2010 (function(){
2011     (((l118.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l118).value = l110.fvalue(pv, "CL")));
2012     return l118;
2013 })();
2014 var l119 = {name: "*USER-PACKAGE*"};
2015 (function(){
2016     (((l119.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l119).value = l110.fvalue(pv, "CL-USER", l44.fvalue(pv, (function(){
2017         var symbol = l118;
2018         var value = symbol.value;
2019         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2020         return value;
2021     })()))));
2022     return l119;
2023 })();
2024 var l120 = {name: "*KEYWORD-PACKAGE*"};
2025 (function(){
2026     (((l120.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l120).value = l110.fvalue(pv, "KEYWORD")));
2027     return l120;
2028 })();
2029 var l121 = {name: "KEYWORDP"};
2030 var l122 = {name: "SYMBOL-PACKAGE"};
2031 (function(){
2032     (l121).fvalue = (function(v221){
2033         ((v221)["fname"] = "KEYWORDP");
2034         return v221;
2035     })((function (values,v220){
2036         checkArgs(arguments, 2);
2037         return (function(){
2038             return (((function(){
2039                 var tmp = v220;
2040                 return (typeof tmp == 'object' && 'name' in tmp);
2041             })()?l4.value: l3.value) !== l3.value ? ((l122.fvalue(pv, v220) === (function(){
2042                 var symbol = l120;
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);
2047         })();
2048     }));
2049     return l121;
2050 })();
2051 var l123 = {name: "*PACKAGE*"};
2052 (function(){
2053     (((l123.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l123).value = (function(){
2054         var symbol = l118;
2055         var value = symbol.value;
2056         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2057         return value;
2058     })()));
2059     return l123;
2060 })();
2061 var l124 = {name: "IN-PACKAGE"};
2062 l124;
2063 var l125 = {name: "%INTERN-SYMBOL"};
2064 (function(){
2065     (l125).fvalue = (function(v225){
2066         ((v225)["fname"] = "%INTERN-SYMBOL");
2067         return v225;
2068     })((function (values,v222){
2069         checkArgs(arguments, 2);
2070         return (function(){
2071             return (function(){
2072                 var v223 = (((("package") in (v222))?l4.value: l3.value) !== l3.value ? l111.fvalue(pv, (function(){
2073                     var tmp = (v222)["package"];
2074                     return tmp == undefined? l3.value: tmp ;
2075                 })()) : (function(){
2076                     var symbol = l118;
2077                     var value = symbol.value;
2078                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2079                     return value;
2080                 })());
2081                 var v224 = l115.fvalue(pv, v223);
2082                 ((v222)["package"] = v223);
2083                 (((v223 === (function(){
2084                     var symbol = l120;
2085                     var value = symbol.value;
2086                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2087                     return value;
2088                 })())?l4.value: l3.value) !== l3.value ? ((v222)["value"] = v222) : l3.value);
2089                 return ((v224)[(v222).name] = v222);
2090             })();
2091         })();
2092     }));
2093     return l125;
2094 })();
2095 var l126 = {name: "FIND-SYMBOL"};
2096 var l127 = {name: "EXTERNAL", 'package': 'KEYWORD'};
2097 var l128 = {name: "INTERNAL", 'package': 'KEYWORD'};
2098 var l129 = {name: "INHERIT", 'package': 'KEYWORD'};
2099 (function(){
2100     (l126).fvalue = (function(v234){
2101         ((v234)["fname"] = "FIND-SYMBOL");
2102         return v234;
2103     })((function (values,v226,v227){
2104         checkArgsAtLeast(arguments, 2);
2105         checkArgsAtMost(arguments, 3);
2106         switch(arguments.length-1){
2107         case 1:
2108         v227=(function(){
2109             var symbol = l123;
2110             var value = symbol.value;
2111             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2112             return value;
2113         })();
2114         default: break;
2115         }
2116         return (function(){
2117             return (function(){
2118                 var v228 = l111.fvalue(pv, v227);
2119                 var v229 = l117.fvalue(pv, v228);
2120                 var v230 = l115.fvalue(pv, v228);
2121                 return ((((v226) in (v229))?l4.value: l3.value) !== l3.value ? values((function(){
2122                     var tmp = (v229)[v226];
2123                     return tmp == undefined? l3.value: tmp ;
2124                 })(), l127.value) : ((((v226) in (v230))?l4.value: l3.value) !== l3.value ? values((function(){
2125                     var tmp = (v230)[v226];
2126                     return tmp == undefined? l3.value: tmp ;
2127                 })(), l128.value) : (function(){
2128                     try {
2129                         return (function(v231,v232){
2130                             (function(){
2131                                 while(v231 !== l3.value){
2132                                     (v232 = (function(){
2133                                         var tmp = v231;
2134                                         return tmp === l3.value? l3.value: tmp.car;
2135                                     })());
2136                                     (function(){
2137                                         (function(v233){
2138                                             return ((((v226) in (v233))?l4.value: l3.value) !== l3.value ? (function(){
2139                                                 var values = mv;
2140                                                 throw ({type: 'block', id: 98, values: values((function(){
2141                                                     var tmp = (v233)[v226];
2142                                                     return tmp == undefined? l3.value: tmp ;
2143                                                 })(), l129.value), message: 'Return from unknown block NIL.'})
2144                                             })() : l3.value);
2145                                         })(l117.fvalue(pv, v232));
2146                                         return l3.value;
2147                                     })();
2148                                     (v231 = (function(){
2149                                         var tmp = v231;
2150                                         return tmp === l3.value? l3.value: tmp.cdr;
2151                                     })());
2152                                 }return l3.value;
2153                             })();
2154                             return values(l3.value, l3.value);
2155                         })(l116.fvalue(pv, v228),l3.value);
2156                     }
2157                     catch (cf){
2158                         if (cf.type == 'block' && cf.id == 98)
2159                             return values.apply(this, forcemv(cf.values));
2160                         else
2161                             throw cf;
2162                     }
2163                 })()));
2164             })();
2165         })();
2166     }));
2167     return l126;
2168 })();
2169 var l130 = {name: "INTERN"};
2170 var l131 = {name: "EXPORT"};
2171 (function(){
2172     (l130).fvalue = (function(v243){
2173         ((v243)["fname"] = "INTERN");
2174         return v243;
2175     })((function (values,v235,v236){
2176         checkArgsAtLeast(arguments, 2);
2177         checkArgsAtMost(arguments, 3);
2178         switch(arguments.length-1){
2179         case 1:
2180         v236=(function(){
2181             var symbol = l123;
2182             var value = symbol.value;
2183             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2184             return value;
2185         })();
2186         default: break;
2187         }
2188         return (function(){
2189             return (function(v237){
2190                 return (function(){
2191                     var func = (function (values,v239,v240){
2192                         switch(arguments.length-1){
2193                         case 0:
2194                         v239=l3.value;
2195                         case 1:
2196                         v240=l3.value;
2197                         default: break;
2198                         }
2199                         var v238= l3.value;
2200                         for (var i = arguments.length-1; i>=3; i--)
2201                             v238 = {car: arguments[i], cdr:
2202                         v238};
2203                         return (v240 !== l3.value ? values(v239, v240) : (function(v241){
2204                             (function(){
2205                                 var tmp = (v241)[v235];
2206                                 return tmp == undefined? l3.value: tmp ;
2207                             })();
2208                             return (function(v242){
2209                                 ((v242)["package"] = v237);
2210                                 (((v237 === (function(){
2211                                     var symbol = l120;
2212                                     var value = symbol.value;
2213                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2214                                     return value;
2215                                 })())?l4.value: l3.value) !== l3.value ? (function(){
2216                                     ((v242)["value"] = v242);
2217                                     return l131.fvalue(pv, l44.fvalue(pv, v242), v237);
2218                                 })() : l3.value);
2219                                 ((v241)[v235] = v242);
2220                                 return values(v242, l3.value);
2221                             })((function(){
2222                                 var name = v235;
2223                                 if (typeof name != 'string')
2224                                     throw 'The value ' + name + ' is not a type string.';
2225                                 return ({name: name});
2226                             })());
2227                         })(l115.fvalue(pv, v237)));
2228                     });
2229                     var args = [values];
2230                     return (function(){
2231                         var values = mv;
2232                         var vs;
2233                         vs = l126.fvalue(values, v235, v237);
2234                         if (typeof vs === 'object' && 'multiple-value' in vs)
2235                             args = args.concat(vs);
2236                         else
2237                             args.push(vs);
2238                         return func.apply(window, args);
2239                     })();
2240                 })();
2241             })(l111.fvalue(pv, v236));
2242         })();
2243     }));
2244     return l130;
2245 })();
2246 (function(){
2247     (l122).fvalue = (function(v245){
2248         ((v245)["fname"] = "SYMBOL-PACKAGE");
2249         return v245;
2250     })((function (values,v244){
2251         checkArgs(arguments, 2);
2252         return (function(){
2253             (((function(){
2254                 var tmp = v244;
2255                 return (typeof tmp == 'object' && 'name' in tmp);
2256             })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
2257                 throw "it is not a symbol";
2258             })());
2259             return (function(){
2260                 var tmp = (v244)["package"];
2261                 return tmp == undefined? l3.value: tmp ;
2262             })();
2263         })();
2264     }));
2265     return l122;
2266 })();
2267 (function(){
2268     (l131).fvalue = (function(v251){
2269         ((v251)["fname"] = "EXPORT");
2270         return v251;
2271     })((function (values,v246,v247){
2272         checkArgsAtLeast(arguments, 2);
2273         checkArgsAtMost(arguments, 3);
2274         switch(arguments.length-1){
2275         case 1:
2276         v247=(function(){
2277             var symbol = l123;
2278             var value = symbol.value;
2279             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2280             return value;
2281         })();
2282         default: break;
2283         }
2284         return (function(){
2285             return (function(v248){
2286                 return (function(){
2287                     return (function(v249,v250){
2288                         (function(){
2289                             while(v249 !== l3.value){
2290                                 (v250 = (function(){
2291                                     var tmp = v249;
2292                                     return tmp === l3.value? l3.value: tmp.car;
2293                                 })());
2294                                 (function(){
2295                                     ((v248)[(v250).name] = v250);
2296                                     return l3.value;
2297                                 })();
2298                                 (v249 = (function(){
2299                                     var tmp = v249;
2300                                     return tmp === l3.value? l3.value: tmp.cdr;
2301                                 })());
2302                             }return l3.value;
2303                         })();
2304                         return l4.value;
2305                     })(v246,l3.value);
2306                 })();
2307             })(l117.fvalue(pv, v247));
2308         })();
2309     }));
2310     return l131;
2311 })();
2312 var l132 = {name: "GET-UNIVERSAL-TIME"};
2313 (function(){
2314     (l132).fvalue = (function(v252){
2315         ((v252)["fname"] = "GET-UNIVERSAL-TIME");
2316         return v252;
2317     })((function (values){
2318         checkArgsAtMost(arguments, 1);
2319         return (function(){
2320             return (function(){
2321                 var x1 = (Math.round(new Date() / 1000));
2322                 if (typeof x1 !== 'number') throw 'Not a number!';
2323                 var x2 = 2208988800;
2324                 if (typeof x2 !== 'number') throw 'Not a number!';
2325                 return x1+x2;
2326             })();
2327         })();
2328     }));
2329     return l132;
2330 })();
2331 var l133 = {name: "*NEWLINE*"};
2332 (function(){
2333     (((l133.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l133).value = l98.fvalue(pv, l78.fvalue(pv, 10))));
2334     return l133;
2335 })();
2336 var l134 = {name: "CONCAT"};
2337 (function(){
2338     (l134).fvalue = (function(v254){
2339         ((v254)["fname"] = "CONCAT");
2340         return v254;
2341     })((function (values){
2342         var v253= l3.value;
2343         for (var i = arguments.length-1; i>=1; i--)
2344             v253 = {car: arguments[i], cdr:
2345         v253};
2346         return (function(){
2347             return l60.fvalue(values, (function(){
2348                 var symbol = l72;
2349                 var func = symbol.fvalue;
2350                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2351                 return func;
2352             })(), v253, "");
2353         })();
2354     }));
2355     return l134;
2356 })();
2357 var l135 = {name: "CONCATF"};
2358 l135;
2359 var l136 = {name: "JOIN"};
2360 (function(){
2361     (l136).fvalue = (function(v257){
2362         ((v257)["fname"] = "JOIN");
2363         return v257;
2364     })((function (values,v255,v256){
2365         checkArgsAtLeast(arguments, 2);
2366         checkArgsAtMost(arguments, 3);
2367         switch(arguments.length-1){
2368         case 1:
2369         v256="";
2370         default: break;
2371         }
2372         return (function(){
2373             return (l12.fvalue(pv, v255) !== l3.value ? "" : (l12.fvalue(pv, (function(){
2374                 var tmp = v255;
2375                 return tmp === l3.value? l3.value: tmp.cdr;
2376             })()) !== l3.value ? (function(){
2377                 var tmp = v255;
2378                 return tmp === l3.value? l3.value: tmp.car;
2379             })() : l134.fvalue(values, (function(){
2380                 var tmp = v255;
2381                 return tmp === l3.value? l3.value: tmp.car;
2382             })(), v256, l136.fvalue(pv, (function(){
2383                 var tmp = v255;
2384                 return tmp === l3.value? l3.value: tmp.cdr;
2385             })(), v256))));
2386         })();
2387     }));
2388     return l136;
2389 })();
2390 var l137 = {name: "JOIN-TRAILING"};
2391 (function(){
2392     (l137).fvalue = (function(v260){
2393         ((v260)["fname"] = "JOIN-TRAILING");
2394         return v260;
2395     })((function (values,v258,v259){
2396         checkArgsAtLeast(arguments, 2);
2397         checkArgsAtMost(arguments, 3);
2398         switch(arguments.length-1){
2399         case 1:
2400         v259="";
2401         default: break;
2402         }
2403         return (function(){
2404             return (l12.fvalue(pv, v258) !== l3.value ? "" : l134.fvalue(values, (function(){
2405                 var tmp = v258;
2406                 return tmp === l3.value? l3.value: tmp.car;
2407             })(), v259, l137.fvalue(pv, (function(){
2408                 var tmp = v258;
2409                 return tmp === l3.value? l3.value: tmp.cdr;
2410             })(), v259)));
2411         })();
2412     }));
2413     return l137;
2414 })();
2415 var l138 = {name: "MAPCONCAT"};
2416 (function(){
2417     (l138).fvalue = (function(v263){
2418         ((v263)["fname"] = "MAPCONCAT");
2419         return v263;
2420     })((function (values,v261,v262){
2421         checkArgs(arguments, 3);
2422         return (function(){
2423             return l136.fvalue(values, l73.fvalue(pv, v261, v262));
2424         })();
2425     }));
2426     return l138;
2427 })();
2428 var l139 = {name: "VECTOR-TO-LIST"};
2429 (function(){
2430     (l139).fvalue = (function(v269){
2431         ((v269)["fname"] = "VECTOR-TO-LIST");
2432         return v269;
2433     })((function (values,v264){
2434         checkArgs(arguments, 2);
2435         return (function(){
2436             return (function(v265,v266){
2437                 return (function(){
2438                     return (function(v267,v268){
2439                         (function(){
2440                             while((function(){
2441                                 var x1 = v267;
2442                                 if (typeof x1 !== 'number') throw 'Not a number!';
2443                                 var x2 = v268;
2444                                 if (typeof x2 !== 'number') throw 'Not a number!';
2445                                 return (x1<x2?l4.value: l3.value);
2446                             })() !== l3.value){
2447                                 (function(){
2448                                     (v265 = ({car: (function(){
2449                                         var x = (v264)[v267];
2450                                         if (x === undefined) throw 'Out of range';
2451                                         return x;
2452                                     })(), cdr: v265}));
2453                                     return l3.value;
2454                                 })();
2455                                 (v267 = (function(){
2456                                     var x1 = v267;
2457                                     if (typeof x1 !== 'number') throw 'Not a number!';
2458                                     var x2 = 1;
2459                                     if (typeof x2 !== 'number') throw 'Not a number!';
2460                                     return x1+x2;
2461                                 })());
2462                             }return l3.value;
2463                         })();
2464                         return l66.fvalue(values, v265);
2465                     })(0,v266);
2466                 })();
2467             })(l3.value,l71.fvalue(pv, v264));
2468         })();
2469     }));
2470     return l139;
2471 })();
2472 var l140 = {name: "LIST-TO-VECTOR"};
2473 (function(){
2474     (l140).fvalue = (function(v275){
2475         ((v275)["fname"] = "LIST-TO-VECTOR");
2476         return v275;
2477     })((function (values,v270){
2478         checkArgs(arguments, 2);
2479         return (function(){
2480             return (function(v271,v272){
2481                 return (function(){
2482                     return (function(v273,v274){
2483                         (function(){
2484                             while(v273 !== l3.value){
2485                                 (v274 = (function(){
2486                                     var tmp = v273;
2487                                     return tmp === l3.value? l3.value: tmp.car;
2488                                 })());
2489                                 (function(){
2490                                     (function(){
2491                                         var x = v271;
2492                                         var i = v272;
2493                                         if (i < 0 || i >= x.length) throw 'Out of range';
2494                                         return x[i] = v274;
2495                                     })();
2496                                     (v272 = (function(){
2497                                         var x1 = v272;
2498                                         if (typeof x1 !== 'number') throw 'Not a number!';
2499                                         var x2 = 1;
2500                                         if (typeof x2 !== 'number') throw 'Not a number!';
2501                                         return x1+x2;
2502                                     })());
2503                                     return l3.value;
2504                                 })();
2505                                 (v273 = (function(){
2506                                     var tmp = v273;
2507                                     return tmp === l3.value? l3.value: tmp.cdr;
2508                                 })());
2509                             }return l3.value;
2510                         })();
2511                         return v271;
2512                     })(v270,l3.value);
2513                 })();
2514             })((function(){
2515                 var r = [];
2516                 for (var i = 0; i < l71.fvalue(pv, v270); i++)
2517                     r.push(l3.value);
2518                 return r;
2519             })(),0);
2520         })();
2521     }));
2522     return l140;
2523 })();
2524 var l141 = {name: "VALUES-LIST"};
2525 (function(){
2526     (l141).fvalue = (function(v277){
2527         ((v277)["fname"] = "VALUES-LIST");
2528         return v277;
2529     })((function (values,v276){
2530         checkArgs(arguments, 2);
2531         return (function(){
2532             return values.apply(this, l140.fvalue(pv, v276));
2533         })();
2534     }));
2535     return l141;
2536 })();
2537 var l142 = {name: "VALUES"};
2538 (function(){
2539     (l142).fvalue = (function(v279){
2540         ((v279)["fname"] = "VALUES");
2541         return v279;
2542     })((function (values){
2543         var v278= l3.value;
2544         for (var i = arguments.length-1; i>=1; i--)
2545             v278 = {car: arguments[i], cdr:
2546         v278};
2547         return (function(){
2548             return l141.fvalue(values, v278);
2549         })();
2550     }));
2551     return l142;
2552 })();
2553 var l143 = {name: "INDENT"};
2554 (function(){
2555     (l143).fvalue = (function(v286){
2556         ((v286)["fname"] = "INDENT");
2557         return v286;
2558     })((function (values){
2559         var v280= l3.value;
2560         for (var i = arguments.length-1; i>=1; i--)
2561             v280 = {car: arguments[i], cdr:
2562         v280};
2563         return (function(){
2564             return (function(v281){
2565                 return (function(v282,v283,v284){
2566                     (l82.fvalue(pv, l71.fvalue(pv, v281)) !== l3.value ? (v282 = l134.fvalue(pv, v282, "    ")) : l3.value);
2567                     (function(){
2568                         return (function(){
2569                             while((function(){
2570                                 var x1 = v283;
2571                                 if (typeof x1 !== 'number') throw 'Not a number!';
2572                                 var x2 = v284;
2573                                 if (typeof x2 !== 'number') throw 'Not a number!';
2574                                 return (x1<x2?l4.value: l3.value);
2575                             })() !== l3.value){
2576                                 (function(v285){
2577                                     return (v282 = l134.fvalue(pv, v282, v285));
2578                                 })(((l80.fvalue(pv, (function(){
2579                                     var string = v281;
2580                                     var index = v283;
2581                                     if (typeof string != 'string')
2582                                         throw 'The value ' + string + ' is not a type string.';
2583                                     if (typeof index != 'number')
2584                                         throw 'The value ' + index + ' is not a type number.';
2585                                     return string.charCodeAt(index);
2586                                 })(), 10) !== l3.value ? ((function(){
2587                                     var x1 = v283;
2588                                     if (typeof x1 !== 'number') throw 'Not a number!';
2589                                     var x2 = l23.fvalue(pv, v284);
2590                                     if (typeof x2 !== 'number') throw 'Not a number!';
2591                                     return (x1<x2?l4.value: l3.value);
2592                                 })() !== l3.value ? l27.fvalue(pv, l80.fvalue(pv, (function(){
2593                                     var string = v281;
2594                                     var index = l22.fvalue(pv, v283);
2595                                     if (typeof string != 'string')
2596                                         throw 'The value ' + string + ' is not a type string.';
2597                                     if (typeof index != 'number')
2598                                         throw 'The value ' + index + ' is not a type number.';
2599                                     return string.charCodeAt(index);
2600                                 })(), 10)) : l3.value) : l3.value) !== l3.value ? l134.fvalue(pv, l98.fvalue(pv, 10), "    ") : l98.fvalue(pv, (function(){
2601                                     var string = v281;
2602                                     var index = v283;
2603                                     if (typeof string != 'string')
2604                                         throw 'The value ' + string + ' is not a type string.';
2605                                     if (typeof index != 'number')
2606                                         throw 'The value ' + index + ' is not a type number.';
2607                                     return string.charCodeAt(index);
2608                                 })())));
2609                                 (v283 = (function(){
2610                                     var x1 = v283;
2611                                     if (typeof x1 !== 'number') throw 'Not a number!';
2612                                     var x2 = 1;
2613                                     if (typeof x2 !== 'number') throw 'Not a number!';
2614                                     return x1+x2;
2615                                 })());
2616                             }return l3.value;
2617                         })();
2618                     })();
2619                     return v282;
2620                 })("",0,l71.fvalue(pv, v281));
2621             })(l136.fvalue(pv, v280));
2622         })();
2623     }));
2624     return l143;
2625 })();
2626 (function(){
2627     (l17).fvalue = (function(v290){
2628         ((v290)["fname"] = "INTEGER-TO-STRING");
2629         return v290;
2630     })((function (values,v287){
2631         checkArgs(arguments, 2);
2632         return (function(){
2633             return (l24.fvalue(pv, v287) !== l3.value ? "0" : (l83.fvalue(pv, v287) !== l3.value ? l134.fvalue(values, "-", l17.fvalue(pv, (function(){
2634                 var x1 = 0;
2635                 if (typeof x1 !== 'number') throw 'Not a number!';
2636                 var x2 = v287;
2637                 if (typeof x2 !== 'number') throw 'Not a number!';
2638                 return x1-x2;
2639             })())) : (function(v288){
2640                 (function(){
2641                     return (function(){
2642                         while(l27.fvalue(pv, l24.fvalue(pv, v287)) !== l3.value){
2643                             (v288 = ({car: (function(){
2644                                 var x = v287;
2645                                 var y = 10;
2646                                 if (typeof x != 'number')
2647                                     throw 'The value ' + x + ' is not a type number.';
2648                                 if (typeof y != 'number')
2649                                     throw 'The value ' + y + ' is not a type number.';
2650                                 return x%y;
2651                             })(), cdr: v288}));
2652                             (v287 = l25.fvalue(pv, v287, 10));
2653                         }return l3.value;
2654                     })();
2655                 })();
2656                 return l138.fvalue(values, (function (values,v289){
2657                     checkArgs(arguments, 2);
2658                     return l98.fvalue(values, l93.fvalue(pv, v289));
2659                 }), v288);
2660             })(l3.value)));
2661         })();
2662     }));
2663     return l17;
2664 })();
2665 var l144 = {name: "JS!BOOL"};
2666 var l145 = {name: "LS-COMPILE"};
2667 (function(){
2668     (l144).fvalue = (function(v292){
2669         ((v292)["fname"] = "JS!BOOL");
2670         return v292;
2671     })((function (values,v291){
2672         checkArgs(arguments, 2);
2673         return (function(){
2674             return l134.fvalue(values, "(", v291, "?", l145.fvalue(pv, l4.value), ": ", l145.fvalue(pv, l3.value), ")");
2675         })();
2676     }));
2677     return l144;
2678 })();
2679 var l146 = {name: "JS!SELFCALL"};
2680 l146;
2681 var l147 = {name: "PRIN1-TO-STRING"};
2682 var l148 = {name: "ESCAPE-STRING"};
2683 (function(){
2684     (l147).fvalue = (function(v301){
2685         ((v301)["fname"] = "PRIN1-TO-STRING");
2686         return v301;
2687     })((function (values,v293){
2688         checkArgs(arguments, 2);
2689         return (function(){
2690             return (((function(){
2691                 var tmp = v293;
2692                 return (typeof tmp == 'object' && 'name' in tmp);
2693             })()?l4.value: l3.value) !== l3.value ? (function(){
2694                 var func = (function (values,v295,v296){
2695                     switch(arguments.length-1){
2696                     case 0:
2697                     v295=l3.value;
2698                     case 1:
2699                     v296=l3.value;
2700                     default: break;
2701                     }
2702                     var v294= l3.value;
2703                     for (var i = arguments.length-1; i>=3; i--)
2704                         v294 = {car: arguments[i], cdr:
2705                     v294};
2706                     return ((v296 !== l3.value ? ((v295 === v293)?l4.value: l3.value) : l3.value) !== l3.value ? (v293).name : (function(v297,v298){
2707                         return l134.fvalue(values, (l12.fvalue(pv, v297) !== l3.value ? "#" : (((v297 === l113.fvalue(pv, "KEYWORD"))?l4.value: l3.value) !== l3.value ? "" : l114.fvalue(pv, v297))), ":", v298);
2708                     })(l122.fvalue(pv, v293),(v293).name));
2709                 });
2710                 var args = [values];
2711                 return (function(){
2712                     var values = mv;
2713                     var vs;
2714                     vs = l126.fvalue(values, (v293).name, (function(){
2715                         var symbol = l123;
2716                         var value = symbol.value;
2717                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2718                         return value;
2719                     })());
2720                     if (typeof vs === 'object' && 'multiple-value' in vs)
2721                         args = args.concat(vs);
2722                     else
2723                         args.push(vs);
2724                     return func.apply(window, args);
2725                 })();
2726             })() : (l81.fvalue(pv, v293) !== l3.value ? l17.fvalue(values, v293) : (((typeof(v293) == "string")?l4.value: l3.value) !== l3.value ? l134.fvalue(values, "\"", l148.fvalue(pv, v293), "\"") : (((typeof v293 == 'function')?l4.value: l3.value) !== l3.value ? (function(v299){
2727                 return (v299 !== l3.value ? l134.fvalue(values, "#<FUNCTION ", v299, ">") : l134.fvalue(values, "#<FUNCTION>"));
2728             })((function(){
2729                 var tmp = (v293)["fname"];
2730                 return tmp == undefined? l3.value: tmp ;
2731             })()) : (l59.fvalue(pv, v293) !== l3.value ? l134.fvalue(values, "(", l137.fvalue(pv, l73.fvalue(pv, (function(){
2732                 var symbol = l147;
2733                 var func = symbol.fvalue;
2734                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2735                 return func;
2736             })(), l87.fvalue(pv, v293)), " "), (function(v300){
2737                 return (l12.fvalue(pv, (function(){
2738                     var tmp = v300;
2739                     return tmp === l3.value? l3.value: tmp.cdr;
2740                 })()) !== l3.value ? l147.fvalue(pv, (function(){
2741                     var tmp = v300;
2742                     return tmp === l3.value? l3.value: tmp.car;
2743                 })()) : l134.fvalue(pv, l147.fvalue(pv, (function(){
2744                     var tmp = v300;
2745                     return tmp === l3.value? l3.value: tmp.car;
2746                 })()), " . ", l147.fvalue(pv, (function(){
2747                     var tmp = v300;
2748                     return tmp === l3.value? l3.value: tmp.cdr;
2749                 })())));
2750             })(l86.fvalue(pv, v293)), ")") : (((function(){
2751                 var x = v293;
2752                 return typeof x === 'object' && 'length' in x;
2753             })()?l4.value: l3.value) !== l3.value ? l134.fvalue(values, "#", l147.fvalue(pv, l139.fvalue(pv, v293))) : (l112.fvalue(pv, v293) !== l3.value ? l134.fvalue(values, "#<PACKAGE ", l114.fvalue(pv, v293), ">") : l3.value)))))));
2754         })();
2755     }));
2756     return l147;
2757 })();
2758 (function(){
2759     (l102).fvalue = (function(v303){
2760         ((v303)["fname"] = "WRITE-LINE");
2761         return v303;
2762     })((function (values,v302){
2763         checkArgs(arguments, 2);
2764         return (function(){
2765             (function(){
2766                 var x = v302;
2767                 if (typeof x != 'string')
2768                     throw 'The value ' + x + ' is not a type string.';
2769                 return lisp.write(x);
2770             })();
2771             (function(){
2772                 var x = (function(){
2773                     var symbol = l133;
2774                     var value = symbol.value;
2775                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2776                     return value;
2777                 })();
2778                 if (typeof x != 'string')
2779                     throw 'The value ' + x + ' is not a type string.';
2780                 return lisp.write(x);
2781             })();
2782             return v302;
2783         })();
2784     }));
2785     return l102;
2786 })();
2787 var l149 = {name: "WARN"};
2788 (function(){
2789     (l149).fvalue = (function(v305){
2790         ((v305)["fname"] = "WARN");
2791         return v305;
2792     })((function (values,v304){
2793         checkArgs(arguments, 2);
2794         return (function(){
2795             (function(){
2796                 var x = "WARNING: ";
2797                 if (typeof x != 'string')
2798                     throw 'The value ' + x + ' is not a type string.';
2799                 return lisp.write(x);
2800             })();
2801             return l102.fvalue(values, v304);
2802         })();
2803     }));
2804     return l149;
2805 })();
2806 var l150 = {name: "PRINT"};
2807 (function(){
2808     (l150).fvalue = (function(v307){
2809         ((v307)["fname"] = "PRINT");
2810         return v307;
2811     })((function (values,v306){
2812         checkArgs(arguments, 2);
2813         return (function(){
2814             l102.fvalue(pv, l147.fvalue(pv, v306));
2815             return v306;
2816         })();
2817     }));
2818     return l150;
2819 })();
2820 var l151 = {name: "MAKE-STRING-STREAM"};
2821 (function(){
2822     (l151).fvalue = (function(v309){
2823         ((v309)["fname"] = "MAKE-STRING-STREAM");
2824         return v309;
2825     })((function (values,v308){
2826         checkArgs(arguments, 2);
2827         return (function(){
2828             return ({car: v308, cdr: 0});
2829         })();
2830     }));
2831     return l151;
2832 })();
2833 var l152 = {name: "%PEEK-CHAR"};
2834 (function(){
2835     (l152).fvalue = (function(v311){
2836         ((v311)["fname"] = "%PEEK-CHAR");
2837         return v311;
2838     })((function (values,v310){
2839         checkArgs(arguments, 2);
2840         return (function(){
2841             return ((function(){
2842                 var x1 = (function(){
2843                     var tmp = v310;
2844                     return tmp === l3.value? l3.value: tmp.cdr;
2845                 })();
2846                 if (typeof x1 !== 'number') throw 'Not a number!';
2847                 var x2 = l71.fvalue(pv, (function(){
2848                     var tmp = v310;
2849                     return tmp === l3.value? l3.value: tmp.car;
2850                 })());
2851                 if (typeof x2 !== 'number') throw 'Not a number!';
2852                 return (x1<x2?l4.value: l3.value);
2853             })() !== l3.value ? (function(){
2854                 var string = (function(){
2855                     var tmp = v310;
2856                     return tmp === l3.value? l3.value: tmp.car;
2857                 })();
2858                 var index = (function(){
2859                     var tmp = v310;
2860                     return tmp === l3.value? l3.value: tmp.cdr;
2861                 })();
2862                 if (typeof string != 'string')
2863                     throw 'The value ' + string + ' is not a type string.';
2864                 if (typeof index != 'number')
2865                     throw 'The value ' + index + ' is not a type number.';
2866                 return string.charCodeAt(index);
2867             })() : l3.value);
2868         })();
2869     }));
2870     return l152;
2871 })();
2872 var l153 = {name: "%READ-CHAR"};
2873 (function(){
2874     (l153).fvalue = (function(v314){
2875         ((v314)["fname"] = "%READ-CHAR");
2876         return v314;
2877     })((function (values,v312){
2878         checkArgs(arguments, 2);
2879         return (function(){
2880             return ((function(){
2881                 var x1 = (function(){
2882                     var tmp = v312;
2883                     return tmp === l3.value? l3.value: tmp.cdr;
2884                 })();
2885                 if (typeof x1 !== 'number') throw 'Not a number!';
2886                 var x2 = l71.fvalue(pv, (function(){
2887                     var tmp = v312;
2888                     return tmp === l3.value? l3.value: tmp.car;
2889                 })());
2890                 if (typeof x2 !== 'number') throw 'Not a number!';
2891                 return (x1<x2?l4.value: l3.value);
2892             })() !== l3.value ? (function(v313){
2893                 (function(){
2894                     var x = v312;
2895                     if (typeof x != 'object')
2896                         throw 'The value ' + x + ' is not a type object.';
2897                     return (x.cdr = l22.fvalue(pv, (function(){
2898                         var tmp = v312;
2899                         return tmp === l3.value? l3.value: tmp.cdr;
2900                     })()), x);
2901                 })();
2902                 return v313;
2903             })((function(){
2904                 var string = (function(){
2905                     var tmp = v312;
2906                     return tmp === l3.value? l3.value: tmp.car;
2907                 })();
2908                 var index = (function(){
2909                     var tmp = v312;
2910                     return tmp === l3.value? l3.value: tmp.cdr;
2911                 })();
2912                 if (typeof string != 'string')
2913                     throw 'The value ' + string + ' is not a type string.';
2914                 if (typeof index != 'number')
2915                     throw 'The value ' + index + ' is not a type number.';
2916                 return string.charCodeAt(index);
2917             })()) : l3.value);
2918         })();
2919     }));
2920     return l153;
2921 })();
2922 var l154 = {name: "WHITESPACEP"};
2923 (function(){
2924     (l154).fvalue = (function(v318){
2925         ((v318)["fname"] = "WHITESPACEP");
2926         return v318;
2927     })((function (values,v315){
2928         checkArgs(arguments, 2);
2929         return (function(){
2930             return (function(v316){
2931                 return (v316 !== l3.value ? v316 : (function(v317){
2932                     return (v317 !== l3.value ? v317 : l80.fvalue(values, v315, 9));
2933                 })(l80.fvalue(pv, v315, 10)));
2934             })(l80.fvalue(pv, v315, 32));
2935         })();
2936     }));
2937     return l154;
2938 })();
2939 var l155 = {name: "SKIP-WHITESPACES"};
2940 (function(){
2941     (l155).fvalue = (function(v321){
2942         ((v321)["fname"] = "SKIP-WHITESPACES");
2943         return v321;
2944     })((function (values,v319){
2945         checkArgs(arguments, 2);
2946         return (function(){
2947             return (function(v320){
2948                 (v320 = l152.fvalue(pv, v319));
2949                 return (function(){
2950                     return (function(){
2951                         while((v320 !== l3.value ? l154.fvalue(pv, v320) : l3.value) !== l3.value){
2952                             l153.fvalue(pv, v319);
2953                             (v320 = l152.fvalue(pv, v319));
2954                         }return l3.value;
2955                     })();
2956                 })();
2957             })(l3.value);
2958         })();
2959     }));
2960     return l155;
2961 })();
2962 var l156 = {name: "TERMINALP"};
2963 (function(){
2964     (l156).fvalue = (function(v326){
2965         ((v326)["fname"] = "TERMINALP");
2966         return v326;
2967     })((function (values,v322){
2968         checkArgs(arguments, 2);
2969         return (function(){
2970             return (function(v323){
2971                 return (v323 !== l3.value ? v323 : (function(v324){
2972                     return (v324 !== l3.value ? v324 : (function(v325){
2973                         return (v325 !== l3.value ? v325 : l80.fvalue(values, 40, v322));
2974                     })(l80.fvalue(pv, 41, v322)));
2975                 })(l154.fvalue(pv, v322)));
2976             })(l12.fvalue(pv, v322));
2977         })();
2978     }));
2979     return l156;
2980 })();
2981 var l157 = {name: "READ-UNTIL"};
2982 (function(){
2983     (l157).fvalue = (function(v331){
2984         ((v331)["fname"] = "READ-UNTIL");
2985         return v331;
2986     })((function (values,v327,v328){
2987         checkArgs(arguments, 3);
2988         return (function(){
2989             return (function(v329,v330){
2990                 (v330 = l152.fvalue(pv, v327));
2991                 (function(){
2992                     return (function(){
2993                         while((v330 !== l3.value ? l27.fvalue(pv, (v328)(pv, v330)) : l3.value) !== l3.value){
2994                             (v329 = l134.fvalue(pv, v329, l98.fvalue(pv, v330)));
2995                             l153.fvalue(pv, v327);
2996                             (v330 = l152.fvalue(pv, v327));
2997                         }return l3.value;
2998                     })();
2999                 })();
3000                 return v329;
3001             })("",l3.value);
3002         })();
3003     }));
3004     return l157;
3005 })();
3006 var l158 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
3007 (function(){
3008     (l158).fvalue = (function(v335){
3009         ((v335)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
3010         return v335;
3011     })((function (values,v332){
3012         checkArgs(arguments, 2);
3013         return (function(){
3014             return (function(v333){
3015                 l155.fvalue(pv, v332);
3016                 (v333 = l152.fvalue(pv, v332));
3017                 return (function(){
3018                     return (function(){
3019                         while((v333 !== l3.value ? l80.fvalue(pv, v333, 59) : l3.value) !== l3.value){
3020                             l157.fvalue(pv, v332, (function (values,v334){
3021                                 checkArgs(arguments, 2);
3022                                 return l80.fvalue(values, v334, 10);
3023                             }));
3024                             l155.fvalue(pv, v332);
3025                             (v333 = l152.fvalue(pv, v332));
3026                         }return l3.value;
3027                     })();
3028                 })();
3029             })(l3.value);
3030         })();
3031     }));
3032     return l158;
3033 })();
3034 var l159 = {name: "%READ-LIST"};
3035 var l160 = {name: "LS-READ"};
3036 (function(){
3037     (l159).fvalue = (function(v339){
3038         ((v339)["fname"] = "%READ-LIST");
3039         return v339;
3040     })((function (values,v336){
3041         checkArgs(arguments, 2);
3042         return (function(){
3043             l158.fvalue(pv, v336);
3044             return (function(v337){
3045                 return (l12.fvalue(pv, v337) !== l3.value ? (function(){
3046                     throw "Unspected EOF";
3047                 })() : (l80.fvalue(pv, v337, 41) !== l3.value ? (function(){
3048                     l153.fvalue(pv, v336);
3049                     return l3.value;
3050                 })() : (l80.fvalue(pv, v337, 46) !== l3.value ? (function(){
3051                     l153.fvalue(pv, v336);
3052                     return (function(v338){
3053                         l158.fvalue(pv, v336);
3054                         (l80.fvalue(pv, l153.fvalue(pv, v336), 41) !== l3.value ? l3.value : (function(){
3055                             throw "')' was expected.";
3056                         })());
3057                         return v338;
3058                     })(l160.fvalue(pv, v336));
3059                 })() : ({car: l160.fvalue(pv, v336), cdr: l159.fvalue(pv, v336)}))));
3060             })(l152.fvalue(pv, v336));
3061         })();
3062     }));
3063     return l159;
3064 })();
3065 var l161 = {name: "READ-STRING"};
3066 (function(){
3067     (l161).fvalue = (function(v343){
3068         ((v343)["fname"] = "READ-STRING");
3069         return v343;
3070     })((function (values,v340){
3071         checkArgs(arguments, 2);
3072         return (function(){
3073             return (function(v341,v342){
3074                 (v342 = l153.fvalue(pv, v340));
3075                 (function(){
3076                     return (function(){
3077                         while(l27.fvalue(pv, l26.fvalue(pv, v342, 34)) !== l3.value){
3078                             (l12.fvalue(pv, v342) !== l3.value ? (function(){
3079                                 throw "Unexpected EOF";
3080                             })() : l3.value);
3081                             (l26.fvalue(pv, v342, 92) !== l3.value ? (v342 = l153.fvalue(pv, v340)) : l3.value);
3082                             (v341 = l134.fvalue(pv, v341, l98.fvalue(pv, v342)));
3083                             (v342 = l153.fvalue(pv, v340));
3084                         }return l3.value;
3085                     })();
3086                 })();
3087                 return v341;
3088             })("",l3.value);
3089         })();
3090     }));
3091     return l161;
3092 })();
3093 var l162 = {name: "READ-SHARP"};
3094 (function(){
3095     (l162).fvalue = (function(v348){
3096         ((v348)["fname"] = "READ-SHARP");
3097         return v348;
3098     })((function (values,v344){
3099         checkArgs(arguments, 2);
3100         return (function(){
3101             l153.fvalue(pv, v344);
3102             return (function(v345){
3103                 return (l26.fvalue(pv, v345, 39) !== l3.value ? l44.fvalue(values, l104, l160.fvalue(pv, v344)) : (l26.fvalue(pv, v345, 40) !== l3.value ? l140.fvalue(values, l159.fvalue(pv, v344)) : (l26.fvalue(pv, v345, 58) !== l3.value ? (function(){
3104                     var name = (function(){
3105                         var x = l157.fvalue(pv, v344, (function(){
3106                             var symbol = l156;
3107                             var func = symbol.fvalue;
3108                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3109                             return func;
3110                         })());
3111                         if (typeof x != 'string')
3112                             throw 'The value ' + x + ' is not a type string.';
3113                         return x.toUpperCase();
3114                     })();
3115                     if (typeof name != 'string')
3116                         throw 'The value ' + name + ' is not a type string.';
3117                     return ({name: name});
3118                 })() : (l26.fvalue(pv, v345, 92) !== l3.value ? (function(v346){
3119                     return (l99.fvalue(pv, v346, "space") !== l3.value ? l79.fvalue(values, 32) : (l99.fvalue(pv, v346, "tab") !== l3.value ? l79.fvalue(values, 9) : (l99.fvalue(pv, v346, "newline") !== l3.value ? l79.fvalue(values, 10) : l79.fvalue(values, (function(){
3120                         var string = v346;
3121                         var index = 0;
3122                         if (typeof string != 'string')
3123                             throw 'The value ' + string + ' is not a type string.';
3124                         if (typeof index != 'number')
3125                             throw 'The value ' + index + ' is not a type number.';
3126                         return string.charCodeAt(index);
3127                     })()))));
3128                 })(l134.fvalue(pv, l98.fvalue(pv, l153.fvalue(pv, v344)), l157.fvalue(pv, v344, (function(){
3129                     var symbol = l156;
3130                     var func = symbol.fvalue;
3131                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3132                     return func;
3133                 })()))) : (l26.fvalue(pv, v345, 43) !== l3.value ? (function(v347){
3134                     return (l99.fvalue(pv, v347, "common-lisp") !== l3.value ? (function(){
3135                         l160.fvalue(pv, v344);
3136                         return l160.fvalue(values, v344);
3137                     })() : (l99.fvalue(pv, v347, "ecmalisp") !== l3.value ? l160.fvalue(values, v344) : (function(){
3138                         throw "Unknown reader form.";
3139                     })()));
3140                 })(l157.fvalue(pv, v344, (function(){
3141                     var symbol = l156;
3142                     var func = symbol.fvalue;
3143                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3144                     return func;
3145                 })())) : (function(){
3146                     throw "ECASE expression failed.";
3147                 })())))));
3148             })(l153.fvalue(pv, v344));
3149         })();
3150     }));
3151     return l162;
3152 })();
3153 var l163 = {name: "READ-SYMBOL"};
3154 (function(){
3155     (l163).fvalue = (function(v356){
3156         ((v356)["fname"] = "READ-SYMBOL");
3157         return v356;
3158     })((function (values,v349){
3159         checkArgs(arguments, 2);
3160         return (function(){
3161             return (function(v350,v351,v352,v353,v354){
3162                 (v354 = 0);
3163                 (function(){
3164                     return (function(){
3165                         while(((function(){
3166                             var x1 = v354;
3167                             if (typeof x1 !== 'number') throw 'Not a number!';
3168                             var x2 = v350;
3169                             if (typeof x2 !== 'number') throw 'Not a number!';
3170                             return (x1<x2?l4.value: l3.value);
3171                         })() !== l3.value ? l27.fvalue(pv, l80.fvalue(pv, (function(){
3172                             var string = v349;
3173                             var index = v354;
3174                             if (typeof string != 'string')
3175                                 throw 'The value ' + string + ' is not a type string.';
3176                             if (typeof index != 'number')
3177                                 throw 'The value ' + index + ' is not a type number.';
3178                             return string.charCodeAt(index);
3179                         })(), 58)) : l3.value) !== l3.value){
3180                             (v354 = (function(){
3181                                 var x1 = v354;
3182                                 if (typeof x1 !== 'number') throw 'Not a number!';
3183                                 var x2 = 1;
3184                                 if (typeof x2 !== 'number') throw 'Not a number!';
3185                                 return x1+x2;
3186                             })());
3187                         }return l3.value;
3188                     })();
3189                 })();
3190                 ((function(){
3191                     var x1 = v354;
3192                     if (typeof x1 !== 'number') throw 'Not a number!';
3193                     var x2 = v350;
3194                     if (typeof x2 !== 'number') throw 'Not a number!';
3195                     return (x1==x2?l4.value: l3.value);
3196                 })() !== l3.value ? (function(){
3197                     (v352 = v349);
3198                     (v351 = (function(){
3199                         var symbol = l123;
3200                         var value = symbol.value;
3201                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3202                         return value;
3203                     })());
3204                     return (v353 = l4.value);
3205                 })() : (function(){
3206                     (l24.fvalue(pv, v354) !== l3.value ? (v351 = "KEYWORD") : (v351 = (function(){
3207                         var x = l94.fvalue(pv, v349, 0, v354);
3208                         if (typeof x != 'string')
3209                             throw 'The value ' + x + ' is not a type string.';
3210                         return x.toUpperCase();
3211                     })()));
3212                     (v354 = (function(){
3213                         var x1 = v354;
3214                         if (typeof x1 !== 'number') throw 'Not a number!';
3215                         var x2 = 1;
3216                         if (typeof x2 !== 'number') throw 'Not a number!';
3217                         return x1+x2;
3218                     })());
3219                     (l80.fvalue(pv, (function(){
3220                         var string = v349;
3221                         var index = v354;
3222                         if (typeof string != 'string')
3223                             throw 'The value ' + string + ' is not a type string.';
3224                         if (typeof index != 'number')
3225                             throw 'The value ' + index + ' is not a type number.';
3226                         return string.charCodeAt(index);
3227                     })(), 58) !== l3.value ? (function(){
3228                         (v353 = l4.value);
3229                         return (v354 = (function(){
3230                             var x1 = v354;
3231                             if (typeof x1 !== 'number') throw 'Not a number!';
3232                             var x2 = 1;
3233                             if (typeof x2 !== 'number') throw 'Not a number!';
3234                             return x1+x2;
3235                         })());
3236                     })() : l3.value);
3237                     return (v352 = l94.fvalue(pv, v349, v354));
3238                 })());
3239                 (v352 = (function(){
3240                     var x = v352;
3241                     if (typeof x != 'string')
3242                         throw 'The value ' + x + ' is not a type string.';
3243                     return x.toUpperCase();
3244                 })());
3245                 (v351 = l113.fvalue(pv, v351));
3246                 return ((function(v355){
3247                     return (v355 !== l3.value ? v355 : ((v351 === l113.fvalue(pv, "KEYWORD"))?l4.value: l3.value));
3248                 })(v353) !== l3.value ? l130.fvalue(values, v352, v351) : l126.fvalue(values, v352, v351));
3249             })(l71.fvalue(pv, v349),l3.value,l3.value,l3.value,l3.value);
3250         })();
3251     }));
3252     return l163;
3253 })();
3254 var l164 = {name: "!PARSE-INTEGER"};
3255 (function(){
3256     (l164).fvalue = (function(v367){
3257         ((v367)["fname"] = "!PARSE-INTEGER");
3258         return v367;
3259     })((function (values,v357,v358){
3260         checkArgs(arguments, 3);
3261         return (function(){
3262             return (function(){
3263                 try {
3264                     return (function(v359,v360,v361,v362){
3265                         (l24.fvalue(pv, v361) !== l3.value ? (function(){
3266                             var values = mv;
3267                             throw ({type: 'block', id: 141, values: values(l3.value, 0), message: 'Return from unknown block NIL.'})
3268                         })() : l3.value);
3269                         (function(v363){
3270                             return (l26.fvalue(pv, v363, 43) !== l3.value ? (v360 = (function(){
3271                                 var x1 = v360;
3272                                 if (typeof x1 !== 'number') throw 'Not a number!';
3273                                 var x2 = 1;
3274                                 if (typeof x2 !== 'number') throw 'Not a number!';
3275                                 return x1+x2;
3276                             })()) : (l26.fvalue(pv, v363, 45) !== l3.value ? (function(){
3277                                 (v362 = -1);
3278                                 return (v360 = (function(){
3279                                     var x1 = v360;
3280                                     if (typeof x1 !== 'number') throw 'Not a number!';
3281                                     var x2 = 1;
3282                                     if (typeof x2 !== 'number') throw 'Not a number!';
3283                                     return x1+x2;
3284                                 })());
3285                             })() : l3.value));
3286                         })((function(){
3287                             var string = v357;
3288                             var index = 0;
3289                             if (typeof string != 'string')
3290                                 throw 'The value ' + string + ' is not a type string.';
3291                             if (typeof index != 'number')
3292                                 throw 'The value ' + index + ' is not a type number.';
3293                             return string.charCodeAt(index);
3294                         })());
3295                         (((function(){
3296                             var x1 = v360;
3297                             if (typeof x1 !== 'number') throw 'Not a number!';
3298                             var x2 = v361;
3299                             if (typeof x2 !== 'number') throw 'Not a number!';
3300                             return (x1<x2?l4.value: l3.value);
3301                         })() !== l3.value ? (v359 = l92.fvalue(pv, (function(){
3302                             var string = v357;
3303                             var index = v360;
3304                             if (typeof string != 'string')
3305                                 throw 'The value ' + string + ' is not a type string.';
3306                             if (typeof index != 'number')
3307                                 throw 'The value ' + index + ' is not a type number.';
3308                             return string.charCodeAt(index);
3309                         })())) : l3.value) !== l3.value ? l3.value : (function(){
3310                             var values = mv;
3311                             throw ({type: 'block', id: 141, values: values(l3.value, v360), message: 'Return from unknown block NIL.'})
3312                         })());
3313                         (v360 = (function(){
3314                             var x1 = v360;
3315                             if (typeof x1 !== 'number') throw 'Not a number!';
3316                             var x2 = 1;
3317                             if (typeof x2 !== 'number') throw 'Not a number!';
3318                             return x1+x2;
3319                         })());
3320                         (function(){
3321                             try {
3322                                 return (function(){
3323                                     while((function(){
3324                                         var x1 = v360;
3325                                         if (typeof x1 !== 'number') throw 'Not a number!';
3326                                         var x2 = v361;
3327                                         if (typeof x2 !== 'number') throw 'Not a number!';
3328                                         return (x1<x2?l4.value: l3.value);
3329                                     })() !== l3.value){
3330                                         (function(v364){
3331                                             (v364 !== l3.value ? l3.value : (function(){
3332                                                 throw ({type: 'block', id: 142, values: l3.value, message: 'Return from unknown block NIL.'})
3333                                             })());
3334                                             (v359 = (function(){
3335                                                 var x1 = (function(){
3336                                                     var x1 = v359;
3337                                                     if (typeof x1 !== 'number') throw 'Not a number!';
3338                                                     var x2 = 10;
3339                                                     if (typeof x2 !== 'number') throw 'Not a number!';
3340                                                     return x1*x2;
3341                                                 })();
3342                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3343                                                 var x2 = v364;
3344                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3345                                                 return x1+x2;
3346                                             })());
3347                                             return (v360 = (function(){
3348                                                 var x1 = v360;
3349                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3350                                                 var x2 = 1;
3351                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3352                                                 return x1+x2;
3353                                             })());
3354                                         })(l92.fvalue(pv, (function(){
3355                                             var string = v357;
3356                                             var index = v360;
3357                                             if (typeof string != 'string')
3358                                                 throw 'The value ' + string + ' is not a type string.';
3359                                             if (typeof index != 'number')
3360                                                 throw 'The value ' + index + ' is not a type number.';
3361                                             return string.charCodeAt(index);
3362                                         })()));
3363                                     }return l3.value;
3364                                 })();
3365                             }
3366                             catch (cf){
3367                                 if (cf.type == 'block' && cf.id == 142)
3368                                     return cf.values;
3369                                 else
3370                                     throw cf;
3371                             }
3372                         })();
3373                         return ((function(v365){
3374                             return (v365 !== l3.value ? v365 : (function(v366){
3375                                 return (v366 !== l3.value ? v366 : l80.fvalue(pv, (function(){
3376                                     var string = v357;
3377                                     var index = v360;
3378                                     if (typeof string != 'string')
3379                                         throw 'The value ' + string + ' is not a type string.';
3380                                     if (typeof index != 'number')
3381                                         throw 'The value ' + index + ' is not a type number.';
3382                                     return string.charCodeAt(index);
3383                                 })(), 32));
3384                             })((function(){
3385                                 var x1 = v360;
3386                                 if (typeof x1 !== 'number') throw 'Not a number!';
3387                                 var x2 = v361;
3388                                 if (typeof x2 !== 'number') throw 'Not a number!';
3389                                 return (x1==x2?l4.value: l3.value);
3390                             })()));
3391                         })(v358) !== l3.value ? values((function(){
3392                             var x1 = v362;
3393                             if (typeof x1 !== 'number') throw 'Not a number!';
3394                             var x2 = v359;
3395                             if (typeof x2 !== 'number') throw 'Not a number!';
3396                             return x1*x2;
3397                         })(), v360) : values(l3.value, v360));
3398                     })(0,0,l71.fvalue(pv, v357),1);
3399                 }
3400                 catch (cf){
3401                     if (cf.type == 'block' && cf.id == 141)
3402                         return values.apply(this, forcemv(cf.values));
3403                     else
3404                         throw cf;
3405                 }
3406             })();
3407         })();
3408     }));
3409     return l164;
3410 })();
3411 var l165 = {name: "PARSE-INTEGER"};
3412 (function(){
3413     (l165).fvalue = (function(v369){
3414         ((v369)["fname"] = "PARSE-INTEGER");
3415         return v369;
3416     })((function (values,v368){
3417         checkArgs(arguments, 2);
3418         return (function(){
3419             return l164.fvalue(values, v368, l3.value);
3420         })();
3421     }));
3422     return l165;
3423 })();
3424 var l166 = {name: "*EOF*"};
3425 (function(){
3426     (((l166.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l166).value = l16.fvalue(pv)));
3427     return l166;
3428 })();
3429 var l167 = {name: "QUOTE"};
3430 var l168 = {name: "BACKQUOTE"};
3431 var l169 = {name: "UNQUOTE-SPLICING"};
3432 var l170 = {name: "UNQUOTE"};
3433 (function(){
3434     (l160).fvalue = (function(v375){
3435         ((v375)["fname"] = "LS-READ");
3436         return v375;
3437     })((function (values,v370){
3438         checkArgs(arguments, 2);
3439         return (function(){
3440             l158.fvalue(pv, v370);
3441             return (function(v371){
3442                 return ((function(v372){
3443                     return (v372 !== l3.value ? v372 : l80.fvalue(pv, v371, 41));
3444                 })(l12.fvalue(pv, v371)) !== l3.value ? (function(){
3445                     var symbol = l166;
3446                     var value = symbol.value;
3447                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3448                     return value;
3449                 })() : (l80.fvalue(pv, v371, 40) !== l3.value ? (function(){
3450                     l153.fvalue(pv, v370);
3451                     return l159.fvalue(values, v370);
3452                 })() : (l80.fvalue(pv, v371, 39) !== l3.value ? (function(){
3453                     l153.fvalue(pv, v370);
3454                     return l44.fvalue(values, l167, l160.fvalue(pv, v370));
3455                 })() : (l80.fvalue(pv, v371, 96) !== l3.value ? (function(){
3456                     l153.fvalue(pv, v370);
3457                     return l44.fvalue(values, l168, l160.fvalue(pv, v370));
3458                 })() : (l80.fvalue(pv, v371, 34) !== l3.value ? (function(){
3459                     l153.fvalue(pv, v370);
3460                     return l161.fvalue(values, v370);
3461                 })() : (l80.fvalue(pv, v371, 44) !== l3.value ? (function(){
3462                     l153.fvalue(pv, v370);
3463                     return (l26.fvalue(pv, l152.fvalue(pv, v370), 64) !== l3.value ? (function(){
3464                         l153.fvalue(pv, v370);
3465                         return l44.fvalue(values, l169, l160.fvalue(pv, v370));
3466                     })() : l44.fvalue(values, l170, l160.fvalue(pv, v370)));
3467                 })() : (l80.fvalue(pv, v371, 35) !== l3.value ? l162.fvalue(values, v370) : (function(v373){
3468                     return (function(v374){
3469                         return (v374 !== l3.value ? v374 : l163.fvalue(values, v373));
3470                     })(pv(l164.fvalue(pv, v373, l3.value)));
3471                 })(l157.fvalue(pv, v370, (function(){
3472                     var symbol = l156;
3473                     var func = symbol.fvalue;
3474                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3475                     return func;
3476                 })())))))))));
3477             })(l152.fvalue(pv, v370));
3478         })();
3479     }));
3480     return l160;
3481 })();
3482 var l171 = {name: "LS-READ-FROM-STRING"};
3483 (function(){
3484     (l171).fvalue = (function(v377){
3485         ((v377)["fname"] = "LS-READ-FROM-STRING");
3486         return v377;
3487     })((function (values,v376){
3488         checkArgs(arguments, 2);
3489         return (function(){
3490             return l160.fvalue(values, l151.fvalue(pv, v376));
3491         })();
3492     }));
3493     return l171;
3494 })();
3495 var l172 = {name: "*MULTIPLE-VALUE-P*"};
3496 (function(){
3497     (((l172.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l172).value = l3.value));
3498     return l172;
3499 })();
3500 var l173 = {name: "MAKE-BINDING"};
3501 (function(){
3502     (l173).fvalue = (function(v382){
3503         ((v382)["fname"] = "MAKE-BINDING");
3504         return v382;
3505     })((function (values,v378,v379,v380,v381){
3506         checkArgsAtLeast(arguments, 4);
3507         checkArgsAtMost(arguments, 5);
3508         switch(arguments.length-1){
3509         case 3:
3510         v381=l3.value;
3511         default: break;
3512         }
3513         return (function(){
3514             return l44.fvalue(values, v378, v379, v380, v381);
3515         })();
3516     }));
3517     return l173;
3518 })();
3519 var l174 = {name: "BINDING-NAME"};
3520 (function(){
3521     (l174).fvalue = (function(v384){
3522         ((v384)["fname"] = "BINDING-NAME");
3523         return v384;
3524     })((function (values,v383){
3525         checkArgs(arguments, 2);
3526         return (function(){
3527             return l39.fvalue(values, v383);
3528         })();
3529     }));
3530     return l174;
3531 })();
3532 var l175 = {name: "BINDING-TYPE"};
3533 (function(){
3534     (l175).fvalue = (function(v386){
3535         ((v386)["fname"] = "BINDING-TYPE");
3536         return v386;
3537     })((function (values,v385){
3538         checkArgs(arguments, 2);
3539         return (function(){
3540             return l40.fvalue(values, v385);
3541         })();
3542     }));
3543     return l175;
3544 })();
3545 var l176 = {name: "BINDING-VALUE"};
3546 (function(){
3547     (l176).fvalue = (function(v388){
3548         ((v388)["fname"] = "BINDING-VALUE");
3549         return v388;
3550     })((function (values,v387){
3551         checkArgs(arguments, 2);
3552         return (function(){
3553             return l41.fvalue(values, v387);
3554         })();
3555     }));
3556     return l176;
3557 })();
3558 var l177 = {name: "BINDING-DECLARATIONS"};
3559 (function(){
3560     (l177).fvalue = (function(v390){
3561         ((v390)["fname"] = "BINDING-DECLARATIONS");
3562         return v390;
3563     })((function (values,v389){
3564         checkArgs(arguments, 2);
3565         return (function(){
3566             return l42.fvalue(values, v389);
3567         })();
3568     }));
3569     return l177;
3570 })();
3571 var l178 = {name: "SET-BINDING-VALUE"};
3572 (function(){
3573     (l178).fvalue = (function(v393){
3574         ((v393)["fname"] = "SET-BINDING-VALUE");
3575         return v393;
3576     })((function (values,v391,v392){
3577         checkArgs(arguments, 3);
3578         return (function(){
3579             return (function(){
3580                 var x = l35.fvalue(pv, v391);
3581                 if (typeof x != 'object')
3582                     throw 'The value ' + x + ' is not a type object.';
3583                 return (x.car = v392, x);
3584             })();
3585         })();
3586     }));
3587     return l178;
3588 })();
3589 var l179 = {name: "SET-BINDING-DECLARATIONS"};
3590 (function(){
3591     (l179).fvalue = (function(v396){
3592         ((v396)["fname"] = "SET-BINDING-DECLARATIONS");
3593         return v396;
3594     })((function (values,v394,v395){
3595         checkArgs(arguments, 3);
3596         return (function(){
3597             return (function(){
3598                 var x = l37.fvalue(pv, v394);
3599                 if (typeof x != 'object')
3600                     throw 'The value ' + x + ' is not a type object.';
3601                 return (x.car = v395, x);
3602             })();
3603         })();
3604     }));
3605     return l179;
3606 })();
3607 var l180 = {name: "PUSH-BINDING-DECLARATION"};
3608 (function(){
3609     (l180).fvalue = (function(v399){
3610         ((v399)["fname"] = "PUSH-BINDING-DECLARATION");
3611         return v399;
3612     })((function (values,v397,v398){
3613         checkArgs(arguments, 3);
3614         return (function(){
3615             return l179.fvalue(values, v398, ({car: v397, cdr: l177.fvalue(pv, v398)}));
3616         })();
3617     }));
3618     return l180;
3619 })();
3620 var l181 = {name: "MAKE-LEXENV"};
3621 (function(){
3622     (l181).fvalue = (function(v400){
3623         ((v400)["fname"] = "MAKE-LEXENV");
3624         return v400;
3625     })((function (values){
3626         checkArgsAtMost(arguments, 1);
3627         return (function(){
3628             return l44.fvalue(values, l3.value, l3.value, l3.value, l3.value);
3629         })();
3630     }));
3631     return l181;
3632 })();
3633 var l182 = {name: "COPY-LEXENV"};
3634 (function(){
3635     (l182).fvalue = (function(v402){
3636         ((v402)["fname"] = "COPY-LEXENV");
3637         return v402;
3638     })((function (values,v401){
3639         checkArgs(arguments, 2);
3640         return (function(){
3641             return l77.fvalue(values, v401);
3642         })();
3643     }));
3644     return l182;
3645 })();
3646 var l183 = {name: "PUSH-TO-LEXENV"};
3647 var l184 = {name: "BLOCK"};
3648 var l185 = {name: "GOTAG"};
3649 (function(){
3650     (l183).fvalue = (function(v407){
3651         ((v407)["fname"] = "PUSH-TO-LEXENV");
3652         return v407;
3653     })((function (values,v403,v404,v405){
3654         checkArgs(arguments, 4);
3655         return (function(){
3656             return (function(v406){
3657                 return (l26.fvalue(pv, v406, l105) !== l3.value ? (function(){
3658                     var x = v404;
3659                     if (typeof x != 'object')
3660                         throw 'The value ' + x + ' is not a type object.';
3661                     return (x.car = ({car: v403, cdr: (function(){
3662                         var tmp = v404;
3663                         return tmp === l3.value? l3.value: tmp.car;
3664                     })()}), x);
3665                 })() : (l26.fvalue(pv, v406, l104) !== l3.value ? (function(){
3666                     var x = (function(){
3667                         var tmp = v404;
3668                         return tmp === l3.value? l3.value: tmp.cdr;
3669                     })();
3670                     if (typeof x != 'object')
3671                         throw 'The value ' + x + ' is not a type object.';
3672                     return (x.car = ({car: v403, cdr: l33.fvalue(pv, v404)}), x);
3673                 })() : (l26.fvalue(pv, v406, l184) !== l3.value ? (function(){
3674                     var x = l35.fvalue(pv, v404);
3675                     if (typeof x != 'object')
3676                         throw 'The value ' + x + ' is not a type object.';
3677                     return (x.car = ({car: v403, cdr: l36.fvalue(pv, v404)}), x);
3678                 })() : (l26.fvalue(pv, v406, l185) !== l3.value ? (function(){
3679                     var x = l37.fvalue(pv, v404);
3680                     if (typeof x != 'object')
3681                         throw 'The value ' + x + ' is not a type object.';
3682                     return (x.car = ({car: v403, cdr: l38.fvalue(pv, v404)}), x);
3683                 })() : (function(){
3684                     throw "ECASE expression failed.";
3685                 })()))));
3686             })(v405);
3687         })();
3688     }));
3689     return l183;
3690 })();
3691 var l186 = {name: "EXTEND-LEXENV"};
3692 (function(){
3693     (l186).fvalue = (function(v414){
3694         ((v414)["fname"] = "EXTEND-LEXENV");
3695         return v414;
3696     })((function (values,v408,v409,v410){
3697         checkArgs(arguments, 4);
3698         return (function(){
3699             return (function(v411){
3700                 return (function(){
3701                     return (function(v412,v413){
3702                         (function(){
3703                             while(v412 !== l3.value){
3704                                 (v413 = (function(){
3705                                     var tmp = v412;
3706                                     return tmp === l3.value? l3.value: tmp.car;
3707                                 })());
3708                                 (function(){
3709                                     l183.fvalue(pv, v413, v411, v410);
3710                                     return l3.value;
3711                                 })();
3712                                 (v412 = (function(){
3713                                     var tmp = v412;
3714                                     return tmp === l3.value? l3.value: tmp.cdr;
3715                                 })());
3716                             }return l3.value;
3717                         })();
3718                         return v411;
3719                     })(l66.fvalue(pv, v408),l3.value);
3720                 })();
3721             })(l182.fvalue(pv, v409));
3722         })();
3723     }));
3724     return l186;
3725 })();
3726 var l187 = {name: "LOOKUP-IN-LEXENV"};
3727 (function(){
3728     (l187).fvalue = (function(v419){
3729         ((v419)["fname"] = "LOOKUP-IN-LEXENV");
3730         return v419;
3731     })((function (values,v415,v416,v417){
3732         checkArgs(arguments, 4);
3733         return (function(){
3734             return l97.fvalue(values, v415, (function(v418){
3735                 return (l26.fvalue(pv, v418, l105) !== l3.value ? l39.fvalue(pv, v416) : (l26.fvalue(pv, v418, l104) !== l3.value ? l40.fvalue(pv, v416) : (l26.fvalue(pv, v418, l184) !== l3.value ? l41.fvalue(pv, v416) : (l26.fvalue(pv, v418, l185) !== l3.value ? l42.fvalue(pv, v416) : (function(){
3736                     throw "ECASE expression failed.";
3737                 })()))));
3738             })(v417));
3739         })();
3740     }));
3741     return l187;
3742 })();
3743 var l188 = {name: "*ENVIRONMENT*"};
3744 (function(){
3745     (((l188.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l188).value = l181.fvalue(pv)));
3746     return l188;
3747 })();
3748 var l189 = {name: "*VARIABLE-COUNTER*"};
3749 (function(){
3750     (((l189.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l189).value = 0));
3751     return l189;
3752 })();
3753 var l190 = {name: "GVARNAME"};
3754 (function(){
3755     (l190).fvalue = (function(v421){
3756         ((v421)["fname"] = "GVARNAME");
3757         return v421;
3758     })((function (values,v420){
3759         checkArgs(arguments, 2);
3760         return (function(){
3761             return l134.fvalue(values, "v", l17.fvalue(pv, ((l189).value = (function(){
3762                 var x1 = (function(){
3763                     var symbol = l189;
3764                     var value = symbol.value;
3765                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3766                     return value;
3767                 })();
3768                 if (typeof x1 !== 'number') throw 'Not a number!';
3769                 var x2 = 1;
3770                 if (typeof x2 !== 'number') throw 'Not a number!';
3771                 return x1+x2;
3772             })())));
3773         })();
3774     }));
3775     return l190;
3776 })();
3777 var l191 = {name: "TRANSLATE-VARIABLE"};
3778 (function(){
3779     (l191).fvalue = (function(v423){
3780         ((v423)["fname"] = "TRANSLATE-VARIABLE");
3781         return v423;
3782     })((function (values,v422){
3783         checkArgs(arguments, 2);
3784         return (function(){
3785             return l176.fvalue(values, l187.fvalue(pv, v422, (function(){
3786                 var symbol = l188;
3787                 var value = symbol.value;
3788                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3789                 return value;
3790             })(), l105));
3791         })();
3792     }));
3793     return l191;
3794 })();
3795 var l192 = {name: "EXTEND-LOCAL-ENV"};
3796 (function(){
3797     (l192).fvalue = (function(v429){
3798         ((v429)["fname"] = "EXTEND-LOCAL-ENV");
3799         return v429;
3800     })((function (values,v424){
3801         checkArgs(arguments, 2);
3802         return (function(){
3803             return (function(v425){
3804                 return (function(){
3805                     return (function(v426,v427){
3806                         (function(){
3807                             while(v426 !== l3.value){
3808                                 (v427 = (function(){
3809                                     var tmp = v426;
3810                                     return tmp === l3.value? l3.value: tmp.car;
3811                                 })());
3812                                 (function(){
3813                                     (function(v428){
3814                                         return l183.fvalue(pv, v428, v425, l105);
3815                                     })(l173.fvalue(pv, v427, l105, l190.fvalue(pv, v427)));
3816                                     return l3.value;
3817                                 })();
3818                                 (v426 = (function(){
3819                                     var tmp = v426;
3820                                     return tmp === l3.value? l3.value: tmp.cdr;
3821                                 })());
3822                             }return l3.value;
3823                         })();
3824                         return v425;
3825                     })(v424,l3.value);
3826                 })();
3827             })(l182.fvalue(pv, (function(){
3828                 var symbol = l188;
3829                 var value = symbol.value;
3830                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3831                 return value;
3832             })()));
3833         })();
3834     }));
3835     return l192;
3836 })();
3837 var l193 = {name: "*TOPLEVEL-COMPILATIONS*"};
3838 (function(){
3839     (((l193.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l193).value = l3.value));
3840     return l193;
3841 })();
3842 var l194 = {name: "TOPLEVEL-COMPILATION"};
3843 (function(){
3844     (l194).fvalue = (function(v431){
3845         ((v431)["fname"] = "TOPLEVEL-COMPILATION");
3846         return v431;
3847     })((function (values,v430){
3848         checkArgs(arguments, 2);
3849         return (function(){
3850             return ((l193).value = ({car: v430, cdr: (function(){
3851                 var symbol = l193;
3852                 var value = symbol.value;
3853                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3854                 return value;
3855             })()}));
3856         })();
3857     }));
3858     return l194;
3859 })();
3860 var l195 = {name: "NULL-OR-EMPTY-P"};
3861 (function(){
3862     (l195).fvalue = (function(v433){
3863         ((v433)["fname"] = "NULL-OR-EMPTY-P");
3864         return v433;
3865     })((function (values,v432){
3866         checkArgs(arguments, 2);
3867         return (function(){
3868             return l24.fvalue(values, l71.fvalue(pv, v432));
3869         })();
3870     }));
3871     return l195;
3872 })();
3873 var l196 = {name: "GET-TOPLEVEL-COMPILATIONS"};
3874 (function(){
3875     (l196).fvalue = (function(v434){
3876         ((v434)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
3877         return v434;
3878     })((function (values){
3879         checkArgsAtMost(arguments, 1);
3880         return (function(){
3881             return l66.fvalue(values, l90.fvalue(pv, (function(){
3882                 var symbol = l195;
3883                 var func = symbol.fvalue;
3884                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3885                 return func;
3886             })(), (function(){
3887                 var symbol = l193;
3888                 var value = symbol.value;
3889                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3890                 return value;
3891             })()));
3892         })();
3893     }));
3894     return l196;
3895 })();
3896 var l197 = {name: "%COMPILE-DEFMACRO"};
3897 var l198 = {name: "MACRO"};
3898 (function(){
3899     (l197).fvalue = (function(v437){
3900         ((v437)["fname"] = "%COMPILE-DEFMACRO");
3901         return v437;
3902     })((function (values,v435,v436){
3903         checkArgs(arguments, 3);
3904         return (function(){
3905             l194.fvalue(pv, l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, v435))));
3906             l183.fvalue(pv, l173.fvalue(pv, v435, l198, v436), (function(){
3907                 var symbol = l188;
3908                 var value = symbol.value;
3909                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3910                 return value;
3911             })(), l104);
3912             return v435;
3913         })();
3914     }));
3915     return l197;
3916 })();
3917 var l199 = {name: "GLOBAL-BINDING"};
3918 (function(){
3919     (l199).fvalue = (function(v443){
3920         ((v443)["fname"] = "GLOBAL-BINDING");
3921         return v443;
3922     })((function (values,v438,v439,v440){
3923         checkArgs(arguments, 4);
3924         return (function(){
3925             return (function(v441){
3926                 return (v441 !== l3.value ? v441 : (function(v442){
3927                     l183.fvalue(pv, v442, (function(){
3928                         var symbol = l188;
3929                         var value = symbol.value;
3930                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3931                         return value;
3932                     })(), v440);
3933                     return v442;
3934                 })(l173.fvalue(pv, v438, v439, l3.value)));
3935             })(l187.fvalue(pv, v438, (function(){
3936                 var symbol = l188;
3937                 var value = symbol.value;
3938                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3939                 return value;
3940             })(), v440));
3941         })();
3942     }));
3943     return l199;
3944 })();
3945 var l200 = {name: "CLAIMP"};
3946 (function(){
3947     (l200).fvalue = (function(v448){
3948         ((v448)["fname"] = "CLAIMP");
3949         return v448;
3950     })((function (values,v444,v445,v446){
3951         checkArgs(arguments, 4);
3952         return (function(){
3953             return (function(v447){
3954                 return (v447 !== l3.value ? l88.fvalue(values, v446, l177.fvalue(pv, v447)) : l3.value);
3955             })(l187.fvalue(pv, v444, (function(){
3956                 var symbol = l188;
3957                 var value = symbol.value;
3958                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3959                 return value;
3960             })(), v445));
3961         })();
3962     }));
3963     return l200;
3964 })();
3965 var l201 = {name: "!PROCLAIM"};
3966 var l202 = {name: "SPECIAL"};
3967 var l203 = {name: "NOTINLINE"};
3968 var l204 = {name: "CONSTANT"};
3969 (function(){
3970     (l201).fvalue = (function(v460){
3971         ((v460)["fname"] = "!PROCLAIM");
3972         return v460;
3973     })((function (values,v449){
3974         checkArgs(arguments, 2);
3975         return (function(){
3976             return (function(v450){
3977                 return (l26.fvalue(pv, v450, l202) !== l3.value ? (function(){
3978                     return (function(v451,v452){
3979                         (function(){
3980                             while(v451 !== l3.value){
3981                                 (v452 = (function(){
3982                                     var tmp = v451;
3983                                     return tmp === l3.value? l3.value: tmp.car;
3984                                 })());
3985                                 (function(){
3986                                     (function(v453){
3987                                         return l180.fvalue(pv, l202, v453);
3988                                     })(l199.fvalue(pv, v452, l105, l105));
3989                                     return l3.value;
3990                                 })();
3991                                 (v451 = (function(){
3992                                     var tmp = v451;
3993                                     return tmp === l3.value? l3.value: tmp.cdr;
3994                                 })());
3995                             }return l3.value;
3996                         })();
3997                         return l3.value;
3998                     })((function(){
3999                         var tmp = v449;
4000                         return tmp === l3.value? l3.value: tmp.cdr;
4001                     })(),l3.value);
4002                 })() : (l26.fvalue(pv, v450, l203) !== l3.value ? (function(){
4003                     return (function(v454,v455){
4004                         (function(){
4005                             while(v454 !== l3.value){
4006                                 (v455 = (function(){
4007                                     var tmp = v454;
4008                                     return tmp === l3.value? l3.value: tmp.car;
4009                                 })());
4010                                 (function(){
4011                                     (function(v456){
4012                                         return l180.fvalue(pv, l203, v456);
4013                                     })(l199.fvalue(pv, v455, l104, l104));
4014                                     return l3.value;
4015                                 })();
4016                                 (v454 = (function(){
4017                                     var tmp = v454;
4018                                     return tmp === l3.value? l3.value: tmp.cdr;
4019                                 })());
4020                             }return l3.value;
4021                         })();
4022                         return l3.value;
4023                     })((function(){
4024                         var tmp = v449;
4025                         return tmp === l3.value? l3.value: tmp.cdr;
4026                     })(),l3.value);
4027                 })() : (l26.fvalue(pv, v450, l204) !== l3.value ? (function(){
4028                     return (function(v457,v458){
4029                         (function(){
4030                             while(v457 !== l3.value){
4031                                 (v458 = (function(){
4032                                     var tmp = v457;
4033                                     return tmp === l3.value? l3.value: tmp.car;
4034                                 })());
4035                                 (function(){
4036                                     (function(v459){
4037                                         return l180.fvalue(pv, l204, v459);
4038                                     })(l199.fvalue(pv, v458, l105, l105));
4039                                     return l3.value;
4040                                 })();
4041                                 (v457 = (function(){
4042                                     var tmp = v457;
4043                                     return tmp === l3.value? l3.value: tmp.cdr;
4044                                 })());
4045                             }return l3.value;
4046                         })();
4047                         return l3.value;
4048                     })((function(){
4049                         var tmp = v449;
4050                         return tmp === l3.value? l3.value: tmp.cdr;
4051                     })(),l3.value);
4052                 })() : l3.value)));
4053             })((function(){
4054                 var tmp = v449;
4055                 return tmp === l3.value? l3.value: tmp.car;
4056             })());
4057         })();
4058     }));
4059     return l201;
4060 })();
4061 var l205 = {name: "PROCLAIM"};
4062 (l205).fvalue = (function(){
4063     var symbol = l201;
4064     var func = symbol.fvalue;
4065     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4066     return func;
4067 })();
4068 var l206 = {name: "*COMPILATIONS*"};
4069 (function(){
4070     (((l206.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l206).value = l3.value));
4071     return l206;
4072 })();
4073 var l207 = {name: "DEFINE-COMPILATION"};
4074 l207;
4075 var l208 = {name: "IF"};
4076 ((l206).value = ({car: l44.fvalue(pv, l208, (function (values,v461,v462,v463){
4077     checkArgs(arguments, 4);
4078     return (function(){
4079         return l134.fvalue(values, "(", l145.fvalue(pv, v461), " !== ", l145.fvalue(pv, l3.value), " ? ", l145.fvalue(pv, v462, (function(){
4080             var symbol = l172;
4081             var value = symbol.value;
4082             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4083             return value;
4084         })()), " : ", l145.fvalue(pv, v463, (function(){
4085             var symbol = l172;
4086             var value = symbol.value;
4087             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4088             return value;
4089         })()), ")");
4090     })();
4091 })), cdr: (function(){
4092     var symbol = l206;
4093     var value = symbol.value;
4094     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4095     return value;
4096 })()}));
4097 var l209 = {name: "*LAMBDA-LIST-KEYWORDS*"};
4098 var l210 = {name: "&OPTIONAL"};
4099 var l211 = {name: "&REST"};
4100 var l212 = QIList(l210,l211,l3);
4101 (function(){
4102     (((l209.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l209).value = l212));
4103     return l209;
4104 })();
4105 var l213 = {name: "LIST-UNTIL-KEYWORD"};
4106 (function(){
4107     (l213).fvalue = (function(v466){
4108         ((v466)["fname"] = "LIST-UNTIL-KEYWORD");
4109         return v466;
4110     })((function (values,v464){
4111         checkArgs(arguments, 2);
4112         return (function(){
4113             return ((function(v465){
4114                 return (v465 !== l3.value ? v465 : l88.fvalue(pv, (function(){
4115                     var tmp = v464;
4116                     return tmp === l3.value? l3.value: tmp.car;
4117                 })(), (function(){
4118                     var symbol = l209;
4119                     var value = symbol.value;
4120                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4121                     return value;
4122                 })()));
4123             })(l12.fvalue(pv, v464)) !== l3.value ? l3.value : ({car: (function(){
4124                 var tmp = v464;
4125                 return tmp === l3.value? l3.value: tmp.car;
4126             })(), cdr: l213.fvalue(pv, (function(){
4127                 var tmp = v464;
4128                 return tmp === l3.value? l3.value: tmp.cdr;
4129             })())}));
4130         })();
4131     }));
4132     return l213;
4133 })();
4134 var l214 = {name: "LAMBDA-LIST-REQUIRED-ARGUMENTS"};
4135 (function(){
4136     (l214).fvalue = (function(v468){
4137         ((v468)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
4138         return v468;
4139     })((function (values,v467){
4140         checkArgs(arguments, 2);
4141         return (function(){
4142             return l213.fvalue(values, v467);
4143         })();
4144     }));
4145     return l214;
4146 })();
4147 var l215 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"};
4148 (function(){
4149     (l215).fvalue = (function(v470){
4150         ((v470)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
4151         return v470;
4152     })((function (values,v469){
4153         checkArgs(arguments, 2);
4154         return (function(){
4155             return l73.fvalue(values, (function(){
4156                 var symbol = l58;
4157                 var func = symbol.fvalue;
4158                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4159                 return func;
4160             })(), l213.fvalue(pv, (function(){
4161                 var tmp = l88.fvalue(pv, l210, v469);
4162                 return tmp === l3.value? l3.value: tmp.cdr;
4163             })()));
4164         })();
4165     }));
4166     return l215;
4167 })();
4168 var l216 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS"};
4169 (function(){
4170     (l216).fvalue = (function(v472){
4171         ((v472)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
4172         return v472;
4173     })((function (values,v471){
4174         checkArgs(arguments, 2);
4175         return (function(){
4176             return l73.fvalue(values, (function(){
4177                 var symbol = l30;
4178                 var func = symbol.fvalue;
4179                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4180                 return func;
4181             })(), l215.fvalue(pv, v471));
4182         })();
4183     }));
4184     return l216;
4185 })();
4186 var l217 = {name: "LAMBDA-LIST-REST-ARGUMENT"};
4187 (function(){
4188     (l217).fvalue = (function(v475){
4189         ((v475)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
4190         return v475;
4191     })((function (values,v473){
4192         checkArgs(arguments, 2);
4193         return (function(){
4194             return (function(v474){
4195                 ((function(){
4196                     var tmp = v474;
4197                     return tmp === l3.value? l3.value: tmp.cdr;
4198                 })() !== l3.value ? (function(){
4199                     throw "Bad lambda-list";
4200                 })() : l3.value);
4201                 return (function(){
4202                     var tmp = v474;
4203                     return tmp === l3.value? l3.value: tmp.car;
4204                 })();
4205             })(l213.fvalue(pv, (function(){
4206                 var tmp = l88.fvalue(pv, l211, v473);
4207                 return tmp === l3.value? l3.value: tmp.cdr;
4208             })()));
4209         })();
4210     }));
4211     return l217;
4212 })();
4213 var l218 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
4214 (function(){
4215     (l218).fvalue = (function(v478){
4216         ((v478)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
4217         return v478;
4218     })((function (values,v477){
4219         checkArgsAtLeast(arguments, 2);
4220         var v476= l3.value;
4221         for (var i = arguments.length-1; i>=2; i--)
4222             v476 = {car: arguments[i], cdr:
4223         v476};
4224         return (function(){
4225             return (v477 !== l3.value ? l134.fvalue(values, "(function(){", (function(){
4226                 var symbol = l133;
4227                 var value = symbol.value;
4228                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4229                 return value;
4230             })(), l143.fvalue(pv, "var func = ", l136.fvalue(pv, v476), ";", (function(){
4231                 var symbol = l133;
4232                 var value = symbol.value;
4233                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4234                 return value;
4235             })(), "func.docstring = '", v477, "';", (function(){
4236                 var symbol = l133;
4237                 var value = symbol.value;
4238                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4239                 return value;
4240             })(), "return func;", (function(){
4241                 var symbol = l133;
4242                 var value = symbol.value;
4243                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4244                 return value;
4245             })()), "})()") : l136.fvalue(values, v476));
4246         })();
4247     }));
4248     return l218;
4249 })();
4250 var l219 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"};
4251 var l220 = {name: "N/A"};
4252 (function(){
4253     (l219).fvalue = (function(v484){
4254         ((v484)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT");
4255         return v484;
4256     })((function (values,v479,v480,v481){
4257         checkArgs(arguments, 4);
4258         return (function(){
4259             return (function(v482,v483){
4260                 return (function(){
4261                     try {
4262                         (((function(){
4263                             var x1 = 1;
4264                             if (typeof x1 !== 'number') throw 'Not a number!';
4265                             var x2 = v482;
4266                             if (typeof x2 !== 'number') throw 'Not a number!';
4267                             return (x1<x2?l4.value: l3.value);
4268                         })() !== l3.value ? l26.fvalue(pv, v482, v483) : l3.value) !== l3.value ? (function(){
4269                             var values = mv;
4270                             throw ({type: 'block', id: 182, values: l134.fvalue(values, "checkArgs(arguments, ", l17.fvalue(pv, v482), ");", (function(){
4271                                 var symbol = l133;
4272                                 var value = symbol.value;
4273                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4274                                 return value;
4275                             })()), message: 'Return from unknown block NIL.'})
4276                         })() : l3.value);
4277                         return l134.fvalue(values, ((function(){
4278                             var x1 = 1;
4279                             if (typeof x1 !== 'number') throw 'Not a number!';
4280                             var x2 = v482;
4281                             if (typeof x2 !== 'number') throw 'Not a number!';
4282                             return (x1<x2?l4.value: l3.value);
4283                         })() !== l3.value ? l134.fvalue(pv, "checkArgsAtLeast(arguments, ", l17.fvalue(pv, v482), ");", (function(){
4284                             var symbol = l133;
4285                             var value = symbol.value;
4286                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4287                             return value;
4288                         })()) : ""), (((typeof (v483) == "number")?l4.value: l3.value) !== l3.value ? l134.fvalue(pv, "checkArgsAtMost(arguments, ", l17.fvalue(pv, v483), ");", (function(){
4289                             var symbol = l133;
4290                             var value = symbol.value;
4291                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4292                             return value;
4293                         })()) : ""));
4294                     }
4295                     catch (cf){
4296                         if (cf.type == 'block' && cf.id == 182)
4297                             return values.apply(this, forcemv(cf.values));
4298                         else
4299                             throw cf;
4300                     }
4301                 })();
4302             })(l22.fvalue(pv, v479),(v481 !== l3.value ? l220 : (function(){
4303                 var x1 = 1;
4304                 if (typeof x1 !== 'number') throw 'Not a number!';
4305                 var x2 = v479;
4306                 if (typeof x2 !== 'number') throw 'Not a number!';
4307                 var x3 = v480;
4308                 if (typeof x3 !== 'number') throw 'Not a number!';
4309                 return x1+x2+x3;
4310             })()));
4311         })();
4312     }));
4313     return l219;
4314 })();
4315 var l221 = {name: "COMPILE-LAMBDA"};
4316 var l222 = {name: "LS-COMPILE-BLOCK"};
4317 (function(){
4318     (l221).fvalue = (function(v500){
4319         ((v500)["fname"] = "COMPILE-LAMBDA");
4320         return v500;
4321     })((function (values,v485,v486){
4322         checkArgs(arguments, 3);
4323         return (function(){
4324             return (function(v487,v488,v489,v490){
4325                 ((((typeof((function(){
4326                     var tmp = v486;
4327                     return tmp === l3.value? l3.value: tmp.car;
4328                 })()) == "string")?l4.value: l3.value) !== l3.value ? l27.fvalue(pv, l12.fvalue(pv, (function(){
4329                     var tmp = v486;
4330                     return tmp === l3.value? l3.value: tmp.cdr;
4331                 })())) : l3.value) !== l3.value ? (function(){
4332                     (v490 = (function(){
4333                         var tmp = v486;
4334                         return tmp === l3.value? l3.value: tmp.car;
4335                     })());
4336                     return (v486 = (function(){
4337                         var tmp = v486;
4338                         return tmp === l3.value? l3.value: tmp.cdr;
4339                     })());
4340                 })() : l3.value);
4341                 return (function(v491,v492,v493){
4342                     try {
4343                         var tmp;
4344                         tmp = l188.value;
4345                         l188.value = v493;
4346                         v493 = tmp;
4347                         return l218.fvalue(values, v490, "(function (", l136.fvalue(pv, ({car: "values", cdr: l73.fvalue(pv, (function(){
4348                             var symbol = l191;
4349                             var func = symbol.fvalue;
4350                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4351                             return func;
4352                         })(), l64.fvalue(pv, v487, v488))}), ","), "){", (function(){
4353                             var symbol = l133;
4354                             var value = symbol.value;
4355                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4356                             return value;
4357                         })(), l143.fvalue(pv, l219.fvalue(pv, v491, v492, v489), (v488 !== l3.value ? l134.fvalue(pv, "switch(arguments.length-1){", (function(){
4358                             var symbol = l133;
4359                             var value = symbol.value;
4360                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4361                             return value;
4362                         })(), (function(v494,v495,v496){
4363                             return (function(){
4364                                 (function(){
4365                                     return (function(){
4366                                         while((function(){
4367                                             var x1 = v496;
4368                                             if (typeof x1 !== 'number') throw 'Not a number!';
4369                                             var x2 = v492;
4370                                             if (typeof x2 !== 'number') throw 'Not a number!';
4371                                             return (x1<x2?l4.value: l3.value);
4372                                         })() !== l3.value){
4373                                             (function(v497){
4374                                                 (v495 = ({car: l134.fvalue(pv, "case ", l17.fvalue(pv, (function(){
4375                                                     var x1 = v496;
4376                                                     if (typeof x1 !== 'number') throw 'Not a number!';
4377                                                     var x2 = v491;
4378                                                     if (typeof x2 !== 'number') throw 'Not a number!';
4379                                                     return x1+x2;
4380                                                 })()), ":", (function(){
4381                                                     var symbol = l133;
4382                                                     var value = symbol.value;
4383                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4384                                                     return value;
4385                                                 })(), l191.fvalue(pv, (function(){
4386                                                     var tmp = v497;
4387                                                     return tmp === l3.value? l3.value: tmp.car;
4388                                                 })()), "=", l145.fvalue(pv, l33.fvalue(pv, v497)), ";", (function(){
4389                                                     var symbol = l133;
4390                                                     var value = symbol.value;
4391                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4392                                                     return value;
4393                                                 })()), cdr: v495}));
4394                                                 return (v496 = (function(){
4395                                                     var x1 = v496;
4396                                                     if (typeof x1 !== 'number') throw 'Not a number!';
4397                                                     var x2 = 1;
4398                                                     if (typeof x2 !== 'number') throw 'Not a number!';
4399                                                     return x1+x2;
4400                                                 })());
4401                                             })(l85.fvalue(pv, v496, v494));
4402                                         }return l3.value;
4403                                     })();
4404                                 })();
4405                                 (v495 = ({car: l134.fvalue(pv, "default: break;", (function(){
4406                                     var symbol = l133;
4407                                     var value = symbol.value;
4408                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4409                                     return value;
4410                                 })()), cdr: v495}));
4411                                 return l136.fvalue(pv, l66.fvalue(pv, v495));
4412                             })();
4413                         })(l215.fvalue(pv, v485),l3.value,0), "}", (function(){
4414                             var symbol = l133;
4415                             var value = symbol.value;
4416                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4417                             return value;
4418                         })()) : ""), (v489 !== l3.value ? (function(v498){
4419                             return l134.fvalue(pv, "var ", v498, "= ", l145.fvalue(pv, l3.value), ";", (function(){
4420                                 var symbol = l133;
4421                                 var value = symbol.value;
4422                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4423                                 return value;
4424                             })(), "for (var i = arguments.length-1; i>=", l17.fvalue(pv, (function(){
4425                                 var x1 = 1;
4426                                 if (typeof x1 !== 'number') throw 'Not a number!';
4427                                 var x2 = v491;
4428                                 if (typeof x2 !== 'number') throw 'Not a number!';
4429                                 var x3 = v492;
4430                                 if (typeof x3 !== 'number') throw 'Not a number!';
4431                                 return x1+x2+x3;
4432                             })()), "; i--)", (function(){
4433                                 var symbol = l133;
4434                                 var value = symbol.value;
4435                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4436                                 return value;
4437                             })(), l143.fvalue(pv, v498, " = ", "{car: arguments[i], cdr: "), v498, "};", (function(){
4438                                 var symbol = l133;
4439                                 var value = symbol.value;
4440                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4441                                 return value;
4442                             })());
4443                         })(l191.fvalue(pv, v489)) : ""), (function(v499){
4444                             try {
4445                                 var tmp;
4446                                 tmp = l172.value;
4447                                 l172.value = v499;
4448                                 v499 = tmp;
4449                                 return l222.fvalue(pv, v486, l4.value);
4450                             }
4451                             finally {
4452                                 l172.value = v499;
4453                             }
4454                         })(l4.value)), "})");
4455                     }
4456                     finally {
4457                         l188.value = v493;
4458                     }
4459                 })(l71.fvalue(pv, v487),l71.fvalue(pv, v488),l192.fvalue(pv, l64.fvalue(pv, l58.fvalue(pv, v489), v487, v488)));
4460             })(l214.fvalue(pv, v485),l216.fvalue(pv, v485),l217.fvalue(pv, v485),l3.value);
4461         })();
4462     }));
4463     return l221;
4464 })();
4465 var l223 = {name: "SETQ-PAIR"};
4466 var l224 = {name: "SET"};
4467 (function(){
4468     (l223).fvalue = (function(v504){
4469         ((v504)["fname"] = "SETQ-PAIR");
4470         return v504;
4471     })((function (values,v501,v502){
4472         checkArgs(arguments, 3);
4473         return (function(){
4474             return (function(v503){
4475                 return ((((l175.fvalue(pv, v503) === l105)?l4.value: l3.value) !== l3.value ? (l27.fvalue(pv, l88.fvalue(pv, l202, l177.fvalue(pv, v503))) !== l3.value ? l27.fvalue(pv, l88.fvalue(pv, l204, l177.fvalue(pv, v503))) : l3.value) : l3.value) !== l3.value ? l134.fvalue(values, l176.fvalue(pv, v503), " = ", l145.fvalue(pv, v502)) : l145.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l224), l44.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, v501))), l44.fvalue(pv, v502))));
4476             })(l187.fvalue(pv, v501, (function(){
4477                 var symbol = l188;
4478                 var value = symbol.value;
4479                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4480                 return value;
4481             })(), l105));
4482         })();
4483     }));
4484     return l223;
4485 })();
4486 var l225 = {name: "SETQ"};
4487 ((l206).value = ({car: l44.fvalue(pv, l225, (function (values){
4488     var v505= l3.value;
4489     for (var i = arguments.length-1; i>=1; i--)
4490         v505 = {car: arguments[i], cdr:
4491     v505};
4492     return (function(){
4493         return (function(v506){
4494             (function(){
4495                 try {
4496                     return (function(){
4497                         while(l4.value !== l3.value){
4498                             (l12.fvalue(pv, v505) !== l3.value ? (function(){
4499                                 throw ({type: 'block', id: 187, values: l3.value, message: 'Return from unknown block NIL.'})
4500                             })() : (l12.fvalue(pv, (function(){
4501                                 var tmp = v505;
4502                                 return tmp === l3.value? l3.value: tmp.cdr;
4503                             })()) !== l3.value ? (function(){
4504                                 throw "Odd paris in SETQ";
4505                             })() : (function(){
4506                                 (v506 = l134.fvalue(pv, v506, l134.fvalue(pv, l223.fvalue(pv, (function(){
4507                                     var tmp = v505;
4508                                     return tmp === l3.value? l3.value: tmp.car;
4509                                 })(), l33.fvalue(pv, v505)), (l12.fvalue(pv, l35.fvalue(pv, v505)) !== l3.value ? "" : ", "))));
4510                                 return (v505 = l35.fvalue(pv, v505));
4511                             })()));
4512                         }return l3.value;
4513                     })();
4514                 }
4515                 catch (cf){
4516                     if (cf.type == 'block' && cf.id == 187)
4517                         return cf.values;
4518                     else
4519                         throw cf;
4520                 }
4521             })();
4522             return l134.fvalue(values, "(", v506, ")");
4523         })("");
4524     })();
4525 })), cdr: (function(){
4526     var symbol = l206;
4527     var value = symbol.value;
4528     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4529     return value;
4530 })()}));
4531 var l226 = {name: "JS-VREF"};
4532 ((l206).value = ({car: l44.fvalue(pv, l226, (function (values,v507){
4533     checkArgs(arguments, 2);
4534     return (function(){
4535         return v507;
4536     })();
4537 })), cdr: (function(){
4538     var symbol = l206;
4539     var value = symbol.value;
4540     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4541     return value;
4542 })()}));
4543 var l227 = {name: "JS-VSET"};
4544 ((l206).value = ({car: l44.fvalue(pv, l227, (function (values,v508,v509){
4545     checkArgs(arguments, 3);
4546     return (function(){
4547         return l134.fvalue(values, "(", v508, " = ", l145.fvalue(pv, v509), ")");
4548     })();
4549 })), cdr: (function(){
4550     var symbol = l206;
4551     var value = symbol.value;
4552     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4553     return value;
4554 })()}));
4555 (function(){
4556     (l148).fvalue = (function(v516){
4557         ((v516)["fname"] = "ESCAPE-STRING");
4558         return v516;
4559     })((function (values,v510){
4560         checkArgs(arguments, 2);
4561         return (function(){
4562             return (function(v511,v512,v513){
4563                 (function(){
4564                     return (function(){
4565                         while((function(){
4566                             var x1 = v512;
4567                             if (typeof x1 !== 'number') throw 'Not a number!';
4568                             var x2 = v513;
4569                             if (typeof x2 !== 'number') throw 'Not a number!';
4570                             return (x1<x2?l4.value: l3.value);
4571                         })() !== l3.value){
4572                             (function(v514){
4573                                 ((function(v515){
4574                                     return (v515 !== l3.value ? v515 : l80.fvalue(pv, v514, 92));
4575                                 })(l80.fvalue(pv, v514, 34)) !== l3.value ? (v511 = l134.fvalue(pv, v511, "\\")) : l3.value);
4576                                 (l80.fvalue(pv, v514, 10) !== l3.value ? (function(){
4577                                     (v511 = l134.fvalue(pv, v511, "\\"));
4578                                     return (v514 = 110);
4579                                 })() : l3.value);
4580                                 return (v511 = l134.fvalue(pv, v511, l98.fvalue(pv, v514)));
4581                             })((function(){
4582                                 var string = v510;
4583                                 var index = v512;
4584                                 if (typeof string != 'string')
4585                                     throw 'The value ' + string + ' is not a type string.';
4586                                 if (typeof index != 'number')
4587                                     throw 'The value ' + index + ' is not a type number.';
4588                                 return string.charCodeAt(index);
4589                             })());
4590                             (v512 = (function(){
4591                                 var x1 = v512;
4592                                 if (typeof x1 !== 'number') throw 'Not a number!';
4593                                 var x2 = 1;
4594                                 if (typeof x2 !== 'number') throw 'Not a number!';
4595                                 return x1+x2;
4596                             })());
4597                         }return l3.value;
4598                     })();
4599                 })();
4600                 return v511;
4601             })("",0,l71.fvalue(pv, v510));
4602         })();
4603     }));
4604     return l148;
4605 })();
4606 var l228 = {name: "*LITERAL-SYMBOLS*"};
4607 (function(){
4608     (((l228.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l228).value = l3.value));
4609     return l228;
4610 })();
4611 var l229 = {name: "*LITERAL-COUNTER*"};
4612 (function(){
4613     (((l229.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l229).value = 0));
4614     return l229;
4615 })();
4616 var l230 = {name: "GENLIT"};
4617 (function(){
4618     (l230).fvalue = (function(v517){
4619         ((v517)["fname"] = "GENLIT");
4620         return v517;
4621     })((function (values){
4622         checkArgsAtMost(arguments, 1);
4623         return (function(){
4624             return l134.fvalue(values, "l", l17.fvalue(pv, ((l229).value = (function(){
4625                 var x1 = (function(){
4626                     var symbol = l229;
4627                     var value = symbol.value;
4628                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4629                     return value;
4630                 })();
4631                 if (typeof x1 !== 'number') throw 'Not a number!';
4632                 var x2 = 1;
4633                 if (typeof x2 !== 'number') throw 'Not a number!';
4634                 return x1+x2;
4635             })())));
4636         })();
4637     }));
4638     return l230;
4639 })();
4640 var l231 = {name: "LITERAL"};
4641 (function(){
4642     (l231).fvalue = (function(v532){
4643         ((v532)["fname"] = "LITERAL");
4644         return v532;
4645     })((function (values,v518,v519){
4646         checkArgsAtLeast(arguments, 2);
4647         checkArgsAtMost(arguments, 3);
4648         switch(arguments.length-1){
4649         case 1:
4650         v519=l3.value;
4651         default: break;
4652         }
4653         return (function(){
4654             return (l81.fvalue(pv, v518) !== l3.value ? l17.fvalue(values, v518) : (((typeof(v518) == "string")?l4.value: l3.value) !== l3.value ? l134.fvalue(values, "\"", l148.fvalue(pv, v518), "\"") : (((function(){
4655                 var tmp = v518;
4656                 return (typeof tmp == 'object' && 'name' in tmp);
4657             })()?l4.value: l3.value) !== l3.value ? (function(v520){
4658                 return (v520 !== l3.value ? v520 : (function(v522,v523){
4659                     ((l228).value = ({car: ({car: v518, cdr: v522}), cdr: (function(){
4660                         var symbol = l228;
4661                         var value = symbol.value;
4662                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4663                         return value;
4664                     })()}));
4665                     l194.fvalue(pv, l134.fvalue(pv, "var ", v522, " = ", v523));
4666                     return v522;
4667                 })(l230.fvalue(pv),(function(v521){
4668                     return (l12.fvalue(pv, v521) !== l3.value ? l134.fvalue(pv, "{name: \"", l148.fvalue(pv, (v518).name), "\"}") : l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l130), l44.fvalue(pv, (v518).name), l44.fvalue(pv, l114.fvalue(pv, v521)))));
4669                 })(l122.fvalue(pv, v518))));
4670             })((function(){
4671                 var tmp = l97.fvalue(pv, v518, (function(){
4672                     var symbol = l228;
4673                     var value = symbol.value;
4674                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4675                     return value;
4676                 })());
4677                 return tmp === l3.value? l3.value: tmp.cdr;
4678             })()) : (((function(){
4679                 var tmp = v518;
4680                 return (typeof tmp == 'object' && 'car' in tmp);
4681             })()?l4.value: l3.value) !== l3.value ? (function(){
4682                 var v524 = l87.fvalue(pv, v518);
4683                 var v525 = l86.fvalue(pv, v518);
4684                 var v526 = l134.fvalue(pv, "QIList(", l137.fvalue(pv, l73.fvalue(pv, (function (values,v527){
4685                     checkArgs(arguments, 2);
4686                     return l231.fvalue(values, v527, l4.value);
4687                 }), v524), ","), l231.fvalue(pv, (function(){
4688                     var tmp = v525;
4689                     return tmp === l3.value? l3.value: tmp.car;
4690                 })(), l4.value), ",", l231.fvalue(pv, (function(){
4691                     var tmp = v525;
4692                     return tmp === l3.value? l3.value: tmp.cdr;
4693                 })(), l4.value), ")");
4694                 return (v519 !== l3.value ? v526 : (function(v528){
4695                     l194.fvalue(pv, l134.fvalue(pv, "var ", v528, " = ", v526));
4696                     return v528;
4697                 })(l230.fvalue(pv)));
4698             })() : (((function(){
4699                 var x = v518;
4700                 return typeof x === 'object' && 'length' in x;
4701             })()?l4.value: l3.value) !== l3.value ? (function(v529){
4702                 return (function(v530){
4703                     return (v519 !== l3.value ? v530 : (function(v531){
4704                         l194.fvalue(pv, l134.fvalue(pv, "var ", v531, " = ", v530));
4705                         return v531;
4706                     })(l230.fvalue(pv)));
4707                 })(l134.fvalue(pv, "[", l136.fvalue(pv, l73.fvalue(pv, (function(){
4708                     var symbol = l231;
4709                     var func = symbol.fvalue;
4710                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4711                     return func;
4712                 })(), v529), ", "), "]"));
4713             })(l139.fvalue(pv, v518)) : l3.value)))));
4714         })();
4715     }));
4716     return l231;
4717 })();
4718 ((l206).value = ({car: l44.fvalue(pv, l167, (function (values,v533){
4719     checkArgs(arguments, 2);
4720     return (function(){
4721         return l231.fvalue(values, v533);
4722     })();
4723 })), cdr: (function(){
4724     var symbol = l206;
4725     var value = symbol.value;
4726     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4727     return value;
4728 })()}));
4729 var l232 = {name: "%WHILE"};
4730 ((l206).value = ({car: l44.fvalue(pv, l232, (function (values,v535){
4731     checkArgsAtLeast(arguments, 2);
4732     var v534= l3.value;
4733     for (var i = arguments.length-1; i>=2; i--)
4734         v534 = {car: arguments[i], cdr:
4735     v534};
4736     return (function(){
4737         return l134.fvalue(values, "(function(){", (function(){
4738             var symbol = l133;
4739             var value = symbol.value;
4740             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4741             return value;
4742         })(), l143.fvalue(pv, "while(", l145.fvalue(pv, v535), " !== ", l145.fvalue(pv, l3.value), "){", (function(){
4743             var symbol = l133;
4744             var value = symbol.value;
4745             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4746             return value;
4747         })(), l143.fvalue(pv, l222.fvalue(pv, v534)), "}", "return ", l145.fvalue(pv, l3.value), ";", (function(){
4748             var symbol = l133;
4749             var value = symbol.value;
4750             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4751             return value;
4752         })()), "})()");
4753     })();
4754 })), cdr: (function(){
4755     var symbol = l206;
4756     var value = symbol.value;
4757     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4758     return value;
4759 })()}));
4760 var l233 = {name: "SYMBOL-FUNCTION"};
4761 ((l206).value = ({car: l44.fvalue(pv, l104, (function (values,v536){
4762     checkArgs(arguments, 2);
4763     return (function(){
4764         return ((l59.fvalue(pv, v536) !== l3.value ? (((function(){
4765             var tmp = v536;
4766             return tmp === l3.value? l3.value: tmp.car;
4767         })() === l5)?l4.value: l3.value) : l3.value) !== l3.value ? l221.fvalue(values, l33.fvalue(pv, v536), l35.fvalue(pv, v536)) : (((function(){
4768             var tmp = v536;
4769             return (typeof tmp == 'object' && 'name' in tmp);
4770         })()?l4.value: l3.value) !== l3.value ? (function(v537){
4771             return (v537 !== l3.value ? l176.fvalue(values, v537) : l145.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l233), l44.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, v536))))));
4772         })(l187.fvalue(pv, v536, (function(){
4773             var symbol = l188;
4774             var value = symbol.value;
4775             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4776             return value;
4777         })(), l104)) : l3.value));
4778     })();
4779 })), cdr: (function(){
4780     var symbol = l206;
4781     var value = symbol.value;
4782     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4783     return value;
4784 })()}));
4785 var l234 = {name: "MAKE-FUNCTION-BINDING"};
4786 (function(){
4787     (l234).fvalue = (function(v539){
4788         ((v539)["fname"] = "MAKE-FUNCTION-BINDING");
4789         return v539;
4790     })((function (values,v538){
4791         checkArgs(arguments, 2);
4792         return (function(){
4793             return l173.fvalue(values, v538, l104, l190.fvalue(pv, v538));
4794         })();
4795     }));
4796     return l234;
4797 })();
4798 var l235 = {name: "COMPILE-FUNCTION-DEFINITION"};
4799 (function(){
4800     (l235).fvalue = (function(v541){
4801         ((v541)["fname"] = "COMPILE-FUNCTION-DEFINITION");
4802         return v541;
4803     })((function (values,v540){
4804         checkArgs(arguments, 2);
4805         return (function(){
4806             return l221.fvalue(values, (function(){
4807                 var tmp = v540;
4808                 return tmp === l3.value? l3.value: tmp.car;
4809             })(), (function(){
4810                 var tmp = v540;
4811                 return tmp === l3.value? l3.value: tmp.cdr;
4812             })());
4813         })();
4814     }));
4815     return l235;
4816 })();
4817 var l236 = {name: "TRANSLATE-FUNCTION"};
4818 (function(){
4819     (l236).fvalue = (function(v544){
4820         ((v544)["fname"] = "TRANSLATE-FUNCTION");
4821         return v544;
4822     })((function (values,v542){
4823         checkArgs(arguments, 2);
4824         return (function(){
4825             return (function(v543){
4826                 return l176.fvalue(values, v543);
4827             })(l187.fvalue(pv, v542, (function(){
4828                 var symbol = l188;
4829                 var value = symbol.value;
4830                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4831                 return value;
4832             })(), l104));
4833         })();
4834     }));
4835     return l236;
4836 })();
4837 var l237 = {name: "FLET"};
4838 ((l206).value = ({car: l44.fvalue(pv, l237, (function (values,v546){
4839     checkArgsAtLeast(arguments, 2);
4840     var v545= l3.value;
4841     for (var i = arguments.length-1; i>=2; i--)
4842         v545 = {car: arguments[i], cdr:
4843     v545};
4844     return (function(){
4845         return (function(){
4846             try {
4847                 var v551 = l188.value;
4848                 var v547 = l73.fvalue(pv, (function(){
4849                     var symbol = l30;
4850                     var func = symbol.fvalue;
4851                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4852                     return func;
4853                 })(), v546);
4854                 var v548 = l73.fvalue(pv, (function(){
4855                     var symbol = l31;
4856                     var func = symbol.fvalue;
4857                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4858                     return func;
4859                 })(), v546);
4860                 var v549 = l73.fvalue(pv, (function(){
4861                     var symbol = l235;
4862                     var func = symbol.fvalue;
4863                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4864                     return func;
4865                 })(), v548);
4866                 ((l188).value = l186.fvalue(pv, l73.fvalue(pv, (function(){
4867                     var symbol = l234;
4868                     var func = symbol.fvalue;
4869                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4870                     return func;
4871                 })(), v547), (function(){
4872                     var symbol = l188;
4873                     var value = symbol.value;
4874                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4875                     return value;
4876                 })(), l104));
4877                 return l134.fvalue(values, "(function(", l136.fvalue(pv, l73.fvalue(pv, (function(){
4878                     var symbol = l236;
4879                     var func = symbol.fvalue;
4880                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4881                     return func;
4882                 })(), v547), ","), "){", (function(){
4883                     var symbol = l133;
4884                     var value = symbol.value;
4885                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4886                     return value;
4887                 })(), (function(v550){
4888                     return l143.fvalue(pv, v550);
4889                 })(l222.fvalue(pv, v545, l4.value)), "})(", l136.fvalue(pv, v549, ","), ")");
4890             }
4891             finally {
4892                 l188.value = v551;
4893             }
4894         })();
4895     })();
4896 })), cdr: (function(){
4897     var symbol = l206;
4898     var value = symbol.value;
4899     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4900     return value;
4901 })()}));
4902 var l238 = {name: "LABELS"};
4903 ((l206).value = ({car: l44.fvalue(pv, l238, (function (values,v553){
4904     checkArgsAtLeast(arguments, 2);
4905     var v552= l3.value;
4906     for (var i = arguments.length-1; i>=2; i--)
4907         v552 = {car: arguments[i], cdr:
4908     v552};
4909     return (function(){
4910         return (function(){
4911             try {
4912                 var v556 = l188.value;
4913                 var v554 = l73.fvalue(pv, (function(){
4914                     var symbol = l30;
4915                     var func = symbol.fvalue;
4916                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4917                     return func;
4918                 })(), v553);
4919                 ((l188).value = l186.fvalue(pv, l73.fvalue(pv, (function(){
4920                     var symbol = l234;
4921                     var func = symbol.fvalue;
4922                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4923                     return func;
4924                 })(), v554), (function(){
4925                     var symbol = l188;
4926                     var value = symbol.value;
4927                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4928                     return value;
4929                 })(), l104));
4930                 return l134.fvalue(values, "(function(){", (function(){
4931                     var symbol = l133;
4932                     var value = symbol.value;
4933                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4934                     return value;
4935                 })(), l143.fvalue(pv, l138.fvalue(pv, (function (values,v555){
4936                     checkArgs(arguments, 2);
4937                     return l134.fvalue(values, "var ", l236.fvalue(pv, (function(){
4938                         var tmp = v555;
4939                         return tmp === l3.value? l3.value: tmp.car;
4940                     })()), " = ", l221.fvalue(pv, l33.fvalue(pv, v555), l35.fvalue(pv, v555)), ";", (function(){
4941                         var symbol = l133;
4942                         var value = symbol.value;
4943                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4944                         return value;
4945                     })());
4946                 }), v553), l222.fvalue(pv, v552, l4.value)), "})()");
4947             }
4948             finally {
4949                 l188.value = v556;
4950             }
4951         })();
4952     })();
4953 })), cdr: (function(){
4954     var symbol = l206;
4955     var value = symbol.value;
4956     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4957     return value;
4958 })()}));
4959 var l239 = {name: "*COMPILING-FILE*"};
4960 (function(){
4961     (((l239.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l239).value = l3.value));
4962     return l239;
4963 })();
4964 var l240 = {name: "EVAL-WHEN-COMPILE"};
4965 var l241 = {name: "PROGN"};
4966 var l242 = {name: "EVAL"};
4967 ((l206).value = ({car: l44.fvalue(pv, l240, (function (values){
4968     var v557= l3.value;
4969     for (var i = arguments.length-1; i>=1; i--)
4970         v557 = {car: arguments[i], cdr:
4971     v557};
4972     return (function(){
4973         return ((function(){
4974             var symbol = l239;
4975             var value = symbol.value;
4976             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4977             return value;
4978         })() !== l3.value ? (function(){
4979             l242.fvalue(pv, ({car: l241, cdr: v557}));
4980             return l3.value;
4981         })() : l145.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l241), v557)));
4982     })();
4983 })), cdr: (function(){
4984     var symbol = l206;
4985     var value = symbol.value;
4986     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4987     return value;
4988 })()}));
4989 var l243 = {name: "DEFINE-TRANSFORMATION"};
4990 l243;
4991 ((l206).value = ({car: l44.fvalue(pv, l241, (function (values){
4992     var v558= l3.value;
4993     for (var i = arguments.length-1; i>=1; i--)
4994         v558 = {car: arguments[i], cdr:
4995     v558};
4996     return (function(){
4997         return (l12.fvalue(pv, (function(){
4998             var tmp = v558;
4999             return tmp === l3.value? l3.value: tmp.cdr;
5000         })()) !== l3.value ? l145.fvalue(values, (function(){
5001             var tmp = v558;
5002             return tmp === l3.value? l3.value: tmp.car;
5003         })(), (function(){
5004             var symbol = l172;
5005             var value = symbol.value;
5006             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5007             return value;
5008         })()) : l134.fvalue(values, "(function(){", (function(){
5009             var symbol = l133;
5010             var value = symbol.value;
5011             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5012             return value;
5013         })(), l143.fvalue(pv, l222.fvalue(pv, v558, l4.value)), "})()"));
5014     })();
5015 })), cdr: (function(){
5016     var symbol = l206;
5017     var value = symbol.value;
5018     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5019     return value;
5020 })()}));
5021 var l244 = {name: "SPECIAL-VARIABLE-P"};
5022 (function(){
5023     (l244).fvalue = (function(v560){
5024         ((v560)["fname"] = "SPECIAL-VARIABLE-P");
5025         return v560;
5026     })((function (values,v559){
5027         checkArgs(arguments, 2);
5028         return (function(){
5029             return (l200.fvalue(pv, v559, l105, l202) !== l3.value ? l4.value : l3.value);
5030         })();
5031     }));
5032     return l244;
5033 })();
5034 var l245 = {name: "LET-BINDING-WRAPPER"};
5035 (function(){
5036     (l245).fvalue = (function(v567){
5037         ((v567)["fname"] = "LET-BINDING-WRAPPER");
5038         return v567;
5039     })((function (values,v561,v562){
5040         checkArgs(arguments, 3);
5041         return (function(){
5042             try {
5043                 (l12.fvalue(pv, v561) !== l3.value ? (function(){
5044                     var values = mv;
5045                     throw ({type: 'block', id: 205, values: v562, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
5046                 })() : l3.value);
5047                 return l134.fvalue(values, "try {", (function(){
5048                     var symbol = l133;
5049                     var value = symbol.value;
5050                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5051                     return value;
5052                 })(), l143.fvalue(pv, "var tmp;", (function(){
5053                     var symbol = l133;
5054                     var value = symbol.value;
5055                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5056                     return value;
5057                 })(), l138.fvalue(pv, (function (values,v563){
5058                     checkArgs(arguments, 2);
5059                     return (function(v564){
5060                         return l134.fvalue(values, "tmp = ", v564, ".value;", (function(){
5061                             var symbol = l133;
5062                             var value = symbol.value;
5063                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5064                             return value;
5065                         })(), v564, ".value = ", (function(){
5066                             var tmp = v563;
5067                             return tmp === l3.value? l3.value: tmp.cdr;
5068                         })(), ";", (function(){
5069                             var symbol = l133;
5070                             var value = symbol.value;
5071                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5072                             return value;
5073                         })(), (function(){
5074                             var tmp = v563;
5075                             return tmp === l3.value? l3.value: tmp.cdr;
5076                         })(), " = tmp;", (function(){
5077                             var symbol = l133;
5078                             var value = symbol.value;
5079                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5080                             return value;
5081                         })());
5082                     })(l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, (function(){
5083                         var tmp = v563;
5084                         return tmp === l3.value? l3.value: tmp.car;
5085                     })()))));
5086                 }), v561), v562, (function(){
5087                     var symbol = l133;
5088                     var value = symbol.value;
5089                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5090                     return value;
5091                 })()), "}", (function(){
5092                     var symbol = l133;
5093                     var value = symbol.value;
5094                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5095                     return value;
5096                 })(), "finally {", (function(){
5097                     var symbol = l133;
5098                     var value = symbol.value;
5099                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5100                     return value;
5101                 })(), l143.fvalue(pv, l138.fvalue(pv, (function (values,v565){
5102                     checkArgs(arguments, 2);
5103                     return (function(v566){
5104                         return l134.fvalue(values, v566, ".value", " = ", (function(){
5105                             var tmp = v565;
5106                             return tmp === l3.value? l3.value: tmp.cdr;
5107                         })(), ";", (function(){
5108                             var symbol = l133;
5109                             var value = symbol.value;
5110                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5111                             return value;
5112                         })());
5113                     })(l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, (function(){
5114                         var tmp = v565;
5115                         return tmp === l3.value? l3.value: tmp.car;
5116                     })()))));
5117                 }), v561)), "}", (function(){
5118                     var symbol = l133;
5119                     var value = symbol.value;
5120                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5121                     return value;
5122                 })());
5123             }
5124             catch (cf){
5125                 if (cf.type == 'block' && cf.id == 205)
5126                     return values.apply(this, forcemv(cf.values));
5127                 else
5128                     throw cf;
5129             }
5130         })();
5131     }));
5132     return l245;
5133 })();
5134 var l246 = {name: "LET"};
5135 ((l206).value = ({car: l44.fvalue(pv, l246, (function (values,v569){
5136     checkArgsAtLeast(arguments, 2);
5137     var v568= l3.value;
5138     for (var i = arguments.length-1; i>=2; i--)
5139         v568 = {car: arguments[i], cdr:
5140     v568};
5141     return (function(){
5142         return (function(){
5143             try {
5144                 var v577 = l188.value;
5145                 var v570 = l73.fvalue(pv, (function(){
5146                     var symbol = l58;
5147                     var func = symbol.fvalue;
5148                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5149                     return func;
5150                 })(), v569);
5151                 var v571 = l73.fvalue(pv, (function(){
5152                     var symbol = l39;
5153                     var func = symbol.fvalue;
5154                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5155                     return func;
5156                 })(), v570);
5157                 var v572 = l73.fvalue(pv, (function(){
5158                     var symbol = l145;
5159                     var func = symbol.fvalue;
5160                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5161                     return func;
5162                 })(), l73.fvalue(pv, (function(){
5163                     var symbol = l40;
5164                     var func = symbol.fvalue;
5165                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5166                     return func;
5167                 })(), v570));
5168                 ((l188).value = l192.fvalue(pv, l90.fvalue(pv, (function(){
5169                     var symbol = l244;
5170                     var func = symbol.fvalue;
5171                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5172                     return func;
5173                 })(), v571)));
5174                 var v573 = l3.value;
5175                 return l134.fvalue(values, "(function(", l136.fvalue(pv, l73.fvalue(pv, (function (values,v574){
5176                     checkArgs(arguments, 2);
5177                     return (l244.fvalue(pv, v574) !== l3.value ? (function(v575){
5178                         (v573 = ({car: ({car: v574, cdr: v575}), cdr: v573}));
5179                         return v575;
5180                     })(l190.fvalue(pv, v574)) : l191.fvalue(values, v574));
5181                 }), v571), ","), "){", (function(){
5182                     var symbol = l133;
5183                     var value = symbol.value;
5184                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5185                     return value;
5186                 })(), (function(v576){
5187                     return l143.fvalue(pv, l245.fvalue(pv, v573, v576));
5188                 })(l222.fvalue(pv, v568, l4.value)), "})(", l136.fvalue(pv, v572, ","), ")");
5189             }
5190             finally {
5191                 l188.value = v577;
5192             }
5193         })();
5194     })();
5195 })), cdr: (function(){
5196     var symbol = l206;
5197     var value = symbol.value;
5198     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5199     return value;
5200 })()}));
5201 var l247 = {name: "LET*-INITIALIZE-VALUE"};
5202 (function(){
5203     (l247).fvalue = (function(v584){
5204         ((v584)["fname"] = "LET*-INITIALIZE-VALUE");
5205         return v584;
5206     })((function (values,v578){
5207         checkArgs(arguments, 2);
5208         return (function(){
5209             return (function(v579,v580){
5210                 return (l244.fvalue(pv, v579) !== l3.value ? l134.fvalue(values, l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l225), l44.fvalue(pv, v579), l44.fvalue(pv, v580))), ";", (function(){
5211                     var symbol = l133;
5212                     var value = symbol.value;
5213                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5214                     return value;
5215                 })()) : (function(){
5216                     var v581 = l190.fvalue(pv, v579);
5217                     var v582 = l173.fvalue(pv, v579, l105, v581);
5218                     return (function(v583){
5219                         l183.fvalue(pv, v582, (function(){
5220                             var symbol = l188;
5221                             var value = symbol.value;
5222                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5223                             return value;
5224                         })(), l105);
5225                         return v583;
5226                     })(l134.fvalue(pv, "var ", v581, " = ", l145.fvalue(pv, v580), ";", (function(){
5227                         var symbol = l133;
5228                         var value = symbol.value;
5229                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5230                         return value;
5231                     })()));
5232                 })());
5233             })(l39.fvalue(pv, v578),l40.fvalue(pv, v578));
5234         })();
5235     }));
5236     return l247;
5237 })();
5238 var l248 = {name: "LET*-BINDING-WRAPPER"};
5239 (function(){
5240     (l248).fvalue = (function(v593){
5241         ((v593)["fname"] = "LET*-BINDING-WRAPPER");
5242         return v593;
5243     })((function (values,v585,v586){
5244         checkArgs(arguments, 3);
5245         return (function(){
5246             try {
5247                 (l12.fvalue(pv, v585) !== l3.value ? (function(){
5248                     var values = mv;
5249                     throw ({type: 'block', id: 208, values: v586, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
5250                 })() : l3.value);
5251                 return (function(v588){
5252                     return l134.fvalue(values, "try {", (function(){
5253                         var symbol = l133;
5254                         var value = symbol.value;
5255                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5256                         return value;
5257                     })(), l143.fvalue(pv, l138.fvalue(pv, (function (values,v589){
5258                         checkArgs(arguments, 2);
5259                         return (function(v590){
5260                             return l134.fvalue(values, "var ", (function(){
5261                                 var tmp = v589;
5262                                 return tmp === l3.value? l3.value: tmp.cdr;
5263                             })(), " = ", v590, ".value;", (function(){
5264                                 var symbol = l133;
5265                                 var value = symbol.value;
5266                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5267                                 return value;
5268                             })());
5269                         })(l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, (function(){
5270                             var tmp = v589;
5271                             return tmp === l3.value? l3.value: tmp.car;
5272                         })()))));
5273                     }), v588), v586), "}", (function(){
5274                         var symbol = l133;
5275                         var value = symbol.value;
5276                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5277                         return value;
5278                     })(), "finally {", (function(){
5279                         var symbol = l133;
5280                         var value = symbol.value;
5281                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5282                         return value;
5283                     })(), l143.fvalue(pv, l138.fvalue(pv, (function (values,v591){
5284                         checkArgs(arguments, 2);
5285                         return (function(v592){
5286                             return l134.fvalue(values, v592, ".value", " = ", (function(){
5287                                 var tmp = v591;
5288                                 return tmp === l3.value? l3.value: tmp.cdr;
5289                             })(), ";", (function(){
5290                                 var symbol = l133;
5291                                 var value = symbol.value;
5292                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5293                                 return value;
5294                             })());
5295                         })(l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, (function(){
5296                             var tmp = v591;
5297                             return tmp === l3.value? l3.value: tmp.car;
5298                         })()))));
5299                     }), v588)), "}", (function(){
5300                         var symbol = l133;
5301                         var value = symbol.value;
5302                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5303                         return value;
5304                     })());
5305                 })(l73.fvalue(pv, (function (values,v587){
5306                     checkArgs(arguments, 2);
5307                     return ({car: v587, cdr: l190.fvalue(pv, v587)});
5308                 }), l91.fvalue(pv, (function(){
5309                     var symbol = l244;
5310                     var func = symbol.fvalue;
5311                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5312                     return func;
5313                 })(), v585)));
5314             }
5315             catch (cf){
5316                 if (cf.type == 'block' && cf.id == 208)
5317                     return values.apply(this, forcemv(cf.values));
5318                 else
5319                     throw cf;
5320             }
5321         })();
5322     }));
5323     return l248;
5324 })();
5325 var l249 = {name: "LET*"};
5326 ((l206).value = ({car: l44.fvalue(pv, l249, (function (values,v595){
5327     checkArgsAtLeast(arguments, 2);
5328     var v594= l3.value;
5329     for (var i = arguments.length-1; i>=2; i--)
5330         v594 = {car: arguments[i], cdr:
5331     v594};
5332     return (function(){
5333         return (function(v596,v597){
5334             try {
5335                 var tmp;
5336                 tmp = l188.value;
5337                 l188.value = v597;
5338                 v597 = tmp;
5339                 return l134.fvalue(values, "(function(){", (function(){
5340                     var symbol = l133;
5341                     var value = symbol.value;
5342                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5343                     return value;
5344                 })(), l143.fvalue(pv, (function(v598,v599){
5345                     return l248.fvalue(pv, v598, v599);
5346                 })(l91.fvalue(pv, (function(){
5347                     var symbol = l244;
5348                     var func = symbol.fvalue;
5349                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5350                     return func;
5351                 })(), l73.fvalue(pv, (function(){
5352                     var symbol = l39;
5353                     var func = symbol.fvalue;
5354                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5355                     return func;
5356                 })(), v596)),l134.fvalue(pv, l138.fvalue(pv, (function(){
5357                     var symbol = l247;
5358                     var func = symbol.fvalue;
5359                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5360                     return func;
5361                 })(), v596), l222.fvalue(pv, v594, l4.value)))), "})()");
5362             }
5363             finally {
5364                 l188.value = v597;
5365             }
5366         })(l73.fvalue(pv, (function(){
5367             var symbol = l58;
5368             var func = symbol.fvalue;
5369             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5370             return func;
5371         })(), v595),l182.fvalue(pv, (function(){
5372             var symbol = l188;
5373             var value = symbol.value;
5374             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5375             return value;
5376         })()));
5377     })();
5378 })), cdr: (function(){
5379     var symbol = l206;
5380     var value = symbol.value;
5381     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5382     return value;
5383 })()}));
5384 var l250 = {name: "*BLOCK-COUNTER*"};
5385 (function(){
5386     (((l250.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l250).value = 0));
5387     return l250;
5388 })();
5389 var l251 = {name: "MULTIPLE-VALUE"};
5390 var l252 = {name: "USED"};
5391 ((l206).value = ({car: l44.fvalue(pv, l184, (function (values,v601){
5392     checkArgsAtLeast(arguments, 2);
5393     var v600= l3.value;
5394     for (var i = arguments.length-1; i>=2; i--)
5395         v600 = {car: arguments[i], cdr:
5396     v600};
5397     return (function(){
5398         return (function(){
5399             var v602 = l17.fvalue(pv, ((l250).value = (function(){
5400                 var x1 = (function(){
5401                     var symbol = l250;
5402                     var value = symbol.value;
5403                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5404                     return value;
5405                 })();
5406                 if (typeof x1 !== 'number') throw 'Not a number!';
5407                 var x2 = 1;
5408                 if (typeof x2 !== 'number') throw 'Not a number!';
5409                 return x1+x2;
5410             })()));
5411             var v603 = l173.fvalue(pv, v601, l184, v602);
5412             ((function(){
5413                 var symbol = l172;
5414                 var value = symbol.value;
5415                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5416                 return value;
5417             })() !== l3.value ? l180.fvalue(pv, l251, v603) : l3.value);
5418             return (function(){
5419                 try {
5420                     var v605 = l188.value;
5421                     ((l188).value = l186.fvalue(pv, l44.fvalue(pv, v603), (function(){
5422                         var symbol = l188;
5423                         var value = symbol.value;
5424                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5425                         return value;
5426                     })(), l184));
5427                     var v604 = l222.fvalue(pv, v600, l4.value);
5428                     return (l88.fvalue(pv, l252, l177.fvalue(pv, v603)) !== l3.value ? l134.fvalue(values, "(function(){", (function(){
5429                         var symbol = l133;
5430                         var value = symbol.value;
5431                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5432                         return value;
5433                     })(), l143.fvalue(pv, "try {", (function(){
5434                         var symbol = l133;
5435                         var value = symbol.value;
5436                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5437                         return value;
5438                     })(), l143.fvalue(pv, v604), "}", (function(){
5439                         var symbol = l133;
5440                         var value = symbol.value;
5441                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5442                         return value;
5443                     })(), "catch (cf){", (function(){
5444                         var symbol = l133;
5445                         var value = symbol.value;
5446                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5447                         return value;
5448                     })(), "    if (cf.type == 'block' && cf.id == ", v602, ")", (function(){
5449                         var symbol = l133;
5450                         var value = symbol.value;
5451                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5452                         return value;
5453                     })(), ((function(){
5454                         var symbol = l172;
5455                         var value = symbol.value;
5456                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5457                         return value;
5458                     })() !== l3.value ? "        return values.apply(this, forcemv(cf.values));" : "        return cf.values;"), (function(){
5459                         var symbol = l133;
5460                         var value = symbol.value;
5461                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5462                         return value;
5463                     })(), "    else", (function(){
5464                         var symbol = l133;
5465                         var value = symbol.value;
5466                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5467                         return value;
5468                     })(), "        throw cf;", (function(){
5469                         var symbol = l133;
5470                         var value = symbol.value;
5471                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5472                         return value;
5473                     })(), "}", (function(){
5474                         var symbol = l133;
5475                         var value = symbol.value;
5476                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5477                         return value;
5478                     })()), "})()") : l134.fvalue(values, "(function(){", (function(){
5479                         var symbol = l133;
5480                         var value = symbol.value;
5481                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5482                         return value;
5483                     })(), l143.fvalue(pv, v604), "})()"));
5484                 }
5485                 finally {
5486                     l188.value = v605;
5487                 }
5488             })();
5489         })();
5490     })();
5491 })), cdr: (function(){
5492     var symbol = l206;
5493     var value = symbol.value;
5494     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5495     return value;
5496 })()}));
5497 var l253 = {name: "RETURN-FROM"};
5498 ((l206).value = ({car: l44.fvalue(pv, l253, (function (values,v606,v607){
5499     checkArgsAtLeast(arguments, 2);
5500     checkArgsAtMost(arguments, 3);
5501     switch(arguments.length-1){
5502     case 1:
5503     v607=l3.value;
5504     default: break;
5505     }
5506     return (function(){
5507         return (function(){
5508             var v608 = l187.fvalue(pv, v606, (function(){
5509                 var symbol = l188;
5510                 var value = symbol.value;
5511                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5512                 return value;
5513             })(), l184);
5514             var v609 = l88.fvalue(pv, l251, l177.fvalue(pv, v608));
5515             (l12.fvalue(pv, v608) !== l3.value ? (function(){
5516                 throw l134.fvalue(pv, "Unknown block `", (v606).name, "'.");
5517             })() : l3.value);
5518             l180.fvalue(pv, l252, v608);
5519             return l134.fvalue(values, "(function(){", (function(){
5520                 var symbol = l133;
5521                 var value = symbol.value;
5522                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5523                 return value;
5524             })(), l143.fvalue(pv, (v609 !== l3.value ? l134.fvalue(pv, "var values = mv;", (function(){
5525                 var symbol = l133;
5526                 var value = symbol.value;
5527                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5528                 return value;
5529             })()) : ""), "throw ({", "type: 'block', ", "id: ", l176.fvalue(pv, v608), ", ", "values: ", l145.fvalue(pv, v607, v609), ", ", "message: 'Return from unknown block ", (v606).name, ".'", "})"), "})()");
5530         })();
5531     })();
5532 })), cdr: (function(){
5533     var symbol = l206;
5534     var value = symbol.value;
5535     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5536     return value;
5537 })()}));
5538 var l254 = {name: "CATCH"};
5539 ((l206).value = ({car: l44.fvalue(pv, l254, (function (values,v611){
5540     checkArgsAtLeast(arguments, 2);
5541     var v610= l3.value;
5542     for (var i = arguments.length-1; i>=2; i--)
5543         v610 = {car: arguments[i], cdr:
5544     v610};
5545     return (function(){
5546         return l134.fvalue(values, "(function(){", (function(){
5547             var symbol = l133;
5548             var value = symbol.value;
5549             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5550             return value;
5551         })(), l143.fvalue(pv, "var id = ", l145.fvalue(pv, v611), ";", (function(){
5552             var symbol = l133;
5553             var value = symbol.value;
5554             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5555             return value;
5556         })(), "try {", (function(){
5557             var symbol = l133;
5558             var value = symbol.value;
5559             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5560             return value;
5561         })(), l143.fvalue(pv, l222.fvalue(pv, v610, l4.value)), (function(){
5562             var symbol = l133;
5563             var value = symbol.value;
5564             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5565             return value;
5566         })(), "}", (function(){
5567             var symbol = l133;
5568             var value = symbol.value;
5569             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5570             return value;
5571         })(), "catch (cf){", (function(){
5572             var symbol = l133;
5573             var value = symbol.value;
5574             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5575             return value;
5576         })(), "    if (cf.type == 'catch' && cf.id == id)", (function(){
5577             var symbol = l133;
5578             var value = symbol.value;
5579             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5580             return value;
5581         })(), ((function(){
5582             var symbol = l172;
5583             var value = symbol.value;
5584             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5585             return value;
5586         })() !== l3.value ? "        return values.apply(this, forcemv(cf.values));" : "        return pv.apply(this, forcemv(cf.values));"), (function(){
5587             var symbol = l133;
5588             var value = symbol.value;
5589             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5590             return value;
5591         })(), "    else", (function(){
5592             var symbol = l133;
5593             var value = symbol.value;
5594             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5595             return value;
5596         })(), "        throw cf;", (function(){
5597             var symbol = l133;
5598             var value = symbol.value;
5599             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5600             return value;
5601         })(), "}", (function(){
5602             var symbol = l133;
5603             var value = symbol.value;
5604             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5605             return value;
5606         })()), "})()");
5607     })();
5608 })), cdr: (function(){
5609     var symbol = l206;
5610     var value = symbol.value;
5611     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5612     return value;
5613 })()}));
5614 var l255 = {name: "THROW"};
5615 ((l206).value = ({car: l44.fvalue(pv, l255, (function (values,v612,v613){
5616     checkArgs(arguments, 3);
5617     return (function(){
5618         return l134.fvalue(values, "(function(){", (function(){
5619             var symbol = l133;
5620             var value = symbol.value;
5621             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5622             return value;
5623         })(), l143.fvalue(pv, "var values = mv;", (function(){
5624             var symbol = l133;
5625             var value = symbol.value;
5626             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5627             return value;
5628         })(), "throw ({", "type: 'catch', ", "id: ", l145.fvalue(pv, v612), ", ", "values: ", l145.fvalue(pv, v613, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
5629     })();
5630 })), cdr: (function(){
5631     var symbol = l206;
5632     var value = symbol.value;
5633     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5634     return value;
5635 })()}));
5636 var l256 = {name: "*TAGBODY-COUNTER*"};
5637 (function(){
5638     (((l256.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l256).value = 0));
5639     return l256;
5640 })();
5641 var l257 = {name: "*GO-TAG-COUNTER*"};
5642 (function(){
5643     (((l257.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l257).value = 0));
5644     return l257;
5645 })();
5646 var l258 = {name: "GO-TAG-P"};
5647 (function(){
5648     (l258).fvalue = (function(v616){
5649         ((v616)["fname"] = "GO-TAG-P");
5650         return v616;
5651     })((function (values,v614){
5652         checkArgs(arguments, 2);
5653         return (function(){
5654             return (function(v615){
5655                 return (v615 !== l3.value ? v615 : ((function(){
5656                     var tmp = v614;
5657                     return (typeof tmp == 'object' && 'name' in tmp);
5658                 })()?l4.value: l3.value));
5659             })(l81.fvalue(pv, v614));
5660         })();
5661     }));
5662     return l258;
5663 })();
5664 var l259 = {name: "DECLARE-TAGBODY-TAGS"};
5665 (function(){
5666     (l259).fvalue = (function(v622){
5667         ((v622)["fname"] = "DECLARE-TAGBODY-TAGS");
5668         return v622;
5669     })((function (values,v617,v618){
5670         checkArgs(arguments, 3);
5671         return (function(){
5672             return (function(v621){
5673                 return l186.fvalue(values, v621, (function(){
5674                     var symbol = l188;
5675                     var value = symbol.value;
5676                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5677                     return value;
5678                 })(), l185);
5679             })(l73.fvalue(pv, (function (values,v619){
5680                 checkArgs(arguments, 2);
5681                 return (function(v620){
5682                     return l173.fvalue(values, v619, l185, l44.fvalue(pv, v617, v620));
5683                 })(l17.fvalue(pv, ((l257).value = (function(){
5684                     var x1 = (function(){
5685                         var symbol = l257;
5686                         var value = symbol.value;
5687                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5688                         return value;
5689                     })();
5690                     if (typeof x1 !== 'number') throw 'Not a number!';
5691                     var x2 = 1;
5692                     if (typeof x2 !== 'number') throw 'Not a number!';
5693                     return x1+x2;
5694                 })())));
5695             }), l91.fvalue(pv, (function(){
5696                 var symbol = l258;
5697                 var func = symbol.fvalue;
5698                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5699                 return func;
5700             })(), v618)));
5701         })();
5702     }));
5703     return l259;
5704 })();
5705 var l260 = {name: "TAGBODY"};
5706 ((l206).value = ({car: l44.fvalue(pv, l260, (function (values){
5707     var v623= l3.value;
5708     for (var i = arguments.length-1; i>=1; i--)
5709         v623 = {car: arguments[i], cdr:
5710     v623};
5711     return (function(){
5712         try {
5713             (l95.fvalue(pv, (function(){
5714                 var symbol = l258;
5715                 var func = symbol.fvalue;
5716                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5717                 return func;
5718             })(), v623) !== l3.value ? l3.value : (function(){
5719                 var values = mv;
5720                 throw ({type: 'block', id: 216, values: l145.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l241), v623, l44.fvalue(pv, l3))), message: 'Return from unknown block TAGBODY.'})
5721             })());
5722             (l258.fvalue(pv, (function(){
5723                 var tmp = v623;
5724                 return tmp === l3.value? l3.value: tmp.car;
5725             })()) !== l3.value ? l3.value : (v623 = ({car: l16.fvalue(pv, "START"), cdr: v623})));
5726             return (function(v624){
5727                 return (function(v626,v625){
5728                     try {
5729                         var tmp;
5730                         tmp = l188.value;
5731                         l188.value = v626;
5732                         v626 = tmp;
5733                         (function(v627){
5734                             return (v625 = l40.fvalue(pv, l176.fvalue(pv, v627)));
5735                         })(l187.fvalue(pv, l39.fvalue(pv, v623), (function(){
5736                             var symbol = l188;
5737                             var value = symbol.value;
5738                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5739                             return value;
5740                         })(), l185));
5741                         return l134.fvalue(values, "(function(){", (function(){
5742                             var symbol = l133;
5743                             var value = symbol.value;
5744                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5745                             return value;
5746                         })(), l143.fvalue(pv, "var tagbody_", v624, " = ", v625, ";", (function(){
5747                             var symbol = l133;
5748                             var value = symbol.value;
5749                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5750                             return value;
5751                         })(), "tbloop:", (function(){
5752                             var symbol = l133;
5753                             var value = symbol.value;
5754                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5755                             return value;
5756                         })(), "while (true) {", (function(){
5757                             var symbol = l133;
5758                             var value = symbol.value;
5759                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5760                             return value;
5761                         })(), l143.fvalue(pv, "try {", (function(){
5762                             var symbol = l133;
5763                             var value = symbol.value;
5764                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5765                             return value;
5766                         })(), l143.fvalue(pv, (function(v628){
5767                             return l134.fvalue(pv, "switch(tagbody_", v624, "){", (function(){
5768                                 var symbol = l133;
5769                                 var value = symbol.value;
5770                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5771                                 return value;
5772                             })(), "case ", v625, ":", (function(){
5773                                 var symbol = l133;
5774                                 var value = symbol.value;
5775                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5776                                 return value;
5777                             })(), (function(){
5778                                 return (function(v629,v630){
5779                                     (function(){
5780                                         while(v629 !== l3.value){
5781                                             (v630 = (function(){
5782                                                 var tmp = v629;
5783                                                 return tmp === l3.value? l3.value: tmp.car;
5784                                             })());
5785                                             (function(){
5786                                                 (v628 = l134.fvalue(pv, v628, (l27.fvalue(pv, l258.fvalue(pv, v630)) !== l3.value ? l143.fvalue(pv, l145.fvalue(pv, v630), ";", (function(){
5787                                                     var symbol = l133;
5788                                                     var value = symbol.value;
5789                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5790                                                     return value;
5791                                                 })()) : (function(v631){
5792                                                     return l134.fvalue(pv, "case ", l40.fvalue(pv, l176.fvalue(pv, v631)), ":", (function(){
5793                                                         var symbol = l133;
5794                                                         var value = symbol.value;
5795                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5796                                                         return value;
5797                                                     })());
5798                                                 })(l187.fvalue(pv, v630, (function(){
5799                                                     var symbol = l188;
5800                                                     var value = symbol.value;
5801                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5802                                                     return value;
5803                                                 })(), l185)))));
5804                                                 return l3.value;
5805                                             })();
5806                                             (v629 = (function(){
5807                                                 var tmp = v629;
5808                                                 return tmp === l3.value? l3.value: tmp.cdr;
5809                                             })());
5810                                         }return l3.value;
5811                                     })();
5812                                     return v628;
5813                                 })((function(){
5814                                     var tmp = v623;
5815                                     return tmp === l3.value? l3.value: tmp.cdr;
5816                                 })(),l3.value);
5817                             })(), "default:", (function(){
5818                                 var symbol = l133;
5819                                 var value = symbol.value;
5820                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5821                                 return value;
5822                             })(), "    break tbloop;", (function(){
5823                                 var symbol = l133;
5824                                 var value = symbol.value;
5825                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5826                                 return value;
5827                             })(), "}", (function(){
5828                                 var symbol = l133;
5829                                 var value = symbol.value;
5830                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5831                                 return value;
5832                             })());
5833                         })("")), "}", (function(){
5834                             var symbol = l133;
5835                             var value = symbol.value;
5836                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5837                             return value;
5838                         })(), "catch (jump) {", (function(){
5839                             var symbol = l133;
5840                             var value = symbol.value;
5841                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5842                             return value;
5843                         })(), "    if (jump.type == 'tagbody' && jump.id == ", v624, ")", (function(){
5844                             var symbol = l133;
5845                             var value = symbol.value;
5846                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5847                             return value;
5848                         })(), "        tagbody_", v624, " = jump.label;", (function(){
5849                             var symbol = l133;
5850                             var value = symbol.value;
5851                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5852                             return value;
5853                         })(), "    else", (function(){
5854                             var symbol = l133;
5855                             var value = symbol.value;
5856                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5857                             return value;
5858                         })(), "        throw(jump);", (function(){
5859                             var symbol = l133;
5860                             var value = symbol.value;
5861                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5862                             return value;
5863                         })(), "}", (function(){
5864                             var symbol = l133;
5865                             var value = symbol.value;
5866                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5867                             return value;
5868                         })()), "}", (function(){
5869                             var symbol = l133;
5870                             var value = symbol.value;
5871                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5872                             return value;
5873                         })(), "return ", l145.fvalue(pv, l3.value), ";", (function(){
5874                             var symbol = l133;
5875                             var value = symbol.value;
5876                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5877                             return value;
5878                         })()), "})()");
5879                     }
5880                     finally {
5881                         l188.value = v626;
5882                     }
5883                 })(l259.fvalue(pv, v624, v623),l3.value);
5884             })(l17.fvalue(pv, (function(){
5885                 var symbol = l256;
5886                 var value = symbol.value;
5887                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5888                 return value;
5889             })()));
5890         }
5891         catch (cf){
5892             if (cf.type == 'block' && cf.id == 216)
5893                 return values.apply(this, forcemv(cf.values));
5894             else
5895                 throw cf;
5896         }
5897     })();
5898 })), cdr: (function(){
5899     var symbol = l206;
5900     var value = symbol.value;
5901     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5902     return value;
5903 })()}));
5904 var l261 = {name: "GO"};
5905 ((l206).value = ({car: l44.fvalue(pv, l261, (function (values,v632){
5906     checkArgs(arguments, 2);
5907     return (function(){
5908         return (function(v633,v634){
5909             return (v633 !== l3.value ? l134.fvalue(values, "(function(){", (function(){
5910                 var symbol = l133;
5911                 var value = symbol.value;
5912                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5913                 return value;
5914             })(), l143.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l39.fvalue(pv, l176.fvalue(pv, v633)), ", ", "label: ", l40.fvalue(pv, l176.fvalue(pv, v633)), ", ", "message: 'Attempt to GO to non-existing tag ", v634, "'", "})", (function(){
5915                 var symbol = l133;
5916                 var value = symbol.value;
5917                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5918                 return value;
5919             })()), "})()") : (function(){
5920                 throw l134.fvalue(pv, "Unknown tag `", v634, "'.");
5921             })());
5922         })(l187.fvalue(pv, v632, (function(){
5923             var symbol = l188;
5924             var value = symbol.value;
5925             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5926             return value;
5927         })(), l185),(((function(){
5928             var tmp = v632;
5929             return (typeof tmp == 'object' && 'name' in tmp);
5930         })()?l4.value: l3.value) !== l3.value ? (v632).name : (l81.fvalue(pv, v632) !== l3.value ? l17.fvalue(pv, v632) : l3.value)));
5931     })();
5932 })), cdr: (function(){
5933     var symbol = l206;
5934     var value = symbol.value;
5935     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5936     return value;
5937 })()}));
5938 var l262 = {name: "UNWIND-PROTECT"};
5939 ((l206).value = ({car: l44.fvalue(pv, l262, (function (values,v636){
5940     checkArgsAtLeast(arguments, 2);
5941     var v635= l3.value;
5942     for (var i = arguments.length-1; i>=2; i--)
5943         v635 = {car: arguments[i], cdr:
5944     v635};
5945     return (function(){
5946         return l134.fvalue(values, "(function(){", (function(){
5947             var symbol = l133;
5948             var value = symbol.value;
5949             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5950             return value;
5951         })(), l143.fvalue(pv, "var ret = ", l145.fvalue(pv, l3.value), ";", (function(){
5952             var symbol = l133;
5953             var value = symbol.value;
5954             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5955             return value;
5956         })(), "try {", (function(){
5957             var symbol = l133;
5958             var value = symbol.value;
5959             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5960             return value;
5961         })(), l143.fvalue(pv, "ret = ", l145.fvalue(pv, v636), ";", (function(){
5962             var symbol = l133;
5963             var value = symbol.value;
5964             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5965             return value;
5966         })()), "} finally {", (function(){
5967             var symbol = l133;
5968             var value = symbol.value;
5969             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5970             return value;
5971         })(), l143.fvalue(pv, l222.fvalue(pv, v635)), "}", (function(){
5972             var symbol = l133;
5973             var value = symbol.value;
5974             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5975             return value;
5976         })(), "return ret;", (function(){
5977             var symbol = l133;
5978             var value = symbol.value;
5979             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5980             return value;
5981         })()), "})()");
5982     })();
5983 })), cdr: (function(){
5984     var symbol = l206;
5985     var value = symbol.value;
5986     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5987     return value;
5988 })()}));
5989 var l263 = {name: "MULTIPLE-VALUE-CALL"};
5990 ((l206).value = ({car: l44.fvalue(pv, l263, (function (values,v638){
5991     checkArgsAtLeast(arguments, 2);
5992     var v637= l3.value;
5993     for (var i = arguments.length-1; i>=2; i--)
5994         v637 = {car: arguments[i], cdr:
5995     v637};
5996     return (function(){
5997         return l134.fvalue(values, "(function(){", (function(){
5998             var symbol = l133;
5999             var value = symbol.value;
6000             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6001             return value;
6002         })(), l143.fvalue(pv, "var func = ", l145.fvalue(pv, v638), ";", (function(){
6003             var symbol = l133;
6004             var value = symbol.value;
6005             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6006             return value;
6007         })(), "var args = [", ((function(){
6008             var symbol = l172;
6009             var value = symbol.value;
6010             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6011             return value;
6012         })() !== l3.value ? "values" : "pv"), "];", (function(){
6013             var symbol = l133;
6014             var value = symbol.value;
6015             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6016             return value;
6017         })(), "return ", l134.fvalue(pv, "(function(){", (function(){
6018             var symbol = l133;
6019             var value = symbol.value;
6020             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6021             return value;
6022         })(), l143.fvalue(pv, "var values = mv;", (function(){
6023             var symbol = l133;
6024             var value = symbol.value;
6025             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6026             return value;
6027         })(), "var vs;", (function(){
6028             var symbol = l133;
6029             var value = symbol.value;
6030             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6031             return value;
6032         })(), l138.fvalue(pv, (function (values,v639){
6033             checkArgs(arguments, 2);
6034             return l134.fvalue(values, "vs = ", l145.fvalue(pv, v639, l4.value), ";", (function(){
6035                 var symbol = l133;
6036                 var value = symbol.value;
6037                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6038                 return value;
6039             })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){
6040                 var symbol = l133;
6041                 var value = symbol.value;
6042                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6043                 return value;
6044             })(), l143.fvalue(pv, "args = args.concat(vs);", (function(){
6045                 var symbol = l133;
6046                 var value = symbol.value;
6047                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6048                 return value;
6049             })()), "else", (function(){
6050                 var symbol = l133;
6051                 var value = symbol.value;
6052                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6053                 return value;
6054             })(), l143.fvalue(pv, "args.push(vs);", (function(){
6055                 var symbol = l133;
6056                 var value = symbol.value;
6057                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6058                 return value;
6059             })()));
6060         }), v637), "return func.apply(window, args);", (function(){
6061             var symbol = l133;
6062             var value = symbol.value;
6063             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6064             return value;
6065         })()), "})()"), ";", (function(){
6066             var symbol = l133;
6067             var value = symbol.value;
6068             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6069             return value;
6070         })()), "})()");
6071     })();
6072 })), cdr: (function(){
6073     var symbol = l206;
6074     var value = symbol.value;
6075     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6076     return value;
6077 })()}));
6078 var l264 = {name: "MULTIPLE-VALUE-PROG1"};
6079 ((l206).value = ({car: l44.fvalue(pv, l264, (function (values,v641){
6080     checkArgsAtLeast(arguments, 2);
6081     var v640= l3.value;
6082     for (var i = arguments.length-1; i>=2; i--)
6083         v640 = {car: arguments[i], cdr:
6084     v640};
6085     return (function(){
6086         return l134.fvalue(values, "(function(){", (function(){
6087             var symbol = l133;
6088             var value = symbol.value;
6089             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6090             return value;
6091         })(), l143.fvalue(pv, "var args = ", l145.fvalue(pv, v641, (function(){
6092             var symbol = l172;
6093             var value = symbol.value;
6094             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6095             return value;
6096         })()), ";", (function(){
6097             var symbol = l133;
6098             var value = symbol.value;
6099             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6100             return value;
6101         })(), l222.fvalue(pv, v640), "return args;", (function(){
6102             var symbol = l133;
6103             var value = symbol.value;
6104             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6105             return value;
6106         })()), "})()");
6107     })();
6108 })), cdr: (function(){
6109     var symbol = l206;
6110     var value = symbol.value;
6111     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6112     return value;
6113 })()}));
6114 var l265 = {name: "BACKQUOTE-EXPAND-1"};
6115 (function(){
6116     (l265).fvalue = (function(v644){
6117         ((v644)["fname"] = "BACKQUOTE-EXPAND-1");
6118         return v644;
6119     })((function (values,v642){
6120         checkArgs(arguments, 2);
6121         return (function(){
6122             return (((function(){
6123                 var tmp = v642;
6124                 return (typeof tmp == 'object' && 'name' in tmp);
6125             })()?l4.value: l3.value) !== l3.value ? l44.fvalue(values, l167, v642) : (l45.fvalue(pv, v642) !== l3.value ? v642 : ((((function(){
6126                 var tmp = v642;
6127                 return tmp === l3.value? l3.value: tmp.car;
6128             })() === l170)?l4.value: l3.value) !== l3.value ? (function(){
6129                 var tmp = v642;
6130                 return tmp === l3.value? l3.value: tmp.car;
6131             })() : ((((function(){
6132                 var tmp = v642;
6133                 return tmp === l3.value? l3.value: tmp.car;
6134             })() === l168)?l4.value: l3.value) !== l3.value ? l265.fvalue(values, l265.fvalue(pv, l33.fvalue(pv, v642))) : ({car: l64, cdr: l73.fvalue(pv, (function (values,v643){
6135                 checkArgs(arguments, 2);
6136                 return ((l59.fvalue(pv, v643) !== l3.value ? (((function(){
6137                     var tmp = v643;
6138                     return tmp === l3.value? l3.value: tmp.car;
6139                 })() === l170)?l4.value: l3.value) : l3.value) !== l3.value ? l44.fvalue(values, l44, l33.fvalue(pv, v643)) : ((l59.fvalue(pv, v643) !== l3.value ? (((function(){
6140                     var tmp = v643;
6141                     return tmp === l3.value? l3.value: tmp.car;
6142                 })() === l169)?l4.value: l3.value) : l3.value) !== l3.value ? l33.fvalue(values, v643) : l44.fvalue(values, l44, l265.fvalue(pv, v643))));
6143             }), v642)})))));
6144         })();
6145     }));
6146     return l265;
6147 })();
6148 var l266 = {name: "BACKQUOTE-EXPAND"};
6149 (function(){
6150     (l266).fvalue = (function(v646){
6151         ((v646)["fname"] = "BACKQUOTE-EXPAND");
6152         return v646;
6153     })((function (values,v645){
6154         checkArgs(arguments, 2);
6155         return (function(){
6156             return ((l59.fvalue(pv, v645) !== l3.value ? (((function(){
6157                 var tmp = v645;
6158                 return tmp === l3.value? l3.value: tmp.car;
6159             })() === l168)?l4.value: l3.value) : l3.value) !== l3.value ? l265.fvalue(values, l33.fvalue(pv, v645)) : v645);
6160         })();
6161     }));
6162     return l266;
6163 })();
6164 l168;
6165 ((l206).value = ({car: l44.fvalue(pv, l168, (function (values,v647){
6166     checkArgs(arguments, 2);
6167     return (function(){
6168         return l145.fvalue(values, l265.fvalue(pv, v647));
6169     })();
6170 })), cdr: (function(){
6171     var symbol = l206;
6172     var value = symbol.value;
6173     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6174     return value;
6175 })()}));
6176 var l267 = {name: "*BUILTINS*"};
6177 (function(){
6178     (((l267.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l267).value = l3.value));
6179     return l267;
6180 })();
6181 var l268 = {name: "DEFINE-RAW-BUILTIN"};
6182 l268;
6183 var l269 = {name: "DEFINE-BUILTIN"};
6184 l269;
6185 var l270 = {name: "TYPE-CHECK"};
6186 l270;
6187 var l271 = {name: "VARIABLE-ARITY-CALL"};
6188 (function(){
6189     (l271).fvalue = (function(v656){
6190         ((v656)["fname"] = "VARIABLE-ARITY-CALL");
6191         return v656;
6192     })((function (values,v648,v649){
6193         checkArgs(arguments, 3);
6194         return (function(){
6195             (((function(){
6196                 var tmp = v648;
6197                 return (typeof tmp == 'object' && 'car' in tmp);
6198             })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
6199                 throw "ARGS must be a non-empty list";
6200             })());
6201             return (function(v650,v651,v652){
6202                 (function(){
6203                     return (function(v653,v654){
6204                         (function(){
6205                             while(v653 !== l3.value){
6206                                 (v654 = (function(){
6207                                     var tmp = v653;
6208                                     return tmp === l3.value? l3.value: tmp.car;
6209                                 })());
6210                                 (function(){
6211                                     (function(v655){
6212                                         (v651 = ({car: v655, cdr: v651}));
6213                                         return (v652 = l134.fvalue(pv, v652, l134.fvalue(pv, "var ", v655, " = ", l145.fvalue(pv, v654), ";", (function(){
6214                                             var symbol = l133;
6215                                             var value = symbol.value;
6216                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6217                                             return value;
6218                                         })(), "if (typeof ", v655, " !== 'number') throw 'Not a number!';", (function(){
6219                                             var symbol = l133;
6220                                             var value = symbol.value;
6221                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6222                                             return value;
6223                                         })())));
6224                                     })(l134.fvalue(pv, "x", l17.fvalue(pv, (v650 = (function(){
6225                                         var x1 = v650;
6226                                         if (typeof x1 !== 'number') throw 'Not a number!';
6227                                         var x2 = 1;
6228                                         if (typeof x2 !== 'number') throw 'Not a number!';
6229                                         return x1+x2;
6230                                     })()))));
6231                                     return l3.value;
6232                                 })();
6233                                 (v653 = (function(){
6234                                     var tmp = v653;
6235                                     return tmp === l3.value? l3.value: tmp.cdr;
6236                                 })());
6237                             }return l3.value;
6238                         })();
6239                         return l3.value;
6240                     })(v648,l3.value);
6241                 })();
6242                 return l134.fvalue(values, "(function(){", (function(){
6243                     var symbol = l133;
6244                     var value = symbol.value;
6245                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6246                     return value;
6247                 })(), l143.fvalue(pv, v652, (v649)(pv, l66.fvalue(pv, v651))), "})()");
6248             })(0,l3,"");
6249         })();
6250     }));
6251     return l271;
6252 })();
6253 var l272 = {name: "VARIABLE-ARITY"};
6254 l272;
6255 var l273 = {name: "NUM-OP-NUM"};
6256 (function(){
6257     (l273).fvalue = (function(v660){
6258         ((v660)["fname"] = "NUM-OP-NUM");
6259         return v660;
6260     })((function (values,v657,v658,v659){
6261         checkArgs(arguments, 4);
6262         return (function(){
6263             return l134.fvalue(values, "(function(){", (function(){
6264                 var symbol = l133;
6265                 var value = symbol.value;
6266                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6267                 return value;
6268             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v657, ";", (function(){
6269                 var symbol = l133;
6270                 var value = symbol.value;
6271                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6272                 return value;
6273             })()), l134.fvalue(pv, "var ", "y", " = ", v659, ";", (function(){
6274                 var symbol = l133;
6275                 var value = symbol.value;
6276                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6277                 return value;
6278             })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6279                 var symbol = l133;
6280                 var value = symbol.value;
6281                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6282                 return value;
6283             })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6284                 var symbol = l133;
6285                 var value = symbol.value;
6286                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6287                 return value;
6288             })())), l134.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
6289                 var symbol = l133;
6290                 var value = symbol.value;
6291                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6292                 return value;
6293             })(), l143.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
6294                 var symbol = l133;
6295                 var value = symbol.value;
6296                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6297                 return value;
6298             })())), l134.fvalue(pv, "return ", l134.fvalue(pv, "x", v658, "y"), ";", (function(){
6299                 var symbol = l133;
6300                 var value = symbol.value;
6301                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6302                 return value;
6303             })())), "})()");
6304         })();
6305     }));
6306     return l273;
6307 })();
6308 ((l267).value = ({car: l44.fvalue(pv, l61, (function (values){
6309     var v661= l3.value;
6310     for (var i = arguments.length-1; i>=1; i--)
6311         v661 = {car: arguments[i], cdr:
6312     v661};
6313     return (function(){
6314         return (l12.fvalue(pv, v661) !== l3.value ? "0" : l271.fvalue(values, v661, (function (values,v662){
6315             checkArgs(arguments, 2);
6316             return l134.fvalue(values, "return ", l136.fvalue(pv, v662, "+"), ";", (function(){
6317                 var symbol = l133;
6318                 var value = symbol.value;
6319                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6320                 return value;
6321             })());
6322         })));
6323     })();
6324 })), cdr: (function(){
6325     var symbol = l267;
6326     var value = symbol.value;
6327     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6328     return value;
6329 })()}));
6330 ((l267).value = ({car: l44.fvalue(pv, l62, (function (values,v664){
6331     checkArgsAtLeast(arguments, 2);
6332     var v663= l3.value;
6333     for (var i = arguments.length-1; i>=2; i--)
6334         v663 = {car: arguments[i], cdr:
6335     v663};
6336     return (function(){
6337         return (function(v665){
6338             return l271.fvalue(values, v665, (function (values,v666){
6339                 checkArgs(arguments, 2);
6340                 return l134.fvalue(values, "return ", (l12.fvalue(pv, v663) !== l3.value ? l134.fvalue(pv, "-", (function(){
6341                     var tmp = v666;
6342                     return tmp === l3.value? l3.value: tmp.car;
6343                 })()) : l136.fvalue(pv, v666, "-")), ";", (function(){
6344                     var symbol = l133;
6345                     var value = symbol.value;
6346                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6347                     return value;
6348                 })());
6349             }));
6350         })(({car: v664, cdr: v663}));
6351     })();
6352 })), cdr: (function(){
6353     var symbol = l267;
6354     var value = symbol.value;
6355     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6356     return value;
6357 })()}));
6358 ((l267).value = ({car: l44.fvalue(pv, l20, (function (values){
6359     var v667= l3.value;
6360     for (var i = arguments.length-1; i>=1; i--)
6361         v667 = {car: arguments[i], cdr:
6362     v667};
6363     return (function(){
6364         return (l12.fvalue(pv, v667) !== l3.value ? "1" : l271.fvalue(values, v667, (function (values,v668){
6365             checkArgs(arguments, 2);
6366             return l134.fvalue(values, "return ", l136.fvalue(pv, v668, "*"), ";", (function(){
6367                 var symbol = l133;
6368                 var value = symbol.value;
6369                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6370                 return value;
6371             })());
6372         })));
6373     })();
6374 })), cdr: (function(){
6375     var symbol = l267;
6376     var value = symbol.value;
6377     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6378     return value;
6379 })()}));
6380 ((l267).value = ({car: l44.fvalue(pv, l21, (function (values,v670){
6381     checkArgsAtLeast(arguments, 2);
6382     var v669= l3.value;
6383     for (var i = arguments.length-1; i>=2; i--)
6384         v669 = {car: arguments[i], cdr:
6385     v669};
6386     return (function(){
6387         return (function(v671){
6388             return l271.fvalue(values, v671, (function (values,v672){
6389                 checkArgs(arguments, 2);
6390                 return l134.fvalue(values, "return ", (l12.fvalue(pv, v669) !== l3.value ? l134.fvalue(pv, "1 /", (function(){
6391                     var tmp = v672;
6392                     return tmp === l3.value? l3.value: tmp.car;
6393                 })()) : l136.fvalue(pv, v672, "/")), ";", (function(){
6394                     var symbol = l133;
6395                     var value = symbol.value;
6396                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6397                     return value;
6398                 })());
6399             }));
6400         })(({car: v670, cdr: v669}));
6401     })();
6402 })), cdr: (function(){
6403     var symbol = l267;
6404     var value = symbol.value;
6405     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6406     return value;
6407 })()}));
6408 var l274 = {name: "MOD"};
6409 ((l267).value = ({car: l44.fvalue(pv, l274, (function (values,v673,v674){
6410     checkArgs(arguments, 3);
6411     return (function(){
6412         return (function(v675,v676){
6413             return l273.fvalue(values, v675, "%", v676);
6414         })(l145.fvalue(pv, v673),l145.fvalue(pv, v674));
6415     })();
6416 })), cdr: (function(){
6417     var symbol = l267;
6418     var value = symbol.value;
6419     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6420     return value;
6421 })()}));
6422 var l275 = {name: "COMPARISON-CONJUNTION"};
6423 (function(){
6424     (l275).fvalue = (function(v679){
6425         ((v679)["fname"] = "COMPARISON-CONJUNTION");
6426         return v679;
6427     })((function (values,v677,v678){
6428         checkArgs(arguments, 3);
6429         return (function(){
6430             return (l12.fvalue(pv, (function(){
6431                 var tmp = v677;
6432                 return tmp === l3.value? l3.value: tmp.cdr;
6433             })()) !== l3.value ? "true" : (l12.fvalue(pv, l35.fvalue(pv, v677)) !== l3.value ? l134.fvalue(values, (function(){
6434                 var tmp = v677;
6435                 return tmp === l3.value? l3.value: tmp.car;
6436             })(), v678, l33.fvalue(pv, v677)) : l134.fvalue(values, (function(){
6437                 var tmp = v677;
6438                 return tmp === l3.value? l3.value: tmp.car;
6439             })(), v678, l33.fvalue(pv, v677), " && ", l275.fvalue(pv, (function(){
6440                 var tmp = v677;
6441                 return tmp === l3.value? l3.value: tmp.cdr;
6442             })(), v678))));
6443         })();
6444     }));
6445     return l275;
6446 })();
6447 var l276 = {name: "DEFINE-BUILTIN-COMPARISON"};
6448 l276;
6449 var l277 = {name: ">"};
6450 ((l267).value = ({car: l44.fvalue(pv, l277, (function (values,v681){
6451     checkArgsAtLeast(arguments, 2);
6452     var v680= l3.value;
6453     for (var i = arguments.length-1; i>=2; i--)
6454         v680 = {car: arguments[i], cdr:
6455     v680};
6456     return (function(){
6457         return (function(v682){
6458             return l271.fvalue(values, v682, (function (values,v683){
6459                 checkArgs(arguments, 2);
6460                 return l134.fvalue(values, "return ", l144.fvalue(pv, l275.fvalue(pv, v683, ">")), ";", (function(){
6461                     var symbol = l133;
6462                     var value = symbol.value;
6463                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6464                     return value;
6465                 })());
6466             }));
6467         })(({car: v681, cdr: v680}));
6468     })();
6469 })), cdr: (function(){
6470     var symbol = l267;
6471     var value = symbol.value;
6472     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6473     return value;
6474 })()}));
6475 var l278 = {name: "<"};
6476 ((l267).value = ({car: l44.fvalue(pv, l278, (function (values,v685){
6477     checkArgsAtLeast(arguments, 2);
6478     var v684= l3.value;
6479     for (var i = arguments.length-1; i>=2; i--)
6480         v684 = {car: arguments[i], cdr:
6481     v684};
6482     return (function(){
6483         return (function(v686){
6484             return l271.fvalue(values, v686, (function (values,v687){
6485                 checkArgs(arguments, 2);
6486                 return l134.fvalue(values, "return ", l144.fvalue(pv, l275.fvalue(pv, v687, "<")), ";", (function(){
6487                     var symbol = l133;
6488                     var value = symbol.value;
6489                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6490                     return value;
6491                 })());
6492             }));
6493         })(({car: v685, cdr: v684}));
6494     })();
6495 })), cdr: (function(){
6496     var symbol = l267;
6497     var value = symbol.value;
6498     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6499     return value;
6500 })()}));
6501 var l279 = {name: ">="};
6502 ((l267).value = ({car: l44.fvalue(pv, l279, (function (values,v689){
6503     checkArgsAtLeast(arguments, 2);
6504     var v688= l3.value;
6505     for (var i = arguments.length-1; i>=2; i--)
6506         v688 = {car: arguments[i], cdr:
6507     v688};
6508     return (function(){
6509         return (function(v690){
6510             return l271.fvalue(values, v690, (function (values,v691){
6511                 checkArgs(arguments, 2);
6512                 return l134.fvalue(values, "return ", l144.fvalue(pv, l275.fvalue(pv, v691, ">=")), ";", (function(){
6513                     var symbol = l133;
6514                     var value = symbol.value;
6515                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6516                     return value;
6517                 })());
6518             }));
6519         })(({car: v689, cdr: v688}));
6520     })();
6521 })), cdr: (function(){
6522     var symbol = l267;
6523     var value = symbol.value;
6524     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6525     return value;
6526 })()}));
6527 var l280 = {name: "<="};
6528 ((l267).value = ({car: l44.fvalue(pv, l280, (function (values,v693){
6529     checkArgsAtLeast(arguments, 2);
6530     var v692= l3.value;
6531     for (var i = arguments.length-1; i>=2; i--)
6532         v692 = {car: arguments[i], cdr:
6533     v692};
6534     return (function(){
6535         return (function(v694){
6536             return l271.fvalue(values, v694, (function (values,v695){
6537                 checkArgs(arguments, 2);
6538                 return l134.fvalue(values, "return ", l144.fvalue(pv, l275.fvalue(pv, v695, "<=")), ";", (function(){
6539                     var symbol = l133;
6540                     var value = symbol.value;
6541                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6542                     return value;
6543                 })());
6544             }));
6545         })(({car: v693, cdr: v692}));
6546     })();
6547 })), cdr: (function(){
6548     var symbol = l267;
6549     var value = symbol.value;
6550     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6551     return value;
6552 })()}));
6553 ((l267).value = ({car: l44.fvalue(pv, l19, (function (values,v697){
6554     checkArgsAtLeast(arguments, 2);
6555     var v696= l3.value;
6556     for (var i = arguments.length-1; i>=2; i--)
6557         v696 = {car: arguments[i], cdr:
6558     v696};
6559     return (function(){
6560         return (function(v698){
6561             return l271.fvalue(values, v698, (function (values,v699){
6562                 checkArgs(arguments, 2);
6563                 return l134.fvalue(values, "return ", l144.fvalue(pv, l275.fvalue(pv, v699, "==")), ";", (function(){
6564                     var symbol = l133;
6565                     var value = symbol.value;
6566                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6567                     return value;
6568                 })());
6569             }));
6570         })(({car: v697, cdr: v696}));
6571     })();
6572 })), cdr: (function(){
6573     var symbol = l267;
6574     var value = symbol.value;
6575     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6576     return value;
6577 })()}));
6578 var l281 = {name: "NUMBERP"};
6579 ((l267).value = ({car: l44.fvalue(pv, l281, (function (values,v700){
6580     checkArgs(arguments, 2);
6581     return (function(){
6582         return (function(v701){
6583             return l144.fvalue(values, l134.fvalue(pv, "(typeof (", v701, ") == \"number\")"));
6584         })(l145.fvalue(pv, v700));
6585     })();
6586 })), cdr: (function(){
6587     var symbol = l267;
6588     var value = symbol.value;
6589     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6590     return value;
6591 })()}));
6592 var l282 = {name: "FLOOR"};
6593 ((l267).value = ({car: l44.fvalue(pv, l282, (function (values,v702){
6594     checkArgs(arguments, 2);
6595     return (function(){
6596         return (function(v703){
6597             return l134.fvalue(values, "(function(){", (function(){
6598                 var symbol = l133;
6599                 var value = symbol.value;
6600                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6601                 return value;
6602             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v703, ";", (function(){
6603                 var symbol = l133;
6604                 var value = symbol.value;
6605                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6606                 return value;
6607             })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6608                 var symbol = l133;
6609                 var value = symbol.value;
6610                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6611                 return value;
6612             })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6613                 var symbol = l133;
6614                 var value = symbol.value;
6615                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6616                 return value;
6617             })())), l134.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){
6618                 var symbol = l133;
6619                 var value = symbol.value;
6620                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6621                 return value;
6622             })())), "})()");
6623         })(l145.fvalue(pv, v702));
6624     })();
6625 })), cdr: (function(){
6626     var symbol = l267;
6627     var value = symbol.value;
6628     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6629     return value;
6630 })()}));
6631 ((l267).value = ({car: l44.fvalue(pv, l28, (function (values,v704,v705){
6632     checkArgs(arguments, 3);
6633     return (function(){
6634         return (function(v706,v707){
6635             return l134.fvalue(values, "({car: ", v706, ", cdr: ", v707, "})");
6636         })(l145.fvalue(pv, v704),l145.fvalue(pv, v705));
6637     })();
6638 })), cdr: (function(){
6639     var symbol = l267;
6640     var value = symbol.value;
6641     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6642     return value;
6643 })()}));
6644 ((l267).value = ({car: l44.fvalue(pv, l29, (function (values,v708){
6645     checkArgs(arguments, 2);
6646     return (function(){
6647         return (function(v709){
6648             return l144.fvalue(values, l134.fvalue(pv, "(function(){", (function(){
6649                 var symbol = l133;
6650                 var value = symbol.value;
6651                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6652                 return value;
6653             })(), l143.fvalue(pv, "var tmp = ", v709, ";", (function(){
6654                 var symbol = l133;
6655                 var value = symbol.value;
6656                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6657                 return value;
6658             })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
6659                 var symbol = l133;
6660                 var value = symbol.value;
6661                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6662                 return value;
6663             })()), "})()"));
6664         })(l145.fvalue(pv, v708));
6665     })();
6666 })), cdr: (function(){
6667     var symbol = l267;
6668     var value = symbol.value;
6669     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6670     return value;
6671 })()}));
6672 ((l267).value = ({car: l44.fvalue(pv, l30, (function (values,v710){
6673     checkArgs(arguments, 2);
6674     return (function(){
6675         return (function(v711){
6676             return l134.fvalue(values, "(function(){", (function(){
6677                 var symbol = l133;
6678                 var value = symbol.value;
6679                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6680                 return value;
6681             })(), l143.fvalue(pv, "var tmp = ", v711, ";", (function(){
6682                 var symbol = l133;
6683                 var value = symbol.value;
6684                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6685                 return value;
6686             })(), "return tmp === ", l145.fvalue(pv, l3.value), "? ", l145.fvalue(pv, l3.value), ": tmp.car;", (function(){
6687                 var symbol = l133;
6688                 var value = symbol.value;
6689                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6690                 return value;
6691             })()), "})()");
6692         })(l145.fvalue(pv, v710));
6693     })();
6694 })), cdr: (function(){
6695     var symbol = l267;
6696     var value = symbol.value;
6697     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6698     return value;
6699 })()}));
6700 ((l267).value = ({car: l44.fvalue(pv, l31, (function (values,v712){
6701     checkArgs(arguments, 2);
6702     return (function(){
6703         return (function(v713){
6704             return l134.fvalue(values, "(function(){", (function(){
6705                 var symbol = l133;
6706                 var value = symbol.value;
6707                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6708                 return value;
6709             })(), l143.fvalue(pv, "var tmp = ", v713, ";", (function(){
6710                 var symbol = l133;
6711                 var value = symbol.value;
6712                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6713                 return value;
6714             })(), "return tmp === ", l145.fvalue(pv, l3.value), "? ", l145.fvalue(pv, l3.value), ": tmp.cdr;", (function(){
6715                 var symbol = l133;
6716                 var value = symbol.value;
6717                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6718                 return value;
6719             })()), "})()");
6720         })(l145.fvalue(pv, v712));
6721     })();
6722 })), cdr: (function(){
6723     var symbol = l267;
6724     var value = symbol.value;
6725     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6726     return value;
6727 })()}));
6728 var l283 = {name: "RPLACA"};
6729 ((l267).value = ({car: l44.fvalue(pv, l283, (function (values,v714,v715){
6730     checkArgs(arguments, 3);
6731     return (function(){
6732         return (function(v716,v717){
6733             return l134.fvalue(values, "(function(){", (function(){
6734                 var symbol = l133;
6735                 var value = symbol.value;
6736                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6737                 return value;
6738             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v716, ";", (function(){
6739                 var symbol = l133;
6740                 var value = symbol.value;
6741                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6742                 return value;
6743             })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
6744                 var symbol = l133;
6745                 var value = symbol.value;
6746                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6747                 return value;
6748             })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
6749                 var symbol = l133;
6750                 var value = symbol.value;
6751                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6752                 return value;
6753             })())), l134.fvalue(pv, "return ", l134.fvalue(pv, "(x.car = ", v717, ", x)"), ";", (function(){
6754                 var symbol = l133;
6755                 var value = symbol.value;
6756                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6757                 return value;
6758             })())), "})()");
6759         })(l145.fvalue(pv, v714),l145.fvalue(pv, v715));
6760     })();
6761 })), cdr: (function(){
6762     var symbol = l267;
6763     var value = symbol.value;
6764     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6765     return value;
6766 })()}));
6767 var l284 = {name: "RPLACD"};
6768 ((l267).value = ({car: l44.fvalue(pv, l284, (function (values,v718,v719){
6769     checkArgs(arguments, 3);
6770     return (function(){
6771         return (function(v720,v721){
6772             return l134.fvalue(values, "(function(){", (function(){
6773                 var symbol = l133;
6774                 var value = symbol.value;
6775                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6776                 return value;
6777             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v720, ";", (function(){
6778                 var symbol = l133;
6779                 var value = symbol.value;
6780                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6781                 return value;
6782             })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
6783                 var symbol = l133;
6784                 var value = symbol.value;
6785                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6786                 return value;
6787             })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
6788                 var symbol = l133;
6789                 var value = symbol.value;
6790                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6791                 return value;
6792             })())), l134.fvalue(pv, "return ", l134.fvalue(pv, "(x.cdr = ", v721, ", x)"), ";", (function(){
6793                 var symbol = l133;
6794                 var value = symbol.value;
6795                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6796                 return value;
6797             })())), "})()");
6798         })(l145.fvalue(pv, v718),l145.fvalue(pv, v719));
6799     })();
6800 })), cdr: (function(){
6801     var symbol = l267;
6802     var value = symbol.value;
6803     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6804     return value;
6805 })()}));
6806 var l285 = {name: "SYMBOLP"};
6807 ((l267).value = ({car: l44.fvalue(pv, l285, (function (values,v722){
6808     checkArgs(arguments, 2);
6809     return (function(){
6810         return (function(v723){
6811             return l144.fvalue(values, l134.fvalue(pv, "(function(){", (function(){
6812                 var symbol = l133;
6813                 var value = symbol.value;
6814                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6815                 return value;
6816             })(), l143.fvalue(pv, "var tmp = ", v723, ";", (function(){
6817                 var symbol = l133;
6818                 var value = symbol.value;
6819                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6820                 return value;
6821             })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
6822                 var symbol = l133;
6823                 var value = symbol.value;
6824                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6825                 return value;
6826             })()), "})()"));
6827         })(l145.fvalue(pv, v722));
6828     })();
6829 })), cdr: (function(){
6830     var symbol = l267;
6831     var value = symbol.value;
6832     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6833     return value;
6834 })()}));
6835 var l286 = {name: "MAKE-SYMBOL"};
6836 ((l267).value = ({car: l44.fvalue(pv, l286, (function (values,v724){
6837     checkArgs(arguments, 2);
6838     return (function(){
6839         return (function(v725){
6840             return l134.fvalue(values, "(function(){", (function(){
6841                 var symbol = l133;
6842                 var value = symbol.value;
6843                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6844                 return value;
6845             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "name", " = ", v725, ";", (function(){
6846                 var symbol = l133;
6847                 var value = symbol.value;
6848                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6849                 return value;
6850             })()), l134.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){
6851                 var symbol = l133;
6852                 var value = symbol.value;
6853                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6854                 return value;
6855             })(), l143.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
6856                 var symbol = l133;
6857                 var value = symbol.value;
6858                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6859                 return value;
6860             })())), l134.fvalue(pv, "return ", "({name: name})", ";", (function(){
6861                 var symbol = l133;
6862                 var value = symbol.value;
6863                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6864                 return value;
6865             })())), "})()");
6866         })(l145.fvalue(pv, v724));
6867     })();
6868 })), cdr: (function(){
6869     var symbol = l267;
6870     var value = symbol.value;
6871     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6872     return value;
6873 })()}));
6874 var l287 = {name: "SYMBOL-NAME"};
6875 ((l267).value = ({car: l44.fvalue(pv, l287, (function (values,v726){
6876     checkArgs(arguments, 2);
6877     return (function(){
6878         return (function(v727){
6879             return l134.fvalue(values, "(", v727, ").name");
6880         })(l145.fvalue(pv, v726));
6881     })();
6882 })), cdr: (function(){
6883     var symbol = l267;
6884     var value = symbol.value;
6885     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6886     return value;
6887 })()}));
6888 ((l267).value = ({car: l44.fvalue(pv, l224, (function (values,v728,v729){
6889     checkArgs(arguments, 3);
6890     return (function(){
6891         return (function(v730,v731){
6892             return l134.fvalue(values, "(", v730, ").value = ", v731);
6893         })(l145.fvalue(pv, v728),l145.fvalue(pv, v729));
6894     })();
6895 })), cdr: (function(){
6896     var symbol = l267;
6897     var value = symbol.value;
6898     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6899     return value;
6900 })()}));
6901 var l288 = {name: "FSET"};
6902 ((l267).value = ({car: l44.fvalue(pv, l288, (function (values,v732,v733){
6903     checkArgs(arguments, 3);
6904     return (function(){
6905         return (function(v734,v735){
6906             return l134.fvalue(values, "(", v734, ").fvalue = ", v735);
6907         })(l145.fvalue(pv, v732),l145.fvalue(pv, v733));
6908     })();
6909 })), cdr: (function(){
6910     var symbol = l267;
6911     var value = symbol.value;
6912     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6913     return value;
6914 })()}));
6915 ((l267).value = ({car: l44.fvalue(pv, l18, (function (values,v736){
6916     checkArgs(arguments, 2);
6917     return (function(){
6918         return (function(v737){
6919             return l144.fvalue(values, l134.fvalue(pv, "(", v737, ".value !== undefined)"));
6920         })(l145.fvalue(pv, v736));
6921     })();
6922 })), cdr: (function(){
6923     var symbol = l267;
6924     var value = symbol.value;
6925     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6926     return value;
6927 })()}));
6928 var l289 = {name: "SYMBOL-VALUE"};
6929 ((l267).value = ({car: l44.fvalue(pv, l289, (function (values,v738){
6930     checkArgs(arguments, 2);
6931     return (function(){
6932         return (function(v739){
6933             return l134.fvalue(values, "(function(){", (function(){
6934                 var symbol = l133;
6935                 var value = symbol.value;
6936                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6937                 return value;
6938             })(), l143.fvalue(pv, "var symbol = ", v739, ";", (function(){
6939                 var symbol = l133;
6940                 var value = symbol.value;
6941                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6942                 return value;
6943             })(), "var value = symbol.value;", (function(){
6944                 var symbol = l133;
6945                 var value = symbol.value;
6946                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6947                 return value;
6948             })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
6949                 var symbol = l133;
6950                 var value = symbol.value;
6951                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6952                 return value;
6953             })(), "return value;", (function(){
6954                 var symbol = l133;
6955                 var value = symbol.value;
6956                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6957                 return value;
6958             })()), "})()");
6959         })(l145.fvalue(pv, v738));
6960     })();
6961 })), cdr: (function(){
6962     var symbol = l267;
6963     var value = symbol.value;
6964     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6965     return value;
6966 })()}));
6967 ((l267).value = ({car: l44.fvalue(pv, l233, (function (values,v740){
6968     checkArgs(arguments, 2);
6969     return (function(){
6970         return (function(v741){
6971             return l134.fvalue(values, "(function(){", (function(){
6972                 var symbol = l133;
6973                 var value = symbol.value;
6974                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6975                 return value;
6976             })(), l143.fvalue(pv, "var symbol = ", v741, ";", (function(){
6977                 var symbol = l133;
6978                 var value = symbol.value;
6979                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6980                 return value;
6981             })(), "var func = symbol.fvalue;", (function(){
6982                 var symbol = l133;
6983                 var value = symbol.value;
6984                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6985                 return value;
6986             })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
6987                 var symbol = l133;
6988                 var value = symbol.value;
6989                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6990                 return value;
6991             })(), "return func;", (function(){
6992                 var symbol = l133;
6993                 var value = symbol.value;
6994                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6995                 return value;
6996             })()), "})()");
6997         })(l145.fvalue(pv, v740));
6998     })();
6999 })), cdr: (function(){
7000     var symbol = l267;
7001     var value = symbol.value;
7002     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7003     return value;
7004 })()}));
7005 var l290 = {name: "SYMBOL-PLIST"};
7006 ((l267).value = ({car: l44.fvalue(pv, l290, (function (values,v742){
7007     checkArgs(arguments, 2);
7008     return (function(){
7009         return (function(v743){
7010             return l134.fvalue(values, "((", v743, ").plist || ", l145.fvalue(pv, l3.value), ")");
7011         })(l145.fvalue(pv, v742));
7012     })();
7013 })), cdr: (function(){
7014     var symbol = l267;
7015     var value = symbol.value;
7016     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7017     return value;
7018 })()}));
7019 var l291 = {name: "LAMBDA-CODE"};
7020 ((l267).value = ({car: l44.fvalue(pv, l291, (function (values,v744){
7021     checkArgs(arguments, 2);
7022     return (function(){
7023         return (function(v745){
7024             return l134.fvalue(values, "(", v745, ").toString()");
7025         })(l145.fvalue(pv, v744));
7026     })();
7027 })), cdr: (function(){
7028     var symbol = l267;
7029     var value = symbol.value;
7030     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7031     return value;
7032 })()}));
7033 var l292 = {name: "EQ"};
7034 ((l267).value = ({car: l44.fvalue(pv, l292, (function (values,v746,v747){
7035     checkArgs(arguments, 3);
7036     return (function(){
7037         return (function(v748,v749){
7038             return l144.fvalue(values, l134.fvalue(pv, "(", v748, " === ", v749, ")"));
7039         })(l145.fvalue(pv, v746),l145.fvalue(pv, v747));
7040     })();
7041 })), cdr: (function(){
7042     var symbol = l267;
7043     var value = symbol.value;
7044     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7045     return value;
7046 })()}));
7047 var l293 = {name: "EQUAL"};
7048 ((l267).value = ({car: l44.fvalue(pv, l293, (function (values,v750,v751){
7049     checkArgs(arguments, 3);
7050     return (function(){
7051         return (function(v752,v753){
7052             return l144.fvalue(values, l134.fvalue(pv, "(", v752, " == ", v753, ")"));
7053         })(l145.fvalue(pv, v750),l145.fvalue(pv, v751));
7054     })();
7055 })), cdr: (function(){
7056     var symbol = l267;
7057     var value = symbol.value;
7058     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7059     return value;
7060 })()}));
7061 var l294 = {name: "CHAR-TO-STRING"};
7062 ((l267).value = ({car: l44.fvalue(pv, l294, (function (values,v754){
7063     checkArgs(arguments, 2);
7064     return (function(){
7065         return (function(v755){
7066             return l134.fvalue(values, "(function(){", (function(){
7067                 var symbol = l133;
7068                 var value = symbol.value;
7069                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7070                 return value;
7071             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v755, ";", (function(){
7072                 var symbol = l133;
7073                 var value = symbol.value;
7074                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7075                 return value;
7076             })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7077                 var symbol = l133;
7078                 var value = symbol.value;
7079                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7080                 return value;
7081             })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7082                 var symbol = l133;
7083                 var value = symbol.value;
7084                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7085                 return value;
7086             })())), l134.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){
7087                 var symbol = l133;
7088                 var value = symbol.value;
7089                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7090                 return value;
7091             })())), "})()");
7092         })(l145.fvalue(pv, v754));
7093     })();
7094 })), cdr: (function(){
7095     var symbol = l267;
7096     var value = symbol.value;
7097     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7098     return value;
7099 })()}));
7100 var l295 = {name: "STRINGP"};
7101 ((l267).value = ({car: l44.fvalue(pv, l295, (function (values,v756){
7102     checkArgs(arguments, 2);
7103     return (function(){
7104         return (function(v757){
7105             return l144.fvalue(values, l134.fvalue(pv, "(typeof(", v757, ") == \"string\")"));
7106         })(l145.fvalue(pv, v756));
7107     })();
7108 })), cdr: (function(){
7109     var symbol = l267;
7110     var value = symbol.value;
7111     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7112     return value;
7113 })()}));
7114 var l296 = {name: "STRING-UPCASE"};
7115 ((l267).value = ({car: l44.fvalue(pv, l296, (function (values,v758){
7116     checkArgs(arguments, 2);
7117     return (function(){
7118         return (function(v759){
7119             return l134.fvalue(values, "(function(){", (function(){
7120                 var symbol = l133;
7121                 var value = symbol.value;
7122                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7123                 return value;
7124             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v759, ";", (function(){
7125                 var symbol = l133;
7126                 var value = symbol.value;
7127                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7128                 return value;
7129             })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7130                 var symbol = l133;
7131                 var value = symbol.value;
7132                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7133                 return value;
7134             })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7135                 var symbol = l133;
7136                 var value = symbol.value;
7137                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7138                 return value;
7139             })())), l134.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){
7140                 var symbol = l133;
7141                 var value = symbol.value;
7142                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7143                 return value;
7144             })())), "})()");
7145         })(l145.fvalue(pv, v758));
7146     })();
7147 })), cdr: (function(){
7148     var symbol = l267;
7149     var value = symbol.value;
7150     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7151     return value;
7152 })()}));
7153 var l297 = {name: "STRING-LENGTH"};
7154 ((l267).value = ({car: l44.fvalue(pv, l297, (function (values,v760){
7155     checkArgs(arguments, 2);
7156     return (function(){
7157         return (function(v761){
7158             return l134.fvalue(values, "(function(){", (function(){
7159                 var symbol = l133;
7160                 var value = symbol.value;
7161                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7162                 return value;
7163             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v761, ";", (function(){
7164                 var symbol = l133;
7165                 var value = symbol.value;
7166                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7167                 return value;
7168             })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7169                 var symbol = l133;
7170                 var value = symbol.value;
7171                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7172                 return value;
7173             })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7174                 var symbol = l133;
7175                 var value = symbol.value;
7176                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7177                 return value;
7178             })())), l134.fvalue(pv, "return ", "x.length", ";", (function(){
7179                 var symbol = l133;
7180                 var value = symbol.value;
7181                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7182                 return value;
7183             })())), "})()");
7184         })(l145.fvalue(pv, v760));
7185     })();
7186 })), cdr: (function(){
7187     var symbol = l267;
7188     var value = symbol.value;
7189     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7190     return value;
7191 })()}));
7192 var l298 = {name: "SLICE"};
7193 ((l267).value = ({car: l44.fvalue(pv, l298, (function (values,v762,v763,v764){
7194     checkArgsAtLeast(arguments, 3);
7195     checkArgsAtMost(arguments, 4);
7196     switch(arguments.length-1){
7197     case 2:
7198     v764=l3.value;
7199     default: break;
7200     }
7201     return (function(){
7202         return l134.fvalue(values, "(function(){", (function(){
7203             var symbol = l133;
7204             var value = symbol.value;
7205             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7206             return value;
7207         })(), l143.fvalue(pv, "var str = ", l145.fvalue(pv, v762), ";", (function(){
7208             var symbol = l133;
7209             var value = symbol.value;
7210             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7211             return value;
7212         })(), "var a = ", l145.fvalue(pv, v763), ";", (function(){
7213             var symbol = l133;
7214             var value = symbol.value;
7215             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7216             return value;
7217         })(), "var b;", (function(){
7218             var symbol = l133;
7219             var value = symbol.value;
7220             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7221             return value;
7222         })(), (v764 !== l3.value ? l134.fvalue(pv, "b = ", l145.fvalue(pv, v764), ";", (function(){
7223             var symbol = l133;
7224             var value = symbol.value;
7225             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7226             return value;
7227         })()) : ""), "return str.slice(a,b);", (function(){
7228             var symbol = l133;
7229             var value = symbol.value;
7230             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7231             return value;
7232         })()), "})()");
7233     })();
7234 })), cdr: (function(){
7235     var symbol = l267;
7236     var value = symbol.value;
7237     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7238     return value;
7239 })()}));
7240 var l299 = {name: "CHAR"};
7241 ((l267).value = ({car: l44.fvalue(pv, l299, (function (values,v765,v766){
7242     checkArgs(arguments, 3);
7243     return (function(){
7244         return (function(v767,v768){
7245             return l134.fvalue(values, "(function(){", (function(){
7246                 var symbol = l133;
7247                 var value = symbol.value;
7248                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7249                 return value;
7250             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "string", " = ", v767, ";", (function(){
7251                 var symbol = l133;
7252                 var value = symbol.value;
7253                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7254                 return value;
7255             })()), l134.fvalue(pv, "var ", "index", " = ", v768, ";", (function(){
7256                 var symbol = l133;
7257                 var value = symbol.value;
7258                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7259                 return value;
7260             })()), l134.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7261                 var symbol = l133;
7262                 var value = symbol.value;
7263                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7264                 return value;
7265             })(), l143.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7266                 var symbol = l133;
7267                 var value = symbol.value;
7268                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7269                 return value;
7270             })())), l134.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){
7271                 var symbol = l133;
7272                 var value = symbol.value;
7273                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7274                 return value;
7275             })(), l143.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
7276                 var symbol = l133;
7277                 var value = symbol.value;
7278                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7279                 return value;
7280             })())), l134.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){
7281                 var symbol = l133;
7282                 var value = symbol.value;
7283                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7284                 return value;
7285             })())), "})()");
7286         })(l145.fvalue(pv, v765),l145.fvalue(pv, v766));
7287     })();
7288 })), cdr: (function(){
7289     var symbol = l267;
7290     var value = symbol.value;
7291     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7292     return value;
7293 })()}));
7294 ((l267).value = ({car: l44.fvalue(pv, l72, (function (values,v769,v770){
7295     checkArgs(arguments, 3);
7296     return (function(){
7297         return (function(v771,v772){
7298             return l134.fvalue(values, "(function(){", (function(){
7299                 var symbol = l133;
7300                 var value = symbol.value;
7301                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7302                 return value;
7303             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "string1", " = ", v771, ";", (function(){
7304                 var symbol = l133;
7305                 var value = symbol.value;
7306                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7307                 return value;
7308             })()), l134.fvalue(pv, "var ", "string2", " = ", v772, ";", (function(){
7309                 var symbol = l133;
7310                 var value = symbol.value;
7311                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7312                 return value;
7313             })()), l134.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){
7314                 var symbol = l133;
7315                 var value = symbol.value;
7316                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7317                 return value;
7318             })(), l143.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
7319                 var symbol = l133;
7320                 var value = symbol.value;
7321                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7322                 return value;
7323             })())), l134.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){
7324                 var symbol = l133;
7325                 var value = symbol.value;
7326                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7327                 return value;
7328             })(), l143.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
7329                 var symbol = l133;
7330                 var value = symbol.value;
7331                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7332                 return value;
7333             })())), l134.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){
7334                 var symbol = l133;
7335                 var value = symbol.value;
7336                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7337                 return value;
7338             })())), "})()");
7339         })(l145.fvalue(pv, v769),l145.fvalue(pv, v770));
7340     })();
7341 })), cdr: (function(){
7342     var symbol = l267;
7343     var value = symbol.value;
7344     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7345     return value;
7346 })()}));
7347 var l300 = {name: "FUNCALL"};
7348 ((l267).value = ({car: l44.fvalue(pv, l300, (function (values,v774){
7349     checkArgsAtLeast(arguments, 2);
7350     var v773= l3.value;
7351     for (var i = arguments.length-1; i>=2; i--)
7352         v773 = {car: arguments[i], cdr:
7353     v773};
7354     return (function(){
7355         return l134.fvalue(values, "(", l145.fvalue(pv, v774), ")(", l136.fvalue(pv, ({car: ((function(){
7356             var symbol = l172;
7357             var value = symbol.value;
7358             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7359             return value;
7360         })() !== l3.value ? "values" : "pv"), cdr: l73.fvalue(pv, (function(){
7361             var symbol = l145;
7362             var func = symbol.fvalue;
7363             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7364             return func;
7365         })(), v773)}), ", "), ")");
7366     })();
7367 })), cdr: (function(){
7368     var symbol = l267;
7369     var value = symbol.value;
7370     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7371     return value;
7372 })()}));
7373 var l301 = {name: "APPLY"};
7374 ((l267).value = ({car: l44.fvalue(pv, l301, (function (values,v776){
7375     checkArgsAtLeast(arguments, 2);
7376     var v775= l3.value;
7377     for (var i = arguments.length-1; i>=2; i--)
7378         v775 = {car: arguments[i], cdr:
7379     v775};
7380     return (function(){
7381         return (l12.fvalue(pv, v775) !== l3.value ? l134.fvalue(values, "(", l145.fvalue(pv, v776), ")()") : (function(v777,v778){
7382             return l134.fvalue(values, "(function(){", (function(){
7383                 var symbol = l133;
7384                 var value = symbol.value;
7385                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7386                 return value;
7387             })(), l143.fvalue(pv, "var f = ", l145.fvalue(pv, v776), ";", (function(){
7388                 var symbol = l133;
7389                 var value = symbol.value;
7390                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7391                 return value;
7392             })(), "var args = [", l136.fvalue(pv, ({car: ((function(){
7393                 var symbol = l172;
7394                 var value = symbol.value;
7395                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7396                 return value;
7397             })() !== l3.value ? "values" : "pv"), cdr: l73.fvalue(pv, (function(){
7398                 var symbol = l145;
7399                 var func = symbol.fvalue;
7400                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7401                 return func;
7402             })(), v777)}), ", "), "];", (function(){
7403                 var symbol = l133;
7404                 var value = symbol.value;
7405                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7406                 return value;
7407             })(), "var tail = (", l145.fvalue(pv, v778), ");", (function(){
7408                 var symbol = l133;
7409                 var value = symbol.value;
7410                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7411                 return value;
7412             })(), "while (tail != ", l145.fvalue(pv, l3.value), "){", (function(){
7413                 var symbol = l133;
7414                 var value = symbol.value;
7415                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7416                 return value;
7417             })(), "    args.push(tail.car);", (function(){
7418                 var symbol = l133;
7419                 var value = symbol.value;
7420                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7421                 return value;
7422             })(), "    tail = tail.cdr;", (function(){
7423                 var symbol = l133;
7424                 var value = symbol.value;
7425                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7426                 return value;
7427             })(), "}", (function(){
7428                 var symbol = l133;
7429                 var value = symbol.value;
7430                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7431                 return value;
7432             })(), "return f.apply(this, args);", (function(){
7433                 var symbol = l133;
7434                 var value = symbol.value;
7435                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7436                 return value;
7437             })()), "})()");
7438         })(l87.fvalue(pv, v775),(function(){
7439             var tmp = l86.fvalue(pv, v775);
7440             return tmp === l3.value? l3.value: tmp.car;
7441         })()));
7442     })();
7443 })), cdr: (function(){
7444     var symbol = l267;
7445     var value = symbol.value;
7446     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7447     return value;
7448 })()}));
7449 var l302 = {name: "JS-EVAL"};
7450 ((l267).value = ({car: l44.fvalue(pv, l302, (function (values,v779){
7451     checkArgs(arguments, 2);
7452     return (function(){
7453         return (function(v780){
7454             return l134.fvalue(values, "(function(){", (function(){
7455                 var symbol = l133;
7456                 var value = symbol.value;
7457                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7458                 return value;
7459             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "string", " = ", v780, ";", (function(){
7460                 var symbol = l133;
7461                 var value = symbol.value;
7462                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7463                 return value;
7464             })()), l134.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7465                 var symbol = l133;
7466                 var value = symbol.value;
7467                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7468                 return value;
7469             })(), l143.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7470                 var symbol = l133;
7471                 var value = symbol.value;
7472                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7473                 return value;
7474             })())), l134.fvalue(pv, "return ", ((function(){
7475                 var symbol = l172;
7476                 var value = symbol.value;
7477                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7478                 return value;
7479             })() !== l3.value ? l134.fvalue(pv, "(function(){", (function(){
7480                 var symbol = l133;
7481                 var value = symbol.value;
7482                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7483                 return value;
7484             })(), l143.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){
7485                 var symbol = l133;
7486                 var value = symbol.value;
7487                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7488                 return value;
7489             })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){
7490                 var symbol = l133;
7491                 var value = symbol.value;
7492                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7493                 return value;
7494             })(), l143.fvalue(pv, "v = [v];", (function(){
7495                 var symbol = l133;
7496                 var value = symbol.value;
7497                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7498                 return value;
7499             })(), "v['multiple-value'] = true;", (function(){
7500                 var symbol = l133;
7501                 var value = symbol.value;
7502                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7503                 return value;
7504             })()), "}", (function(){
7505                 var symbol = l133;
7506                 var value = symbol.value;
7507                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7508                 return value;
7509             })(), "return values.apply(this, v);", (function(){
7510                 var symbol = l133;
7511                 var value = symbol.value;
7512                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7513                 return value;
7514             })()), "})()") : "eval.apply(window, [string])"), ";", (function(){
7515                 var symbol = l133;
7516                 var value = symbol.value;
7517                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7518                 return value;
7519             })())), "})()");
7520         })(l145.fvalue(pv, v779));
7521     })();
7522 })), cdr: (function(){
7523     var symbol = l267;
7524     var value = symbol.value;
7525     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7526     return value;
7527 })()}));
7528 var l303 = {name: "ERROR"};
7529 ((l267).value = ({car: l44.fvalue(pv, l303, (function (values,v781){
7530     checkArgs(arguments, 2);
7531     return (function(){
7532         return (function(v782){
7533             return l134.fvalue(values, "(function(){", (function(){
7534                 var symbol = l133;
7535                 var value = symbol.value;
7536                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7537                 return value;
7538             })(), l143.fvalue(pv, "throw ", v782, ";", (function(){
7539                 var symbol = l133;
7540                 var value = symbol.value;
7541                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7542                 return value;
7543             })()), "})()");
7544         })(l145.fvalue(pv, v781));
7545     })();
7546 })), cdr: (function(){
7547     var symbol = l267;
7548     var value = symbol.value;
7549     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7550     return value;
7551 })()}));
7552 var l304 = {name: "NEW"};
7553 ((l267).value = ({car: l44.fvalue(pv, l304, (function (values){
7554     checkArgsAtMost(arguments, 1);
7555     return (function(){
7556         return (function(){
7557             return "{}";
7558         })();
7559     })();
7560 })), cdr: (function(){
7561     var symbol = l267;
7562     var value = symbol.value;
7563     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7564     return value;
7565 })()}));
7566 var l305 = {name: "OBJECTP"};
7567 ((l267).value = ({car: l44.fvalue(pv, l305, (function (values,v783){
7568     checkArgs(arguments, 2);
7569     return (function(){
7570         return (function(v784){
7571             return l144.fvalue(values, l134.fvalue(pv, "(typeof (", v784, ") === 'object')"));
7572         })(l145.fvalue(pv, v783));
7573     })();
7574 })), cdr: (function(){
7575     var symbol = l267;
7576     var value = symbol.value;
7577     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7578     return value;
7579 })()}));
7580 var l306 = {name: "OGET"};
7581 ((l267).value = ({car: l44.fvalue(pv, l306, (function (values,v785,v786){
7582     checkArgs(arguments, 3);
7583     return (function(){
7584         return (function(v787,v788){
7585             return l134.fvalue(values, "(function(){", (function(){
7586                 var symbol = l133;
7587                 var value = symbol.value;
7588                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7589                 return value;
7590             })(), l143.fvalue(pv, "var tmp = ", "(", v787, ")[", v788, "];", (function(){
7591                 var symbol = l133;
7592                 var value = symbol.value;
7593                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7594                 return value;
7595             })(), "return tmp == undefined? ", l145.fvalue(pv, l3.value), ": tmp ;", (function(){
7596                 var symbol = l133;
7597                 var value = symbol.value;
7598                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7599                 return value;
7600             })()), "})()");
7601         })(l145.fvalue(pv, v785),l145.fvalue(pv, v786));
7602     })();
7603 })), cdr: (function(){
7604     var symbol = l267;
7605     var value = symbol.value;
7606     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7607     return value;
7608 })()}));
7609 var l307 = {name: "OSET"};
7610 ((l267).value = ({car: l44.fvalue(pv, l307, (function (values,v789,v790,v791){
7611     checkArgs(arguments, 4);
7612     return (function(){
7613         return (function(v792,v793,v794){
7614             return l134.fvalue(values, "((", v792, ")[", v793, "] = ", v794, ")");
7615         })(l145.fvalue(pv, v789),l145.fvalue(pv, v790),l145.fvalue(pv, v791));
7616     })();
7617 })), cdr: (function(){
7618     var symbol = l267;
7619     var value = symbol.value;
7620     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7621     return value;
7622 })()}));
7623 var l308 = {name: "IN"};
7624 ((l267).value = ({car: l44.fvalue(pv, l308, (function (values,v795,v796){
7625     checkArgs(arguments, 3);
7626     return (function(){
7627         return (function(v797,v798){
7628             return l144.fvalue(values, l134.fvalue(pv, "((", v797, ") in (", v798, "))"));
7629         })(l145.fvalue(pv, v795),l145.fvalue(pv, v796));
7630     })();
7631 })), cdr: (function(){
7632     var symbol = l267;
7633     var value = symbol.value;
7634     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7635     return value;
7636 })()}));
7637 var l309 = {name: "FUNCTIONP"};
7638 ((l267).value = ({car: l44.fvalue(pv, l309, (function (values,v799){
7639     checkArgs(arguments, 2);
7640     return (function(){
7641         return (function(v800){
7642             return l144.fvalue(values, l134.fvalue(pv, "(typeof ", v800, " == 'function')"));
7643         })(l145.fvalue(pv, v799));
7644     })();
7645 })), cdr: (function(){
7646     var symbol = l267;
7647     var value = symbol.value;
7648     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7649     return value;
7650 })()}));
7651 var l310 = {name: "WRITE-STRING"};
7652 ((l267).value = ({car: l44.fvalue(pv, l310, (function (values,v801){
7653     checkArgs(arguments, 2);
7654     return (function(){
7655         return (function(v802){
7656             return l134.fvalue(values, "(function(){", (function(){
7657                 var symbol = l133;
7658                 var value = symbol.value;
7659                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7660                 return value;
7661             })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v802, ";", (function(){
7662                 var symbol = l133;
7663                 var value = symbol.value;
7664                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7665                 return value;
7666             })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7667                 var symbol = l133;
7668                 var value = symbol.value;
7669                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7670                 return value;
7671             })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7672                 var symbol = l133;
7673                 var value = symbol.value;
7674                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7675                 return value;
7676             })())), l134.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){
7677                 var symbol = l133;
7678                 var value = symbol.value;
7679                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7680                 return value;
7681             })())), "})()");
7682         })(l145.fvalue(pv, v801));
7683     })();
7684 })), cdr: (function(){
7685     var symbol = l267;
7686     var value = symbol.value;
7687     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7688     return value;
7689 })()}));
7690 var l311 = {name: "MAKE-ARRAY"};
7691 ((l267).value = ({car: l44.fvalue(pv, l311, (function (values,v803){
7692     checkArgs(arguments, 2);
7693     return (function(){
7694         return (function(v804){
7695             return l134.fvalue(values, "(function(){", (function(){
7696                 var symbol = l133;
7697                 var value = symbol.value;
7698                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7699                 return value;
7700             })(), l143.fvalue(pv, "var r = [];", (function(){
7701                 var symbol = l133;
7702                 var value = symbol.value;
7703                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7704                 return value;
7705             })(), "for (var i = 0; i < ", v804, "; i++)", (function(){
7706                 var symbol = l133;
7707                 var value = symbol.value;
7708                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7709                 return value;
7710             })(), l143.fvalue(pv, "r.push(", l145.fvalue(pv, l3.value), ");", (function(){
7711                 var symbol = l133;
7712                 var value = symbol.value;
7713                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7714                 return value;
7715             })()), "return r;", (function(){
7716                 var symbol = l133;
7717                 var value = symbol.value;
7718                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7719                 return value;
7720             })()), "})()");
7721         })(l145.fvalue(pv, v803));
7722     })();
7723 })), cdr: (function(){
7724     var symbol = l267;
7725     var value = symbol.value;
7726     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7727     return value;
7728 })()}));
7729 var l312 = {name: "ARRAYP"};
7730 ((l267).value = ({car: l44.fvalue(pv, l312, (function (values,v805){
7731     checkArgs(arguments, 2);
7732     return (function(){
7733         return (function(v806){
7734             return l144.fvalue(values, l134.fvalue(pv, "(function(){", (function(){
7735                 var symbol = l133;
7736                 var value = symbol.value;
7737                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7738                 return value;
7739             })(), l143.fvalue(pv, "var x = ", v806, ";", (function(){
7740                 var symbol = l133;
7741                 var value = symbol.value;
7742                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7743                 return value;
7744             })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
7745         })(l145.fvalue(pv, v805));
7746     })();
7747 })), cdr: (function(){
7748     var symbol = l267;
7749     var value = symbol.value;
7750     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7751     return value;
7752 })()}));
7753 var l313 = {name: "AREF"};
7754 ((l267).value = ({car: l44.fvalue(pv, l313, (function (values,v807,v808){
7755     checkArgs(arguments, 3);
7756     return (function(){
7757         return (function(v809,v810){
7758             return l134.fvalue(values, "(function(){", (function(){
7759                 var symbol = l133;
7760                 var value = symbol.value;
7761                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7762                 return value;
7763             })(), l143.fvalue(pv, "var x = ", "(", v809, ")[", v810, "];", (function(){
7764                 var symbol = l133;
7765                 var value = symbol.value;
7766                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7767                 return value;
7768             })(), "if (x === undefined) throw 'Out of range';", (function(){
7769                 var symbol = l133;
7770                 var value = symbol.value;
7771                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7772                 return value;
7773             })(), "return x;", (function(){
7774                 var symbol = l133;
7775                 var value = symbol.value;
7776                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7777                 return value;
7778             })()), "})()");
7779         })(l145.fvalue(pv, v807),l145.fvalue(pv, v808));
7780     })();
7781 })), cdr: (function(){
7782     var symbol = l267;
7783     var value = symbol.value;
7784     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7785     return value;
7786 })()}));
7787 var l314 = {name: "ASET"};
7788 ((l267).value = ({car: l44.fvalue(pv, l314, (function (values,v811,v812,v813){
7789     checkArgs(arguments, 4);
7790     return (function(){
7791         return (function(v814,v815,v816){
7792             return l134.fvalue(values, "(function(){", (function(){
7793                 var symbol = l133;
7794                 var value = symbol.value;
7795                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7796                 return value;
7797             })(), l143.fvalue(pv, "var x = ", v814, ";", (function(){
7798                 var symbol = l133;
7799                 var value = symbol.value;
7800                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7801                 return value;
7802             })(), "var i = ", v815, ";", (function(){
7803                 var symbol = l133;
7804                 var value = symbol.value;
7805                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7806                 return value;
7807             })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
7808                 var symbol = l133;
7809                 var value = symbol.value;
7810                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7811                 return value;
7812             })(), "return x[i] = ", v816, ";", (function(){
7813                 var symbol = l133;
7814                 var value = symbol.value;
7815                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7816                 return value;
7817             })()), "})()");
7818         })(l145.fvalue(pv, v811),l145.fvalue(pv, v812),l145.fvalue(pv, v813));
7819     })();
7820 })), cdr: (function(){
7821     var symbol = l267;
7822     var value = symbol.value;
7823     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7824     return value;
7825 })()}));
7826 var l315 = {name: "GET-UNIX-TIME"};
7827 ((l267).value = ({car: l44.fvalue(pv, l315, (function (values){
7828     checkArgsAtMost(arguments, 1);
7829     return (function(){
7830         return (function(){
7831             return l134.fvalue(values, "(Math.round(new Date() / 1000))");
7832         })();
7833     })();
7834 })), cdr: (function(){
7835     var symbol = l267;
7836     var value = symbol.value;
7837     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7838     return value;
7839 })()}));
7840 var l316 = {name: "VALUES-ARRAY"};
7841 ((l267).value = ({car: l44.fvalue(pv, l316, (function (values,v817){
7842     checkArgs(arguments, 2);
7843     return (function(){
7844         return (function(v818){
7845             return ((function(){
7846                 var symbol = l172;
7847                 var value = symbol.value;
7848                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7849                 return value;
7850             })() !== l3.value ? l134.fvalue(values, "values.apply(this, ", v818, ")") : l134.fvalue(values, "pv.apply(this, ", v818, ")"));
7851         })(l145.fvalue(pv, v817));
7852     })();
7853 })), cdr: (function(){
7854     var symbol = l267;
7855     var value = symbol.value;
7856     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7857     return value;
7858 })()}));
7859 ((l267).value = ({car: l44.fvalue(pv, l142, (function (values){
7860     var v819= l3.value;
7861     for (var i = arguments.length-1; i>=1; i--)
7862         v819 = {car: arguments[i], cdr:
7863     v819};
7864     return (function(){
7865         return ((function(){
7866             var symbol = l172;
7867             var value = symbol.value;
7868             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7869             return value;
7870         })() !== l3.value ? l134.fvalue(values, "values(", l136.fvalue(pv, l73.fvalue(pv, (function(){
7871             var symbol = l145;
7872             var func = symbol.fvalue;
7873             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7874             return func;
7875         })(), v819), ", "), ")") : l134.fvalue(values, "pv(", l136.fvalue(pv, l73.fvalue(pv, (function(){
7876             var symbol = l145;
7877             var func = symbol.fvalue;
7878             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7879             return func;
7880         })(), v819), ", "), ")"));
7881     })();
7882 })), cdr: (function(){
7883     var symbol = l267;
7884     var value = symbol.value;
7885     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7886     return value;
7887 })()}));
7888 (function(){
7889     (l198).fvalue = (function(v822){
7890         ((v822)["fname"] = "MACRO");
7891         return v822;
7892     })((function (values,v820){
7893         checkArgs(arguments, 2);
7894         return (function(){
7895             return (((function(){
7896                 var tmp = v820;
7897                 return (typeof tmp == 'object' && 'name' in tmp);
7898             })()?l4.value: l3.value) !== l3.value ? (function(v821){
7899                 return (((l175.fvalue(pv, v821) === l198)?l4.value: l3.value) !== l3.value ? v821 : l3.value);
7900             })(l187.fvalue(pv, v820, (function(){
7901                 var symbol = l188;
7902                 var value = symbol.value;
7903                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7904                 return value;
7905             })(), l104)) : l3.value);
7906         })();
7907     }));
7908     return l198;
7909 })();
7910 var l317 = {name: "LS-MACROEXPAND-1"};
7911 (function(){
7912     (l317).fvalue = (function(v827){
7913         ((v827)["fname"] = "LS-MACROEXPAND-1");
7914         return v827;
7915     })((function (values,v823){
7916         checkArgs(arguments, 2);
7917         return (function(){
7918             return (function(v824){
7919                 return (v824 !== l3.value ? (function(v825){
7920                     (l59.fvalue(pv, v825) !== l3.value ? (function(v826){
7921                         l178.fvalue(pv, v824, v826);
7922                         return (v825 = v826);
7923                     })(l242.fvalue(pv, v825)) : l3.value);
7924                     return (function(){
7925                         var f = v825;
7926                         var args = [values];
7927                         var tail = ((function(){
7928                             var tmp = v823;
7929                             return tmp === l3.value? l3.value: tmp.cdr;
7930                         })());
7931                         while (tail != l3.value){
7932                             args.push(tail.car);
7933                             tail = tail.cdr;
7934                         }
7935                         return f.apply(this, args);
7936                     })();
7937                 })(l176.fvalue(pv, v824)) : v823);
7938             })(l198.fvalue(pv, (function(){
7939                 var tmp = v823;
7940                 return tmp === l3.value? l3.value: tmp.car;
7941             })()));
7942         })();
7943     }));
7944     return l317;
7945 })();
7946 var l318 = {name: "COMPILE-FUNCALL"};
7947 var l319 = {name: "G902"};
7948 (function(){
7949     (l318).fvalue = (function(v832){
7950         ((v832)["fname"] = "COMPILE-FUNCALL");
7951         return v832;
7952     })((function (values,v828,v829){
7953         checkArgs(arguments, 3);
7954         return (function(){
7955             return (function(){
7956                 var v830 = ((function(){
7957                     var symbol = l172;
7958                     var value = symbol.value;
7959                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7960                     return value;
7961                 })() !== l3.value ? "values" : "pv");
7962                 var v831 = l134.fvalue(pv, "(", l136.fvalue(pv, ({car: v830, cdr: l73.fvalue(pv, (function(){
7963                     var symbol = l145;
7964                     var func = symbol.fvalue;
7965                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7966                     return func;
7967                 })(), v829)}), ", "), ")");
7968                 return (l236.fvalue(pv, v828) !== l3.value ? l134.fvalue(values, l236.fvalue(pv, v828), v831) : ((((function(){
7969                     var tmp = v828;
7970                     return (typeof tmp == 'object' && 'name' in tmp);
7971                 })()?l4.value: l3.value) !== l3.value ? (((l122.fvalue(pv, v828) === l113.fvalue(pv, "COMMON-LISP"))?l4.value: l3.value) !== l3.value ? (function(){
7972                     var symbol = l319;
7973                     var value = symbol.value;
7974                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7975                     return value;
7976                 })() : l3.value) : l3.value) !== l3.value ? l134.fvalue(values, l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, v828))), ".fvalue", v831) : l134.fvalue(values, l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l104), l44.fvalue(pv, v828))), v831)));
7977             })();
7978         })();
7979     }));
7980     return l318;
7981 })();
7982 (function(){
7983     (l222).fvalue = (function(v835){
7984         ((v835)["fname"] = "LS-COMPILE-BLOCK");
7985         return v835;
7986     })((function (values,v833,v834){
7987         checkArgsAtLeast(arguments, 2);
7988         checkArgsAtMost(arguments, 3);
7989         switch(arguments.length-1){
7990         case 1:
7991         v834=l3.value;
7992         default: break;
7993         }
7994         return (function(){
7995             return (v834 !== l3.value ? l134.fvalue(values, l222.fvalue(pv, l87.fvalue(pv, v833)), "return ", l145.fvalue(pv, (function(){
7996                 var tmp = l86.fvalue(pv, v833);
7997                 return tmp === l3.value? l3.value: tmp.car;
7998             })(), (function(){
7999                 var symbol = l172;
8000                 var value = symbol.value;
8001                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8002                 return value;
8003             })()), ";") : l137.fvalue(values, l90.fvalue(pv, (function(){
8004                 var symbol = l195;
8005                 var func = symbol.fvalue;
8006                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8007                 return func;
8008             })(), l73.fvalue(pv, (function(){
8009                 var symbol = l145;
8010                 var func = symbol.fvalue;
8011                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8012                 return func;
8013             })(), v833)), l134.fvalue(pv, ";", (function(){
8014                 var symbol = l133;
8015                 var value = symbol.value;
8016                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8017                 return value;
8018             })())));
8019         })();
8020     }));
8021     return l222;
8022 })();
8023 (function(){
8024     (l145).fvalue = (function(v845){
8025         ((v845)["fname"] = "LS-COMPILE");
8026         return v845;
8027     })((function (values,v836,v837){
8028         checkArgsAtLeast(arguments, 2);
8029         checkArgsAtMost(arguments, 3);
8030         switch(arguments.length-1){
8031         case 1:
8032         v837=l3.value;
8033         default: break;
8034         }
8035         return (function(){
8036             return (function(v838){
8037                 try {
8038                     var tmp;
8039                     tmp = l172.value;
8040                     l172.value = v838;
8041                     v838 = tmp;
8042                     return (((function(){
8043                         var tmp = v836;
8044                         return (typeof tmp == 'object' && 'name' in tmp);
8045                     })()?l4.value: l3.value) !== l3.value ? (function(v839){
8046                         return ((v839 !== l3.value ? l27.fvalue(pv, l88.fvalue(pv, l202, l177.fvalue(pv, v839))) : l3.value) !== l3.value ? l176.fvalue(values, v839) : ((function(v840){
8047                             return (v840 !== l3.value ? v840 : l88.fvalue(pv, l204, l177.fvalue(pv, v839)));
8048                         })(l121.fvalue(pv, v836)) !== l3.value ? l134.fvalue(values, l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, v836))), ".value") : l145.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l289), l44.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, v836)))))));
8049                     })(l187.fvalue(pv, v836, (function(){
8050                         var symbol = l188;
8051                         var value = symbol.value;
8052                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8053                         return value;
8054                     })(), l105)) : (l81.fvalue(pv, v836) !== l3.value ? l17.fvalue(values, v836) : (((typeof(v836) == "string")?l4.value: l3.value) !== l3.value ? l134.fvalue(values, "\"", l148.fvalue(pv, v836), "\"") : (((function(){
8055                         var x = v836;
8056                         return typeof x === 'object' && 'length' in x;
8057                     })()?l4.value: l3.value) !== l3.value ? l231.fvalue(values, v836) : (l59.fvalue(pv, v836) !== l3.value ? (function(v841,v842){
8058                         return (l97.fvalue(pv, v841, (function(){
8059                             var symbol = l206;
8060                             var value = symbol.value;
8061                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8062                             return value;
8063                         })()) !== l3.value ? (function(v843){
8064                             return (function(){
8065                                 var f = v843;
8066                                 var args = [values];
8067                                 var tail = (v842);
8068                                 while (tail != l3.value){
8069                                     args.push(tail.car);
8070                                     tail = tail.cdr;
8071                                 }
8072                                 return f.apply(this, args);
8073                             })();
8074                         })(l40.fvalue(pv, l97.fvalue(pv, v841, (function(){
8075                             var symbol = l206;
8076                             var value = symbol.value;
8077                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8078                             return value;
8079                         })()))) : ((l97.fvalue(pv, v841, (function(){
8080                             var symbol = l267;
8081                             var value = symbol.value;
8082                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8083                             return value;
8084                         })()) !== l3.value ? l27.fvalue(pv, l200.fvalue(pv, v841, l104, l203)) : l3.value) !== l3.value ? (function(v844){
8085                             return (function(){
8086                                 var f = v844;
8087                                 var args = [values];
8088                                 var tail = (v842);
8089                                 while (tail != l3.value){
8090                                     args.push(tail.car);
8091                                     tail = tail.cdr;
8092                                 }
8093                                 return f.apply(this, args);
8094                             })();
8095                         })(l40.fvalue(pv, l97.fvalue(pv, v841, (function(){
8096                             var symbol = l267;
8097                             var value = symbol.value;
8098                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8099                             return value;
8100                         })()))) : (l198.fvalue(pv, v841) !== l3.value ? l145.fvalue(values, l317.fvalue(pv, v836), v837) : l318.fvalue(values, v841, v842))));
8101                     })((function(){
8102                         var tmp = v836;
8103                         return tmp === l3.value? l3.value: tmp.car;
8104                     })(),(function(){
8105                         var tmp = v836;
8106                         return tmp === l3.value? l3.value: tmp.cdr;
8107                     })()) : (function(){
8108                         throw "How should I compile this?";
8109                     })())))));
8110                 }
8111                 finally {
8112                     l172.value = v838;
8113                 }
8114             })(v837);
8115         })();
8116     }));
8117     return l145;
8118 })();
8119 var l320 = {name: "LS-COMPILE-TOPLEVEL"};
8120 (function(){
8121     (l320).fvalue = (function(v852){
8122         ((v852)["fname"] = "LS-COMPILE-TOPLEVEL");
8123         return v852;
8124     })((function (values,v846,v847){
8125         checkArgsAtLeast(arguments, 2);
8126         checkArgsAtMost(arguments, 3);
8127         switch(arguments.length-1){
8128         case 1:
8129         v847=l3.value;
8130         default: break;
8131         }
8132         return (function(){
8133             return (function(v848){
8134                 try {
8135                     var tmp;
8136                     tmp = l193.value;
8137                     l193.value = v848;
8138                     v848 = tmp;
8139                     return ((((function(){
8140                         var tmp = v846;
8141                         return (typeof tmp == 'object' && 'car' in tmp);
8142                     })()?l4.value: l3.value) !== l3.value ? (((function(){
8143                         var tmp = v846;
8144                         return tmp === l3.value? l3.value: tmp.car;
8145                     })() === l241)?l4.value: l3.value) : l3.value) !== l3.value ? (function(v850){
8146                         return l136.fvalue(values, l90.fvalue(pv, (function(){
8147                             var symbol = l195;
8148                             var func = symbol.fvalue;
8149                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8150                             return func;
8151                         })(), v850));
8152                     })(l73.fvalue(pv, (function (values,v849){
8153                         checkArgs(arguments, 2);
8154                         return l320.fvalue(values, v849, l4.value);
8155                     }), (function(){
8156                         var tmp = v846;
8157                         return tmp === l3.value? l3.value: tmp.cdr;
8158                     })())) : (function(v851){
8159                         return l134.fvalue(values, l137.fvalue(pv, l196.fvalue(pv), l134.fvalue(pv, ";", (function(){
8160                             var symbol = l133;
8161                             var value = symbol.value;
8162                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8163                             return value;
8164                         })())), (v851 !== l3.value ? l134.fvalue(pv, v851, ";", (function(){
8165                             var symbol = l133;
8166                             var value = symbol.value;
8167                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8168                             return value;
8169                         })()) : ""));
8170                     })(l145.fvalue(pv, v846, v847)));
8171                 }
8172                 finally {
8173                     l193.value = v848;
8174                 }
8175             })(l3.value);
8176         })();
8177     }));
8178     return l320;
8179 })();
8180 (function(){
8181     (l242).fvalue = (function(v854){
8182         ((v854)["fname"] = "EVAL");
8183         return v854;
8184     })((function (values,v853){
8185         checkArgs(arguments, 2);
8186         return (function(){
8187             return (function(){
8188                 var string = l320.fvalue(pv, v853, l4.value);
8189                 if (typeof string != 'string')
8190                     throw 'The value ' + string + ' is not a type string.';
8191                 return (function(){
8192                     var v = eval.apply(window, [string]);
8193                     if (typeof v !== 'object' || !('multiple-value' in v)){
8194                         v = [v];
8195                         v['multiple-value'] = true;
8196                     }
8197                     return values.apply(this, v);
8198                 })();
8199             })();
8200         })();
8201     }));
8202     return l242;
8203 })();
8204 var l321 = {name: "&BODY"};
8205 var l322 = QIList(l211,l210,l321,l20,l15,l123,l61,l62,l21,l22,l23,l278,l280,l19,l19,l277,l279,l54,l64,l301,l313,l312,l314,l97,l45,l184,l18,l18,l87,l32,l38,l36,l33,l30,l30,l52,l254,l34,l37,l35,l31,l31,l299,l79,l80,l78,l51,l28,l29,l76,l77,l47,l2,l9,l11,l1,l8,l93,l92,l101,l68,l69,l103,l49,l50,l53,l292,l26,l293,l303,l242,l96,l131,l100,l113,l126,l39,l237,l42,l288,l300,l104,l309,l16,l132,l261,l75,l208,l124,l46,l81,l81,l130,l121,l238,l5,l86,l71,l246,l249,l109,l44,l59,l311,l110,l286,l73,l88,l83,l274,l106,l263,l107,l264,l3,l27,l85,l84,l12,l281,l55,l114,l116,l112,l165,l82,l147,l150,l205,l56,l57,l241,l67,l48,l167,l89,l90,l91,l13,l253,l65,l66,l283,l284,l40,l224,l225,l95,l296,l98,l99,l295,l94,l233,l287,l122,l290,l289,l285,l4,l260,l41,l255,l25,l7,l262,l142,l141,l105,l149,l6,l102,l310,l24,l3);
8206 l131.fvalue(values, l322);
8207 ((l123).value = (function(){
8208     var symbol = l119;
8209     var value = symbol.value;
8210     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8211     return value;
8212 })());
8213 (function(){
8214     var string = "var lisp";
8215     if (typeof string != 'string')
8216         throw 'The value ' + string + ' is not a type string.';
8217     return (function(){
8218         var v = eval.apply(window, [string]);
8219         if (typeof v !== 'object' || !('multiple-value' in v)){
8220             v = [v];
8221             v['multiple-value'] = true;
8222         }
8223         return values.apply(this, v);
8224     })();
8225 })();
8226 (lisp = {});
8227 (lisp.read = (function(){
8228     var symbol = l171;
8229     var func = symbol.fvalue;
8230     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8231     return func;
8232 })());
8233 (lisp.print = (function(){
8234     var symbol = l147;
8235     var func = symbol.fvalue;
8236     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8237     return func;
8238 })());
8239 (lisp.eval = (function(){
8240     var symbol = l242;
8241     var func = symbol.fvalue;
8242     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8243     return func;
8244 })());
8245 (lisp.compile = (function (values,v855){
8246     checkArgs(arguments, 2);
8247     return l320.fvalue(values, v855, l4.value);
8248 }));
8249 (lisp.evalString = (function (values,v856){
8250     checkArgs(arguments, 2);
8251     return l242.fvalue(values, l171.fvalue(pv, v856));
8252 }));
8253 (lisp.compileString = (function (values,v857){
8254     checkArgs(arguments, 2);
8255     return l320.fvalue(values, l171.fvalue(pv, v857), l4.value);
8256 }));
8257 var l323 = QIList(QIList(l321,"l321"),QIList(l320,"l320"),QIList(l319,"l319"),QIList(l318,"l318"),QIList(l317,"l317"),QIList(l316,"l316"),QIList(l315,"l315"),QIList(l314,"l314"),QIList(l313,"l313"),QIList(l312,"l312"),QIList(l311,"l311"),QIList(l310,"l310"),QIList(l309,"l309"),QIList(l308,"l308"),QIList(l307,"l307"),QIList(l306,"l306"),QIList(l305,"l305"),QIList(l304,"l304"),QIList(l303,"l303"),QIList(l302,"l302"),QIList(l301,"l301"),QIList(l300,"l300"),QIList(l299,"l299"),QIList(l298,"l298"),QIList(l297,"l297"),QIList(l296,"l296"),QIList(l295,"l295"),QIList(l294,"l294"),QIList(l293,"l293"),QIList(l292,"l292"),QIList(l291,"l291"),QIList(l290,"l290"),QIList(l289,"l289"),QIList(l288,"l288"),QIList(l287,"l287"),QIList(l286,"l286"),QIList(l285,"l285"),QIList(l284,"l284"),QIList(l283,"l283"),QIList(l282,"l282"),QIList(l281,"l281"),QIList(l280,"l280"),QIList(l279,"l279"),QIList(l278,"l278"),QIList(l277,"l277"),QIList(l276,"l276"),QIList(l275,"l275"),QIList(l274,"l274"),QIList(l273,"l273"),QIList(l272,"l272"),QIList(l271,"l271"),QIList(l270,"l270"),QIList(l269,"l269"),QIList(l268,"l268"),QIList(l267,"l267"),QIList(l266,"l266"),QIList(l265,"l265"),QIList(l264,"l264"),QIList(l263,"l263"),QIList(l262,"l262"),QIList(l261,"l261"),QIList(l260,"l260"),QIList(l259,"l259"),QIList(l258,"l258"),QIList(l257,"l257"),QIList(l256,"l256"),QIList(l255,"l255"),QIList(l254,"l254"),QIList(l253,"l253"),QIList(l252,"l252"),QIList(l251,"l251"),QIList(l250,"l250"),QIList(l249,"l249"),QIList(l248,"l248"),QIList(l247,"l247"),QIList(l246,"l246"),QIList(l245,"l245"),QIList(l244,"l244"),QIList(l243,"l243"),QIList(l242,"l242"),QIList(l241,"l241"),QIList(l240,"l240"),QIList(l239,"l239"),QIList(l238,"l238"),QIList(l237,"l237"),QIList(l236,"l236"),QIList(l235,"l235"),QIList(l234,"l234"),QIList(l233,"l233"),QIList(l232,"l232"),QIList(l231,"l231"),QIList(l230,"l230"),QIList(l229,"l229"),QIList(l228,"l228"),QIList(l227,"l227"),QIList(l226,"l226"),QIList(l225,"l225"),QIList(l224,"l224"),QIList(l223,"l223"),QIList(l222,"l222"),QIList(l221,"l221"),QIList(l220,"l220"),QIList(l219,"l219"),QIList(l218,"l218"),QIList(l217,"l217"),QIList(l216,"l216"),QIList(l215,"l215"),QIList(l214,"l214"),QIList(l213,"l213"),QIList(l211,"l211"),QIList(l210,"l210"),QIList(l209,"l209"),QIList(l208,"l208"),QIList(l207,"l207"),QIList(l206,"l206"),QIList(l205,"l205"),QIList(l204,"l204"),QIList(l203,"l203"),QIList(l202,"l202"),QIList(l201,"l201"),QIList(l200,"l200"),QIList(l199,"l199"),QIList(l198,"l198"),QIList(l197,"l197"),QIList(l196,"l196"),QIList(l195,"l195"),QIList(l194,"l194"),QIList(l193,"l193"),QIList(l192,"l192"),QIList(l191,"l191"),QIList(l190,"l190"),QIList(l189,"l189"),QIList(l188,"l188"),QIList(l187,"l187"),QIList(l186,"l186"),QIList(l185,"l185"),QIList(l184,"l184"),QIList(l183,"l183"),QIList(l182,"l182"),QIList(l181,"l181"),QIList(l180,"l180"),QIList(l179,"l179"),QIList(l178,"l178"),QIList(l177,"l177"),QIList(l176,"l176"),QIList(l175,"l175"),QIList(l174,"l174"),QIList(l173,"l173"),QIList(l172,"l172"),QIList(l171,"l171"),QIList(l170,"l170"),QIList(l169,"l169"),QIList(l168,"l168"),QIList(l167,"l167"),QIList(l166,"l166"),QIList(l165,"l165"),QIList(l164,"l164"),QIList(l163,"l163"),QIList(l162,"l162"),QIList(l161,"l161"),QIList(l160,"l160"),QIList(l159,"l159"),QIList(l158,"l158"),QIList(l157,"l157"),QIList(l156,"l156"),QIList(l155,"l155"),QIList(l154,"l154"),QIList(l153,"l153"),QIList(l152,"l152"),QIList(l151,"l151"),QIList(l150,"l150"),QIList(l149,"l149"),QIList(l148,"l148"),QIList(l147,"l147"),QIList(l146,"l146"),QIList(l145,"l145"),QIList(l144,"l144"),QIList(l143,"l143"),QIList(l142,"l142"),QIList(l141,"l141"),QIList(l140,"l140"),QIList(l139,"l139"),QIList(l138,"l138"),QIList(l137,"l137"),QIList(l136,"l136"),QIList(l135,"l135"),QIList(l134,"l134"),QIList(l133,"l133"),QIList(l132,"l132"),QIList(l131,"l131"),QIList(l130,"l130"),QIList(l129,"l129"),QIList(l128,"l128"),QIList(l127,"l127"),QIList(l126,"l126"),QIList(l125,"l125"),QIList(l124,"l124"),QIList(l123,"l123"),QIList(l122,"l122"),QIList(l121,"l121"),QIList(l120,"l120"),QIList(l119,"l119"),QIList(l118,"l118"),QIList(l117,"l117"),QIList(l116,"l116"),QIList(l115,"l115"),QIList(l114,"l114"),QIList(l113,"l113"),QIList(l112,"l112"),QIList(l111,"l111"),QIList(l110,"l110"),QIList(l109,"l109"),QIList(l108,"l108"),QIList(l107,"l107"),QIList(l106,"l106"),QIList(l105,"l105"),QIList(l104,"l104"),QIList(l103,"l103"),QIList(l102,"l102"),QIList(l101,"l101"),QIList(l100,"l100"),QIList(l99,"l99"),QIList(l98,"l98"),QIList(l97,"l97"),QIList(l96,"l96"),QIList(l95,"l95"),QIList(l94,"l94"),QIList(l93,"l93"),QIList(l92,"l92"),QIList(l91,"l91"),QIList(l90,"l90"),QIList(l89,"l89"),QIList(l88,"l88"),QIList(l87,"l87"),QIList(l86,"l86"),QIList(l85,"l85"),QIList(l84,"l84"),QIList(l83,"l83"),QIList(l82,"l82"),QIList(l81,"l81"),QIList(l80,"l80"),QIList(l79,"l79"),QIList(l78,"l78"),QIList(l77,"l77"),QIList(l76,"l76"),QIList(l75,"l75"),QIList(l74,"l74"),QIList(l73,"l73"),QIList(l72,"l72"),QIList(l71,"l71"),QIList(l70,"l70"),QIList(l69,"l69"),QIList(l68,"l68"),QIList(l67,"l67"),QIList(l66,"l66"),QIList(l65,"l65"),QIList(l64,"l64"),QIList(l63,"l63"),QIList(l62,"l62"),QIList(l61,"l61"),QIList(l60,"l60"),QIList(l59,"l59"),QIList(l58,"l58"),QIList(l57,"l57"),QIList(l56,"l56"),QIList(l55,"l55"),QIList(l54,"l54"),QIList(l53,"l53"),QIList(l52,"l52"),QIList(l51,"l51"),QIList(l50,"l50"),QIList(l49,"l49"),QIList(l48,"l48"),QIList(l47,"l47"),QIList(l46,"l46"),QIList(l45,"l45"),QIList(l44,"l44"),QIList(l43,"l43"),QIList(l42,"l42"),QIList(l41,"l41"),QIList(l40,"l40"),QIList(l39,"l39"),QIList(l38,"l38"),QIList(l37,"l37"),QIList(l36,"l36"),QIList(l35,"l35"),QIList(l34,"l34"),QIList(l33,"l33"),QIList(l32,"l32"),QIList(l31,"l31"),QIList(l30,"l30"),QIList(l29,"l29"),QIList(l28,"l28"),QIList(l27,"l27"),QIList(l26,"l26"),QIList(l25,"l25"),QIList(l24,"l24"),QIList(l23,"l23"),QIList(l22,"l22"),QIList(l21,"l21"),QIList(l20,"l20"),QIList(l19,"l19"),QIList(l18,"l18"),QIList(l17,"l17"),QIList(l16,"l16"),QIList(l15,"l15"),QIList(l14,"l14"),QIList(l13,"l13"),QIList(l12,"l12"),QIList(l11,"l11"),QIList(l10,"l10"),QIList(l9,"l9"),QIList(l8,"l8"),QIList(l7,"l7"),QIList(l6,"l6"),QIList(l5,"l5"),QIList(l4,"l4"),QIList(l3,"l3"),QIList(l2,"l2"),QIList(l1,"l1"),l3);
8258 var l324 = {name: "OP"};
8259 var l325 = {name: "SYM"};
8260 var l326 = {name: "X"};
8261 var l327 = {name: "ARGS"};
8262 var l328 = {name: "BODY"};
8263 var l329 = {name: "DECLS"};
8264 var l330 = {name: "DECL"};
8265 var l331 = {name: "NAME"};
8266 var l332 = {name: "ARG"};
8267 var l333 = {name: "FORM"};
8268 var l334 = {name: "PACKAGE-DESIGNATOR"};
8269 var l335 = {name: "VALUE-FROM"};
8270 var l336 = {name: "VARIABLES"};
8271 var l337 = {name: "VARLIST"};
8272 var l338 = {name: "ENDLIST"};
8273 var l339 = {name: "V"};
8274 var l340 = {name: "PAIRS"};
8275 var l341 = {name: "ASSIGNMENTS"};
8276 var l342 = {name: "VALUE"};
8277 var l343 = {name: "FORM1"};
8278 var l344 = {name: "RESULT"};
8279 var l345 = {name: "FORMS"};
8280 var l346 = {name: "G"};
8281 var l347 = {name: "CLAUSULES"};
8282 var l348 = {name: "!FORM"};
8283 var l349 = {name: "CLAUSULE"};
8284 var l350 = {name: "ITER"};
8285 var l351 = {name: "G!TO"};
8286 var l352 = {name: "VAR"};
8287 var l353 = {name: "TO"};
8288 var l354 = {name: "G!LIST"};
8289 var l355 = {name: "PLACE"};
8290 var l356 = {name: "DELTA"};
8291 var l357 = {name: "CONDITION"};
8292 var l358 = {name: "DOCSTRING"};
8293 var l359 = QIList(QIList(QIList(l267,l105,l3,QIList(l202,l3),l3),QIList(l257,l105,l3,QIList(l202,l3),l3),QIList(l256,l105,l3,QIList(l202,l3),l3),QIList(l250,l105,l3,QIList(l202,l3),l3),QIList(l239,l105,l3,QIList(l202,l3),l3),QIList(l229,l105,l3,QIList(l202,l3),l3),QIList(l228,l105,l3,QIList(l202,l3),l3),QIList(l209,l105,l3,QIList(l202,l3),l3),QIList(l206,l105,l3,QIList(l202,l3),l3),QIList(l193,l105,l3,QIList(l202,l3),l3),QIList(l189,l105,l3,QIList(l202,l3),l3),QIList(l188,l105,l3,QIList(l202,l3),l3),QIList(l172,l105,l3,QIList(l202,l3),l3),QIList(l166,l105,l3,QIList(l202,l3),l3),QIList(l133,l105,l3,QIList(l202,l3),l3),QIList(l123,l105,l3,QIList(l202,l3),l3),QIList(l120,l105,l3,QIList(l202,l3),l3),QIList(l119,l105,l3,QIList(l202,l3),l3),QIList(l118,l105,l3,QIList(l202,l3),l3),QIList(l108,l105,l3,QIList(l202,l3),l3),QIList(l15,l105,l3,QIList(l202,l3),l3),QIList(l4,l105,l3,QIList(l202,l204,l3),l3),QIList(l3,l105,l3,QIList(l202,l204,l3),l3),l3),QIList(QIList(l276,l198,QIList(l104,QIList(l5,QIList(l324,l325,l3),QIList(l168,QIList(l268,QIList(l170,l324,l3),QIList(l326,l211,l327,l3),QIList(l246,QIList(QIList(l327,QIList(l28,l326,l327,l3),l3),l3),QIList(l272,l327,QIList(l144,QIList(l275,l327,QIList(l170,l325,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l272,l198,QIList(l104,QIList(l5,QIList(l327,l211,l328,l3),QIList(l7,QIList(l285,l327,l3),QIList(l303,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l3),l3),QIList(l168,QIList(l271,QIList(l170,l327,l3),QIList(l5,QIList(QIList(l170,l327,l3),l3),QIList(l134,"return ",QIList(l169,l328,l3),";",l133,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l270,l198,QIList(l104,QIList(l5,QIList(l329,l211,l328,l3),QIList(l168,QIList(l146,QIList(l169,QIList(l73,QIList(l5,QIList(l330,l3),QIList(l168,QIList(l134,"var ",QIList(l170,QIList(l39,l330,l3),l3)," = ",QIList(l170,QIList(l41,l330,l3),l3),";",l133,l3),l3),l3),l329,l3),l3),QIList(l169,QIList(l73,QIList(l5,QIList(l330,l3),QIList(l168,QIList(l134,"if (typeof ",QIList(l170,QIList(l39,l330,l3),l3)," != '",QIList(l170,QIList(l40,l330,l3),l3),"')",l133,QIList(l143,"throw 'The value ' + ",QIList(l170,QIList(l39,l330,l3),l3)," + ' is not a type ",QIList(l170,QIList(l40,l330,l3),l3),".';",l133,l3),l3),l3),l3),l329,l3),l3),QIList(l134,"return ",QIList(l241,QIList(l169,l328,l3),l3),";",l133,l3),l3),l3),l3),l3),l3,l3),QIList(l269,l198,QIList(l104,QIList(l5,QIList(l331,l327,l211,l328,l3),QIList(l168,QIList(l241,QIList(l268,QIList(l170,l331,l3),QIList(l170,l327,l3),QIList(l246,QIList(l170,QIList(l73,QIList(l5,QIList(l332,l3),QIList(l168,QIList(QIList(l170,l332,l3),QIList(l145,QIList(l170,l332,l3),l3),l3),l3),l3),l327,l3),l3),QIList(l169,l328,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l268,l198,QIList(l104,QIList(l5,QIList(l331,l327,l211,l328,l3),QIList(l168,QIList(l48,QIList(l44,QIList(l167,QIList(l170,l331,l3),l3),QIList(l5,QIList(l170,l327,l3),QIList(l184,QIList(l170,l331,l3),QIList(l169,l328,l3),l3),l3),l3),l267,l3),l3),l3),l3),l3,l3),QIList(l168,l198,QIList(l104,QIList(l5,QIList(l333,l3),QIList(l265,l333,l3),l3),l3),l3,l3),QIList(l243,l198,QIList(l104,QIList(l5,QIList(l331,l327,l333,l3),QIList(l168,QIList(l207,QIList(l170,l331,l3),QIList(l170,l327,l3),QIList(l145,QIList(l170,l333,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l207,l198,QIList(l104,QIList(l5,QIList(l331,l327,l211,l328,l3),QIList(l168,QIList(l48,QIList(l44,QIList(l167,QIList(l170,l331,l3),l3),QIList(l5,QIList(l170,l327,l3),QIList(l184,QIList(l170,l331,l3),QIList(l169,l328,l3),l3),l3),l3),l206,l3),l3),l3),l3),l3,l3),QIList(l146,l198,QIList(l104,QIList(l5,QIList(l211,l328,l3),QIList(l168,QIList(l134,"(function(){",l133,QIList(l143,QIList(l169,l328,l3),l3),"})()",l3),l3),l3),l3),l3,l3),QIList(l135,l198,QIList(l104,QIList(l5,QIList(l105,l211,l333,l3),QIList(l168,QIList(l225,QIList(l170,l105,l3),QIList(l134,QIList(l170,l105,l3),QIList(l241,QIList(l169,l333,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l124,l198,QIList(l104,QIList(l5,QIList(l334,l3),QIList(l168,QIList(l240,QIList(l225,l123,QIList(l111,QIList(l170,l334,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l107,l198,QIList(l104,QIList(l5,QIList(l335,l3),QIList(l168,QIList(l263,QIList(l104,l44,l3),QIList(l170,l335,l3),l3),l3),l3),l3),l3,l3),QIList(l106,l198,QIList(l104,QIList(l5,QIList(l336,l335,l211,l328,l3),QIList(l168,QIList(l263,QIList(l5,QIList(l210,QIList(l169,l336,l3),l211,QIList(l170,QIList(l16,l3),l3),l3),QIList(l169,l328,l3),l3),QIList(l170,l335,l3),l3),l3),l3),l3),l3,l3),QIList(l69,l198,QIList(l104,QIList(l5,QIList(l337,l338,l211,l328,l3),QIList(l168,QIList(l184,l3,QIList(l249,QIList(l170,QIList(l73,QIList(l5,QIList(l326,l3),QIList(l44,QIList(l39,l326,l3),QIList(l40,l326,l3),l3),l3),l337,l3),l3),QIList(l14,l4,QIList(l6,QIList(l170,QIList(l30,l338,l3),l3),QIList(l13,QIList(l241,QIList(l170,QIList(l31,l338,l3),l3),l3),l3),l3),QIList(l260,QIList(l169,l328,l3),l3),QIList(l225,QIList(l169,QIList(l301,QIList(l104,l64,l3),QIList(l73,QIList(l5,QIList(l339,l3),QIList(l54,QIList(l29,QIList(l35,l339,l3),l3),QIList(l44,QIList(l39,l339,l3),QIList(l41,l339,l3),l3),l3),l3),l337,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l68,l198,QIList(l104,QIList(l5,QIList(l337,l338,l211,l328,l3),QIList(l168,QIList(l184,l3,QIList(l246,QIList(l170,QIList(l73,QIList(l5,QIList(l326,l3),QIList(l44,QIList(l39,l326,l3),QIList(l40,l326,l3),l3),l3),l337,l3),l3),QIList(l14,l4,QIList(l6,QIList(l170,QIList(l30,l338,l3),l3),QIList(l13,QIList(l241,QIList(l170,QIList(l31,l338,l3),l3),l3),l3),l3),QIList(l260,QIList(l169,l328,l3),l3),QIList(l67,QIList(l169,QIList(l301,QIList(l104,l64,l3),QIList(l73,QIList(l5,QIList(l339,l3),QIList(l54,QIList(l29,QIList(l35,l339,l3),l3),QIList(l44,QIList(l39,l339,l3),QIList(l41,l339,l3),l3),l3),l3),l337,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l67,l198,QIList(l104,QIList(l5,QIList(l211,l340,l3),QIList(l246,QIList(QIList(l341,QIList(l167,l3,l3),l3),l3),QIList(l14,l4,QIList(l51,QIList(QIList(l12,l340,l3),QIList(l13,l3),l3),QIList(QIList(l12,QIList(l31,l340,l3),l3),QIList(l303,"Odd paris in PSETQ",l3),l3),QIList(l4,QIList(l246,QIList(QIList(l105,QIList(l30,l340,l3),l3),QIList(l342,QIList(l33,l340,l3),l3),l3),QIList(l48,QIList(l168,QIList(QIList(l170,l105,l3),QIList(l170,QIList(l16,l3),l3),QIList(l170,l342,l3),l3),l3),l341,l3),QIList(l225,l340,QIList(l35,l340,l3),l3),l3),l3),l3),l3),QIList(l225,l341,QIList(l66,l341,l3),l3),QIList(l168,QIList(l246,QIList(l170,QIList(l73,QIList(l104,l31,l3),l341,l3),l3),QIList(l225,QIList(l169,QIList(l60,QIList(l104,l64,l3),QIList(l73,QIList(l104,l87,l3),l341,l3),QIList(l167,l3,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l57,l198,QIList(l104,QIList(l5,QIList(l343,l344,l211,l328,l3),QIList(l168,QIList(l56,QIList(l241,QIList(l170,l343,l3),QIList(l170,l344,l3),l3),QIList(l169,l328,l3),l3),l3),l3),l3),l3,l3),QIList(l56,l198,QIList(l104,QIList(l5,QIList(l333,l211,l328,l3),QIList(l246,QIList(QIList(l342,QIList(l16,l3),l3),l3),QIList(l168,QIList(l246,QIList(QIList(QIList(l170,l342,l3),QIList(l170,l333,l3),l3),l3),QIList(l169,l328,l3),QIList(l170,l342,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l55,l198,QIList(l104,QIList(l5,QIList(l211,l345,l3),QIList(l51,QIList(QIList(l12,l345,l3),l3,l3),QIList(QIList(l12,QIList(l31,l345,l3),l3),QIList(l30,l345,l3),l3),QIList(l4,QIList(l246,QIList(QIList(l346,QIList(l16,l3),l3),l3),QIList(l168,QIList(l246,QIList(QIList(QIList(l170,l346,l3),QIList(l170,QIList(l30,l345,l3),l3),l3),l3),QIList(l208,QIList(l170,l346,l3),QIList(l170,l346,l3),QIList(l55,QIList(l169,QIList(l31,l345,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l54,l198,QIList(l104,QIList(l5,QIList(l211,l345,l3),QIList(l51,QIList(QIList(l12,l345,l3),l4,l3),QIList(QIList(l12,QIList(l31,l345,l3),l3),QIList(l30,l345,l3),l3),QIList(l4,QIList(l168,QIList(l208,QIList(l170,QIList(l30,l345,l3),l3),QIList(l54,QIList(l169,QIList(l31,l345,l3),l3),l3),l3,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l53,l198,QIList(l104,QIList(l5,QIList(l333,l211,l347,l3),QIList(l168,QIList(l52,QIList(l170,l333,l3),QIList(l169,QIList(l64,l347,QIList(l168,QIList(QIList(l4,QIList(l303,"ECASE expression failed.",l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l52,l198,QIList(l104,QIList(l5,QIList(l333,l211,l347,l3),QIList(l246,QIList(QIList(l348,QIList(l16,l3),l3),l3),QIList(l168,QIList(l246,QIList(QIList(QIList(l170,l348,l3),QIList(l170,l333,l3),l3),l3),QIList(l51,QIList(l169,QIList(l73,QIList(l5,QIList(l349,l3),QIList(l208,QIList(l292,QIList(l30,l349,l3),l4,l3),l349,QIList(l168,QIList(QIList(l26,QIList(l170,l348,l3),QIList(l167,QIList(l170,QIList(l30,l349,l3),l3),l3),l3),QIList(l169,QIList(l31,l349,l3),l3),l3),l3),l3),l3),l347,l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l51,l198,QIList(l104,QIList(l5,QIList(l211,l347,l3),QIList(l208,QIList(l12,l347,l3),l3,QIList(l208,QIList(l292,QIList(l32,l347,l3),l4,l3),QIList(l168,QIList(l241,QIList(l169,QIList(l34,l347,l3),l3),l3),l3),QIList(l168,QIList(l208,QIList(l170,QIList(l32,l347,l3),l3),QIList(l241,QIList(l169,QIList(l34,l347,l3),l3),l3),QIList(l51,QIList(l169,QIList(l31,l347,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l50,l198,QIList(l104,QIList(l5,QIList(l350,l211,l328,l3),QIList(l246,QIList(QIList(l351,QIList(l16,l3),l3),QIList(l352,QIList(l39,l350,l3),l3),QIList(l353,QIList(l40,l350,l3),l3),QIList(l344,QIList(l41,l350,l3),l3),l3),QIList(l168,QIList(l184,l3,QIList(l246,QIList(QIList(QIList(l170,l352,l3),0,l3),QIList(QIList(l170,l351,l3),QIList(l170,l353,l3),l3),l3),QIList(l232,QIList(l278,QIList(l170,l352,l3),QIList(l170,l351,l3),l3),QIList(l260,QIList(l169,l328,l3),l3),QIList(l46,QIList(l170,l352,l3),l3),l3),QIList(l170,l344,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l49,l198,QIList(l104,QIList(l5,QIList(l350,l211,l328,l3),QIList(l246,QIList(QIList(l352,QIList(l39,l350,l3),l3),QIList(l354,QIList(l16,l3),l3),l3),QIList(l168,QIList(l184,l3,QIList(l246,QIList(QIList(QIList(l170,l354,l3),QIList(l170,QIList(l40,l350,l3),l3),l3),QIList(QIList(l170,l352,l3),l3,l3),l3),QIList(l232,QIList(l170,l354,l3),QIList(l225,QIList(l170,l352,l3),QIList(l30,QIList(l170,l354,l3),l3),l3),QIList(l260,QIList(l169,l328,l3),l3),QIList(l225,QIList(l170,l354,l3),QIList(l31,QIList(l170,l354,l3),l3),l3),l3),QIList(l170,QIList(l41,l350,l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l48,l198,QIList(l104,QIList(l5,QIList(l326,l355,l3),QIList(l168,QIList(l225,QIList(l170,l355,l3),QIList(l28,QIList(l170,l326,l3),QIList(l170,l355,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l47,l198,QIList(l104,QIList(l5,QIList(l326,l210,QIList(l356,1,l3),l3),QIList(l168,QIList(l225,QIList(l170,l326,l3),QIList(l62,QIList(l170,l326,l3),QIList(l170,l356,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l46,l198,QIList(l104,QIList(l5,QIList(l326,l210,QIList(l356,1,l3),l3),QIList(l168,QIList(l225,QIList(l170,l326,l3),QIList(l61,QIList(l170,l326,l3),QIList(l170,l356,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l14,l198,QIList(l104,QIList(l5,QIList(l357,l211,l328,l3),QIList(l168,QIList(l184,l3,QIList(l232,QIList(l170,l357,l3),QIList(l169,l328,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l13,l198,QIList(l104,QIList(l5,QIList(l210,l342,l3),QIList(l168,QIList(l253,l3,QIList(l170,l342,l3),l3),l3),l3),l3),l3,l3),QIList(l11,l198,QIList(l104,QIList(l5,QIList(l331,l327,l211,l328,l3),QIList(l168,QIList(l241,QIList(l288,QIList(l167,QIList(l170,l331,l3),l3),QIList(l10,QIList(l170,QIList(l287,l331,l3),l3),QIList(l170,l327,l3),QIList(l169,QIList(l208,QIList(l54,QIList(l295,QIList(l30,l328,l3),l3),QIList(l27,QIList(l12,QIList(l31,l328,l3),l3),l3),l3),QIList(l168,QIList(QIList(l170,QIList(l30,l328,l3),l3),QIList(l184,QIList(l170,l331,l3),QIList(l169,QIList(l31,l328,l3),l3),l3),l3),l3),QIList(l168,QIList(QIList(l184,QIList(l170,l331,l3),QIList(l169,l328,l3),l3),l3),l3),l3),l3),l3),l3),QIList(l167,QIList(l170,l331,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l10,l198,QIList(l104,QIList(l5,QIList(l331,l327,l211,l328,l3),QIList(l246,QIList(QIList(l326,QIList(l16,"FN",l3),l3),l3),QIList(l168,QIList(l246,QIList(QIList(QIList(l170,l326,l3),QIList(l5,QIList(l170,l327,l3),QIList(l169,l328,l3),l3),l3),l3),QIList(l307,QIList(l170,l326,l3),"fname",QIList(l170,l331,l3),l3),QIList(l170,l326,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l9,l198,QIList(l104,QIList(l5,QIList(l331,l342,l210,l358,l3),QIList(l168,QIList(l241,QIList(l225,QIList(l170,l331,l3),QIList(l170,l342,l3),l3),QIList(l169,QIList(l6,QIList(l295,l358,l3),QIList(l168,QIList(QIList(l307,QIList(l167,QIList(l170,l331,l3),l3),"vardoc",QIList(l170,l358,l3),l3),l3),l3),l3),l3),QIList(l167,QIList(l170,l331,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l8,l198,QIList(l104,QIList(l5,QIList(l331,l342,l210,l358,l3),QIList(l168,QIList(l241,QIList(l2,QIList(l202,QIList(l170,l331,l3),l3),l3),QIList(l7,QIList(l18,QIList(l167,QIList(l170,l331,l3),l3),l3),QIList(l225,QIList(l170,l331,l3),QIList(l170,l342,l3),l3),l3),QIList(l169,QIList(l6,QIList(l295,l358,l3),QIList(l168,QIList(QIList(l307,QIList(l167,QIList(l170,l331,l3),l3),"vardoc",QIList(l170,l358,l3),l3),l3),l3),l3),l3),QIList(l167,QIList(l170,l331,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l7,l198,QIList(l104,QIList(l5,QIList(l357,l211,l328,l3),QIList(l168,QIList(l208,QIList(l170,l357,l3),l3,QIList(l241,QIList(l169,l328,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l6,l198,QIList(l104,QIList(l5,QIList(l357,l211,l328,l3),QIList(l168,QIList(l208,QIList(l170,l357,l3),QIList(l241,QIList(l169,l328,l3),l3),l3,l3),l3),l3),l3),l3,l3),QIList(l5,l198,QIList(l104,QIList(l5,QIList(l327,l211,l328,l3),QIList(l168,QIList(l104,QIList(l5,QIList(l170,l327,l3),QIList(l169,l328,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l2,l198,QIList(l104,QIList(l5,QIList(l211,l329,l3),QIList(l168,QIList(l240,QIList(l169,QIList(l73,QIList(l5,QIList(l330,l3),QIList(l168,QIList(l201,QIList(l167,QIList(l170,l330,l3),l3),l3),l3),l3),l329,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l1,l198,QIList(l104,QIList(l5,QIList(l331,l327,l211,l328,l3),QIList(l168,QIList(l240,QIList(l197,QIList(l167,QIList(l170,l331,l3),l3),QIList(l167,QIList(l104,QIList(l5,QIList(l170,QIList(l73,QIList(l104,QIList(l5,QIList(l326,l3),QIList(l208,QIList(l292,l326,QIList(l167,l321,l3),l3),QIList(l167,l211,l3),l326,l3),l3),l3),l327,l3),l3),QIList(l169,l328,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),l3),l3,l3,l3);
8294 (function(){
8295     l125.fvalue(pv, l321);
8296     l125.fvalue(pv, l320);
8297     l125.fvalue(pv, l319);
8298     l125.fvalue(pv, l318);
8299     l125.fvalue(pv, l317);
8300     l125.fvalue(pv, l316);
8301     l125.fvalue(pv, l315);
8302     l125.fvalue(pv, l314);
8303     l125.fvalue(pv, l313);
8304     l125.fvalue(pv, l312);
8305     l125.fvalue(pv, l311);
8306     l125.fvalue(pv, l310);
8307     l125.fvalue(pv, l309);
8308     l125.fvalue(pv, l308);
8309     l125.fvalue(pv, l307);
8310     l125.fvalue(pv, l306);
8311     l125.fvalue(pv, l305);
8312     l125.fvalue(pv, l304);
8313     l125.fvalue(pv, l303);
8314     l125.fvalue(pv, l302);
8315     l125.fvalue(pv, l301);
8316     l125.fvalue(pv, l300);
8317     l125.fvalue(pv, l299);
8318     l125.fvalue(pv, l298);
8319     l125.fvalue(pv, l297);
8320     l125.fvalue(pv, l296);
8321     l125.fvalue(pv, l295);
8322     l125.fvalue(pv, l294);
8323     l125.fvalue(pv, l293);
8324     l125.fvalue(pv, l292);
8325     l125.fvalue(pv, l291);
8326     l125.fvalue(pv, l290);
8327     l125.fvalue(pv, l289);
8328     l125.fvalue(pv, l288);
8329     l125.fvalue(pv, l287);
8330     l125.fvalue(pv, l286);
8331     l125.fvalue(pv, l285);
8332     l125.fvalue(pv, l284);
8333     l125.fvalue(pv, l283);
8334     l125.fvalue(pv, l282);
8335     l125.fvalue(pv, l281);
8336     l125.fvalue(pv, l280);
8337     l125.fvalue(pv, l279);
8338     l125.fvalue(pv, l278);
8339     l125.fvalue(pv, l277);
8340     l125.fvalue(pv, l276);
8341     l125.fvalue(pv, l275);
8342     l125.fvalue(pv, l274);
8343     l125.fvalue(pv, l273);
8344     l125.fvalue(pv, l272);
8345     l125.fvalue(pv, l271);
8346     l125.fvalue(pv, l270);
8347     l125.fvalue(pv, l269);
8348     l125.fvalue(pv, l268);
8349     l125.fvalue(pv, l267);
8350     l125.fvalue(pv, l266);
8351     l125.fvalue(pv, l265);
8352     l125.fvalue(pv, l264);
8353     l125.fvalue(pv, l263);
8354     l125.fvalue(pv, l262);
8355     l125.fvalue(pv, l261);
8356     l125.fvalue(pv, l260);
8357     l125.fvalue(pv, l259);
8358     l125.fvalue(pv, l258);
8359     l125.fvalue(pv, l257);
8360     l125.fvalue(pv, l256);
8361     l125.fvalue(pv, l255);
8362     l125.fvalue(pv, l254);
8363     l125.fvalue(pv, l253);
8364     l125.fvalue(pv, l252);
8365     l125.fvalue(pv, l251);
8366     l125.fvalue(pv, l250);
8367     l125.fvalue(pv, l249);
8368     l125.fvalue(pv, l248);
8369     l125.fvalue(pv, l247);
8370     l125.fvalue(pv, l246);
8371     l125.fvalue(pv, l245);
8372     l125.fvalue(pv, l244);
8373     l125.fvalue(pv, l243);
8374     l125.fvalue(pv, l242);
8375     l125.fvalue(pv, l241);
8376     l125.fvalue(pv, l240);
8377     l125.fvalue(pv, l239);
8378     l125.fvalue(pv, l238);
8379     l125.fvalue(pv, l237);
8380     l125.fvalue(pv, l236);
8381     l125.fvalue(pv, l235);
8382     l125.fvalue(pv, l234);
8383     l125.fvalue(pv, l233);
8384     l125.fvalue(pv, l232);
8385     l125.fvalue(pv, l231);
8386     l125.fvalue(pv, l230);
8387     l125.fvalue(pv, l229);
8388     l125.fvalue(pv, l228);
8389     l125.fvalue(pv, l227);
8390     l125.fvalue(pv, l226);
8391     l125.fvalue(pv, l225);
8392     l125.fvalue(pv, l224);
8393     l125.fvalue(pv, l223);
8394     l125.fvalue(pv, l222);
8395     l125.fvalue(pv, l221);
8396     l125.fvalue(pv, l220);
8397     l125.fvalue(pv, l219);
8398     l125.fvalue(pv, l218);
8399     l125.fvalue(pv, l217);
8400     l125.fvalue(pv, l216);
8401     l125.fvalue(pv, l215);
8402     l125.fvalue(pv, l214);
8403     l125.fvalue(pv, l213);
8404     l125.fvalue(pv, l211);
8405     l125.fvalue(pv, l210);
8406     l125.fvalue(pv, l209);
8407     l125.fvalue(pv, l208);
8408     l125.fvalue(pv, l207);
8409     l125.fvalue(pv, l206);
8410     l125.fvalue(pv, l205);
8411     l125.fvalue(pv, l204);
8412     l125.fvalue(pv, l203);
8413     l125.fvalue(pv, l202);
8414     l125.fvalue(pv, l201);
8415     l125.fvalue(pv, l200);
8416     l125.fvalue(pv, l199);
8417     l125.fvalue(pv, l198);
8418     l125.fvalue(pv, l197);
8419     l125.fvalue(pv, l196);
8420     l125.fvalue(pv, l195);
8421     l125.fvalue(pv, l194);
8422     l125.fvalue(pv, l193);
8423     l125.fvalue(pv, l192);
8424     l125.fvalue(pv, l191);
8425     l125.fvalue(pv, l190);
8426     l125.fvalue(pv, l189);
8427     l125.fvalue(pv, l188);
8428     l125.fvalue(pv, l187);
8429     l125.fvalue(pv, l186);
8430     l125.fvalue(pv, l185);
8431     l125.fvalue(pv, l184);
8432     l125.fvalue(pv, l183);
8433     l125.fvalue(pv, l182);
8434     l125.fvalue(pv, l181);
8435     l125.fvalue(pv, l180);
8436     l125.fvalue(pv, l179);
8437     l125.fvalue(pv, l178);
8438     l125.fvalue(pv, l177);
8439     l125.fvalue(pv, l176);
8440     l125.fvalue(pv, l175);
8441     l125.fvalue(pv, l174);
8442     l125.fvalue(pv, l173);
8443     l125.fvalue(pv, l172);
8444     l125.fvalue(pv, l171);
8445     l125.fvalue(pv, l170);
8446     l125.fvalue(pv, l169);
8447     l125.fvalue(pv, l168);
8448     l125.fvalue(pv, l167);
8449     l125.fvalue(pv, l166);
8450     l125.fvalue(pv, l165);
8451     l125.fvalue(pv, l164);
8452     l125.fvalue(pv, l163);
8453     l125.fvalue(pv, l162);
8454     l125.fvalue(pv, l161);
8455     l125.fvalue(pv, l160);
8456     l125.fvalue(pv, l159);
8457     l125.fvalue(pv, l158);
8458     l125.fvalue(pv, l157);
8459     l125.fvalue(pv, l156);
8460     l125.fvalue(pv, l155);
8461     l125.fvalue(pv, l154);
8462     l125.fvalue(pv, l153);
8463     l125.fvalue(pv, l152);
8464     l125.fvalue(pv, l151);
8465     l125.fvalue(pv, l150);
8466     l125.fvalue(pv, l149);
8467     l125.fvalue(pv, l148);
8468     l125.fvalue(pv, l147);
8469     l125.fvalue(pv, l146);
8470     l125.fvalue(pv, l145);
8471     l125.fvalue(pv, l144);
8472     l125.fvalue(pv, l143);
8473     l125.fvalue(pv, l142);
8474     l125.fvalue(pv, l141);
8475     l125.fvalue(pv, l140);
8476     l125.fvalue(pv, l139);
8477     l125.fvalue(pv, l138);
8478     l125.fvalue(pv, l137);
8479     l125.fvalue(pv, l136);
8480     l125.fvalue(pv, l135);
8481     l125.fvalue(pv, l134);
8482     l125.fvalue(pv, l133);
8483     l125.fvalue(pv, l132);
8484     l125.fvalue(pv, l131);
8485     l125.fvalue(pv, l130);
8486     l125.fvalue(pv, l129);
8487     l125.fvalue(pv, l128);
8488     l125.fvalue(pv, l127);
8489     l125.fvalue(pv, l126);
8490     l125.fvalue(pv, l125);
8491     l125.fvalue(pv, l124);
8492     l125.fvalue(pv, l123);
8493     l125.fvalue(pv, l122);
8494     l125.fvalue(pv, l121);
8495     l125.fvalue(pv, l120);
8496     l125.fvalue(pv, l119);
8497     l125.fvalue(pv, l118);
8498     l125.fvalue(pv, l117);
8499     l125.fvalue(pv, l116);
8500     l125.fvalue(pv, l115);
8501     l125.fvalue(pv, l114);
8502     l125.fvalue(pv, l113);
8503     l125.fvalue(pv, l112);
8504     l125.fvalue(pv, l111);
8505     l125.fvalue(pv, l110);
8506     l125.fvalue(pv, l109);
8507     l125.fvalue(pv, l108);
8508     l125.fvalue(pv, l107);
8509     l125.fvalue(pv, l106);
8510     l125.fvalue(pv, l105);
8511     l125.fvalue(pv, l104);
8512     l125.fvalue(pv, l103);
8513     l125.fvalue(pv, l102);
8514     l125.fvalue(pv, l101);
8515     l125.fvalue(pv, l100);
8516     l125.fvalue(pv, l99);
8517     l125.fvalue(pv, l98);
8518     l125.fvalue(pv, l97);
8519     l125.fvalue(pv, l96);
8520     l125.fvalue(pv, l95);
8521     l125.fvalue(pv, l94);
8522     l125.fvalue(pv, l93);
8523     l125.fvalue(pv, l92);
8524     l125.fvalue(pv, l91);
8525     l125.fvalue(pv, l90);
8526     l125.fvalue(pv, l89);
8527     l125.fvalue(pv, l88);
8528     l125.fvalue(pv, l87);
8529     l125.fvalue(pv, l86);
8530     l125.fvalue(pv, l85);
8531     l125.fvalue(pv, l84);
8532     l125.fvalue(pv, l83);
8533     l125.fvalue(pv, l82);
8534     l125.fvalue(pv, l81);
8535     l125.fvalue(pv, l80);
8536     l125.fvalue(pv, l79);
8537     l125.fvalue(pv, l78);
8538     l125.fvalue(pv, l77);
8539     l125.fvalue(pv, l76);
8540     l125.fvalue(pv, l75);
8541     l125.fvalue(pv, l74);
8542     l125.fvalue(pv, l73);
8543     l125.fvalue(pv, l72);
8544     l125.fvalue(pv, l71);
8545     l125.fvalue(pv, l70);
8546     l125.fvalue(pv, l69);
8547     l125.fvalue(pv, l68);
8548     l125.fvalue(pv, l67);
8549     l125.fvalue(pv, l66);
8550     l125.fvalue(pv, l65);
8551     l125.fvalue(pv, l64);
8552     l125.fvalue(pv, l63);
8553     l125.fvalue(pv, l62);
8554     l125.fvalue(pv, l61);
8555     l125.fvalue(pv, l60);
8556     l125.fvalue(pv, l59);
8557     l125.fvalue(pv, l58);
8558     l125.fvalue(pv, l57);
8559     l125.fvalue(pv, l56);
8560     l125.fvalue(pv, l55);
8561     l125.fvalue(pv, l54);
8562     l125.fvalue(pv, l53);
8563     l125.fvalue(pv, l52);
8564     l125.fvalue(pv, l51);
8565     l125.fvalue(pv, l50);
8566     l125.fvalue(pv, l49);
8567     l125.fvalue(pv, l48);
8568     l125.fvalue(pv, l47);
8569     l125.fvalue(pv, l46);
8570     l125.fvalue(pv, l45);
8571     l125.fvalue(pv, l44);
8572     l125.fvalue(pv, l43);
8573     l125.fvalue(pv, l42);
8574     l125.fvalue(pv, l41);
8575     l125.fvalue(pv, l40);
8576     l125.fvalue(pv, l39);
8577     l125.fvalue(pv, l38);
8578     l125.fvalue(pv, l37);
8579     l125.fvalue(pv, l36);
8580     l125.fvalue(pv, l35);
8581     l125.fvalue(pv, l34);
8582     l125.fvalue(pv, l33);
8583     l125.fvalue(pv, l32);
8584     l125.fvalue(pv, l31);
8585     l125.fvalue(pv, l30);
8586     l125.fvalue(pv, l29);
8587     l125.fvalue(pv, l28);
8588     l125.fvalue(pv, l27);
8589     l125.fvalue(pv, l26);
8590     l125.fvalue(pv, l25);
8591     l125.fvalue(pv, l24);
8592     l125.fvalue(pv, l23);
8593     l125.fvalue(pv, l22);
8594     l125.fvalue(pv, l21);
8595     l125.fvalue(pv, l20);
8596     l125.fvalue(pv, l19);
8597     l125.fvalue(pv, l18);
8598     l125.fvalue(pv, l17);
8599     l125.fvalue(pv, l16);
8600     l125.fvalue(pv, l15);
8601     l125.fvalue(pv, l14);
8602     l125.fvalue(pv, l13);
8603     l125.fvalue(pv, l12);
8604     l125.fvalue(pv, l11);
8605     l125.fvalue(pv, l10);
8606     l125.fvalue(pv, l9);
8607     l125.fvalue(pv, l8);
8608     l125.fvalue(pv, l7);
8609     l125.fvalue(pv, l6);
8610     l125.fvalue(pv, l5);
8611     l125.fvalue(pv, l4);
8612     l125.fvalue(pv, l3);
8613     l125.fvalue(pv, l2);
8614     l125.fvalue(pv, l1);
8615     ((l228).value = l323);
8616     ((l188).value = l359);
8617     ((l189).value = 857);
8618     ((l15).value = 219);
8619     return ((l250).value = 290);
8620 })();
8621 ((l229).value = 359);