ecmalisp.js

   1 var nil;
   2
   3 function pv (x) { return x==undefined? nil: x; }
   4
   5 function mv(){
   6     var r = [];
   7     r['multiple-value'] = true;
   8     for (var i=0; i<arguments.length; i++)
   9         r.push(arguments[i]);
  10     return r;
  11 }
  12
  13 function forcemv (x) {
  14     return typeof x == 'object' && 'multiple-value' in x? x: mv(x);
  15 }
  16
  17 // NOTE: Define VALUES to be MV for toplevel forms. It is because
  18 // `eval' compiles the forms and execute the Javascript code at
  19 // toplevel with `js-eval', so it is necessary to return multiple
  20 // values from the eval function.
  21 var values = mv;
  22
  23 function checkArgsAtLeast(args, n){
  24     if (args.length < n) throw 'too few arguments';
  25 }
  26
  27 function checkArgsAtMost(args, n){
  28     if (args.length > n) throw 'too many arguments';
  29 }
  30
  31 function checkArgs(args, n){
  32     checkArgsAtLeast(args, n);
  33     checkArgsAtMost(args, n);
  34 }
  35
  36 // Improper list constructor (like LIST*)
  37 function QIList(){
  38     if (arguments.length == 1)
  39         return arguments[0];
  40     else {
  41         var i = arguments.length-1;
  42         var r = arguments[i--];
  43         for (; i>=0; i--){
  44             r = {car: arguments[i], cdr: r};
  45         }
  46         return r;
  47     }
  48 }
  49 var l1 = {name: "DEFMACRO"};
  50 l1;
  51 var l2 = {name: "DECLAIM"};
  52 l2;
  53 var l3 = {name: "NIL"};
  54 ((l3).value = l3);
  55 (nil = l3.value);
  56 var l4 = {name: "T"};
  57 ((l4).value = l4);
  58 var l5 = {name: "LAMBDA"};
  59 l5;
  60 var l6 = {name: "WHEN"};
  61 l6;
  62 var l7 = {name: "UNLESS"};
  63 l7;
  64 var l8 = {name: "DEFVAR"};
  65 l8;
  66 var l9 = {name: "DEFPARAMETER"};
  67 l9;
  68 var l10 = {name: "NAMED-LAMBDA"};
  69 l10;
  70 var l11 = {name: "DEFUN"};
  71 l11;
  72 var l12 = {name: "NULL"};
  73 (function(){
  74     (l12).fvalue = (function(v2){
  75         ((v2)["fname"] = "NULL");
  76         return v2;
  77     })((function (values,v1){
  78         checkArgs(arguments, 2);
  79         return (function(){
  80             return ((v1 === l3.value)?l4.value: l3.value);
  81         })();
  82     }));
  83     return l12;
  84 })();
  85 var l13 = {name: "RETURN"};
  86 l13;
  87 var l14 = {name: "WHILE"};
  88 l14;
  89 var l15 = {name: "*GENSYM-COUNTER*"};
  90 (function(){
  91     (((l15.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l15).value = 0));
  92     return l15;
  93 })();
  94 var l16 = {name: "GENSYM"};
  95 var l17 = {name: "INTEGER-TO-STRING"};
  96 (function(){
  97     (l16).fvalue = (function(v4){
  98         ((v4)["fname"] = "GENSYM");
  99         return v4;
 100     })((function (values,v3){
 101         checkArgsAtMost(arguments, 2);
 102         switch(arguments.length-1){
 103         case 0:
 104         v3="G";
 105         default: break;
 106         }
 107         return (function(){
 108             ((l15).value = (function(){
 109                 var x1 = (function(){
 110                     var symbol = l15;
 111                     var value = symbol.value;
 112                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 113                     return value;
 114                 })();
 115                 if (typeof x1 !== 'number') throw 'Not a number!';
 116                 var x2 = 1;
 117                 if (typeof x2 !== 'number') throw 'Not a number!';
 118                 return x1+x2;
 119             })());
 120             return (function(){
 121                 var name = (function(){
 122                     var string1 = v3;
 123                     var string2 = l17.fvalue(pv, (function(){
 124                         var symbol = l15;
 125                         var value = symbol.value;
 126                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 127                         return value;
 128                     })());
 129                     if (typeof string1 != 'string')
 130                         throw 'The value ' + string1 + ' is not a type string.';
 131                     if (typeof string2 != 'string')
 132                         throw 'The value ' + string2 + ' is not a type string.';
 133                     return string1.concat(string2);
 134                 })();
 135                 if (typeof name != 'string')
 136                     throw 'The value ' + name + ' is not a type string.';
 137                 return ({name: name});
 138             })();
 139         })();
 140     }));
 141     return l16;
 142 })();
 143 var l18 = {name: "BOUNDP"};
 144 (function(){
 145     (l18).fvalue = (function(v6){
 146         ((v6)["fname"] = "BOUNDP");
 147         return v6;
 148     })((function (values,v5){
 149         checkArgs(arguments, 2);
 150         return (function(){
 151             return ((v5.value !== undefined)?l4.value: l3.value);
 152         })();
 153     }));
 154     return l18;
 155 })();
 156 var l19 = {name: "="};
 157 (function(){
 158     (l19).fvalue = (function(v9){
 159         ((v9)["fname"] = "=");
 160         return v9;
 161     })((function (values,v7,v8){
 162         checkArgs(arguments, 3);
 163         return (function(){
 164             return (function(){
 165                 var x1 = v7;
 166                 if (typeof x1 !== 'number') throw 'Not a number!';
 167                 var x2 = v8;
 168                 if (typeof x2 !== 'number') throw 'Not a number!';
 169                 return (x1==x2?l4.value: l3.value);
 170             })();
 171         })();
 172     }));
 173     return l19;
 174 })();
 175 var l20 = {name: "*"};
 176 (function(){
 177     (l20).fvalue = (function(v12){
 178         ((v12)["fname"] = "*");
 179         return v12;
 180     })((function (values,v10,v11){
 181         checkArgs(arguments, 3);
 182         return (function(){
 183             return (function(){
 184                 var x1 = v10;
 185                 if (typeof x1 !== 'number') throw 'Not a number!';
 186                 var x2 = v11;
 187                 if (typeof x2 !== 'number') throw 'Not a number!';
 188                 return x1*x2;
 189             })();
 190         })();
 191     }));
 192     return l20;
 193 })();
 194 var l21 = {name: "/"};
 195 (function(){
 196     (l21).fvalue = (function(v15){
 197         ((v15)["fname"] = "/");
 198         return v15;
 199     })((function (values,v13,v14){
 200         checkArgs(arguments, 3);
 201         return (function(){
 202             return (function(){
 203                 var x1 = v13;
 204                 if (typeof x1 !== 'number') throw 'Not a number!';
 205                 var x2 = v14;
 206                 if (typeof x2 !== 'number') throw 'Not a number!';
 207                 return x1/x2;
 208             })();
 209         })();
 210     }));
 211     return l21;
 212 })();
 213 var l22 = {name: "1+"};
 214 (function(){
 215     (l22).fvalue = (function(v17){
 216         ((v17)["fname"] = "1+");
 217         return v17;
 218     })((function (values,v16){
 219         checkArgs(arguments, 2);
 220         return (function(){
 221             return (function(){
 222                 var x1 = v16;
 223                 if (typeof x1 !== 'number') throw 'Not a number!';
 224                 var x2 = 1;
 225                 if (typeof x2 !== 'number') throw 'Not a number!';
 226                 return x1+x2;
 227             })();
 228         })();
 229     }));
 230     return l22;
 231 })();
 232 var l23 = {name: "1-"};
 233 (function(){
 234     (l23).fvalue = (function(v19){
 235         ((v19)["fname"] = "1-");
 236         return v19;
 237     })((function (values,v18){
 238         checkArgs(arguments, 2);
 239         return (function(){
 240             return (function(){
 241                 var x1 = v18;
 242                 if (typeof x1 !== 'number') throw 'Not a number!';
 243                 var x2 = 1;
 244                 if (typeof x2 !== 'number') throw 'Not a number!';
 245                 return x1-x2;
 246             })();
 247         })();
 248     }));
 249     return l23;
 250 })();
 251 var l24 = {name: "ZEROP"};
 252 (function(){
 253     (l24).fvalue = (function(v21){
 254         ((v21)["fname"] = "ZEROP");
 255         return v21;
 256     })((function (values,v20){
 257         checkArgs(arguments, 2);
 258         return (function(){
 259             return (function(){
 260                 var x1 = v20;
 261                 if (typeof x1 !== 'number') throw 'Not a number!';
 262                 var x2 = 0;
 263                 if (typeof x2 !== 'number') throw 'Not a number!';
 264                 return (x1==x2?l4.value: l3.value);
 265             })();
 266         })();
 267     }));
 268     return l24;
 269 })();
 270 var l25 = {name: "TRUNCATE"};
 271 (function(){
 272     (l25).fvalue = (function(v24){
 273         ((v24)["fname"] = "TRUNCATE");
 274         return v24;
 275     })((function (values,v22,v23){
 276         checkArgs(arguments, 3);
 277         return (function(){
 278             return (function(){
 279                 var x = (function(){
 280                     var x1 = v22;
 281                     if (typeof x1 !== 'number') throw 'Not a number!';
 282                     var x2 = v23;
 283                     if (typeof x2 !== 'number') throw 'Not a number!';
 284                     return x1/x2;
 285                 })();
 286                 if (typeof x != 'number')
 287                     throw 'The value ' + x + ' is not a type number.';
 288                 return Math.floor(x);
 289             })();
 290         })();
 291     }));
 292     return l25;
 293 })();
 294 var l26 = {name: "EQL"};
 295 (function(){
 296     (l26).fvalue = (function(v27){
 297         ((v27)["fname"] = "EQL");
 298         return v27;
 299     })((function (values,v25,v26){
 300         checkArgs(arguments, 3);
 301         return (function(){
 302             return ((v25 === v26)?l4.value: l3.value);
 303         })();
 304     }));
 305     return l26;
 306 })();
 307 var l27 = {name: "NOT"};
 308 (function(){
 309     (l27).fvalue = (function(v29){
 310         ((v29)["fname"] = "NOT");
 311         return v29;
 312     })((function (values,v28){
 313         checkArgs(arguments, 2);
 314         return (function(){
 315             return (v28 !== l3.value ? l3.value : l4.value);
 316         })();
 317     }));
 318     return l27;
 319 })();
 320 var l28 = {name: "CONS"};
 321 (function(){
 322     (l28).fvalue = (function(v32){
 323         ((v32)["fname"] = "CONS");
 324         return v32;
 325     })((function (values,v30,v31){
 326         checkArgs(arguments, 3);
 327         return (function(){
 328             return ({car: v30, cdr: v31});
 329         })();
 330     }));
 331     return l28;
 332 })();
 333 var l29 = {name: "CONSP"};
 334 (function(){
 335     (l29).fvalue = (function(v34){
 336         ((v34)["fname"] = "CONSP");
 337         return v34;
 338     })((function (values,v33){
 339         checkArgs(arguments, 2);
 340         return (function(){
 341             return ((function(){
 342                 var tmp = v33;
 343                 return (typeof tmp == 'object' && 'car' in tmp);
 344             })()?l4.value: l3.value);
 345         })();
 346     }));
 347     return l29;
 348 })();
 349 var l30 = {name: "CAR"};
 350 (function(){
 351     (l30).fvalue = (function(v36){
 352         ((v36)["fname"] = "CAR");
 353         return v36;
 354     })((function(){
 355         var func = (function (values,v35){
 356             checkArgs(arguments, 2);
 357             return (function(){
 358                 return (function(){
 359                     var tmp = v35;
 360                     return tmp === l3.value? l3.value: tmp.car;
 361                 })();
 362             })();
 363         });
 364         func.docstring = 'Return the CAR part of a cons, or NIL if X is null.';
 365         return func;
 366     })());
 367     return l30;
 368 })();
 369 var l31 = {name: "CDR"};
 370 (function(){
 371     (l31).fvalue = (function(v38){
 372         ((v38)["fname"] = "CDR");
 373         return v38;
 374     })((function (values,v37){
 375         checkArgs(arguments, 2);
 376         return (function(){
 377             return (function(){
 378                 var tmp = v37;
 379                 return tmp === l3.value? l3.value: tmp.cdr;
 380             })();
 381         })();
 382     }));
 383     return l31;
 384 })();
 385 var l32 = {name: "CAAR"};
 386 (function(){
 387     (l32).fvalue = (function(v40){
 388         ((v40)["fname"] = "CAAR");
 389         return v40;
 390     })((function (values,v39){
 391         checkArgs(arguments, 2);
 392         return (function(){
 393             return (function(){
 394                 var tmp = (function(){
 395                     var tmp = v39;
 396                     return tmp === l3.value? l3.value: tmp.car;
 397                 })();
 398                 return tmp === l3.value? l3.value: tmp.car;
 399             })();
 400         })();
 401     }));
 402     return l32;
 403 })();
 404 var l33 = {name: "CADR"};
 405 (function(){
 406     (l33).fvalue = (function(v42){
 407         ((v42)["fname"] = "CADR");
 408         return v42;
 409     })((function (values,v41){
 410         checkArgs(arguments, 2);
 411         return (function(){
 412             return (function(){
 413                 var tmp = (function(){
 414                     var tmp = v41;
 415                     return tmp === l3.value? l3.value: tmp.cdr;
 416                 })();
 417                 return tmp === l3.value? l3.value: tmp.car;
 418             })();
 419         })();
 420     }));
 421     return l33;
 422 })();
 423 var l34 = {name: "CDAR"};
 424 (function(){
 425     (l34).fvalue = (function(v44){
 426         ((v44)["fname"] = "CDAR");
 427         return v44;
 428     })((function (values,v43){
 429         checkArgs(arguments, 2);
 430         return (function(){
 431             return (function(){
 432                 var tmp = (function(){
 433                     var tmp = v43;
 434                     return tmp === l3.value? l3.value: tmp.car;
 435                 })();
 436                 return tmp === l3.value? l3.value: tmp.cdr;
 437             })();
 438         })();
 439     }));
 440     return l34;
 441 })();
 442 var l35 = {name: "CDDR"};
 443 (function(){
 444     (l35).fvalue = (function(v46){
 445         ((v46)["fname"] = "CDDR");
 446         return v46;
 447     })((function (values,v45){
 448         checkArgs(arguments, 2);
 449         return (function(){
 450             return (function(){
 451                 var tmp = (function(){
 452                     var tmp = v45;
 453                     return tmp === l3.value? l3.value: tmp.cdr;
 454                 })();
 455                 return tmp === l3.value? l3.value: tmp.cdr;
 456             })();
 457         })();
 458     }));
 459     return l35;
 460 })();
 461 var l36 = {name: "CADDR"};
 462 (function(){
 463     (l36).fvalue = (function(v48){
 464         ((v48)["fname"] = "CADDR");
 465         return v48;
 466     })((function (values,v47){
 467         checkArgs(arguments, 2);
 468         return (function(){
 469             return (function(){
 470                 var tmp = (function(){
 471                     var tmp = (function(){
 472                         var tmp = v47;
 473                         return tmp === l3.value? l3.value: tmp.cdr;
 474                     })();
 475                     return tmp === l3.value? l3.value: tmp.cdr;
 476                 })();
 477                 return tmp === l3.value? l3.value: tmp.car;
 478             })();
 479         })();
 480     }));
 481     return l36;
 482 })();
 483 var l37 = {name: "CDDDR"};
 484 (function(){
 485     (l37).fvalue = (function(v50){
 486         ((v50)["fname"] = "CDDDR");
 487         return v50;
 488     })((function (values,v49){
 489         checkArgs(arguments, 2);
 490         return (function(){
 491             return (function(){
 492                 var tmp = (function(){
 493                     var tmp = (function(){
 494                         var tmp = v49;
 495                         return tmp === l3.value? l3.value: tmp.cdr;
 496                     })();
 497                     return tmp === l3.value? l3.value: tmp.cdr;
 498                 })();
 499                 return tmp === l3.value? l3.value: tmp.cdr;
 500             })();
 501         })();
 502     }));
 503     return l37;
 504 })();
 505 var l38 = {name: "CADDDR"};
 506 (function(){
 507     (l38).fvalue = (function(v52){
 508         ((v52)["fname"] = "CADDDR");
 509         return v52;
 510     })((function (values,v51){
 511         checkArgs(arguments, 2);
 512         return (function(){
 513             return (function(){
 514                 var tmp = (function(){
 515                     var tmp = (function(){
 516                         var tmp = (function(){
 517                             var tmp = v51;
 518                             return tmp === l3.value? l3.value: tmp.cdr;
 519                         })();
 520                         return tmp === l3.value? l3.value: tmp.cdr;
 521                     })();
 522                     return tmp === l3.value? l3.value: tmp.cdr;
 523                 })();
 524                 return tmp === l3.value? l3.value: tmp.car;
 525             })();
 526         })();
 527     }));
 528     return l38;
 529 })();
 530 var l39 = {name: "FIRST"};
 531 (function(){
 532     (l39).fvalue = (function(v54){
 533         ((v54)["fname"] = "FIRST");
 534         return v54;
 535     })((function (values,v53){
 536         checkArgs(arguments, 2);
 537         return (function(){
 538             return (function(){
 539                 var tmp = v53;
 540                 return tmp === l3.value? l3.value: tmp.car;
 541             })();
 542         })();
 543     }));
 544     return l39;
 545 })();
 546 var l40 = {name: "SECOND"};
 547 (function(){
 548     (l40).fvalue = (function(v56){
 549         ((v56)["fname"] = "SECOND");
 550         return v56;
 551     })((function (values,v55){
 552         checkArgs(arguments, 2);
 553         return (function(){
 554             return l33.fvalue(values, v55);
 555         })();
 556     }));
 557     return l40;
 558 })();
 559 var l41 = {name: "THIRD"};
 560 (function(){
 561     (l41).fvalue = (function(v58){
 562         ((v58)["fname"] = "THIRD");
 563         return v58;
 564     })((function (values,v57){
 565         checkArgs(arguments, 2);
 566         return (function(){
 567             return l36.fvalue(values, v57);
 568         })();
 569     }));
 570     return l41;
 571 })();
 572 var l42 = {name: "FOURTH"};
 573 (function(){
 574     (l42).fvalue = (function(v60){
 575         ((v60)["fname"] = "FOURTH");
 576         return v60;
 577     })((function (values,v59){
 578         checkArgs(arguments, 2);
 579         return (function(){
 580             return l38.fvalue(values, v59);
 581         })();
 582     }));
 583     return l42;
 584 })();
 585 var l43 = {name: "REST"};
 586 (function(){
 587     (l43).fvalue = (function(v62){
 588         ((v62)["fname"] = "REST");
 589         return v62;
 590     })((function (values,v61){
 591         checkArgs(arguments, 2);
 592         return (function(){
 593             return (function(){
 594                 var tmp = v61;
 595                 return tmp === l3.value? l3.value: tmp.cdr;
 596             })();
 597         })();
 598     }));
 599     return l43;
 600 })();
 601 var l44 = {name: "LIST"};
 602 (function(){
 603     (l44).fvalue = (function(v64){
 604         ((v64)["fname"] = "LIST");
 605         return v64;
 606     })((function (values){
 607         var v63= l3.value;
 608         for (var i = arguments.length-1; i>=1; i--)
 609             v63 = {car: arguments[i], cdr:
 610         v63};
 611         return (function(){
 612             return v63;
 613         })();
 614     }));
 615     return l44;
 616 })();
 617 var l45 = {name: "ATOM"};
 618 (function(){
 619     (l45).fvalue = (function(v66){
 620         ((v66)["fname"] = "ATOM");
 621         return v66;
 622     })((function (values,v65){
 623         checkArgs(arguments, 2);
 624         return (function(){
 625             return l27.fvalue(values, ((function(){
 626                 var tmp = v65;
 627                 return (typeof tmp == 'object' && 'car' in tmp);
 628             })()?l4.value: l3.value));
 629         })();
 630     }));
 631     return l45;
 632 })();
 633 var l46 = {name: "INCF"};
 634 l46;
 635 var l47 = {name: "DECF"};
 636 l47;
 637 var l48 = {name: "PUSH"};
 638 l48;
 639 var l49 = {name: "DOLIST"};
 640 l49;
 641 var l50 = {name: "DOTIMES"};
 642 l50;
 643 var l51 = {name: "COND"};
 644 l51;
 645 var l52 = {name: "CASE"};
 646 l52;
 647 var l53 = {name: "ECASE"};
 648 l53;
 649 var l54 = {name: "AND"};
 650 l54;
 651 var l55 = {name: "OR"};
 652 l55;
 653 var l56 = {name: "PROG1"};
 654 l56;
 655 var l57 = {name: "PROG2"};
 656 l57;
 657 var l58 = {name: "ENSURE-LIST"};
 658 var l59 = {name: "LISTP"};
 659 (function(){
 660     (l58).fvalue = (function(v68){
 661         ((v68)["fname"] = "ENSURE-LIST");
 662         return v68;
 663     })((function (values,v67){
 664         checkArgs(arguments, 2);
 665         return (function(){
 666             return (l59.fvalue(pv, v67) !== l3.value ? v67 : l44.fvalue(values, v67));
 667         })();
 668     }));
 669     return l58;
 670 })();
 671 var l60 = {name: "!REDUCE"};
 672 (function(){
 673     (l60).fvalue = (function(v72){
 674         ((v72)["fname"] = "!REDUCE");
 675         return v72;
 676     })((function (values,v69,v70,v71){
 677         checkArgs(arguments, 4);
 678         return (function(){
 679             return (l12.fvalue(pv, v70) !== l3.value ? v71 : l60.fvalue(values, v69, (function(){
 680                 var tmp = v70;
 681                 return tmp === l3.value? l3.value: tmp.cdr;
 682             })(), (v69)(pv, v71, (function(){
 683                 var tmp = v70;
 684                 return tmp === l3.value? l3.value: tmp.car;
 685             })())));
 686         })();
 687     }));
 688     return l60;
 689 })();
 690 var l61 = {name: "+"};
 691 (function(){
 692     (l61).fvalue = (function(v77){
 693         ((v77)["fname"] = "+");
 694         return v77;
 695     })((function (values){
 696         var v73= l3.value;
 697         for (var i = arguments.length-1; i>=1; i--)
 698             v73 = {car: arguments[i], cdr:
 699         v73};
 700         return (function(){
 701             return (function(v74){
 702                 return (function(){
 703                     return (function(v75,v76){
 704                         (function(){
 705                             while(v75 !== l3.value){
 706                                 (v76 = (function(){
 707                                     var tmp = v75;
 708                                     return tmp === l3.value? l3.value: tmp.car;
 709                                 })());
 710                                 (function(){
 711                                     (v74 = (function(){
 712                                         var x1 = v74;
 713                                         if (typeof x1 !== 'number') throw 'Not a number!';
 714                                         var x2 = v76;
 715                                         if (typeof x2 !== 'number') throw 'Not a number!';
 716                                         return x1+x2;
 717                                     })());
 718                                     return l3.value;
 719                                 })();
 720                                 (v75 = (function(){
 721                                     var tmp = v75;
 722                                     return tmp === l3.value? l3.value: tmp.cdr;
 723                                 })());
 724                             }return l3.value;
 725                         })();
 726                         return v74;
 727                     })(v73,l3.value);
 728                 })();
 729             })(0);
 730         })();
 731     }));
 732     return l61;
 733 })();
 734 var l62 = {name: "-"};
 735 (function(){
 736     (l62).fvalue = (function(v83){
 737         ((v83)["fname"] = "-");
 738         return v83;
 739     })((function (values,v79){
 740         checkArgsAtLeast(arguments, 2);
 741         var v78= l3.value;
 742         for (var i = arguments.length-1; i>=2; i--)
 743             v78 = {car: arguments[i], cdr:
 744         v78};
 745         return (function(){
 746             return (l12.fvalue(pv, v78) !== l3.value ? (function(){
 747                 var x1 = v79;
 748                 if (typeof x1 !== 'number') throw 'Not a number!';
 749                 return -x1;
 750             })() : (function(v80){
 751                 return (function(){
 752                     return (function(v81,v82){
 753                         (function(){
 754                             while(v81 !== l3.value){
 755                                 (v82 = (function(){
 756                                     var tmp = v81;
 757                                     return tmp === l3.value? l3.value: tmp.car;
 758                                 })());
 759                                 (function(){
 760                                     (v80 = (function(){
 761                                         var x1 = v80;
 762                                         if (typeof x1 !== 'number') throw 'Not a number!';
 763                                         var x2 = v82;
 764                                         if (typeof x2 !== 'number') throw 'Not a number!';
 765                                         return x1-x2;
 766                                     })());
 767                                     return l3.value;
 768                                 })();
 769                                 (v81 = (function(){
 770                                     var tmp = v81;
 771                                     return tmp === l3.value? l3.value: tmp.cdr;
 772                                 })());
 773                             }return l3.value;
 774                         })();
 775                         return v80;
 776                     })(v78,l3.value);
 777                 })();
 778             })(v79));
 779         })();
 780     }));
 781     return l62;
 782 })();
 783 var l63 = {name: "APPEND-TWO"};
 784 var l64 = {name: "APPEND"};
 785 (function(){
 786     (l63).fvalue = (function(v86){
 787         ((v86)["fname"] = "APPEND-TWO");
 788         return v86;
 789     })((function (values,v84,v85){
 790         checkArgs(arguments, 3);
 791         return (function(){
 792             return (l12.fvalue(pv, v84) !== l3.value ? v85 : ({car: (function(){
 793                 var tmp = v84;
 794                 return tmp === l3.value? l3.value: tmp.car;
 795             })(), cdr: l64.fvalue(pv, (function(){
 796                 var tmp = v84;
 797                 return tmp === l3.value? l3.value: tmp.cdr;
 798             })(), v85)}));
 799         })();
 800     }));
 801     return l63;
 802 })();
 803 (function(){
 804     (l64).fvalue = (function(v88){
 805         ((v88)["fname"] = "APPEND");
 806         return v88;
 807     })((function (values){
 808         var v87= l3.value;
 809         for (var i = arguments.length-1; i>=1; i--)
 810             v87 = {car: arguments[i], cdr:
 811         v87};
 812         return (function(){
 813             return l60.fvalue(values, (function(){
 814                 var symbol = l63;
 815                 var func = symbol.fvalue;
 816                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
 817                 return func;
 818             })(), v87, l3);
 819         })();
 820     }));
 821     return l64;
 822 })();
 823 var l65 = {name: "REVAPPEND"};
 824 (function(){
 825     (l65).fvalue = (function(v91){
 826         ((v91)["fname"] = "REVAPPEND");
 827         return v91;
 828     })((function (values,v89,v90){
 829         checkArgs(arguments, 3);
 830         return (function(){
 831             (function(){
 832                 return (function(){
 833                     while(v89 !== l3.value){
 834                         (v90 = ({car: (function(){
 835                             var tmp = v89;
 836                             return tmp === l3.value? l3.value: tmp.car;
 837                         })(), cdr: v90}));
 838                         (v89 = (function(){
 839                             var tmp = v89;
 840                             return tmp === l3.value? l3.value: tmp.cdr;
 841                         })());
 842                     }return l3.value;
 843                 })();
 844             })();
 845             return v90;
 846         })();
 847     }));
 848     return l65;
 849 })();
 850 var l66 = {name: "REVERSE"};
 851 (function(){
 852     (l66).fvalue = (function(v93){
 853         ((v93)["fname"] = "REVERSE");
 854         return v93;
 855     })((function (values,v92){
 856         checkArgs(arguments, 2);
 857         return (function(){
 858             return l65.fvalue(values, v92, l3);
 859         })();
 860     }));
 861     return l66;
 862 })();
 863 var l67 = {name: "PSETQ"};
 864 l67;
 865 var l68 = {name: "DO"};
 866 l68;
 867 var l69 = {name: "DO*"};
 868 l69;
 869 var l70 = {name: "LIST-LENGTH"};
 870 (function(){
 871     (l70).fvalue = (function(v96){
 872         ((v96)["fname"] = "LIST-LENGTH");
 873         return v96;
 874     })((function (values,v94){
 875         checkArgs(arguments, 2);
 876         return (function(){
 877             return (function(v95){
 878                 (function(){
 879                     return (function(){
 880                         while(l27.fvalue(pv, l12.fvalue(pv, v94)) !== l3.value){
 881                             (v95 = (function(){
 882                                 var x1 = v95;
 883                                 if (typeof x1 !== 'number') throw 'Not a number!';
 884                                 var x2 = 1;
 885                                 if (typeof x2 !== 'number') throw 'Not a number!';
 886                                 return x1+x2;
 887                             })());
 888                             (v94 = (function(){
 889                                 var tmp = v94;
 890                                 return tmp === l3.value? l3.value: tmp.cdr;
 891                             })());
 892                         }return l3.value;
 893                     })();
 894                 })();
 895                 return v95;
 896             })(0);
 897         })();
 898     }));
 899     return l70;
 900 })();
 901 var l71 = {name: "LENGTH"};
 902 (function(){
 903     (l71).fvalue = (function(v98){
 904         ((v98)["fname"] = "LENGTH");
 905         return v98;
 906     })((function (values,v97){
 907         checkArgs(arguments, 2);
 908         return (function(){
 909             return (((typeof(v97) == "string")?l4.value: l3.value) !== l3.value ? (function(){
 910                 var x = v97;
 911                 if (typeof x != 'string')
 912                     throw 'The value ' + x + ' is not a type string.';
 913                 return x.length;
 914             })() : (((function(){
 915                 var x = v97;
 916                 return typeof x === 'object' && 'length' in x;
 917             })()?l4.value: l3.value) !== l3.value ? (function(){
 918                 var tmp = (v97)["length"];
 919                 return tmp == undefined? l3.value: tmp ;
 920             })() : (l59.fvalue(pv, v97) !== l3.value ? l70.fvalue(values, v97) : l3.value)));
 921         })();
 922     }));
 923     return l71;
 924 })();
 925 var l72 = {name: "CONCAT-TWO"};
 926 (function(){
 927     (l72).fvalue = (function(v101){
 928         ((v101)["fname"] = "CONCAT-TWO");
 929         return v101;
 930     })((function (values,v99,v100){
 931         checkArgs(arguments, 3);
 932         return (function(){
 933             return (function(){
 934                 var string1 = v99;
 935                 var string2 = v100;
 936                 if (typeof string1 != 'string')
 937                     throw 'The value ' + string1 + ' is not a type string.';
 938                 if (typeof string2 != 'string')
 939                     throw 'The value ' + string2 + ' is not a type string.';
 940                 return string1.concat(string2);
 941             })();
 942         })();
 943     }));
 944     return l72;
 945 })();
 946 var l73 = {name: "MAPCAR"};
 947 (function(){
 948     (l73).fvalue = (function(v104){
 949         ((v104)["fname"] = "MAPCAR");
 950         return v104;
 951     })((function (values,v102,v103){
 952         checkArgs(arguments, 3);
 953         return (function(){
 954             return (l12.fvalue(pv, v103) !== l3.value ? l3 : ({car: (v102)(pv, (function(){
 955                 var tmp = v103;
 956                 return tmp === l3.value? l3.value: tmp.car;
 957             })()), cdr: l73.fvalue(pv, v102, (function(){
 958                 var tmp = v103;
 959                 return tmp === l3.value? l3.value: tmp.cdr;
 960             })())}));
 961         })();
 962     }));
 963     return l73;
 964 })();
 965 var l74 = {name: "IDENTITY"};
 966 (function(){
 967     (l74).fvalue = (function(v106){
 968         ((v106)["fname"] = "IDENTITY");
 969         return v106;
 970     })((function (values,v105){
 971         checkArgs(arguments, 2);
 972         return (function(){
 973             return v105;
 974         })();
 975     }));
 976     return l74;
 977 })();
 978 var l75 = {name: "COPY-LIST"};
 979 (function(){
 980     (l75).fvalue = (function(v108){
 981         ((v108)["fname"] = "COPY-LIST");
 982         return v108;
 983     })((function (values,v107){
 984         checkArgs(arguments, 2);
 985         return (function(){
 986             return l73.fvalue(values, (function(){
 987                 var symbol = l74;
 988                 var func = symbol.fvalue;
 989                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
 990                 return func;
 991             })(), v107);
 992         })();
 993     }));
 994     return l75;
 995 })();
 996 var l76 = {name: "CODE-CHAR"};
 997 (function(){
 998     (l76).fvalue = (function(v110){
 999         ((v110)["fname"] = "CODE-CHAR");
1000         return v110;
1001     })((function (values,v109){
1002         checkArgs(arguments, 2);
1003         return (function(){
1004             return v109;
1005         })();
1006     }));
1007     return l76;
1008 })();
1009 var l77 = {name: "CHAR-CODE"};
1010 (function(){
1011     (l77).fvalue = (function(v112){
1012         ((v112)["fname"] = "CHAR-CODE");
1013         return v112;
1014     })((function (values,v111){
1015         checkArgs(arguments, 2);
1016         return (function(){
1017             return v111;
1018         })();
1019     }));
1020     return l77;
1021 })();
1022 var l78 = {name: "CHAR="};
1023 (function(){
1024     (l78).fvalue = (function(v115){
1025         ((v115)["fname"] = "CHAR=");
1026         return v115;
1027     })((function (values,v113,v114){
1028         checkArgs(arguments, 3);
1029         return (function(){
1030             return (function(){
1031                 var x1 = v113;
1032                 if (typeof x1 !== 'number') throw 'Not a number!';
1033                 var x2 = v114;
1034                 if (typeof x2 !== 'number') throw 'Not a number!';
1035                 return (x1==x2?l4.value: l3.value);
1036             })();
1037         })();
1038     }));
1039     return l78;
1040 })();
1041 var l79 = {name: "INTEGERP"};
1042 (function(){
1043     (l79).fvalue = (function(v117){
1044         ((v117)["fname"] = "INTEGERP");
1045         return v117;
1046     })((function (values,v116){
1047         checkArgs(arguments, 2);
1048         return (function(){
1049             return (((typeof (v116) == "number")?l4.value: l3.value) !== l3.value ? (function(){
1050                 var x1 = (function(){
1051                     var x = v116;
1052                     if (typeof x != 'number')
1053                         throw 'The value ' + x + ' is not a type number.';
1054                     return Math.floor(x);
1055                 })();
1056                 if (typeof x1 !== 'number') throw 'Not a number!';
1057                 var x2 = v116;
1058                 if (typeof x2 !== 'number') throw 'Not a number!';
1059                 return (x1==x2?l4.value: l3.value);
1060             })() : l3.value);
1061         })();
1062     }));
1063     return l79;
1064 })();
1065 var l80 = {name: "PLUSP"};
1066 (function(){
1067     (l80).fvalue = (function(v119){
1068         ((v119)["fname"] = "PLUSP");
1069         return v119;
1070     })((function (values,v118){
1071         checkArgs(arguments, 2);
1072         return (function(){
1073             return (function(){
1074                 var x1 = 0;
1075                 if (typeof x1 !== 'number') throw 'Not a number!';
1076                 var x2 = v118;
1077                 if (typeof x2 !== 'number') throw 'Not a number!';
1078                 return (x1<x2?l4.value: l3.value);
1079             })();
1080         })();
1081     }));
1082     return l80;
1083 })();
1084 var l81 = {name: "MINUSP"};
1085 (function(){
1086     (l81).fvalue = (function(v121){
1087         ((v121)["fname"] = "MINUSP");
1088         return v121;
1089     })((function (values,v120){
1090         checkArgs(arguments, 2);
1091         return (function(){
1092             return (function(){
1093                 var x1 = v120;
1094                 if (typeof x1 !== 'number') throw 'Not a number!';
1095                 var x2 = 0;
1096                 if (typeof x2 !== 'number') throw 'Not a number!';
1097                 return (x1<x2?l4.value: l3.value);
1098             })();
1099         })();
1100     }));
1101     return l81;
1102 })();
1103 (function(){
1104     (l59).fvalue = (function(v124){
1105         ((v124)["fname"] = "LISTP");
1106         return v124;
1107     })((function (values,v122){
1108         checkArgs(arguments, 2);
1109         return (function(){
1110             return (function(v123){
1111                 return (v123 !== l3.value ? v123 : l12.fvalue(values, v122));
1112             })(((function(){
1113                 var tmp = v122;
1114                 return (typeof tmp == 'object' && 'car' in tmp);
1115             })()?l4.value: l3.value));
1116         })();
1117     }));
1118     return l59;
1119 })();
1120 var l82 = {name: "NTHCDR"};
1121 (function(){
1122     (l82).fvalue = (function(v127){
1123         ((v127)["fname"] = "NTHCDR");
1124         return v127;
1125     })((function (values,v125,v126){
1126         checkArgs(arguments, 3);
1127         return (function(){
1128             (function(){
1129                 return (function(){
1130                     while((l80.fvalue(pv, v125) !== l3.value ? v126 : l3.value) !== l3.value){
1131                         (v125 = l23.fvalue(pv, v125));
1132                         (v126 = (function(){
1133                             var tmp = v126;
1134                             return tmp === l3.value? l3.value: tmp.cdr;
1135                         })());
1136                     }return l3.value;
1137                 })();
1138             })();
1139             return v126;
1140         })();
1141     }));
1142     return l82;
1143 })();
1144 var l83 = {name: "NTH"};
1145 (function(){
1146     (l83).fvalue = (function(v130){
1147         ((v130)["fname"] = "NTH");
1148         return v130;
1149     })((function (values,v128,v129){
1150         checkArgs(arguments, 3);
1151         return (function(){
1152             return (function(){
1153                 var tmp = l82.fvalue(pv, v128, v129);
1154                 return tmp === l3.value? l3.value: tmp.car;
1155             })();
1156         })();
1157     }));
1158     return l83;
1159 })();
1160 var l84 = {name: "LAST"};
1161 (function(){
1162     (l84).fvalue = (function(v132){
1163         ((v132)["fname"] = "LAST");
1164         return v132;
1165     })((function (values,v131){
1166         checkArgs(arguments, 2);
1167         return (function(){
1168             (function(){
1169                 return (function(){
1170                     while(((function(){
1171                         var tmp = (function(){
1172                             var tmp = v131;
1173                             return tmp === l3.value? l3.value: tmp.cdr;
1174                         })();
1175                         return (typeof tmp == 'object' && 'car' in tmp);
1176                     })()?l4.value: l3.value) !== l3.value){
1177                         (v131 = (function(){
1178                             var tmp = v131;
1179                             return tmp === l3.value? l3.value: tmp.cdr;
1180                         })());
1181                     }return l3.value;
1182                 })();
1183             })();
1184             return v131;
1185         })();
1186     }));
1187     return l84;
1188 })();
1189 var l85 = {name: "BUTLAST"};
1190 (function(){
1191     (l85).fvalue = (function(v134){
1192         ((v134)["fname"] = "BUTLAST");
1193         return v134;
1194     })((function (values,v133){
1195         checkArgs(arguments, 2);
1196         return (function(){
1197             return (((function(){
1198                 var tmp = (function(){
1199                     var tmp = v133;
1200                     return tmp === l3.value? l3.value: tmp.cdr;
1201                 })();
1202                 return (typeof tmp == 'object' && 'car' in tmp);
1203             })()?l4.value: l3.value) !== l3.value ? ({car: (function(){
1204                 var tmp = v133;
1205                 return tmp === l3.value? l3.value: tmp.car;
1206             })(), cdr: l85.fvalue(pv, (function(){
1207                 var tmp = v133;
1208                 return tmp === l3.value? l3.value: tmp.cdr;
1209             })())}) : l3.value);
1210         })();
1211     }));
1212     return l85;
1213 })();
1214 var l86 = {name: "MEMBER"};
1215 (function(){
1216     (l86).fvalue = (function(v137){
1217         ((v137)["fname"] = "MEMBER");
1218         return v137;
1219     })((function (values,v135,v136){
1220         checkArgs(arguments, 3);
1221         return (function(){
1222             return (function(){
1223                 try {
1224                     return (function(){
1225                         while(v136 !== l3.value){
1226                             (l26.fvalue(pv, v135, (function(){
1227                                 var tmp = v136;
1228                                 return tmp === l3.value? l3.value: tmp.car;
1229                             })()) !== l3.value ? (function(){
1230                                 var values = mv;
1231                                 throw ({type: 'block', id: 63, values: v136, message: 'Return from unknown block NIL.'})
1232                             })() : l3.value);
1233                             (v136 = (function(){
1234                                 var tmp = v136;
1235                                 return tmp === l3.value? l3.value: tmp.cdr;
1236                             })());
1237                         }return l3.value;
1238                     })();
1239                 }
1240                 catch (cf){
1241                     if (cf.type == 'block' && cf.id == 63)
1242                         return values.apply(this, forcemv(cf.values));
1243                     else
1244                         throw cf;
1245                 }
1246             })();
1247         })();
1248     }));
1249     return l86;
1250 })();
1251 var l87 = {name: "REMOVE"};
1252 (function(){
1253     (l87).fvalue = (function(v140){
1254         ((v140)["fname"] = "REMOVE");
1255         return v140;
1256     })((function (values,v138,v139){
1257         checkArgs(arguments, 3);
1258         return (function(){
1259             return (l12.fvalue(pv, v139) !== l3.value ? l3.value : (l26.fvalue(pv, v138, (function(){
1260                 var tmp = v139;
1261                 return tmp === l3.value? l3.value: tmp.car;
1262             })()) !== l3.value ? l87.fvalue(values, v138, (function(){
1263                 var tmp = v139;
1264                 return tmp === l3.value? l3.value: tmp.cdr;
1265             })()) : ({car: (function(){
1266                 var tmp = v139;
1267                 return tmp === l3.value? l3.value: tmp.car;
1268             })(), cdr: l87.fvalue(pv, v138, (function(){
1269                 var tmp = v139;
1270                 return tmp === l3.value? l3.value: tmp.cdr;
1271             })())})));
1272         })();
1273     }));
1274     return l87;
1275 })();
1276 var l88 = {name: "REMOVE-IF"};
1277 (function(){
1278     (l88).fvalue = (function(v143){
1279         ((v143)["fname"] = "REMOVE-IF");
1280         return v143;
1281     })((function (values,v141,v142){
1282         checkArgs(arguments, 3);
1283         return (function(){
1284             return (l12.fvalue(pv, v142) !== l3.value ? l3.value : ((v141)(pv, (function(){
1285                 var tmp = v142;
1286                 return tmp === l3.value? l3.value: tmp.car;
1287             })()) !== l3.value ? l88.fvalue(values, v141, (function(){
1288                 var tmp = v142;
1289                 return tmp === l3.value? l3.value: tmp.cdr;
1290             })()) : ({car: (function(){
1291                 var tmp = v142;
1292                 return tmp === l3.value? l3.value: tmp.car;
1293             })(), cdr: l88.fvalue(pv, v141, (function(){
1294                 var tmp = v142;
1295                 return tmp === l3.value? l3.value: tmp.cdr;
1296             })())})));
1297         })();
1298     }));
1299     return l88;
1300 })();
1301 var l89 = {name: "REMOVE-IF-NOT"};
1302 (function(){
1303     (l89).fvalue = (function(v146){
1304         ((v146)["fname"] = "REMOVE-IF-NOT");
1305         return v146;
1306     })((function (values,v144,v145){
1307         checkArgs(arguments, 3);
1308         return (function(){
1309             return (l12.fvalue(pv, v145) !== l3.value ? l3.value : ((v144)(pv, (function(){
1310                 var tmp = v145;
1311                 return tmp === l3.value? l3.value: tmp.car;
1312             })()) !== l3.value ? ({car: (function(){
1313                 var tmp = v145;
1314                 return tmp === l3.value? l3.value: tmp.car;
1315             })(), cdr: l89.fvalue(pv, v144, (function(){
1316                 var tmp = v145;
1317                 return tmp === l3.value? l3.value: tmp.cdr;
1318             })())}) : l89.fvalue(values, v144, (function(){
1319                 var tmp = v145;
1320                 return tmp === l3.value? l3.value: tmp.cdr;
1321             })())));
1322         })();
1323     }));
1324     return l89;
1325 })();
1326 var l90 = {name: "DIGIT-CHAR-P"};
1327 (function(){
1328     (l90).fvalue = (function(v148){
1329         ((v148)["fname"] = "DIGIT-CHAR-P");
1330         return v148;
1331     })((function (values,v147){
1332         checkArgs(arguments, 2);
1333         return (function(){
1334             return (((function(){
1335                 var x1 = 48;
1336                 if (typeof x1 !== 'number') throw 'Not a number!';
1337                 var x2 = v147;
1338                 if (typeof x2 !== 'number') throw 'Not a number!';
1339                 return (x1<=x2?l4.value: l3.value);
1340             })() !== l3.value ? (function(){
1341                 var x1 = v147;
1342                 if (typeof x1 !== 'number') throw 'Not a number!';
1343                 var x2 = 57;
1344                 if (typeof x2 !== 'number') throw 'Not a number!';
1345                 return (x1<=x2?l4.value: l3.value);
1346             })() : l3.value) !== l3.value ? (function(){
1347                 var x1 = v147;
1348                 if (typeof x1 !== 'number') throw 'Not a number!';
1349                 var x2 = 48;
1350                 if (typeof x2 !== 'number') throw 'Not a number!';
1351                 return x1-x2;
1352             })() : l3.value);
1353         })();
1354     }));
1355     return l90;
1356 })();
1357 var l91 = {name: "SUBSEQ"};
1358 (function(){
1359     (l91).fvalue = (function(v152){
1360         ((v152)["fname"] = "SUBSEQ");
1361         return v152;
1362     })((function (values,v149,v150,v151){
1363         checkArgsAtLeast(arguments, 3);
1364         checkArgsAtMost(arguments, 4);
1365         switch(arguments.length-1){
1366         case 2:
1367         v151=l3.value;
1368         default: break;
1369         }
1370         return (function(){
1371             return (((typeof(v149) == "string")?l4.value: l3.value) !== l3.value ? (v151 !== l3.value ? (function(){
1372                 var str = v149;
1373                 var a = v150;
1374                 var b;
1375                 b = v151;
1376                 return str.slice(a,b);
1377             })() : (function(){
1378                 var str = v149;
1379                 var a = v150;
1380                 var b;
1381                 return str.slice(a,b);
1382             })()) : (function(){
1383                 throw "Unsupported argument.";
1384             })());
1385         })();
1386     }));
1387     return l91;
1388 })();
1389 var l92 = {name: "SOME"};
1390 (function(){
1391     (l92).fvalue = (function(v159){
1392         ((v159)["fname"] = "SOME");
1393         return v159;
1394     })((function (values,v153,v154){
1395         checkArgs(arguments, 3);
1396         return (function(){
1397             try {
1398                 return (((typeof(v154) == "string")?l4.value: l3.value) !== l3.value ? (function(v155,v156){
1399                     (function(){
1400                         return (function(){
1401                             while((function(){
1402                                 var x1 = v155;
1403                                 if (typeof x1 !== 'number') throw 'Not a number!';
1404                                 var x2 = v156;
1405                                 if (typeof x2 !== 'number') throw 'Not a number!';
1406                                 return (x1<x2?l4.value: l3.value);
1407                             })() !== l3.value){
1408                                 ((v153)(pv, (function(){
1409                                     var string = v154;
1410                                     var index = v155;
1411                                     if (typeof string != 'string')
1412                                         throw 'The value ' + string + ' is not a type string.';
1413                                     if (typeof index != 'number')
1414                                         throw 'The value ' + index + ' is not a type number.';
1415                                     return string.charCodeAt(index);
1416                                 })()) !== l3.value ? (function(){
1417                                     var values = mv;
1418                                     throw ({type: 'block', id: 69, values: l4.value, message: 'Return from unknown block SOME.'})
1419                                 })() : l3.value);
1420                                 (v155 = (function(){
1421                                     var x1 = v155;
1422                                     if (typeof x1 !== 'number') throw 'Not a number!';
1423                                     var x2 = 1;
1424                                     if (typeof x2 !== 'number') throw 'Not a number!';
1425                                     return x1+x2;
1426                                 })());
1427                             }return l3.value;
1428                         })();
1429                     })();
1430                     return l3.value;
1431                 })(0,l71.fvalue(pv, v154)) : (l59.fvalue(pv, v154) !== l3.value ? (function(){
1432                     try {
1433                         return (function(v157,v158){
1434                             (function(){
1435                                 while(v157 !== l3.value){
1436                                     (v158 = (function(){
1437                                         var tmp = v157;
1438                                         return tmp === l3.value? l3.value: tmp.car;
1439                                     })());
1440                                     (function(){
1441                                         ((v153)(pv, v158) !== l3.value ? (function(){
1442                                             var values = mv;
1443                                             throw ({type: 'block', id: 71, values: l4.value, message: 'Return from unknown block NIL.'})
1444                                         })() : l3.value);
1445                                         return l3.value;
1446                                     })();
1447                                     (v157 = (function(){
1448                                         var tmp = v157;
1449                                         return tmp === l3.value? l3.value: tmp.cdr;
1450                                     })());
1451                                 }return l3.value;
1452                             })();
1453                             return l3.value;
1454                         })(v154,l3.value);
1455                     }
1456                     catch (cf){
1457                         if (cf.type == 'block' && cf.id == 71)
1458                             return values.apply(this, forcemv(cf.values));
1459                         else
1460                             throw cf;
1461                     }
1462                 })() : (function(){
1463                     throw "Unknown sequence.";
1464                 })()));
1465             }
1466             catch (cf){
1467                 if (cf.type == 'block' && cf.id == 69)
1468                     return values.apply(this, forcemv(cf.values));
1469                 else
1470                     throw cf;
1471             }
1472         })();
1473     }));
1474     return l92;
1475 })();
1476 var l93 = {name: "EVERY"};
1477 (function(){
1478     (l93).fvalue = (function(v166){
1479         ((v166)["fname"] = "EVERY");
1480         return v166;
1481     })((function (values,v160,v161){
1482         checkArgs(arguments, 3);
1483         return (function(){
1484             try {
1485                 return (((typeof(v161) == "string")?l4.value: l3.value) !== l3.value ? (function(v162,v163){
1486                     (function(){
1487                         return (function(){
1488                             while((function(){
1489                                 var x1 = v162;
1490                                 if (typeof x1 !== 'number') throw 'Not a number!';
1491                                 var x2 = v163;
1492                                 if (typeof x2 !== 'number') throw 'Not a number!';
1493                                 return (x1<x2?l4.value: l3.value);
1494                             })() !== l3.value){
1495                                 ((v160)(pv, (function(){
1496                                     var string = v161;
1497                                     var index = v162;
1498                                     if (typeof string != 'string')
1499                                         throw 'The value ' + string + ' is not a type string.';
1500                                     if (typeof index != 'number')
1501                                         throw 'The value ' + index + ' is not a type number.';
1502                                     return string.charCodeAt(index);
1503                                 })()) !== l3.value ? l3.value : (function(){
1504                                     var values = mv;
1505                                     throw ({type: 'block', id: 72, values: l3.value, message: 'Return from unknown block EVERY.'})
1506                                 })());
1507                                 (v162 = (function(){
1508                                     var x1 = v162;
1509                                     if (typeof x1 !== 'number') throw 'Not a number!';
1510                                     var x2 = 1;
1511                                     if (typeof x2 !== 'number') throw 'Not a number!';
1512                                     return x1+x2;
1513                                 })());
1514                             }return l3.value;
1515                         })();
1516                     })();
1517                     return l4.value;
1518                 })(0,l71.fvalue(pv, v161)) : (l59.fvalue(pv, v161) !== l3.value ? (function(){
1519                     try {
1520                         return (function(v164,v165){
1521                             (function(){
1522                                 while(v164 !== l3.value){
1523                                     (v165 = (function(){
1524                                         var tmp = v164;
1525                                         return tmp === l3.value? l3.value: tmp.car;
1526                                     })());
1527                                     (function(){
1528                                         ((v160)(pv, v165) !== l3.value ? l3.value : (function(){
1529                                             var values = mv;
1530                                             throw ({type: 'block', id: 74, values: l3.value, message: 'Return from unknown block NIL.'})
1531                                         })());
1532                                         return l3.value;
1533                                     })();
1534                                     (v164 = (function(){
1535                                         var tmp = v164;
1536                                         return tmp === l3.value? l3.value: tmp.cdr;
1537                                     })());
1538                                 }return l3.value;
1539                             })();
1540                             return l4.value;
1541                         })(v161,l3.value);
1542                     }
1543                     catch (cf){
1544                         if (cf.type == 'block' && cf.id == 74)
1545                             return values.apply(this, forcemv(cf.values));
1546                         else
1547                             throw cf;
1548                     }
1549                 })() : (function(){
1550                     throw "Unknown sequence.";
1551                 })()));
1552             }
1553             catch (cf){
1554                 if (cf.type == 'block' && cf.id == 72)
1555                     return values.apply(this, forcemv(cf.values));
1556                 else
1557                     throw cf;
1558             }
1559         })();
1560     }));
1561     return l93;
1562 })();
1563 var l94 = {name: "ASSOC"};
1564 (function(){
1565     (l94).fvalue = (function(v169){
1566         ((v169)["fname"] = "ASSOC");
1567         return v169;
1568     })((function (values,v167,v168){
1569         checkArgs(arguments, 3);
1570         return (function(){
1571             (function(){
1572                 try {
1573                     return (function(){
1574                         while(v168 !== l3.value){
1575                             (l26.fvalue(pv, v167, l32.fvalue(pv, v168)) !== l3.value ? (function(){
1576                                 throw ({type: 'block', id: 76, values: l3.value, message: 'Return from unknown block NIL.'})
1577                             })() : (v168 = (function(){
1578                                 var tmp = v168;
1579                                 return tmp === l3.value? l3.value: tmp.cdr;
1580                             })()));
1581                         }return l3.value;
1582                     })();
1583                 }
1584                 catch (cf){
1585                     if (cf.type == 'block' && cf.id == 76)
1586                         return cf.values;
1587                     else
1588                         throw cf;
1589                 }
1590             })();
1591             return (function(){
1592                 var tmp = v168;
1593                 return tmp === l3.value? l3.value: tmp.car;
1594             })();
1595         })();
1596     }));
1597     return l94;
1598 })();
1599 var l95 = {name: "STRING"};
1600 (function(){
1601     (l95).fvalue = (function(v171){
1602         ((v171)["fname"] = "STRING");
1603         return v171;
1604     })((function (values,v170){
1605         checkArgs(arguments, 2);
1606         return (function(){
1607             return (((typeof(v170) == "string")?l4.value: l3.value) !== l3.value ? v170 : (((function(){
1608                 var tmp = v170;
1609                 return (typeof tmp == 'object' && 'name' in tmp);
1610             })()?l4.value: l3.value) !== l3.value ? (v170).name : (function(){
1611                 var x = v170;
1612                 if (typeof x != 'number')
1613                     throw 'The value ' + x + ' is not a type number.';
1614                 return String.fromCharCode(x);
1615             })()));
1616         })();
1617     }));
1618     return l95;
1619 })();
1620 var l96 = {name: "STRING="};
1621 (function(){
1622     (l96).fvalue = (function(v174){
1623         ((v174)["fname"] = "STRING=");
1624         return v174;
1625     })((function (values,v172,v173){
1626         checkArgs(arguments, 3);
1627         return (function(){
1628             return ((v172 == v173)?l4.value: l3.value);
1629         })();
1630     }));
1631     return l96;
1632 })();
1633 var l97 = {name: "FDEFINITION"};
1634 (function(){
1635     (l97).fvalue = (function(v176){
1636         ((v176)["fname"] = "FDEFINITION");
1637         return v176;
1638     })((function (values,v175){
1639         checkArgs(arguments, 2);
1640         return (function(){
1641             return (((typeof v175 == 'function')?l4.value: l3.value) !== l3.value ? v175 : (((function(){
1642                 var tmp = v175;
1643                 return (typeof tmp == 'object' && 'name' in tmp);
1644             })()?l4.value: l3.value) !== l3.value ? (function(){
1645                 var symbol = v175;
1646                 var func = symbol.fvalue;
1647                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1648                 return func;
1649             })() : (function(){
1650                 throw "Invalid function";
1651             })()));
1652         })();
1653     }));
1654     return l97;
1655 })();
1656 var l98 = {name: "DISASSEMBLE"};
1657 var l99 = {name: "WRITE-LINE"};
1658 (function(){
1659     (l98).fvalue = (function(v178){
1660         ((v178)["fname"] = "DISASSEMBLE");
1661         return v178;
1662     })((function (values,v177){
1663         checkArgs(arguments, 2);
1664         return (function(){
1665             l99.fvalue(pv, (l97.fvalue(pv, v177)).toString());
1666             return l3.value;
1667         })();
1668     }));
1669     return l98;
1670 })();
1671 var l100 = {name: "DOCUMENTATION"};
1672 var l101 = {name: "FUNCTION"};
1673 var l102 = {name: "VARIABLE"};
1674 (function(){
1675     (l100).fvalue = (function(v183){
1676         ((v183)["fname"] = "DOCUMENTATION");
1677         return v183;
1678     })((function(){
1679         var func = (function (values,v179,v180){
1680             checkArgs(arguments, 3);
1681             return (function(){
1682                 return (function(v181){
1683                     return (l26.fvalue(pv, v181, l101) !== l3.value ? (function(v182){
1684                         return (function(){
1685                             var tmp = (v182)["docstring"];
1686                             return tmp == undefined? l3.value: tmp ;
1687                         })();
1688                     })(l97.fvalue(pv, v179)) : (l26.fvalue(pv, v181, l102) !== l3.value ? (function(){
1689                         (((function(){
1690                             var tmp = v179;
1691                             return (typeof tmp == 'object' && 'name' in tmp);
1692                         })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
1693                             throw "Wrong argument type! it should be a symbol";
1694                         })());
1695                         return (function(){
1696                             var tmp = (v179)["vardoc"];
1697                             return tmp == undefined? l3.value: tmp ;
1698                         })();
1699                     })() : (function(){
1700                         throw "ECASE expression failed.";
1701                     })()));
1702                 })(v180);
1703             })();
1704         });
1705         func.docstring = 'Return the documentation of X. TYPE must be the symbol VARIABLE or FUNCTION.';
1706         return func;
1707     })());
1708     return l100;
1709 })();
1710 var l103 = {name: "MULTIPLE-VALUE-BIND"};
1711 l103;
1712 var l104 = {name: "MULTIPLE-VALUE-LIST"};
1713 l104;
1714 var l105 = {name: "*PACKAGE-LIST*"};
1715 (function(){
1716     (((l105.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l105).value = l3.value));
1717     return l105;
1718 })();
1719 var l106 = {name: "LIST-ALL-PACKAGES"};
1720 (function(){
1721     (l106).fvalue = (function(v184){
1722         ((v184)["fname"] = "LIST-ALL-PACKAGES");
1723         return v184;
1724     })((function (values){
1725         checkArgsAtMost(arguments, 1);
1726         return (function(){
1727             return (function(){
1728                 var symbol = l105;
1729                 var value = symbol.value;
1730                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1731                 return value;
1732             })();
1733         })();
1734     }));
1735     return l106;
1736 })();
1737 var l107 = {name: "MAKE-PACKAGE"};
1738 var l108 = {name: "FIND-PACKAGE-OR-FAIL"};
1739 (function(){
1740     (l107).fvalue = (function(v189){
1741         ((v189)["fname"] = "MAKE-PACKAGE");
1742         return v189;
1743     })((function (values,v185,v186){
1744         checkArgsAtLeast(arguments, 2);
1745         checkArgsAtMost(arguments, 3);
1746         switch(arguments.length-1){
1747         case 1:
1748         v186=l3.value;
1749         default: break;
1750         }
1751         return (function(){
1752             return (function(v187,v188){
1753                 ((v187)["packageName"] = v185);
1754                 ((v187)["symbols"] = {});
1755                 ((v187)["exports"] = {});
1756                 ((v187)["use"] = v188);
1757                 ((l105).value = ({car: v187, cdr: (function(){
1758                     var symbol = l105;
1759                     var value = symbol.value;
1760                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1761                     return value;
1762                 })()}));
1763                 return v187;
1764             })({},l73.fvalue(pv, (function(){
1765                 var symbol = l108;
1766                 var func = symbol.fvalue;
1767                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1768                 return func;
1769             })(), v186));
1770         })();
1771     }));
1772     return l107;
1773 })();
1774 var l109 = {name: "PACKAGEP"};
1775 (function(){
1776     (l109).fvalue = (function(v191){
1777         ((v191)["fname"] = "PACKAGEP");
1778         return v191;
1779     })((function (values,v190){
1780         checkArgs(arguments, 2);
1781         return (function(){
1782             return (((typeof (v190) === 'object')?l4.value: l3.value) !== l3.value ? ((("symbols") in (v190))?l4.value: l3.value) : l3.value);
1783         })();
1784     }));
1785     return l109;
1786 })();
1787 var l110 = {name: "FIND-PACKAGE"};
1788 var l111 = {name: "PACKAGE-NAME"};
1789 (function(){
1790     (l110).fvalue = (function(v196){
1791         ((v196)["fname"] = "FIND-PACKAGE");
1792         return v196;
1793     })((function (values,v192){
1794         checkArgs(arguments, 2);
1795         return (function(){
1796             try {
1797                 (l109.fvalue(pv, v192) !== l3.value ? (function(){
1798                     var values = mv;
1799                     throw ({type: 'block', id: 85, values: v192, message: 'Return from unknown block FIND-PACKAGE.'})
1800                 })() : l3.value);
1801                 return (function(v193){
1802                     return (function(){
1803                         try {
1804                             return (function(v194,v195){
1805                                 (function(){
1806                                     while(v194 !== l3.value){
1807                                         (v195 = (function(){
1808                                             var tmp = v194;
1809                                             return tmp === l3.value? l3.value: tmp.car;
1810                                         })());
1811                                         (function(){
1812                                             (l96.fvalue(pv, l111.fvalue(pv, v195), v193) !== l3.value ? (function(){
1813                                                 var values = mv;
1814                                                 throw ({type: 'block', id: 86, values: v195, message: 'Return from unknown block NIL.'})
1815                                             })() : l3.value);
1816                                             return l3.value;
1817                                         })();
1818                                         (v194 = (function(){
1819                                             var tmp = v194;
1820                                             return tmp === l3.value? l3.value: tmp.cdr;
1821                                         })());
1822                                     }return l3.value;
1823                                 })();
1824                                 return l3.value;
1825                             })((function(){
1826                                 var symbol = l105;
1827                                 var value = symbol.value;
1828                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1829                                 return value;
1830                             })(),l3.value);
1831                         }
1832                         catch (cf){
1833                             if (cf.type == 'block' && cf.id == 86)
1834                                 return values.apply(this, forcemv(cf.values));
1835                             else
1836                                 throw cf;
1837                         }
1838                     })();
1839                 })(l95.fvalue(pv, v192));
1840             }
1841             catch (cf){
1842                 if (cf.type == 'block' && cf.id == 85)
1843                     return values.apply(this, forcemv(cf.values));
1844                 else
1845                     throw cf;
1846             }
1847         })();
1848     }));
1849     return l110;
1850 })();
1851 (function(){
1852     (l108).fvalue = (function(v199){
1853         ((v199)["fname"] = "FIND-PACKAGE-OR-FAIL");
1854         return v199;
1855     })((function (values,v197){
1856         checkArgs(arguments, 2);
1857         return (function(){
1858             return (function(v198){
1859                 return (v198 !== l3.value ? v198 : (function(){
1860                     throw "Package unknown.";
1861                 })());
1862             })(l110.fvalue(pv, v197));
1863         })();
1864     }));
1865     return l108;
1866 })();
1867 (function(){
1868     (l111).fvalue = (function(v202){
1869         ((v202)["fname"] = "PACKAGE-NAME");
1870         return v202;
1871     })((function (values,v200){
1872         checkArgs(arguments, 2);
1873         return (function(){
1874             return (function(v201){
1875                 return (function(){
1876                     var tmp = (v201)["packageName"];
1877                     return tmp == undefined? l3.value: tmp ;
1878                 })();
1879             })(l108.fvalue(pv, v200));
1880         })();
1881     }));
1882     return l111;
1883 })();
1884 var l112 = {name: "%PACKAGE-SYMBOLS"};
1885 (function(){
1886     (l112).fvalue = (function(v205){
1887         ((v205)["fname"] = "%PACKAGE-SYMBOLS");
1888         return v205;
1889     })((function (values,v203){
1890         checkArgs(arguments, 2);
1891         return (function(){
1892             return (function(v204){
1893                 return (function(){
1894                     var tmp = (v204)["symbols"];
1895                     return tmp == undefined? l3.value: tmp ;
1896                 })();
1897             })(l108.fvalue(pv, v203));
1898         })();
1899     }));
1900     return l112;
1901 })();
1902 var l113 = {name: "PACKAGE-USE-LIST"};
1903 (function(){
1904     (l113).fvalue = (function(v208){
1905         ((v208)["fname"] = "PACKAGE-USE-LIST");
1906         return v208;
1907     })((function (values,v206){
1908         checkArgs(arguments, 2);
1909         return (function(){
1910             return (function(v207){
1911                 return (function(){
1912                     var tmp = (v207)["use"];
1913                     return tmp == undefined? l3.value: tmp ;
1914                 })();
1915             })(l108.fvalue(pv, v206));
1916         })();
1917     }));
1918     return l113;
1919 })();
1920 var l114 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
1921 (function(){
1922     (l114).fvalue = (function(v211){
1923         ((v211)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
1924         return v211;
1925     })((function (values,v209){
1926         checkArgs(arguments, 2);
1927         return (function(){
1928             return (function(v210){
1929                 return (function(){
1930                     var tmp = (v210)["exports"];
1931                     return tmp == undefined? l3.value: tmp ;
1932                 })();
1933             })(l108.fvalue(pv, v209));
1934         })();
1935     }));
1936     return l114;
1937 })();
1938 var l115 = {name: "*COMMON-LISP-PACKAGE*"};
1939 (function(){
1940     (((l115.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l115).value = l107.fvalue(pv, "CL")));
1941     return l115;
1942 })();
1943 var l116 = {name: "*USER-PACKAGE*"};
1944 (function(){
1945     (((l116.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l116).value = l107.fvalue(pv, "CL-USER", l44.fvalue(pv, (function(){
1946         var symbol = l115;
1947         var value = symbol.value;
1948         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1949         return value;
1950     })()))));
1951     return l116;
1952 })();
1953 var l117 = {name: "*KEYWORD-PACKAGE*"};
1954 (function(){
1955     (((l117.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l117).value = l107.fvalue(pv, "KEYWORD")));
1956     return l117;
1957 })();
1958 var l118 = {name: "KEYWORDP"};
1959 var l119 = {name: "SYMBOL-PACKAGE"};
1960 (function(){
1961     (l118).fvalue = (function(v213){
1962         ((v213)["fname"] = "KEYWORDP");
1963         return v213;
1964     })((function (values,v212){
1965         checkArgs(arguments, 2);
1966         return (function(){
1967             return (((function(){
1968                 var tmp = v212;
1969                 return (typeof tmp == 'object' && 'name' in tmp);
1970             })()?l4.value: l3.value) !== l3.value ? ((l119.fvalue(pv, v212) === (function(){
1971                 var symbol = l117;
1972                 var value = symbol.value;
1973                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1974                 return value;
1975             })())?l4.value: l3.value) : l3.value);
1976         })();
1977     }));
1978     return l118;
1979 })();
1980 var l120 = {name: "*PACKAGE*"};
1981 (function(){
1982     (((l120.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l120).value = (function(){
1983         var symbol = l115;
1984         var value = symbol.value;
1985         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1986         return value;
1987     })()));
1988     return l120;
1989 })();
1990 var l121 = {name: "IN-PACKAGE"};
1991 l121;
1992 var l122 = {name: "%INTERN-SYMBOL"};
1993 (function(){
1994     (l122).fvalue = (function(v217){
1995         ((v217)["fname"] = "%INTERN-SYMBOL");
1996         return v217;
1997     })((function (values,v214){
1998         checkArgs(arguments, 2);
1999         return (function(){
2000             return (function(){
2001                 var v215 = (((("package") in (v214))?l4.value: l3.value) !== l3.value ? l108.fvalue(pv, (function(){
2002                     var tmp = (v214)["package"];
2003                     return tmp == undefined? l3.value: tmp ;
2004                 })()) : (function(){
2005                     var symbol = l115;
2006                     var value = symbol.value;
2007                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2008                     return value;
2009                 })());
2010                 var v216 = l112.fvalue(pv, v215);
2011                 ((v214)["package"] = v215);
2012                 (((v215 === (function(){
2013                     var symbol = l117;
2014                     var value = symbol.value;
2015                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2016                     return value;
2017                 })())?l4.value: l3.value) !== l3.value ? ((v214)["value"] = v214) : l3.value);
2018                 return ((v216)[(v214).name] = v214);
2019             })();
2020         })();
2021     }));
2022     return l122;
2023 })();
2024 var l123 = {name: "FIND-SYMBOL"};
2025 var l124 = {name: "EXTERNAL", 'package': 'KEYWORD'};
2026 var l125 = {name: "INTERNAL", 'package': 'KEYWORD'};
2027 var l126 = {name: "INHERIT", 'package': 'KEYWORD'};
2028 (function(){
2029     (l123).fvalue = (function(v226){
2030         ((v226)["fname"] = "FIND-SYMBOL");
2031         return v226;
2032     })((function (values,v218,v219){
2033         checkArgsAtLeast(arguments, 2);
2034         checkArgsAtMost(arguments, 3);
2035         switch(arguments.length-1){
2036         case 1:
2037         v219=(function(){
2038             var symbol = l120;
2039             var value = symbol.value;
2040             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2041             return value;
2042         })();
2043         default: break;
2044         }
2045         return (function(){
2046             return (function(){
2047                 var v220 = l108.fvalue(pv, v219);
2048                 var v221 = l114.fvalue(pv, v220);
2049                 var v222 = l112.fvalue(pv, v220);
2050                 return ((((v218) in (v221))?l4.value: l3.value) !== l3.value ? values((function(){
2051                     var tmp = (v221)[v218];
2052                     return tmp == undefined? l3.value: tmp ;
2053                 })(), l124.value) : ((((v218) in (v222))?l4.value: l3.value) !== l3.value ? values((function(){
2054                     var tmp = (v222)[v218];
2055                     return tmp == undefined? l3.value: tmp ;
2056                 })(), l125.value) : (function(){
2057                     try {
2058                         return (function(v223,v224){
2059                             (function(){
2060                                 while(v223 !== l3.value){
2061                                     (v224 = (function(){
2062                                         var tmp = v223;
2063                                         return tmp === l3.value? l3.value: tmp.car;
2064                                     })());
2065                                     (function(){
2066                                         (function(v225){
2067                                             return ((((v218) in (v225))?l4.value: l3.value) !== l3.value ? (function(){
2068                                                 var values = mv;
2069                                                 throw ({type: 'block', id: 95, values: values((function(){
2070                                                     var tmp = (v225)[v218];
2071                                                     return tmp == undefined? l3.value: tmp ;
2072                                                 })(), l126.value), message: 'Return from unknown block NIL.'})
2073                                             })() : l3.value);
2074                                         })(l114.fvalue(pv, v224));
2075                                         return l3.value;
2076                                     })();
2077                                     (v223 = (function(){
2078                                         var tmp = v223;
2079                                         return tmp === l3.value? l3.value: tmp.cdr;
2080                                     })());
2081                                 }return l3.value;
2082                             })();
2083                             return values(l3.value, l3.value);
2084                         })(l113.fvalue(pv, v220),l3.value);
2085                     }
2086                     catch (cf){
2087                         if (cf.type == 'block' && cf.id == 95)
2088                             return values.apply(this, forcemv(cf.values));
2089                         else
2090                             throw cf;
2091                     }
2092                 })()));
2093             })();
2094         })();
2095     }));
2096     return l123;
2097 })();
2098 var l127 = {name: "INTERN"};
2099 var l128 = {name: "EXPORT"};
2100 (function(){
2101     (l127).fvalue = (function(v235){
2102         ((v235)["fname"] = "INTERN");
2103         return v235;
2104     })((function (values,v227,v228){
2105         checkArgsAtLeast(arguments, 2);
2106         checkArgsAtMost(arguments, 3);
2107         switch(arguments.length-1){
2108         case 1:
2109         v228=(function(){
2110             var symbol = l120;
2111             var value = symbol.value;
2112             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2113             return value;
2114         })();
2115         default: break;
2116         }
2117         return (function(){
2118             return (function(v229){
2119                 return (function(){
2120                     var func = (function (values,v231,v232){
2121                         switch(arguments.length-1){
2122                         case 0:
2123                         v231=l3.value;
2124                         case 1:
2125                         v232=l3.value;
2126                         default: break;
2127                         }
2128                         var v230= l3.value;
2129                         for (var i = arguments.length-1; i>=3; i--)
2130                             v230 = {car: arguments[i], cdr:
2131                         v230};
2132                         return (v232 !== l3.value ? values(v231, v232) : (function(v233){
2133                             (function(){
2134                                 var tmp = (v233)[v227];
2135                                 return tmp == undefined? l3.value: tmp ;
2136                             })();
2137                             return (function(v234){
2138                                 ((v234)["package"] = v229);
2139                                 (((v229 === (function(){
2140                                     var symbol = l117;
2141                                     var value = symbol.value;
2142                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2143                                     return value;
2144                                 })())?l4.value: l3.value) !== l3.value ? (function(){
2145                                     ((v234)["value"] = v234);
2146                                     return l128.fvalue(pv, l44.fvalue(pv, v234), v229);
2147                                 })() : l3.value);
2148                                 ((v233)[v227] = v234);
2149                                 return values(v234, l3.value);
2150                             })((function(){
2151                                 var name = v227;
2152                                 if (typeof name != 'string')
2153                                     throw 'The value ' + name + ' is not a type string.';
2154                                 return ({name: name});
2155                             })());
2156                         })(l112.fvalue(pv, v229)));
2157                     });
2158                     var args = [values];
2159                     return (function(){
2160                         var values = mv;
2161                         var vs;
2162                         vs = l123.fvalue(values, v227, v229);
2163                         if (typeof vs === 'object' && 'multiple-value' in vs)
2164                             args = args.concat(vs);
2165                         else
2166                             args.push(vs);
2167                         return func.apply(window, args);
2168                     })();
2169                 })();
2170             })(l108.fvalue(pv, v228));
2171         })();
2172     }));
2173     return l127;
2174 })();
2175 (function(){
2176     (l119).fvalue = (function(v237){
2177         ((v237)["fname"] = "SYMBOL-PACKAGE");
2178         return v237;
2179     })((function (values,v236){
2180         checkArgs(arguments, 2);
2181         return (function(){
2182             (((function(){
2183                 var tmp = v236;
2184                 return (typeof tmp == 'object' && 'name' in tmp);
2185             })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
2186                 throw "it is not a symbol";
2187             })());
2188             return (function(){
2189                 var tmp = (v236)["package"];
2190                 return tmp == undefined? l3.value: tmp ;
2191             })();
2192         })();
2193     }));
2194     return l119;
2195 })();
2196 (function(){
2197     (l128).fvalue = (function(v243){
2198         ((v243)["fname"] = "EXPORT");
2199         return v243;
2200     })((function (values,v238,v239){
2201         checkArgsAtLeast(arguments, 2);
2202         checkArgsAtMost(arguments, 3);
2203         switch(arguments.length-1){
2204         case 1:
2205         v239=(function(){
2206             var symbol = l120;
2207             var value = symbol.value;
2208             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2209             return value;
2210         })();
2211         default: break;
2212         }
2213         return (function(){
2214             return (function(v240){
2215                 return (function(){
2216                     return (function(v241,v242){
2217                         (function(){
2218                             while(v241 !== l3.value){
2219                                 (v242 = (function(){
2220                                     var tmp = v241;
2221                                     return tmp === l3.value? l3.value: tmp.car;
2222                                 })());
2223                                 (function(){
2224                                     ((v240)[(v242).name] = v242);
2225                                     return l3.value;
2226                                 })();
2227                                 (v241 = (function(){
2228                                     var tmp = v241;
2229                                     return tmp === l3.value? l3.value: tmp.cdr;
2230                                 })());
2231                             }return l3.value;
2232                         })();
2233                         return l4.value;
2234                     })(v238,l3.value);
2235                 })();
2236             })(l114.fvalue(pv, v239));
2237         })();
2238     }));
2239     return l128;
2240 })();
2241 var l129 = {name: "GET-UNIVERSAL-TIME"};
2242 (function(){
2243     (l129).fvalue = (function(v244){
2244         ((v244)["fname"] = "GET-UNIVERSAL-TIME");
2245         return v244;
2246     })((function (values){
2247         checkArgsAtMost(arguments, 1);
2248         return (function(){
2249             return (function(){
2250                 var x1 = (Math.round(new Date() / 1000));
2251                 if (typeof x1 !== 'number') throw 'Not a number!';
2252                 var x2 = 2208988800;
2253                 if (typeof x2 !== 'number') throw 'Not a number!';
2254                 return x1+x2;
2255             })();
2256         })();
2257     }));
2258     return l129;
2259 })();
2260 var l130 = {name: "*NEWLINE*"};
2261 (function(){
2262     (((l130.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l130).value = l95.fvalue(pv, l76.fvalue(pv, 10))));
2263     return l130;
2264 })();
2265 var l131 = {name: "CONCAT"};
2266 (function(){
2267     (l131).fvalue = (function(v246){
2268         ((v246)["fname"] = "CONCAT");
2269         return v246;
2270     })((function (values){
2271         var v245= l3.value;
2272         for (var i = arguments.length-1; i>=1; i--)
2273             v245 = {car: arguments[i], cdr:
2274         v245};
2275         return (function(){
2276             return l60.fvalue(values, (function(){
2277                 var symbol = l72;
2278                 var func = symbol.fvalue;
2279                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2280                 return func;
2281             })(), v245, "");
2282         })();
2283     }));
2284     return l131;
2285 })();
2286 var l132 = {name: "CONCATF"};
2287 l132;
2288 var l133 = {name: "JOIN"};
2289 (function(){
2290     (l133).fvalue = (function(v249){
2291         ((v249)["fname"] = "JOIN");
2292         return v249;
2293     })((function (values,v247,v248){
2294         checkArgsAtLeast(arguments, 2);
2295         checkArgsAtMost(arguments, 3);
2296         switch(arguments.length-1){
2297         case 1:
2298         v248="";
2299         default: break;
2300         }
2301         return (function(){
2302             return (l12.fvalue(pv, v247) !== l3.value ? "" : (l12.fvalue(pv, (function(){
2303                 var tmp = v247;
2304                 return tmp === l3.value? l3.value: tmp.cdr;
2305             })()) !== l3.value ? (function(){
2306                 var tmp = v247;
2307                 return tmp === l3.value? l3.value: tmp.car;
2308             })() : l131.fvalue(values, (function(){
2309                 var tmp = v247;
2310                 return tmp === l3.value? l3.value: tmp.car;
2311             })(), v248, l133.fvalue(pv, (function(){
2312                 var tmp = v247;
2313                 return tmp === l3.value? l3.value: tmp.cdr;
2314             })(), v248))));
2315         })();
2316     }));
2317     return l133;
2318 })();
2319 var l134 = {name: "JOIN-TRAILING"};
2320 (function(){
2321     (l134).fvalue = (function(v252){
2322         ((v252)["fname"] = "JOIN-TRAILING");
2323         return v252;
2324     })((function (values,v250,v251){
2325         checkArgsAtLeast(arguments, 2);
2326         checkArgsAtMost(arguments, 3);
2327         switch(arguments.length-1){
2328         case 1:
2329         v251="";
2330         default: break;
2331         }
2332         return (function(){
2333             return (l12.fvalue(pv, v250) !== l3.value ? "" : l131.fvalue(values, (function(){
2334                 var tmp = v250;
2335                 return tmp === l3.value? l3.value: tmp.car;
2336             })(), v251, l134.fvalue(pv, (function(){
2337                 var tmp = v250;
2338                 return tmp === l3.value? l3.value: tmp.cdr;
2339             })(), v251)));
2340         })();
2341     }));
2342     return l134;
2343 })();
2344 var l135 = {name: "MAPCONCAT"};
2345 (function(){
2346     (l135).fvalue = (function(v255){
2347         ((v255)["fname"] = "MAPCONCAT");
2348         return v255;
2349     })((function (values,v253,v254){
2350         checkArgs(arguments, 3);
2351         return (function(){
2352             return l133.fvalue(values, l73.fvalue(pv, v253, v254));
2353         })();
2354     }));
2355     return l135;
2356 })();
2357 var l136 = {name: "VECTOR-TO-LIST"};
2358 (function(){
2359     (l136).fvalue = (function(v261){
2360         ((v261)["fname"] = "VECTOR-TO-LIST");
2361         return v261;
2362     })((function (values,v256){
2363         checkArgs(arguments, 2);
2364         return (function(){
2365             return (function(v257,v258){
2366                 return (function(){
2367                     return (function(v259,v260){
2368                         (function(){
2369                             while((function(){
2370                                 var x1 = v259;
2371                                 if (typeof x1 !== 'number') throw 'Not a number!';
2372                                 var x2 = v260;
2373                                 if (typeof x2 !== 'number') throw 'Not a number!';
2374                                 return (x1<x2?l4.value: l3.value);
2375                             })() !== l3.value){
2376                                 (function(){
2377                                     (v257 = ({car: (function(){
2378                                         var x = (v256)[v259];
2379                                         if (x === undefined) throw 'Out of range';
2380                                         return x;
2381                                     })(), cdr: v257}));
2382                                     return l3.value;
2383                                 })();
2384                                 (v259 = (function(){
2385                                     var x1 = v259;
2386                                     if (typeof x1 !== 'number') throw 'Not a number!';
2387                                     var x2 = 1;
2388                                     if (typeof x2 !== 'number') throw 'Not a number!';
2389                                     return x1+x2;
2390                                 })());
2391                             }return l3.value;
2392                         })();
2393                         return l66.fvalue(values, v257);
2394                     })(0,v258);
2395                 })();
2396             })(l3.value,l71.fvalue(pv, v256));
2397         })();
2398     }));
2399     return l136;
2400 })();
2401 var l137 = {name: "LIST-TO-VECTOR"};
2402 (function(){
2403     (l137).fvalue = (function(v267){
2404         ((v267)["fname"] = "LIST-TO-VECTOR");
2405         return v267;
2406     })((function (values,v262){
2407         checkArgs(arguments, 2);
2408         return (function(){
2409             return (function(v263,v264){
2410                 return (function(){
2411                     return (function(v265,v266){
2412                         (function(){
2413                             while(v265 !== l3.value){
2414                                 (v266 = (function(){
2415                                     var tmp = v265;
2416                                     return tmp === l3.value? l3.value: tmp.car;
2417                                 })());
2418                                 (function(){
2419                                     (function(){
2420                                         var x = v263;
2421                                         var i = v264;
2422                                         if (i < 0 || i >= x.length) throw 'Out of range';
2423                                         return x[i] = v266;
2424                                     })();
2425                                     (v264 = (function(){
2426                                         var x1 = v264;
2427                                         if (typeof x1 !== 'number') throw 'Not a number!';
2428                                         var x2 = 1;
2429                                         if (typeof x2 !== 'number') throw 'Not a number!';
2430                                         return x1+x2;
2431                                     })());
2432                                     return l3.value;
2433                                 })();
2434                                 (v265 = (function(){
2435                                     var tmp = v265;
2436                                     return tmp === l3.value? l3.value: tmp.cdr;
2437                                 })());
2438                             }return l3.value;
2439                         })();
2440                         return v263;
2441                     })(v262,l3.value);
2442                 })();
2443             })((function(){
2444                 var r = [];
2445                 for (var i = 0; i < l71.fvalue(pv, v262); i++)
2446                     r.push(l3.value);
2447                 return r;
2448             })(),0);
2449         })();
2450     }));
2451     return l137;
2452 })();
2453 var l138 = {name: "VALUES-LIST"};
2454 (function(){
2455     (l138).fvalue = (function(v269){
2456         ((v269)["fname"] = "VALUES-LIST");
2457         return v269;
2458     })((function (values,v268){
2459         checkArgs(arguments, 2);
2460         return (function(){
2461             return values.apply(this, l137.fvalue(pv, v268));
2462         })();
2463     }));
2464     return l138;
2465 })();
2466 var l139 = {name: "VALUES"};
2467 (function(){
2468     (l139).fvalue = (function(v271){
2469         ((v271)["fname"] = "VALUES");
2470         return v271;
2471     })((function (values){
2472         var v270= l3.value;
2473         for (var i = arguments.length-1; i>=1; i--)
2474             v270 = {car: arguments[i], cdr:
2475         v270};
2476         return (function(){
2477             return l138.fvalue(values, v270);
2478         })();
2479     }));
2480     return l139;
2481 })();
2482 var l140 = {name: "INDENT"};
2483 (function(){
2484     (l140).fvalue = (function(v278){
2485         ((v278)["fname"] = "INDENT");
2486         return v278;
2487     })((function (values){
2488         var v272= l3.value;
2489         for (var i = arguments.length-1; i>=1; i--)
2490             v272 = {car: arguments[i], cdr:
2491         v272};
2492         return (function(){
2493             return (function(v273){
2494                 return (function(v274,v275,v276){
2495                     (l80.fvalue(pv, l71.fvalue(pv, v273)) !== l3.value ? (v274 = l131.fvalue(pv, v274, "    ")) : l3.value);
2496                     (function(){
2497                         return (function(){
2498                             while((function(){
2499                                 var x1 = v275;
2500                                 if (typeof x1 !== 'number') throw 'Not a number!';
2501                                 var x2 = v276;
2502                                 if (typeof x2 !== 'number') throw 'Not a number!';
2503                                 return (x1<x2?l4.value: l3.value);
2504                             })() !== l3.value){
2505                                 (function(v277){
2506                                     return (v274 = l131.fvalue(pv, v274, v277));
2507                                 })(((l78.fvalue(pv, (function(){
2508                                     var string = v273;
2509                                     var index = v275;
2510                                     if (typeof string != 'string')
2511                                         throw 'The value ' + string + ' is not a type string.';
2512                                     if (typeof index != 'number')
2513                                         throw 'The value ' + index + ' is not a type number.';
2514                                     return string.charCodeAt(index);
2515                                 })(), 10) !== l3.value ? ((function(){
2516                                     var x1 = v275;
2517                                     if (typeof x1 !== 'number') throw 'Not a number!';
2518                                     var x2 = l23.fvalue(pv, v276);
2519                                     if (typeof x2 !== 'number') throw 'Not a number!';
2520                                     return (x1<x2?l4.value: l3.value);
2521                                 })() !== l3.value ? l27.fvalue(pv, l78.fvalue(pv, (function(){
2522                                     var string = v273;
2523                                     var index = l22.fvalue(pv, v275);
2524                                     if (typeof string != 'string')
2525                                         throw 'The value ' + string + ' is not a type string.';
2526                                     if (typeof index != 'number')
2527                                         throw 'The value ' + index + ' is not a type number.';
2528                                     return string.charCodeAt(index);
2529                                 })(), 10)) : l3.value) : l3.value) !== l3.value ? l131.fvalue(pv, l95.fvalue(pv, 10), "    ") : l95.fvalue(pv, (function(){
2530                                     var string = v273;
2531                                     var index = v275;
2532                                     if (typeof string != 'string')
2533                                         throw 'The value ' + string + ' is not a type string.';
2534                                     if (typeof index != 'number')
2535                                         throw 'The value ' + index + ' is not a type number.';
2536                                     return string.charCodeAt(index);
2537                                 })())));
2538                                 (v275 = (function(){
2539                                     var x1 = v275;
2540                                     if (typeof x1 !== 'number') throw 'Not a number!';
2541                                     var x2 = 1;
2542                                     if (typeof x2 !== 'number') throw 'Not a number!';
2543                                     return x1+x2;
2544                                 })());
2545                             }return l3.value;
2546                         })();
2547                     })();
2548                     return v274;
2549                 })("",0,l71.fvalue(pv, v273));
2550             })(l133.fvalue(pv, v272));
2551         })();
2552     }));
2553     return l140;
2554 })();
2555 (function(){
2556     (l17).fvalue = (function(v282){
2557         ((v282)["fname"] = "INTEGER-TO-STRING");
2558         return v282;
2559     })((function (values,v279){
2560         checkArgs(arguments, 2);
2561         return (function(){
2562             return (l24.fvalue(pv, v279) !== l3.value ? "0" : (l81.fvalue(pv, v279) !== l3.value ? l131.fvalue(values, "-", l17.fvalue(pv, (function(){
2563                 var x1 = 0;
2564                 if (typeof x1 !== 'number') throw 'Not a number!';
2565                 var x2 = v279;
2566                 if (typeof x2 !== 'number') throw 'Not a number!';
2567                 return x1-x2;
2568             })())) : (function(v280){
2569                 (function(){
2570                     return (function(){
2571                         while(l27.fvalue(pv, l24.fvalue(pv, v279)) !== l3.value){
2572                             (v280 = ({car: (function(){
2573                                 var x = v279;
2574                                 var y = 10;
2575                                 if (typeof x != 'number')
2576                                     throw 'The value ' + x + ' is not a type number.';
2577                                 if (typeof y != 'number')
2578                                     throw 'The value ' + y + ' is not a type number.';
2579                                 return x%y;
2580                             })(), cdr: v280}));
2581                             (v279 = l25.fvalue(pv, v279, 10));
2582                         }return l3.value;
2583                     })();
2584                 })();
2585                 return l133.fvalue(values, l73.fvalue(pv, (function (values,v281){
2586                     checkArgs(arguments, 2);
2587                     return l95.fvalue(values, (function(){
2588                         var string = "0123456789";
2589                         var index = v281;
2590                         if (typeof string != 'string')
2591                             throw 'The value ' + string + ' is not a type string.';
2592                         if (typeof index != 'number')
2593                             throw 'The value ' + index + ' is not a type number.';
2594                         return string.charCodeAt(index);
2595                     })());
2596                 }), v280));
2597             })(l3.value)));
2598         })();
2599     }));
2600     return l17;
2601 })();
2602 var l141 = {name: "JS!BOOL"};
2603 var l142 = {name: "LS-COMPILE"};
2604 (function(){
2605     (l141).fvalue = (function(v284){
2606         ((v284)["fname"] = "JS!BOOL");
2607         return v284;
2608     })((function (values,v283){
2609         checkArgs(arguments, 2);
2610         return (function(){
2611             return l131.fvalue(values, "(", v283, "?", l142.fvalue(pv, l4.value), ": ", l142.fvalue(pv, l3.value), ")");
2612         })();
2613     }));
2614     return l141;
2615 })();
2616 var l143 = {name: "JS!SELFCALL"};
2617 l143;
2618 var l144 = {name: "PRIN1-TO-STRING"};
2619 var l145 = {name: "ESCAPE-STRING"};
2620 (function(){
2621     (l144).fvalue = (function(v293){
2622         ((v293)["fname"] = "PRIN1-TO-STRING");
2623         return v293;
2624     })((function (values,v285){
2625         checkArgs(arguments, 2);
2626         return (function(){
2627             return (((function(){
2628                 var tmp = v285;
2629                 return (typeof tmp == 'object' && 'name' in tmp);
2630             })()?l4.value: l3.value) !== l3.value ? (function(){
2631                 var func = (function (values,v287,v288){
2632                     switch(arguments.length-1){
2633                     case 0:
2634                     v287=l3.value;
2635                     case 1:
2636                     v288=l3.value;
2637                     default: break;
2638                     }
2639                     var v286= l3.value;
2640                     for (var i = arguments.length-1; i>=3; i--)
2641                         v286 = {car: arguments[i], cdr:
2642                     v286};
2643                     return ((v288 !== l3.value ? ((v287 === v285)?l4.value: l3.value) : l3.value) !== l3.value ? (v285).name : (function(v289,v290){
2644                         return l131.fvalue(values, (l12.fvalue(pv, v289) !== l3.value ? "#" : (((v289 === l110.fvalue(pv, "KEYWORD"))?l4.value: l3.value) !== l3.value ? "" : l111.fvalue(pv, v289))), ":", v290);
2645                     })(l119.fvalue(pv, v285),(v285).name));
2646                 });
2647                 var args = [values];
2648                 return (function(){
2649                     var values = mv;
2650                     var vs;
2651                     vs = l123.fvalue(values, (v285).name, (function(){
2652                         var symbol = l120;
2653                         var value = symbol.value;
2654                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2655                         return value;
2656                     })());
2657                     if (typeof vs === 'object' && 'multiple-value' in vs)
2658                         args = args.concat(vs);
2659                     else
2660                         args.push(vs);
2661                     return func.apply(window, args);
2662                 })();
2663             })() : (l79.fvalue(pv, v285) !== l3.value ? l17.fvalue(values, v285) : (((typeof(v285) == "string")?l4.value: l3.value) !== l3.value ? l131.fvalue(values, "\"", l145.fvalue(pv, v285), "\"") : (((typeof v285 == 'function')?l4.value: l3.value) !== l3.value ? (function(v291){
2664                 return (v291 !== l3.value ? l131.fvalue(values, "#<FUNCTION ", v291, ">") : l131.fvalue(values, "#<FUNCTION>"));
2665             })((function(){
2666                 var tmp = (v285)["fname"];
2667                 return tmp == undefined? l3.value: tmp ;
2668             })()) : (l59.fvalue(pv, v285) !== l3.value ? l131.fvalue(values, "(", l134.fvalue(pv, l73.fvalue(pv, (function(){
2669                 var symbol = l144;
2670                 var func = symbol.fvalue;
2671                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2672                 return func;
2673             })(), l85.fvalue(pv, v285)), " "), (function(v292){
2674                 return (l12.fvalue(pv, (function(){
2675                     var tmp = v292;
2676                     return tmp === l3.value? l3.value: tmp.cdr;
2677                 })()) !== l3.value ? l144.fvalue(pv, (function(){
2678                     var tmp = v292;
2679                     return tmp === l3.value? l3.value: tmp.car;
2680                 })()) : l131.fvalue(pv, l144.fvalue(pv, (function(){
2681                     var tmp = v292;
2682                     return tmp === l3.value? l3.value: tmp.car;
2683                 })()), " . ", l144.fvalue(pv, (function(){
2684                     var tmp = v292;
2685                     return tmp === l3.value? l3.value: tmp.cdr;
2686                 })())));
2687             })(l84.fvalue(pv, v285)), ")") : (((function(){
2688                 var x = v285;
2689                 return typeof x === 'object' && 'length' in x;
2690             })()?l4.value: l3.value) !== l3.value ? l131.fvalue(values, "#", l144.fvalue(pv, l136.fvalue(pv, v285))) : (l109.fvalue(pv, v285) !== l3.value ? l131.fvalue(values, "#<PACKAGE ", l111.fvalue(pv, v285), ">") : l3.value)))))));
2691         })();
2692     }));
2693     return l144;
2694 })();
2695 (function(){
2696     (l99).fvalue = (function(v295){
2697         ((v295)["fname"] = "WRITE-LINE");
2698         return v295;
2699     })((function (values,v294){
2700         checkArgs(arguments, 2);
2701         return (function(){
2702             (function(){
2703                 var x = v294;
2704                 if (typeof x != 'string')
2705                     throw 'The value ' + x + ' is not a type string.';
2706                 return lisp.write(x);
2707             })();
2708             (function(){
2709                 var x = (function(){
2710                     var symbol = l130;
2711                     var value = symbol.value;
2712                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2713                     return value;
2714                 })();
2715                 if (typeof x != 'string')
2716                     throw 'The value ' + x + ' is not a type string.';
2717                 return lisp.write(x);
2718             })();
2719             return v294;
2720         })();
2721     }));
2722     return l99;
2723 })();
2724 var l146 = {name: "WARN"};
2725 (function(){
2726     (l146).fvalue = (function(v297){
2727         ((v297)["fname"] = "WARN");
2728         return v297;
2729     })((function (values,v296){
2730         checkArgs(arguments, 2);
2731         return (function(){
2732             (function(){
2733                 var x = "WARNING: ";
2734                 if (typeof x != 'string')
2735                     throw 'The value ' + x + ' is not a type string.';
2736                 return lisp.write(x);
2737             })();
2738             return l99.fvalue(values, v296);
2739         })();
2740     }));
2741     return l146;
2742 })();
2743 var l147 = {name: "PRINT"};
2744 (function(){
2745     (l147).fvalue = (function(v299){
2746         ((v299)["fname"] = "PRINT");
2747         return v299;
2748     })((function (values,v298){
2749         checkArgs(arguments, 2);
2750         return (function(){
2751             l99.fvalue(pv, l144.fvalue(pv, v298));
2752             return v298;
2753         })();
2754     }));
2755     return l147;
2756 })();
2757 var l148 = {name: "MAKE-STRING-STREAM"};
2758 (function(){
2759     (l148).fvalue = (function(v301){
2760         ((v301)["fname"] = "MAKE-STRING-STREAM");
2761         return v301;
2762     })((function (values,v300){
2763         checkArgs(arguments, 2);
2764         return (function(){
2765             return ({car: v300, cdr: 0});
2766         })();
2767     }));
2768     return l148;
2769 })();
2770 var l149 = {name: "%PEEK-CHAR"};
2771 (function(){
2772     (l149).fvalue = (function(v303){
2773         ((v303)["fname"] = "%PEEK-CHAR");
2774         return v303;
2775     })((function (values,v302){
2776         checkArgs(arguments, 2);
2777         return (function(){
2778             return ((function(){
2779                 var x1 = (function(){
2780                     var tmp = v302;
2781                     return tmp === l3.value? l3.value: tmp.cdr;
2782                 })();
2783                 if (typeof x1 !== 'number') throw 'Not a number!';
2784                 var x2 = l71.fvalue(pv, (function(){
2785                     var tmp = v302;
2786                     return tmp === l3.value? l3.value: tmp.car;
2787                 })());
2788                 if (typeof x2 !== 'number') throw 'Not a number!';
2789                 return (x1<x2?l4.value: l3.value);
2790             })() !== l3.value ? (function(){
2791                 var string = (function(){
2792                     var tmp = v302;
2793                     return tmp === l3.value? l3.value: tmp.car;
2794                 })();
2795                 var index = (function(){
2796                     var tmp = v302;
2797                     return tmp === l3.value? l3.value: tmp.cdr;
2798                 })();
2799                 if (typeof string != 'string')
2800                     throw 'The value ' + string + ' is not a type string.';
2801                 if (typeof index != 'number')
2802                     throw 'The value ' + index + ' is not a type number.';
2803                 return string.charCodeAt(index);
2804             })() : l3.value);
2805         })();
2806     }));
2807     return l149;
2808 })();
2809 var l150 = {name: "%READ-CHAR"};
2810 (function(){
2811     (l150).fvalue = (function(v306){
2812         ((v306)["fname"] = "%READ-CHAR");
2813         return v306;
2814     })((function (values,v304){
2815         checkArgs(arguments, 2);
2816         return (function(){
2817             return ((function(){
2818                 var x1 = (function(){
2819                     var tmp = v304;
2820                     return tmp === l3.value? l3.value: tmp.cdr;
2821                 })();
2822                 if (typeof x1 !== 'number') throw 'Not a number!';
2823                 var x2 = l71.fvalue(pv, (function(){
2824                     var tmp = v304;
2825                     return tmp === l3.value? l3.value: tmp.car;
2826                 })());
2827                 if (typeof x2 !== 'number') throw 'Not a number!';
2828                 return (x1<x2?l4.value: l3.value);
2829             })() !== l3.value ? (function(v305){
2830                 (function(){
2831                     var x = v304;
2832                     if (typeof x != 'object')
2833                         throw 'The value ' + x + ' is not a type object.';
2834                     return (x.cdr = l22.fvalue(pv, (function(){
2835                         var tmp = v304;
2836                         return tmp === l3.value? l3.value: tmp.cdr;
2837                     })()), x);
2838                 })();
2839                 return v305;
2840             })((function(){
2841                 var string = (function(){
2842                     var tmp = v304;
2843                     return tmp === l3.value? l3.value: tmp.car;
2844                 })();
2845                 var index = (function(){
2846                     var tmp = v304;
2847                     return tmp === l3.value? l3.value: tmp.cdr;
2848                 })();
2849                 if (typeof string != 'string')
2850                     throw 'The value ' + string + ' is not a type string.';
2851                 if (typeof index != 'number')
2852                     throw 'The value ' + index + ' is not a type number.';
2853                 return string.charCodeAt(index);
2854             })()) : l3.value);
2855         })();
2856     }));
2857     return l150;
2858 })();
2859 var l151 = {name: "WHITESPACEP"};
2860 (function(){
2861     (l151).fvalue = (function(v310){
2862         ((v310)["fname"] = "WHITESPACEP");
2863         return v310;
2864     })((function (values,v307){
2865         checkArgs(arguments, 2);
2866         return (function(){
2867             return (function(v308){
2868                 return (v308 !== l3.value ? v308 : (function(v309){
2869                     return (v309 !== l3.value ? v309 : l78.fvalue(values, v307, 9));
2870                 })(l78.fvalue(pv, v307, 10)));
2871             })(l78.fvalue(pv, v307, 32));
2872         })();
2873     }));
2874     return l151;
2875 })();
2876 var l152 = {name: "SKIP-WHITESPACES"};
2877 (function(){
2878     (l152).fvalue = (function(v313){
2879         ((v313)["fname"] = "SKIP-WHITESPACES");
2880         return v313;
2881     })((function (values,v311){
2882         checkArgs(arguments, 2);
2883         return (function(){
2884             return (function(v312){
2885                 (v312 = l149.fvalue(pv, v311));
2886                 return (function(){
2887                     return (function(){
2888                         while((v312 !== l3.value ? l151.fvalue(pv, v312) : l3.value) !== l3.value){
2889                             l150.fvalue(pv, v311);
2890                             (v312 = l149.fvalue(pv, v311));
2891                         }return l3.value;
2892                     })();
2893                 })();
2894             })(l3.value);
2895         })();
2896     }));
2897     return l152;
2898 })();
2899 var l153 = {name: "TERMINALP"};
2900 (function(){
2901     (l153).fvalue = (function(v318){
2902         ((v318)["fname"] = "TERMINALP");
2903         return v318;
2904     })((function (values,v314){
2905         checkArgs(arguments, 2);
2906         return (function(){
2907             return (function(v315){
2908                 return (v315 !== l3.value ? v315 : (function(v316){
2909                     return (v316 !== l3.value ? v316 : (function(v317){
2910                         return (v317 !== l3.value ? v317 : l78.fvalue(values, 40, v314));
2911                     })(l78.fvalue(pv, 41, v314)));
2912                 })(l151.fvalue(pv, v314)));
2913             })(l12.fvalue(pv, v314));
2914         })();
2915     }));
2916     return l153;
2917 })();
2918 var l154 = {name: "READ-UNTIL"};
2919 (function(){
2920     (l154).fvalue = (function(v323){
2921         ((v323)["fname"] = "READ-UNTIL");
2922         return v323;
2923     })((function (values,v319,v320){
2924         checkArgs(arguments, 3);
2925         return (function(){
2926             return (function(v321,v322){
2927                 (v322 = l149.fvalue(pv, v319));
2928                 (function(){
2929                     return (function(){
2930                         while((v322 !== l3.value ? l27.fvalue(pv, (v320)(pv, v322)) : l3.value) !== l3.value){
2931                             (v321 = l131.fvalue(pv, v321, l95.fvalue(pv, v322)));
2932                             l150.fvalue(pv, v319);
2933                             (v322 = l149.fvalue(pv, v319));
2934                         }return l3.value;
2935                     })();
2936                 })();
2937                 return v321;
2938             })("",l3.value);
2939         })();
2940     }));
2941     return l154;
2942 })();
2943 var l155 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
2944 (function(){
2945     (l155).fvalue = (function(v327){
2946         ((v327)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
2947         return v327;
2948     })((function (values,v324){
2949         checkArgs(arguments, 2);
2950         return (function(){
2951             return (function(v325){
2952                 l152.fvalue(pv, v324);
2953                 (v325 = l149.fvalue(pv, v324));
2954                 return (function(){
2955                     return (function(){
2956                         while((v325 !== l3.value ? l78.fvalue(pv, v325, 59) : l3.value) !== l3.value){
2957                             l154.fvalue(pv, v324, (function (values,v326){
2958                                 checkArgs(arguments, 2);
2959                                 return l78.fvalue(values, v326, 10);
2960                             }));
2961                             l152.fvalue(pv, v324);
2962                             (v325 = l149.fvalue(pv, v324));
2963                         }return l3.value;
2964                     })();
2965                 })();
2966             })(l3.value);
2967         })();
2968     }));
2969     return l155;
2970 })();
2971 var l156 = {name: "%READ-LIST"};
2972 var l157 = {name: "LS-READ"};
2973 (function(){
2974     (l156).fvalue = (function(v331){
2975         ((v331)["fname"] = "%READ-LIST");
2976         return v331;
2977     })((function (values,v328){
2978         checkArgs(arguments, 2);
2979         return (function(){
2980             l155.fvalue(pv, v328);
2981             return (function(v329){
2982                 return (l12.fvalue(pv, v329) !== l3.value ? (function(){
2983                     throw "Unspected EOF";
2984                 })() : (l78.fvalue(pv, v329, 41) !== l3.value ? (function(){
2985                     l150.fvalue(pv, v328);
2986                     return l3.value;
2987                 })() : (l78.fvalue(pv, v329, 46) !== l3.value ? (function(){
2988                     l150.fvalue(pv, v328);
2989                     return (function(v330){
2990                         l155.fvalue(pv, v328);
2991                         (l78.fvalue(pv, l150.fvalue(pv, v328), 41) !== l3.value ? l3.value : (function(){
2992                             throw "')' was expected.";
2993                         })());
2994                         return v330;
2995                     })(l157.fvalue(pv, v328));
2996                 })() : ({car: l157.fvalue(pv, v328), cdr: l156.fvalue(pv, v328)}))));
2997             })(l149.fvalue(pv, v328));
2998         })();
2999     }));
3000     return l156;
3001 })();
3002 var l158 = {name: "READ-STRING"};
3003 (function(){
3004     (l158).fvalue = (function(v335){
3005         ((v335)["fname"] = "READ-STRING");
3006         return v335;
3007     })((function (values,v332){
3008         checkArgs(arguments, 2);
3009         return (function(){
3010             return (function(v333,v334){
3011                 (v334 = l150.fvalue(pv, v332));
3012                 (function(){
3013                     return (function(){
3014                         while(l27.fvalue(pv, l26.fvalue(pv, v334, 34)) !== l3.value){
3015                             (l12.fvalue(pv, v334) !== l3.value ? (function(){
3016                                 throw "Unexpected EOF";
3017                             })() : l3.value);
3018                             (l26.fvalue(pv, v334, 92) !== l3.value ? (v334 = l150.fvalue(pv, v332)) : l3.value);
3019                             (v333 = l131.fvalue(pv, v333, l95.fvalue(pv, v334)));
3020                             (v334 = l150.fvalue(pv, v332));
3021                         }return l3.value;
3022                     })();
3023                 })();
3024                 return v333;
3025             })("",l3.value);
3026         })();
3027     }));
3028     return l158;
3029 })();
3030 var l159 = {name: "READ-SHARP"};
3031 (function(){
3032     (l159).fvalue = (function(v340){
3033         ((v340)["fname"] = "READ-SHARP");
3034         return v340;
3035     })((function (values,v336){
3036         checkArgs(arguments, 2);
3037         return (function(){
3038             l150.fvalue(pv, v336);
3039             return (function(v337){
3040                 return (l26.fvalue(pv, v337, 39) !== l3.value ? l44.fvalue(values, l101, l157.fvalue(pv, v336)) : (l26.fvalue(pv, v337, 40) !== l3.value ? l137.fvalue(values, l156.fvalue(pv, v336)) : (l26.fvalue(pv, v337, 58) !== l3.value ? (function(){
3041                     var name = (function(){
3042                         var x = l154.fvalue(pv, v336, (function(){
3043                             var symbol = l153;
3044                             var func = symbol.fvalue;
3045                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3046                             return func;
3047                         })());
3048                         if (typeof x != 'string')
3049                             throw 'The value ' + x + ' is not a type string.';
3050                         return x.toUpperCase();
3051                     })();
3052                     if (typeof name != 'string')
3053                         throw 'The value ' + name + ' is not a type string.';
3054                     return ({name: name});
3055                 })() : (l26.fvalue(pv, v337, 92) !== l3.value ? (function(v338){
3056                     return (l96.fvalue(pv, v338, "space") !== l3.value ? l77.fvalue(values, 32) : (l96.fvalue(pv, v338, "tab") !== l3.value ? l77.fvalue(values, 9) : (l96.fvalue(pv, v338, "newline") !== l3.value ? l77.fvalue(values, 10) : l77.fvalue(values, (function(){
3057                         var string = v338;
3058                         var index = 0;
3059                         if (typeof string != 'string')
3060                             throw 'The value ' + string + ' is not a type string.';
3061                         if (typeof index != 'number')
3062                             throw 'The value ' + index + ' is not a type number.';
3063                         return string.charCodeAt(index);
3064                     })()))));
3065                 })(l131.fvalue(pv, l95.fvalue(pv, l150.fvalue(pv, v336)), l154.fvalue(pv, v336, (function(){
3066                     var symbol = l153;
3067                     var func = symbol.fvalue;
3068                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3069                     return func;
3070                 })()))) : (l26.fvalue(pv, v337, 43) !== l3.value ? (function(v339){
3071                     return (l96.fvalue(pv, v339, "common-lisp") !== l3.value ? (function(){
3072                         l157.fvalue(pv, v336);
3073                         return l157.fvalue(values, v336);
3074                     })() : (l96.fvalue(pv, v339, "ecmalisp") !== l3.value ? l157.fvalue(values, v336) : (function(){
3075                         throw "Unknown reader form.";
3076                     })()));
3077                 })(l154.fvalue(pv, v336, (function(){
3078                     var symbol = l153;
3079                     var func = symbol.fvalue;
3080                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3081                     return func;
3082                 })())) : (function(){
3083                     throw "ECASE expression failed.";
3084                 })())))));
3085             })(l150.fvalue(pv, v336));
3086         })();
3087     }));
3088     return l159;
3089 })();
3090 var l160 = {name: "READ-SYMBOL"};
3091 (function(){
3092     (l160).fvalue = (function(v348){
3093         ((v348)["fname"] = "READ-SYMBOL");
3094         return v348;
3095     })((function (values,v341){
3096         checkArgs(arguments, 2);
3097         return (function(){
3098             return (function(v342,v343,v344,v345,v346){
3099                 (v346 = 0);
3100                 (function(){
3101                     return (function(){
3102                         while(((function(){
3103                             var x1 = v346;
3104                             if (typeof x1 !== 'number') throw 'Not a number!';
3105                             var x2 = v342;
3106                             if (typeof x2 !== 'number') throw 'Not a number!';
3107                             return (x1<x2?l4.value: l3.value);
3108                         })() !== l3.value ? l27.fvalue(pv, l78.fvalue(pv, (function(){
3109                             var string = v341;
3110                             var index = v346;
3111                             if (typeof string != 'string')
3112                                 throw 'The value ' + string + ' is not a type string.';
3113                             if (typeof index != 'number')
3114                                 throw 'The value ' + index + ' is not a type number.';
3115                             return string.charCodeAt(index);
3116                         })(), 58)) : l3.value) !== l3.value){
3117                             (v346 = (function(){
3118                                 var x1 = v346;
3119                                 if (typeof x1 !== 'number') throw 'Not a number!';
3120                                 var x2 = 1;
3121                                 if (typeof x2 !== 'number') throw 'Not a number!';
3122                                 return x1+x2;
3123                             })());
3124                         }return l3.value;
3125                     })();
3126                 })();
3127                 ((function(){
3128                     var x1 = v346;
3129                     if (typeof x1 !== 'number') throw 'Not a number!';
3130                     var x2 = v342;
3131                     if (typeof x2 !== 'number') throw 'Not a number!';
3132                     return (x1==x2?l4.value: l3.value);
3133                 })() !== l3.value ? (function(){
3134                     (v344 = v341);
3135                     (v343 = (function(){
3136                         var symbol = l120;
3137                         var value = symbol.value;
3138                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3139                         return value;
3140                     })());
3141                     return (v345 = l4.value);
3142                 })() : (function(){
3143                     (l24.fvalue(pv, v346) !== l3.value ? (v343 = "KEYWORD") : (v343 = (function(){
3144                         var x = l91.fvalue(pv, v341, 0, v346);
3145                         if (typeof x != 'string')
3146                             throw 'The value ' + x + ' is not a type string.';
3147                         return x.toUpperCase();
3148                     })()));
3149                     (v346 = (function(){
3150                         var x1 = v346;
3151                         if (typeof x1 !== 'number') throw 'Not a number!';
3152                         var x2 = 1;
3153                         if (typeof x2 !== 'number') throw 'Not a number!';
3154                         return x1+x2;
3155                     })());
3156                     (l78.fvalue(pv, (function(){
3157                         var string = v341;
3158                         var index = v346;
3159                         if (typeof string != 'string')
3160                             throw 'The value ' + string + ' is not a type string.';
3161                         if (typeof index != 'number')
3162                             throw 'The value ' + index + ' is not a type number.';
3163                         return string.charCodeAt(index);
3164                     })(), 58) !== l3.value ? (function(){
3165                         (v345 = l4.value);
3166                         return (v346 = (function(){
3167                             var x1 = v346;
3168                             if (typeof x1 !== 'number') throw 'Not a number!';
3169                             var x2 = 1;
3170                             if (typeof x2 !== 'number') throw 'Not a number!';
3171                             return x1+x2;
3172                         })());
3173                     })() : l3.value);
3174                     return (v344 = l91.fvalue(pv, v341, v346));
3175                 })());
3176                 (v344 = (function(){
3177                     var x = v344;
3178                     if (typeof x != 'string')
3179                         throw 'The value ' + x + ' is not a type string.';
3180                     return x.toUpperCase();
3181                 })());
3182                 (v343 = l110.fvalue(pv, v343));
3183                 return ((function(v347){
3184                     return (v347 !== l3.value ? v347 : ((v343 === l110.fvalue(pv, "KEYWORD"))?l4.value: l3.value));
3185                 })(v345) !== l3.value ? l127.fvalue(values, v344, v343) : l123.fvalue(values, v344, v343));
3186             })(l71.fvalue(pv, v341),l3.value,l3.value,l3.value,l3.value);
3187         })();
3188     }));
3189     return l160;
3190 })();
3191 var l161 = {name: "!PARSE-INTEGER"};
3192 (function(){
3193     (l161).fvalue = (function(v359){
3194         ((v359)["fname"] = "!PARSE-INTEGER");
3195         return v359;
3196     })((function (values,v349,v350){
3197         checkArgs(arguments, 3);
3198         return (function(){
3199             return (function(){
3200                 try {
3201                     return (function(v351,v352,v353,v354){
3202                         (l24.fvalue(pv, v353) !== l3.value ? (function(){
3203                             var values = mv;
3204                             throw ({type: 'block', id: 138, values: values(l3.value, 0), message: 'Return from unknown block NIL.'})
3205                         })() : l3.value);
3206                         (function(v355){
3207                             return (l26.fvalue(pv, v355, 43) !== l3.value ? (v352 = (function(){
3208                                 var x1 = v352;
3209                                 if (typeof x1 !== 'number') throw 'Not a number!';
3210                                 var x2 = 1;
3211                                 if (typeof x2 !== 'number') throw 'Not a number!';
3212                                 return x1+x2;
3213                             })()) : (l26.fvalue(pv, v355, 45) !== l3.value ? (function(){
3214                                 (v354 = -1);
3215                                 return (v352 = (function(){
3216                                     var x1 = v352;
3217                                     if (typeof x1 !== 'number') throw 'Not a number!';
3218                                     var x2 = 1;
3219                                     if (typeof x2 !== 'number') throw 'Not a number!';
3220                                     return x1+x2;
3221                                 })());
3222                             })() : l3.value));
3223                         })((function(){
3224                             var string = v349;
3225                             var index = 0;
3226                             if (typeof string != 'string')
3227                                 throw 'The value ' + string + ' is not a type string.';
3228                             if (typeof index != 'number')
3229                                 throw 'The value ' + index + ' is not a type number.';
3230                             return string.charCodeAt(index);
3231                         })());
3232                         (((function(){
3233                             var x1 = v352;
3234                             if (typeof x1 !== 'number') throw 'Not a number!';
3235                             var x2 = v353;
3236                             if (typeof x2 !== 'number') throw 'Not a number!';
3237                             return (x1<x2?l4.value: l3.value);
3238                         })() !== l3.value ? (v351 = l90.fvalue(pv, (function(){
3239                             var string = v349;
3240                             var index = v352;
3241                             if (typeof string != 'string')
3242                                 throw 'The value ' + string + ' is not a type string.';
3243                             if (typeof index != 'number')
3244                                 throw 'The value ' + index + ' is not a type number.';
3245                             return string.charCodeAt(index);
3246                         })())) : l3.value) !== l3.value ? l3.value : (function(){
3247                             var values = mv;
3248                             throw ({type: 'block', id: 138, values: values(l3.value, v352), message: 'Return from unknown block NIL.'})
3249                         })());
3250                         (v352 = (function(){
3251                             var x1 = v352;
3252                             if (typeof x1 !== 'number') throw 'Not a number!';
3253                             var x2 = 1;
3254                             if (typeof x2 !== 'number') throw 'Not a number!';
3255                             return x1+x2;
3256                         })());
3257                         (function(){
3258                             try {
3259                                 return (function(){
3260                                     while((function(){
3261                                         var x1 = v352;
3262                                         if (typeof x1 !== 'number') throw 'Not a number!';
3263                                         var x2 = v353;
3264                                         if (typeof x2 !== 'number') throw 'Not a number!';
3265                                         return (x1<x2?l4.value: l3.value);
3266                                     })() !== l3.value){
3267                                         (function(v356){
3268                                             (v356 !== l3.value ? l3.value : (function(){
3269                                                 throw ({type: 'block', id: 139, values: l3.value, message: 'Return from unknown block NIL.'})
3270                                             })());
3271                                             (v351 = (function(){
3272                                                 var x1 = (function(){
3273                                                     var x1 = v351;
3274                                                     if (typeof x1 !== 'number') throw 'Not a number!';
3275                                                     var x2 = 10;
3276                                                     if (typeof x2 !== 'number') throw 'Not a number!';
3277                                                     return x1*x2;
3278                                                 })();
3279                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3280                                                 var x2 = v356;
3281                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3282                                                 return x1+x2;
3283                                             })());
3284                                             return (v352 = (function(){
3285                                                 var x1 = v352;
3286                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3287                                                 var x2 = 1;
3288                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3289                                                 return x1+x2;
3290                                             })());
3291                                         })(l90.fvalue(pv, (function(){
3292                                             var string = v349;
3293                                             var index = v352;
3294                                             if (typeof string != 'string')
3295                                                 throw 'The value ' + string + ' is not a type string.';
3296                                             if (typeof index != 'number')
3297                                                 throw 'The value ' + index + ' is not a type number.';
3298                                             return string.charCodeAt(index);
3299                                         })()));
3300                                     }return l3.value;
3301                                 })();
3302                             }
3303                             catch (cf){
3304                                 if (cf.type == 'block' && cf.id == 139)
3305                                     return cf.values;
3306                                 else
3307                                     throw cf;
3308                             }
3309                         })();
3310                         return ((function(v357){
3311                             return (v357 !== l3.value ? v357 : (function(v358){
3312                                 return (v358 !== l3.value ? v358 : l78.fvalue(pv, (function(){
3313                                     var string = v349;
3314                                     var index = v352;
3315                                     if (typeof string != 'string')
3316                                         throw 'The value ' + string + ' is not a type string.';
3317                                     if (typeof index != 'number')
3318                                         throw 'The value ' + index + ' is not a type number.';
3319                                     return string.charCodeAt(index);
3320                                 })(), 32));
3321                             })((function(){
3322                                 var x1 = v352;
3323                                 if (typeof x1 !== 'number') throw 'Not a number!';
3324                                 var x2 = v353;
3325                                 if (typeof x2 !== 'number') throw 'Not a number!';
3326                                 return (x1==x2?l4.value: l3.value);
3327                             })()));
3328                         })(v350) !== l3.value ? values((function(){
3329                             var x1 = v354;
3330                             if (typeof x1 !== 'number') throw 'Not a number!';
3331                             var x2 = v351;
3332                             if (typeof x2 !== 'number') throw 'Not a number!';
3333                             return x1*x2;
3334                         })(), v352) : values(l3.value, v352));
3335                     })(0,0,l71.fvalue(pv, v349),1);
3336                 }
3337                 catch (cf){
3338                     if (cf.type == 'block' && cf.id == 138)
3339                         return values.apply(this, forcemv(cf.values));
3340                     else
3341                         throw cf;
3342                 }
3343             })();
3344         })();
3345     }));
3346     return l161;
3347 })();
3348 var l162 = {name: "PARSE-INTEGER"};
3349 (function(){
3350     (l162).fvalue = (function(v361){
3351         ((v361)["fname"] = "PARSE-INTEGER");
3352         return v361;
3353     })((function (values,v360){
3354         checkArgs(arguments, 2);
3355         return (function(){
3356             return l161.fvalue(values, v360, l3.value);
3357         })();
3358     }));
3359     return l162;
3360 })();
3361 var l163 = {name: "*EOF*"};
3362 (function(){
3363     (((l163.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l163).value = l16.fvalue(pv)));
3364     return l163;
3365 })();
3366 var l164 = {name: "QUOTE"};
3367 var l165 = {name: "BACKQUOTE"};
3368 var l166 = {name: "UNQUOTE-SPLICING"};
3369 var l167 = {name: "UNQUOTE"};
3370 (function(){
3371     (l157).fvalue = (function(v367){
3372         ((v367)["fname"] = "LS-READ");
3373         return v367;
3374     })((function (values,v362){
3375         checkArgs(arguments, 2);
3376         return (function(){
3377             l155.fvalue(pv, v362);
3378             return (function(v363){
3379                 return ((function(v364){
3380                     return (v364 !== l3.value ? v364 : l78.fvalue(pv, v363, 41));
3381                 })(l12.fvalue(pv, v363)) !== l3.value ? (function(){
3382                     var symbol = l163;
3383                     var value = symbol.value;
3384                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3385                     return value;
3386                 })() : (l78.fvalue(pv, v363, 40) !== l3.value ? (function(){
3387                     l150.fvalue(pv, v362);
3388                     return l156.fvalue(values, v362);
3389                 })() : (l78.fvalue(pv, v363, 39) !== l3.value ? (function(){
3390                     l150.fvalue(pv, v362);
3391                     return l44.fvalue(values, l164, l157.fvalue(pv, v362));
3392                 })() : (l78.fvalue(pv, v363, 96) !== l3.value ? (function(){
3393                     l150.fvalue(pv, v362);
3394                     return l44.fvalue(values, l165, l157.fvalue(pv, v362));
3395                 })() : (l78.fvalue(pv, v363, 34) !== l3.value ? (function(){
3396                     l150.fvalue(pv, v362);
3397                     return l158.fvalue(values, v362);
3398                 })() : (l78.fvalue(pv, v363, 44) !== l3.value ? (function(){
3399                     l150.fvalue(pv, v362);
3400                     return (l26.fvalue(pv, l149.fvalue(pv, v362), 64) !== l3.value ? (function(){
3401                         l150.fvalue(pv, v362);
3402                         return l44.fvalue(values, l166, l157.fvalue(pv, v362));
3403                     })() : l44.fvalue(values, l167, l157.fvalue(pv, v362)));
3404                 })() : (l78.fvalue(pv, v363, 35) !== l3.value ? l159.fvalue(values, v362) : (function(v365){
3405                     return (function(v366){
3406                         return (v366 !== l3.value ? v366 : l160.fvalue(values, v365));
3407                     })(pv(l161.fvalue(pv, v365, l3.value)));
3408                 })(l154.fvalue(pv, v362, (function(){
3409                     var symbol = l153;
3410                     var func = symbol.fvalue;
3411                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3412                     return func;
3413                 })())))))))));
3414             })(l149.fvalue(pv, v362));
3415         })();
3416     }));
3417     return l157;
3418 })();
3419 var l168 = {name: "LS-READ-FROM-STRING"};
3420 (function(){
3421     (l168).fvalue = (function(v369){
3422         ((v369)["fname"] = "LS-READ-FROM-STRING");
3423         return v369;
3424     })((function (values,v368){
3425         checkArgs(arguments, 2);
3426         return (function(){
3427             return l157.fvalue(values, l148.fvalue(pv, v368));
3428         })();
3429     }));
3430     return l168;
3431 })();
3432 var l169 = {name: "*MULTIPLE-VALUE-P*"};
3433 (function(){
3434     (((l169.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l169).value = l3.value));
3435     return l169;
3436 })();
3437 var l170 = {name: "MAKE-BINDING"};
3438 (function(){
3439     (l170).fvalue = (function(v374){
3440         ((v374)["fname"] = "MAKE-BINDING");
3441         return v374;
3442     })((function (values,v370,v371,v372,v373){
3443         checkArgsAtLeast(arguments, 4);
3444         checkArgsAtMost(arguments, 5);
3445         switch(arguments.length-1){
3446         case 3:
3447         v373=l3.value;
3448         default: break;
3449         }
3450         return (function(){
3451             return l44.fvalue(values, v370, v371, v372, v373);
3452         })();
3453     }));
3454     return l170;
3455 })();
3456 var l171 = {name: "BINDING-NAME"};
3457 (function(){
3458     (l171).fvalue = (function(v376){
3459         ((v376)["fname"] = "BINDING-NAME");
3460         return v376;
3461     })((function (values,v375){
3462         checkArgs(arguments, 2);
3463         return (function(){
3464             return l39.fvalue(values, v375);
3465         })();
3466     }));
3467     return l171;
3468 })();
3469 var l172 = {name: "BINDING-TYPE"};
3470 (function(){
3471     (l172).fvalue = (function(v378){
3472         ((v378)["fname"] = "BINDING-TYPE");
3473         return v378;
3474     })((function (values,v377){
3475         checkArgs(arguments, 2);
3476         return (function(){
3477             return l40.fvalue(values, v377);
3478         })();
3479     }));
3480     return l172;
3481 })();
3482 var l173 = {name: "BINDING-VALUE"};
3483 (function(){
3484     (l173).fvalue = (function(v380){
3485         ((v380)["fname"] = "BINDING-VALUE");
3486         return v380;
3487     })((function (values,v379){
3488         checkArgs(arguments, 2);
3489         return (function(){
3490             return l41.fvalue(values, v379);
3491         })();
3492     }));
3493     return l173;
3494 })();
3495 var l174 = {name: "BINDING-DECLARATIONS"};
3496 (function(){
3497     (l174).fvalue = (function(v382){
3498         ((v382)["fname"] = "BINDING-DECLARATIONS");
3499         return v382;
3500     })((function (values,v381){
3501         checkArgs(arguments, 2);
3502         return (function(){
3503             return l42.fvalue(values, v381);
3504         })();
3505     }));
3506     return l174;
3507 })();
3508 var l175 = {name: "SET-BINDING-VALUE"};
3509 (function(){
3510     (l175).fvalue = (function(v385){
3511         ((v385)["fname"] = "SET-BINDING-VALUE");
3512         return v385;
3513     })((function (values,v383,v384){
3514         checkArgs(arguments, 3);
3515         return (function(){
3516             return (function(){
3517                 var x = l35.fvalue(pv, v383);
3518                 if (typeof x != 'object')
3519                     throw 'The value ' + x + ' is not a type object.';
3520                 return (x.car = v384, x);
3521             })();
3522         })();
3523     }));
3524     return l175;
3525 })();
3526 var l176 = {name: "SET-BINDING-DECLARATIONS"};
3527 (function(){
3528     (l176).fvalue = (function(v388){
3529         ((v388)["fname"] = "SET-BINDING-DECLARATIONS");
3530         return v388;
3531     })((function (values,v386,v387){
3532         checkArgs(arguments, 3);
3533         return (function(){
3534             return (function(){
3535                 var x = l37.fvalue(pv, v386);
3536                 if (typeof x != 'object')
3537                     throw 'The value ' + x + ' is not a type object.';
3538                 return (x.car = v387, x);
3539             })();
3540         })();
3541     }));
3542     return l176;
3543 })();
3544 var l177 = {name: "PUSH-BINDING-DECLARATION"};
3545 (function(){
3546     (l177).fvalue = (function(v391){
3547         ((v391)["fname"] = "PUSH-BINDING-DECLARATION");
3548         return v391;
3549     })((function (values,v389,v390){
3550         checkArgs(arguments, 3);
3551         return (function(){
3552             return l176.fvalue(values, v390, ({car: v389, cdr: l174.fvalue(pv, v390)}));
3553         })();
3554     }));
3555     return l177;
3556 })();
3557 var l178 = {name: "MAKE-LEXENV"};
3558 (function(){
3559     (l178).fvalue = (function(v392){
3560         ((v392)["fname"] = "MAKE-LEXENV");
3561         return v392;
3562     })((function (values){
3563         checkArgsAtMost(arguments, 1);
3564         return (function(){
3565             return l44.fvalue(values, l3.value, l3.value, l3.value, l3.value);
3566         })();
3567     }));
3568     return l178;
3569 })();
3570 var l179 = {name: "COPY-LEXENV"};
3571 (function(){
3572     (l179).fvalue = (function(v394){
3573         ((v394)["fname"] = "COPY-LEXENV");
3574         return v394;
3575     })((function (values,v393){
3576         checkArgs(arguments, 2);
3577         return (function(){
3578             return l75.fvalue(values, v393);
3579         })();
3580     }));
3581     return l179;
3582 })();
3583 var l180 = {name: "PUSH-TO-LEXENV"};
3584 var l181 = {name: "BLOCK"};
3585 var l182 = {name: "GOTAG"};
3586 (function(){
3587     (l180).fvalue = (function(v399){
3588         ((v399)["fname"] = "PUSH-TO-LEXENV");
3589         return v399;
3590     })((function (values,v395,v396,v397){
3591         checkArgs(arguments, 4);
3592         return (function(){
3593             return (function(v398){
3594                 return (l26.fvalue(pv, v398, l102) !== l3.value ? (function(){
3595                     var x = v396;
3596                     if (typeof x != 'object')
3597                         throw 'The value ' + x + ' is not a type object.';
3598                     return (x.car = ({car: v395, cdr: (function(){
3599                         var tmp = v396;
3600                         return tmp === l3.value? l3.value: tmp.car;
3601                     })()}), x);
3602                 })() : (l26.fvalue(pv, v398, l101) !== l3.value ? (function(){
3603                     var x = (function(){
3604                         var tmp = v396;
3605                         return tmp === l3.value? l3.value: tmp.cdr;
3606                     })();
3607                     if (typeof x != 'object')
3608                         throw 'The value ' + x + ' is not a type object.';
3609                     return (x.car = ({car: v395, cdr: l33.fvalue(pv, v396)}), x);
3610                 })() : (l26.fvalue(pv, v398, l181) !== l3.value ? (function(){
3611                     var x = l35.fvalue(pv, v396);
3612                     if (typeof x != 'object')
3613                         throw 'The value ' + x + ' is not a type object.';
3614                     return (x.car = ({car: v395, cdr: l36.fvalue(pv, v396)}), x);
3615                 })() : (l26.fvalue(pv, v398, l182) !== l3.value ? (function(){
3616                     var x = l37.fvalue(pv, v396);
3617                     if (typeof x != 'object')
3618                         throw 'The value ' + x + ' is not a type object.';
3619                     return (x.car = ({car: v395, cdr: l38.fvalue(pv, v396)}), x);
3620                 })() : (function(){
3621                     throw "ECASE expression failed.";
3622                 })()))));
3623             })(v397);
3624         })();
3625     }));
3626     return l180;
3627 })();
3628 var l183 = {name: "EXTEND-LEXENV"};
3629 (function(){
3630     (l183).fvalue = (function(v406){
3631         ((v406)["fname"] = "EXTEND-LEXENV");
3632         return v406;
3633     })((function (values,v400,v401,v402){
3634         checkArgs(arguments, 4);
3635         return (function(){
3636             return (function(v403){
3637                 return (function(){
3638                     return (function(v404,v405){
3639                         (function(){
3640                             while(v404 !== l3.value){
3641                                 (v405 = (function(){
3642                                     var tmp = v404;
3643                                     return tmp === l3.value? l3.value: tmp.car;
3644                                 })());
3645                                 (function(){
3646                                     l180.fvalue(pv, v405, v403, v402);
3647                                     return l3.value;
3648                                 })();
3649                                 (v404 = (function(){
3650                                     var tmp = v404;
3651                                     return tmp === l3.value? l3.value: tmp.cdr;
3652                                 })());
3653                             }return l3.value;
3654                         })();
3655                         return v403;
3656                     })(l66.fvalue(pv, v400),l3.value);
3657                 })();
3658             })(l179.fvalue(pv, v401));
3659         })();
3660     }));
3661     return l183;
3662 })();
3663 var l184 = {name: "LOOKUP-IN-LEXENV"};
3664 (function(){
3665     (l184).fvalue = (function(v411){
3666         ((v411)["fname"] = "LOOKUP-IN-LEXENV");
3667         return v411;
3668     })((function (values,v407,v408,v409){
3669         checkArgs(arguments, 4);
3670         return (function(){
3671             return l94.fvalue(values, v407, (function(v410){
3672                 return (l26.fvalue(pv, v410, l102) !== l3.value ? l39.fvalue(pv, v408) : (l26.fvalue(pv, v410, l101) !== l3.value ? l40.fvalue(pv, v408) : (l26.fvalue(pv, v410, l181) !== l3.value ? l41.fvalue(pv, v408) : (l26.fvalue(pv, v410, l182) !== l3.value ? l42.fvalue(pv, v408) : (function(){
3673                     throw "ECASE expression failed.";
3674                 })()))));
3675             })(v409));
3676         })();
3677     }));
3678     return l184;
3679 })();
3680 var l185 = {name: "*ENVIRONMENT*"};
3681 (function(){
3682     (((l185.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l185).value = l178.fvalue(pv)));
3683     return l185;
3684 })();
3685 var l186 = {name: "*VARIABLE-COUNTER*"};
3686 (function(){
3687     (((l186.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l186).value = 0));
3688     return l186;
3689 })();
3690 var l187 = {name: "GVARNAME"};
3691 (function(){
3692     (l187).fvalue = (function(v413){
3693         ((v413)["fname"] = "GVARNAME");
3694         return v413;
3695     })((function (values,v412){
3696         checkArgs(arguments, 2);
3697         return (function(){
3698             return l131.fvalue(values, "v", l17.fvalue(pv, ((l186).value = (function(){
3699                 var x1 = (function(){
3700                     var symbol = l186;
3701                     var value = symbol.value;
3702                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3703                     return value;
3704                 })();
3705                 if (typeof x1 !== 'number') throw 'Not a number!';
3706                 var x2 = 1;
3707                 if (typeof x2 !== 'number') throw 'Not a number!';
3708                 return x1+x2;
3709             })())));
3710         })();
3711     }));
3712     return l187;
3713 })();
3714 var l188 = {name: "TRANSLATE-VARIABLE"};
3715 (function(){
3716     (l188).fvalue = (function(v415){
3717         ((v415)["fname"] = "TRANSLATE-VARIABLE");
3718         return v415;
3719     })((function (values,v414){
3720         checkArgs(arguments, 2);
3721         return (function(){
3722             return l173.fvalue(values, l184.fvalue(pv, v414, (function(){
3723                 var symbol = l185;
3724                 var value = symbol.value;
3725                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3726                 return value;
3727             })(), l102));
3728         })();
3729     }));
3730     return l188;
3731 })();
3732 var l189 = {name: "EXTEND-LOCAL-ENV"};
3733 (function(){
3734     (l189).fvalue = (function(v421){
3735         ((v421)["fname"] = "EXTEND-LOCAL-ENV");
3736         return v421;
3737     })((function (values,v416){
3738         checkArgs(arguments, 2);
3739         return (function(){
3740             return (function(v417){
3741                 return (function(){
3742                     return (function(v418,v419){
3743                         (function(){
3744                             while(v418 !== l3.value){
3745                                 (v419 = (function(){
3746                                     var tmp = v418;
3747                                     return tmp === l3.value? l3.value: tmp.car;
3748                                 })());
3749                                 (function(){
3750                                     (function(v420){
3751                                         return l180.fvalue(pv, v420, v417, l102);
3752                                     })(l170.fvalue(pv, v419, l102, l187.fvalue(pv, v419)));
3753                                     return l3.value;
3754                                 })();
3755                                 (v418 = (function(){
3756                                     var tmp = v418;
3757                                     return tmp === l3.value? l3.value: tmp.cdr;
3758                                 })());
3759                             }return l3.value;
3760                         })();
3761                         return v417;
3762                     })(v416,l3.value);
3763                 })();
3764             })(l179.fvalue(pv, (function(){
3765                 var symbol = l185;
3766                 var value = symbol.value;
3767                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3768                 return value;
3769             })()));
3770         })();
3771     }));
3772     return l189;
3773 })();
3774 var l190 = {name: "*TOPLEVEL-COMPILATIONS*"};
3775 (function(){
3776     (((l190.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l190).value = l3.value));
3777     return l190;
3778 })();
3779 var l191 = {name: "TOPLEVEL-COMPILATION"};
3780 (function(){
3781     (l191).fvalue = (function(v423){
3782         ((v423)["fname"] = "TOPLEVEL-COMPILATION");
3783         return v423;
3784     })((function (values,v422){
3785         checkArgs(arguments, 2);
3786         return (function(){
3787             return ((l190).value = ({car: v422, cdr: (function(){
3788                 var symbol = l190;
3789                 var value = symbol.value;
3790                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3791                 return value;
3792             })()}));
3793         })();
3794     }));
3795     return l191;
3796 })();
3797 var l192 = {name: "NULL-OR-EMPTY-P"};
3798 (function(){
3799     (l192).fvalue = (function(v425){
3800         ((v425)["fname"] = "NULL-OR-EMPTY-P");
3801         return v425;
3802     })((function (values,v424){
3803         checkArgs(arguments, 2);
3804         return (function(){
3805             return l24.fvalue(values, l71.fvalue(pv, v424));
3806         })();
3807     }));
3808     return l192;
3809 })();
3810 var l193 = {name: "GET-TOPLEVEL-COMPILATIONS"};
3811 (function(){
3812     (l193).fvalue = (function(v426){
3813         ((v426)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
3814         return v426;
3815     })((function (values){
3816         checkArgsAtMost(arguments, 1);
3817         return (function(){
3818             return l66.fvalue(values, l88.fvalue(pv, (function(){
3819                 var symbol = l192;
3820                 var func = symbol.fvalue;
3821                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3822                 return func;
3823             })(), (function(){
3824                 var symbol = l190;
3825                 var value = symbol.value;
3826                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3827                 return value;
3828             })()));
3829         })();
3830     }));
3831     return l193;
3832 })();
3833 var l194 = {name: "%COMPILE-DEFMACRO"};
3834 var l195 = {name: "MACRO"};
3835 (function(){
3836     (l194).fvalue = (function(v429){
3837         ((v429)["fname"] = "%COMPILE-DEFMACRO");
3838         return v429;
3839     })((function (values,v427,v428){
3840         checkArgs(arguments, 3);
3841         return (function(){
3842             l191.fvalue(pv, l142.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l164), l44.fvalue(pv, v427))));
3843             l180.fvalue(pv, l170.fvalue(pv, v427, l195, v428), (function(){
3844                 var symbol = l185;
3845                 var value = symbol.value;
3846                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3847                 return value;
3848             })(), l101);
3849             return v427;
3850         })();
3851     }));
3852     return l194;
3853 })();
3854 var l196 = {name: "GLOBAL-BINDING"};
3855 (function(){
3856     (l196).fvalue = (function(v435){
3857         ((v435)["fname"] = "GLOBAL-BINDING");
3858         return v435;
3859     })((function (values,v430,v431,v432){
3860         checkArgs(arguments, 4);
3861         return (function(){
3862             return (function(v433){
3863                 return (v433 !== l3.value ? v433 : (function(v434){
3864                     l180.fvalue(pv, v434, (function(){
3865                         var symbol = l185;
3866                         var value = symbol.value;
3867                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3868                         return value;
3869                     })(), v432);
3870                     return v434;
3871                 })(l170.fvalue(pv, v430, v431, l3.value)));
3872             })(l184.fvalue(pv, v430, (function(){
3873                 var symbol = l185;
3874                 var value = symbol.value;
3875                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3876                 return value;
3877             })(), v432));
3878         })();
3879     }));
3880     return l196;
3881 })();
3882 var l197 = {name: "CLAIMP"};
3883 (function(){
3884     (l197).fvalue = (function(v440){
3885         ((v440)["fname"] = "CLAIMP");
3886         return v440;
3887     })((function (values,v436,v437,v438){
3888         checkArgs(arguments, 4);
3889         return (function(){
3890             return (function(v439){
3891                 return (v439 !== l3.value ? l86.fvalue(values, v438, l174.fvalue(pv, v439)) : l3.value);
3892             })(l184.fvalue(pv, v436, (function(){
3893                 var symbol = l185;
3894                 var value = symbol.value;
3895                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3896                 return value;
3897             })(), v437));
3898         })();
3899     }));
3900     return l197;
3901 })();
3902 var l198 = {name: "!PROCLAIM"};
3903 var l199 = {name: "SPECIAL"};
3904 var l200 = {name: "NOTINLINE"};
3905 var l201 = {name: "CONSTANT"};
3906 (function(){
3907     (l198).fvalue = (function(v452){
3908         ((v452)["fname"] = "!PROCLAIM");
3909         return v452;
3910     })((function (values,v441){
3911         checkArgs(arguments, 2);
3912         return (function(){
3913             return (function(v442){
3914                 return (l26.fvalue(pv, v442, l199) !== l3.value ? (function(){
3915                     return (function(v443,v444){
3916                         (function(){
3917                             while(v443 !== l3.value){
3918                                 (v444 = (function(){
3919                                     var tmp = v443;
3920                                     return tmp === l3.value? l3.value: tmp.car;
3921                                 })());
3922                                 (function(){
3923                                     (function(v445){
3924                                         return l177.fvalue(pv, l199, v445);
3925                                     })(l196.fvalue(pv, v444, l102, l102));
3926                                     return l3.value;
3927                                 })();
3928                                 (v443 = (function(){
3929                                     var tmp = v443;
3930                                     return tmp === l3.value? l3.value: tmp.cdr;
3931                                 })());
3932                             }return l3.value;
3933                         })();
3934                         return l3.value;
3935                     })((function(){
3936                         var tmp = v441;
3937                         return tmp === l3.value? l3.value: tmp.cdr;
3938                     })(),l3.value);
3939                 })() : (l26.fvalue(pv, v442, l200) !== l3.value ? (function(){
3940                     return (function(v446,v447){
3941                         (function(){
3942                             while(v446 !== l3.value){
3943                                 (v447 = (function(){
3944                                     var tmp = v446;
3945                                     return tmp === l3.value? l3.value: tmp.car;
3946                                 })());
3947                                 (function(){
3948                                     (function(v448){
3949                                         return l177.fvalue(pv, l200, v448);
3950                                     })(l196.fvalue(pv, v447, l101, l101));
3951                                     return l3.value;
3952                                 })();
3953                                 (v446 = (function(){
3954                                     var tmp = v446;
3955                                     return tmp === l3.value? l3.value: tmp.cdr;
3956                                 })());
3957                             }return l3.value;
3958                         })();
3959                         return l3.value;
3960                     })((function(){
3961                         var tmp = v441;
3962                         return tmp === l3.value? l3.value: tmp.cdr;
3963                     })(),l3.value);
3964                 })() : (l26.fvalue(pv, v442, l201) !== l3.value ? (function(){
3965                     return (function(v449,v450){
3966                         (function(){
3967                             while(v449 !== l3.value){
3968                                 (v450 = (function(){
3969                                     var tmp = v449;
3970                                     return tmp === l3.value? l3.value: tmp.car;
3971                                 })());
3972                                 (function(){
3973                                     (function(v451){
3974                                         return l177.fvalue(pv, l201, v451);
3975                                     })(l196.fvalue(pv, v450, l102, l102));
3976                                     return l3.value;
3977                                 })();
3978                                 (v449 = (function(){
3979                                     var tmp = v449;
3980                                     return tmp === l3.value? l3.value: tmp.cdr;
3981                                 })());
3982                             }return l3.value;
3983                         })();
3984                         return l3.value;
3985                     })((function(){
3986                         var tmp = v441;
3987                         return tmp === l3.value? l3.value: tmp.cdr;
3988                     })(),l3.value);
3989                 })() : l3.value)));
3990             })((function(){
3991                 var tmp = v441;
3992                 return tmp === l3.value? l3.value: tmp.car;
3993             })());
3994         })();
3995     }));
3996     return l198;
3997 })();
3998 var l202 = {name: "PROCLAIM"};
3999 (l202).fvalue = (function(){
4000     var symbol = l198;
4001     var func = symbol.fvalue;
4002     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4003     return func;
4004 })();
4005 var l203 = {name: "*COMPILATIONS*"};
4006 (function(){
4007     (((l203.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l203).value = l3.value));
4008     return l203;
4009 })();
4010 var l204 = {name: "DEFINE-COMPILATION"};
4011 l204;
4012 var l205 = {name: "IF"};
4013 ((l203).value = ({car: l44.fvalue(pv, l205, (function (values,v453,v454,v455){
4014     checkArgs(arguments, 4);
4015     return (function(){
4016         return l131.fvalue(values, "(", l142.fvalue(pv, v453), " !== ", l142.fvalue(pv, l3.value), " ? ", l142.fvalue(pv, v454, (function(){
4017             var symbol = l169;
4018             var value = symbol.value;
4019             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4020             return value;
4021         })()), " : ", l142.fvalue(pv, v455, (function(){
4022             var symbol = l169;
4023             var value = symbol.value;
4024             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4025             return value;
4026         })()), ")");
4027     })();
4028 })), cdr: (function(){
4029     var symbol = l203;
4030     var value = symbol.value;
4031     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4032     return value;
4033 })()}));
4034 var l206 = {name: "*LAMBDA-LIST-KEYWORDS*"};
4035 var l207 = {name: "&OPTIONAL"};
4036 var l208 = {name: "&REST"};
4037 var l209 = QIList(l207,l208,l3);
4038 (function(){
4039     (((l206.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l206).value = l209));
4040     return l206;
4041 })();
4042 var l210 = {name: "LIST-UNTIL-KEYWORD"};
4043 (function(){
4044     (l210).fvalue = (function(v458){
4045         ((v458)["fname"] = "LIST-UNTIL-KEYWORD");
4046         return v458;
4047     })((function (values,v456){
4048         checkArgs(arguments, 2);
4049         return (function(){
4050             return ((function(v457){
4051                 return (v457 !== l3.value ? v457 : l86.fvalue(pv, (function(){
4052                     var tmp = v456;
4053                     return tmp === l3.value? l3.value: tmp.car;
4054                 })(), (function(){
4055                     var symbol = l206;
4056                     var value = symbol.value;
4057                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4058                     return value;
4059                 })()));
4060             })(l12.fvalue(pv, v456)) !== l3.value ? l3.value : ({car: (function(){
4061                 var tmp = v456;
4062                 return tmp === l3.value? l3.value: tmp.car;
4063             })(), cdr: l210.fvalue(pv, (function(){
4064                 var tmp = v456;
4065                 return tmp === l3.value? l3.value: tmp.cdr;
4066             })())}));
4067         })();
4068     }));
4069     return l210;
4070 })();
4071 var l211 = {name: "LAMBDA-LIST-REQUIRED-ARGUMENTS"};
4072 (function(){
4073     (l211).fvalue = (function(v460){
4074         ((v460)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
4075         return v460;
4076     })((function (values,v459){
4077         checkArgs(arguments, 2);
4078         return (function(){
4079             return l210.fvalue(values, v459);
4080         })();
4081     }));
4082     return l211;
4083 })();
4084 var l212 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"};
4085 (function(){
4086     (l212).fvalue = (function(v462){
4087         ((v462)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
4088         return v462;
4089     })((function (values,v461){
4090         checkArgs(arguments, 2);
4091         return (function(){
4092             return l73.fvalue(values, (function(){
4093                 var symbol = l58;
4094                 var func = symbol.fvalue;
4095                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4096                 return func;
4097             })(), l210.fvalue(pv, (function(){
4098                 var tmp = l86.fvalue(pv, l207, v461);
4099                 return tmp === l3.value? l3.value: tmp.cdr;
4100             })()));
4101         })();
4102     }));
4103     return l212;
4104 })();
4105 var l213 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS"};
4106 (function(){
4107     (l213).fvalue = (function(v464){
4108         ((v464)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
4109         return v464;
4110     })((function (values,v463){
4111         checkArgs(arguments, 2);
4112         return (function(){
4113             return l73.fvalue(values, (function(){
4114                 var symbol = l30;
4115                 var func = symbol.fvalue;
4116                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4117                 return func;
4118             })(), l212.fvalue(pv, v463));
4119         })();
4120     }));
4121     return l213;
4122 })();
4123 var l214 = {name: "LAMBDA-LIST-REST-ARGUMENT"};
4124 (function(){
4125     (l214).fvalue = (function(v467){
4126         ((v467)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
4127         return v467;
4128     })((function (values,v465){
4129         checkArgs(arguments, 2);
4130         return (function(){
4131             return (function(v466){
4132                 ((function(){
4133                     var tmp = v466;
4134                     return tmp === l3.value? l3.value: tmp.cdr;
4135                 })() !== l3.value ? (function(){
4136                     throw "Bad lambda-list";
4137                 })() : l3.value);
4138                 return (function(){
4139                     var tmp = v466;
4140                     return tmp === l3.value? l3.value: tmp.car;
4141                 })();
4142             })(l210.fvalue(pv, (function(){
4143                 var tmp = l86.fvalue(pv, l208, v465);
4144                 return tmp === l3.value? l3.value: tmp.cdr;
4145             })()));
4146         })();
4147     }));
4148     return l214;
4149 })();
4150 var l215 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
4151 (function(){
4152     (l215).fvalue = (function(v470){
4153         ((v470)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
4154         return v470;
4155     })((function (values,v469){
4156         checkArgsAtLeast(arguments, 2);
4157         var v468= l3.value;
4158         for (var i = arguments.length-1; i>=2; i--)
4159             v468 = {car: arguments[i], cdr:
4160         v468};
4161         return (function(){
4162             return (v469 !== l3.value ? l131.fvalue(values, "(function(){", (function(){
4163                 var symbol = l130;
4164                 var value = symbol.value;
4165                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4166                 return value;
4167             })(), l140.fvalue(pv, "var func = ", l133.fvalue(pv, v468), ";", (function(){
4168                 var symbol = l130;
4169                 var value = symbol.value;
4170                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4171                 return value;
4172             })(), "func.docstring = '", v469, "';", (function(){
4173                 var symbol = l130;
4174                 var value = symbol.value;
4175                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4176                 return value;
4177             })(), "return func;", (function(){
4178                 var symbol = l130;
4179                 var value = symbol.value;
4180                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4181                 return value;
4182             })()), "})()") : l133.fvalue(values, v468));
4183         })();
4184     }));
4185     return l215;
4186 })();
4187 var l216 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"};
4188 var l217 = {name: "N/A"};
4189 (function(){
4190     (l216).fvalue = (function(v476){
4191         ((v476)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT");
4192         return v476;
4193     })((function (values,v471,v472,v473){
4194         checkArgs(arguments, 4);
4195         return (function(){
4196             return (function(v474,v475){
4197                 return (function(){
4198                     try {
4199                         (((function(){
4200                             var x1 = 1;
4201                             if (typeof x1 !== 'number') throw 'Not a number!';
4202                             var x2 = v474;
4203                             if (typeof x2 !== 'number') throw 'Not a number!';
4204                             return (x1<x2?l4.value: l3.value);
4205                         })() !== l3.value ? l26.fvalue(pv, v474, v475) : l3.value) !== l3.value ? (function(){
4206                             var values = mv;
4207                             throw ({type: 'block', id: 179, values: l131.fvalue(values, "checkArgs(arguments, ", l17.fvalue(pv, v474), ");", (function(){
4208                                 var symbol = l130;
4209                                 var value = symbol.value;
4210                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4211                                 return value;
4212                             })()), message: 'Return from unknown block NIL.'})
4213                         })() : l3.value);
4214                         return l131.fvalue(values, ((function(){
4215                             var x1 = 1;
4216                             if (typeof x1 !== 'number') throw 'Not a number!';
4217                             var x2 = v474;
4218                             if (typeof x2 !== 'number') throw 'Not a number!';
4219                             return (x1<x2?l4.value: l3.value);
4220                         })() !== l3.value ? l131.fvalue(pv, "checkArgsAtLeast(arguments, ", l17.fvalue(pv, v474), ");", (function(){
4221                             var symbol = l130;
4222                             var value = symbol.value;
4223                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4224                             return value;
4225                         })()) : ""), (((typeof (v475) == "number")?l4.value: l3.value) !== l3.value ? l131.fvalue(pv, "checkArgsAtMost(arguments, ", l17.fvalue(pv, v475), ");", (function(){
4226                             var symbol = l130;
4227                             var value = symbol.value;
4228                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4229                             return value;
4230                         })()) : ""));
4231                     }
4232                     catch (cf){
4233                         if (cf.type == 'block' && cf.id == 179)
4234                             return values.apply(this, forcemv(cf.values));
4235                         else
4236                             throw cf;
4237                     }
4238                 })();
4239             })(l22.fvalue(pv, v471),(v473 !== l3.value ? l217 : (function(){
4240                 var x1 = 1;
4241                 if (typeof x1 !== 'number') throw 'Not a number!';
4242                 var x2 = v471;
4243                 if (typeof x2 !== 'number') throw 'Not a number!';
4244                 var x3 = v472;
4245                 if (typeof x3 !== 'number') throw 'Not a number!';
4246                 return x1+x2+x3;
4247             })()));
4248         })();
4249     }));
4250     return l216;
4251 })();
4252 var l218 = {name: "COMPILE-LAMBDA"};
4253 var l219 = {name: "LS-COMPILE-BLOCK"};
4254 (function(){
4255     (l218).fvalue = (function(v492){
4256         ((v492)["fname"] = "COMPILE-LAMBDA");
4257         return v492;
4258     })((function (values,v477,v478){
4259         checkArgs(arguments, 3);
4260         return (function(){
4261             return (function(v479,v480,v481,v482){
4262                 ((((typeof((function(){
4263                     var tmp = v478;
4264                     return tmp === l3.value? l3.value: tmp.car;
4265                 })()) == "string")?l4.value: l3.value) !== l3.value ? l27.fvalue(pv, l12.fvalue(pv, (function(){
4266                     var tmp = v478;
4267                     return tmp === l3.value? l3.value: tmp.cdr;
4268                 })())) : l3.value) !== l3.value ? (function(){
4269                     (v482 = (function(){
4270                         var tmp = v478;
4271                         return tmp === l3.value? l3.value: tmp.car;
4272                     })());
4273                     return (v478 = (function(){
4274                         var tmp = v478;
4275                         return tmp === l3.value? l3.value: tmp.cdr;
4276                     })());
4277                 })() : l3.value);
4278                 return (function(v483,v484,v485){
4279                     try {
4280                         var tmp;
4281                         tmp = l185.value;
4282                         l185.value = v485;
4283                         v485 = tmp;
4284                         return l215.fvalue(values, v482, "(function (", l133.fvalue(pv, ({car: "values", cdr: l73.fvalue(pv, (function(){
4285                             var symbol = l188;
4286                             var func = symbol.fvalue;
4287                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4288                             return func;
4289                         })(), l64.fvalue(pv, v479, v480))}), ","), "){", (function(){
4290                             var symbol = l130;
4291                             var value = symbol.value;
4292                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4293                             return value;
4294                         })(), l140.fvalue(pv, l216.fvalue(pv, v483, v484, v481), (v480 !== l3.value ? l131.fvalue(pv, "switch(arguments.length-1){", (function(){
4295                             var symbol = l130;
4296                             var value = symbol.value;
4297                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4298                             return value;
4299                         })(), (function(v486,v487,v488){
4300                             return (function(){
4301                                 (function(){
4302                                     return (function(){
4303                                         while((function(){
4304                                             var x1 = v488;
4305                                             if (typeof x1 !== 'number') throw 'Not a number!';
4306                                             var x2 = v484;
4307                                             if (typeof x2 !== 'number') throw 'Not a number!';
4308                                             return (x1<x2?l4.value: l3.value);
4309                                         })() !== l3.value){
4310                                             (function(v489){
4311                                                 (v487 = ({car: l131.fvalue(pv, "case ", l17.fvalue(pv, (function(){
4312                                                     var x1 = v488;
4313                                                     if (typeof x1 !== 'number') throw 'Not a number!';
4314                                                     var x2 = v483;
4315                                                     if (typeof x2 !== 'number') throw 'Not a number!';
4316                                                     return x1+x2;
4317                                                 })()), ":", (function(){
4318                                                     var symbol = l130;
4319                                                     var value = symbol.value;
4320                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4321                                                     return value;
4322                                                 })(), l188.fvalue(pv, (function(){
4323                                                     var tmp = v489;
4324                                                     return tmp === l3.value? l3.value: tmp.car;
4325                                                 })()), "=", l142.fvalue(pv, l33.fvalue(pv, v489)), ";", (function(){
4326                                                     var symbol = l130;
4327                                                     var value = symbol.value;
4328                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4329                                                     return value;
4330                                                 })()), cdr: v487}));
4331                                                 return (v488 = (function(){
4332                                                     var x1 = v488;
4333                                                     if (typeof x1 !== 'number') throw 'Not a number!';
4334                                                     var x2 = 1;
4335                                                     if (typeof x2 !== 'number') throw 'Not a number!';
4336                                                     return x1+x2;
4337                                                 })());
4338                                             })(l83.fvalue(pv, v488, v486));
4339                                         }return l3.value;
4340                                     })();
4341                                 })();
4342                                 (v487 = ({car: l131.fvalue(pv, "default: break;", (function(){
4343                                     var symbol = l130;
4344                                     var value = symbol.value;
4345                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4346                                     return value;
4347                                 })()), cdr: v487}));
4348                                 return l133.fvalue(pv, l66.fvalue(pv, v487));
4349                             })();
4350                         })(l212.fvalue(pv, v477),l3.value,0), "}", (function(){
4351                             var symbol = l130;
4352                             var value = symbol.value;
4353                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4354                             return value;
4355                         })()) : ""), (v481 !== l3.value ? (function(v490){
4356                             return l131.fvalue(pv, "var ", v490, "= ", l142.fvalue(pv, l3.value), ";", (function(){
4357                                 var symbol = l130;
4358                                 var value = symbol.value;
4359                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4360                                 return value;
4361                             })(), "for (var i = arguments.length-1; i>=", l17.fvalue(pv, (function(){
4362                                 var x1 = 1;
4363                                 if (typeof x1 !== 'number') throw 'Not a number!';
4364                                 var x2 = v483;
4365                                 if (typeof x2 !== 'number') throw 'Not a number!';
4366                                 var x3 = v484;
4367                                 if (typeof x3 !== 'number') throw 'Not a number!';
4368                                 return x1+x2+x3;
4369                             })()), "; i--)", (function(){
4370                                 var symbol = l130;
4371                                 var value = symbol.value;
4372                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4373                                 return value;
4374                             })(), l140.fvalue(pv, v490, " = ", "{car: arguments[i], cdr: "), v490, "};", (function(){
4375                                 var symbol = l130;
4376                                 var value = symbol.value;
4377                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4378                                 return value;
4379                             })());
4380                         })(l188.fvalue(pv, v481)) : ""), (function(v491){
4381                             try {
4382                                 var tmp;
4383                                 tmp = l169.value;
4384                                 l169.value = v491;
4385                                 v491 = tmp;
4386                                 return l219.fvalue(pv, v478, l4.value);
4387                             }
4388                             finally {
4389                                 l169.value = v491;
4390                             }
4391                         })(l4.value)), "})");
4392                     }
4393                     finally {
4394                         l185.value = v485;
4395                     }
4396                 })(l71.fvalue(pv, v479),l71.fvalue(pv, v480),l189.fvalue(pv, l64.fvalue(pv, l58.fvalue(pv, v481), v479, v480)));
4397             })(l211.fvalue(pv, v477),l213.fvalue(pv, v477),l214.fvalue(pv, v477),l3.value);
4398         })();
4399     }));
4400     return l218;
4401 })();
4402 var l220 = {name: "SETQ-PAIR"};
4403 var l221 = {name: "SET"};
4404 (function(){
4405     (l220).fvalue = (function(v496){
4406         ((v496)["fname"] = "SETQ-PAIR");
4407         return v496;
4408     })((function (values,v493,v494){
4409         checkArgs(arguments, 3);
4410         return (function(){
4411             return (function(v495){
4412                 return ((((l172.fvalue(pv, v495) === l102)?l4.value: l3.value) !== l3.value ? (l27.fvalue(pv, l86.fvalue(pv, l199, l174.fvalue(pv, v495))) !== l3.value ? l27.fvalue(pv, l86.fvalue(pv, l201, l174.fvalue(pv, v495))) : l3.value) : l3.value) !== l3.value ? l131.fvalue(values, l173.fvalue(pv, v495), " = ", l142.fvalue(pv, v494)) : l142.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l221), l44.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l164), l44.fvalue(pv, v493))), l44.fvalue(pv, v494))));
4413             })(l184.fvalue(pv, v493, (function(){
4414                 var symbol = l185;
4415                 var value = symbol.value;
4416                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4417                 return value;
4418             })(), l102));
4419         })();
4420     }));
4421     return l220;
4422 })();
4423 var l222 = {name: "SETQ"};
4424 ((l203).value = ({car: l44.fvalue(pv, l222, (function (values){
4425     var v497= l3.value;
4426     for (var i = arguments.length-1; i>=1; i--)
4427         v497 = {car: arguments[i], cdr:
4428     v497};
4429     return (function(){
4430         return (function(v498){
4431             (function(){
4432                 try {
4433                     return (function(){
4434                         while(l4.value !== l3.value){
4435                             (l12.fvalue(pv, v497) !== l3.value ? (function(){
4436                                 throw ({type: 'block', id: 184, values: l3.value, message: 'Return from unknown block NIL.'})
4437                             })() : (l12.fvalue(pv, (function(){
4438                                 var tmp = v497;
4439                                 return tmp === l3.value? l3.value: tmp.cdr;
4440                             })()) !== l3.value ? (function(){
4441                                 throw "Odd paris in SETQ";
4442                             })() : (function(){
4443                                 (v498 = l131.fvalue(pv, v498, l131.fvalue(pv, l220.fvalue(pv, (function(){
4444                                     var tmp = v497;
4445                                     return tmp === l3.value? l3.value: tmp.car;
4446                                 })(), l33.fvalue(pv, v497)), (l12.fvalue(pv, l35.fvalue(pv, v497)) !== l3.value ? "" : ", "))));
4447                                 return (v497 = l35.fvalue(pv, v497));
4448                             })()));
4449                         }return l3.value;
4450                     })();
4451                 }
4452                 catch (cf){
4453                     if (cf.type == 'block' && cf.id == 184)
4454                         return cf.values;
4455                     else
4456                         throw cf;
4457                 }
4458             })();
4459             return l131.fvalue(values, "(", v498, ")");
4460         })("");
4461     })();
4462 })), cdr: (function(){
4463     var symbol = l203;
4464     var value = symbol.value;
4465     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4466     return value;
4467 })()}));
4468 var l223 = {name: "JS-VREF"};
4469 ((l203).value = ({car: l44.fvalue(pv, l223, (function (values,v499){
4470     checkArgs(arguments, 2);
4471     return (function(){
4472         return v499;
4473     })();
4474 })), cdr: (function(){
4475     var symbol = l203;
4476     var value = symbol.value;
4477     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4478     return value;
4479 })()}));
4480 var l224 = {name: "JS-VSET"};
4481 ((l203).value = ({car: l44.fvalue(pv, l224, (function (values,v500,v501){
4482     checkArgs(arguments, 3);
4483     return (function(){
4484         return l131.fvalue(values, "(", v500, " = ", l142.fvalue(pv, v501), ")");
4485     })();
4486 })), cdr: (function(){
4487     var symbol = l203;
4488     var value = symbol.value;
4489     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4490     return value;
4491 })()}));
4492 (function(){
4493     (l145).fvalue = (function(v508){
4494         ((v508)["fname"] = "ESCAPE-STRING");
4495         return v508;
4496     })((function (values,v502){
4497         checkArgs(arguments, 2);
4498         return (function(){
4499             return (function(v503,v504,v505){
4500                 (function(){
4501                     return (function(){
4502                         while((function(){
4503                             var x1 = v504;
4504                             if (typeof x1 !== 'number') throw 'Not a number!';
4505                             var x2 = v505;
4506                             if (typeof x2 !== 'number') throw 'Not a number!';
4507                             return (x1<x2?l4.value: l3.value);
4508                         })() !== l3.value){
4509                             (function(v506){
4510                                 ((function(v507){
4511                                     return (v507 !== l3.value ? v507 : l78.fvalue(pv, v506, 92));
4512                                 })(l78.fvalue(pv, v506, 34)) !== l3.value ? (v503 = l131.fvalue(pv, v503, "\\")) : l3.value);
4513                                 (l78.fvalue(pv, v506, 10) !== l3.value ? (function(){
4514                                     (v503 = l131.fvalue(pv, v503, "\\"));
4515                                     return (v506 = 110);
4516                                 })() : l3.value);
4517                                 return (v503 = l131.fvalue(pv, v503, l95.fvalue(pv, v506)));
4518                             })((function(){
4519                                 var string = v502;
4520                                 var index = v504;
4521                                 if (typeof string != 'string')
4522                                     throw 'The value ' + string + ' is not a type string.';
4523                                 if (typeof index != 'number')
4524                                     throw 'The value ' + index + ' is not a type number.';
4525                                 return string.charCodeAt(index);
4526                             })());
4527                             (v504 = (function(){
4528                                 var x1 = v504;
4529                                 if (typeof x1 !== 'number') throw 'Not a number!';
4530                                 var x2 = 1;
4531                                 if (typeof x2 !== 'number') throw 'Not a number!';
4532                                 return x1+x2;
4533                             })());
4534                         }return l3.value;
4535                     })();
4536                 })();
4537                 return v503;
4538             })("",0,l71.fvalue(pv, v502));
4539         })();
4540     }));
4541     return l145;
4542 })();
4543 var l225 = {name: "*LITERAL-SYMBOLS*"};
4544 (function(){
4545     (((l225.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l225).value = l3.value));
4546     return l225;
4547 })();
4548 var l226 = {name: "*LITERAL-COUNTER*"};
4549 (function(){
4550     (((l226.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l226).value = 0));
4551     return l226;
4552 })();
4553 var l227 = {name: "GENLIT"};
4554 (function(){
4555     (l227).fvalue = (function(v509){
4556         ((v509)["fname"] = "GENLIT");
4557         return v509;
4558     })((function (values){
4559         checkArgsAtMost(arguments, 1);
4560         return (function(){
4561             return l131.fvalue(values, "l", l17.fvalue(pv, ((l226).value = (function(){
4562                 var x1 = (function(){
4563                     var symbol = l226;
4564                     var value = symbol.value;
4565                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4566                     return value;
4567                 })();
4568                 if (typeof x1 !== 'number') throw 'Not a number!';
4569                 var x2 = 1;
4570                 if (typeof x2 !== 'number') throw 'Not a number!';
4571                 return x1+x2;
4572             })())));
4573         })();
4574     }));
4575     return l227;
4576 })();
4577 var l228 = {name: "LITERAL"};
4578 (function(){
4579     (l228).fvalue = (function(v524){
4580         ((v524)["fname"] = "LITERAL");
4581         return v524;
4582     })((function (values,v510,v511){
4583         checkArgsAtLeast(arguments, 2);
4584         checkArgsAtMost(arguments, 3);
4585         switch(arguments.length-1){
4586         case 1:
4587         v511=l3.value;
4588         default: break;
4589         }
4590         return (function(){
4591             return (l79.fvalue(pv, v510) !== l3.value ? l17.fvalue(values, v510) : (((typeof(v510) == "string")?l4.value: l3.value) !== l3.value ? l131.fvalue(values, "\"", l145.fvalue(pv, v510), "\"") : (((function(){
4592                 var tmp = v510;
4593                 return (typeof tmp == 'object' && 'name' in tmp);
4594             })()?l4.value: l3.value) !== l3.value ? (function(v512){
4595                 return (v512 !== l3.value ? v512 : (function(v514,v515){
4596                     ((l225).value = ({car: ({car: v510, cdr: v514}), cdr: (function(){
4597                         var symbol = l225;
4598                         var value = symbol.value;
4599                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4600                         return value;
4601                     })()}));
4602                     l191.fvalue(pv, l131.fvalue(pv, "var ", v514, " = ", v515));
4603                     return v514;
4604                 })(l227.fvalue(pv),(function(v513){
4605                     return (l12.fvalue(pv, v513) !== l3.value ? l131.fvalue(pv, "{name: \"", l145.fvalue(pv, (v510).name), "\"}") : l142.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l127), l44.fvalue(pv, (v510).name), l44.fvalue(pv, l111.fvalue(pv, v513)))));
4606                 })(l119.fvalue(pv, v510))));
4607             })((function(){
4608                 var tmp = l94.fvalue(pv, v510, (function(){
4609                     var symbol = l225;
4610                     var value = symbol.value;
4611                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4612                     return value;
4613                 })());
4614                 return tmp === l3.value? l3.value: tmp.cdr;
4615             })()) : (((function(){
4616                 var tmp = v510;
4617                 return (typeof tmp == 'object' && 'car' in tmp);
4618             })()?l4.value: l3.value) !== l3.value ? (function(){
4619                 var v516 = l85.fvalue(pv, v510);
4620                 var v517 = l84.fvalue(pv, v510);
4621                 var v518 = l131.fvalue(pv, "QIList(", l134.fvalue(pv, l73.fvalue(pv, (function (values,v519){
4622                     checkArgs(arguments, 2);
4623                     return l228.fvalue(values, v519, l4.value);
4624                 }), v516), ","), l228.fvalue(pv, (function(){
4625                     var tmp = v517;
4626                     return tmp === l3.value? l3.value: tmp.car;
4627                 })(), l4.value), ",", l228.fvalue(pv, (function(){
4628                     var tmp = v517;
4629                     return tmp === l3.value? l3.value: tmp.cdr;
4630                 })(), l4.value), ")");
4631                 return (v511 !== l3.value ? v518 : (function(v520){
4632                     l191.fvalue(pv, l131.fvalue(pv, "var ", v520, " = ", v518));
4633                     return v520;
4634                 })(l227.fvalue(pv)));
4635             })() : (((function(){
4636                 var x = v510;
4637                 return typeof x === 'object' && 'length' in x;
4638             })()?l4.value: l3.value) !== l3.value ? (function(v521){
4639                 return (function(v522){
4640                     return (v511 !== l3.value ? v522 : (function(v523){
4641                         l191.fvalue(pv, l131.fvalue(pv, "var ", v523, " = ", v522));
4642                         return v523;
4643                     })(l227.fvalue(pv)));
4644                 })(l131.fvalue(pv, "[", l133.fvalue(pv, l73.fvalue(pv, (function(){
4645                     var symbol = l228;
4646                     var func = symbol.fvalue;
4647                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4648                     return func;
4649                 })(), v521), ", "), "]"));
4650             })(l136.fvalue(pv, v510)) : l3.value)))));
4651         })();
4652     }));
4653     return l228;
4654 })();
4655 ((l203).value = ({car: l44.fvalue(pv, l164, (function (values,v525){
4656     checkArgs(arguments, 2);
4657     return (function(){
4658         return l228.fvalue(values, v525);
4659     })();
4660 })), cdr: (function(){
4661     var symbol = l203;
4662     var value = symbol.value;
4663     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4664     return value;
4665 })()}));
4666 var l229 = {name: "%WHILE"};
4667 ((l203).value = ({car: l44.fvalue(pv, l229, (function (values,v527){
4668     checkArgsAtLeast(arguments, 2);
4669     var v526= l3.value;
4670     for (var i = arguments.length-1; i>=2; i--)
4671         v526 = {car: arguments[i], cdr:
4672     v526};
4673     return (function(){
4674         return l131.fvalue(values, "(function(){", (function(){
4675             var symbol = l130;
4676             var value = symbol.value;
4677             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4678             return value;
4679         })(), l140.fvalue(pv, "while(", l142.fvalue(pv, v527), " !== ", l142.fvalue(pv, l3.value), "){", (function(){
4680             var symbol = l130;
4681             var value = symbol.value;
4682             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4683             return value;
4684         })(), l140.fvalue(pv, l219.fvalue(pv, v526)), "}", "return ", l142.fvalue(pv, l3.value), ";", (function(){
4685             var symbol = l130;
4686             var value = symbol.value;
4687             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4688             return value;
4689         })()), "})()");
4690     })();
4691 })), cdr: (function(){
4692     var symbol = l203;
4693     var value = symbol.value;
4694     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4695     return value;
4696 })()}));
4697 var l230 = {name: "SYMBOL-FUNCTION"};
4698 ((l203).value = ({car: l44.fvalue(pv, l101, (function (values,v528){
4699     checkArgs(arguments, 2);
4700     return (function(){
4701         return ((l59.fvalue(pv, v528) !== l3.value ? (((function(){
4702             var tmp = v528;
4703             return tmp === l3.value? l3.value: tmp.car;
4704         })() === l5)?l4.value: l3.value) : l3.value) !== l3.value ? l218.fvalue(values, l33.fvalue(pv, v528), l35.fvalue(pv, v528)) : (((function(){
4705             var tmp = v528;
4706             return (typeof tmp == 'object' && 'name' in tmp);
4707         })()?l4.value: l3.value) !== l3.value ? (function(v529){
4708             return (v529 !== l3.value ? l173.fvalue(values, v529) : l142.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l230), l44.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l164), l44.fvalue(pv, v528))))));
4709         })(l184.fvalue(pv, v528, (function(){
4710             var symbol = l185;
4711             var value = symbol.value;
4712             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4713             return value;
4714         })(), l101)) : l3.value));
4715     })();
4716 })), cdr: (function(){
4717     var symbol = l203;
4718     var value = symbol.value;
4719     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4720     return value;
4721 })()}));
4722 var l231 = {name: "MAKE-FUNCTION-BINDING"};
4723 (function(){
4724     (l231).fvalue = (function(v531){
4725         ((v531)["fname"] = "MAKE-FUNCTION-BINDING");
4726         return v531;
4727     })((function (values,v530){
4728         checkArgs(arguments, 2);
4729         return (function(){
4730             return l170.fvalue(values, v530, l101, l187.fvalue(pv, v530));
4731         })();
4732     }));
4733     return l231;
4734 })();
4735 var l232 = {name: "COMPILE-FUNCTION-DEFINITION"};
4736 (function(){
4737     (l232).fvalue = (function(v533){
4738         ((v533)["fname"] = "COMPILE-FUNCTION-DEFINITION");
4739         return v533;
4740     })((function (values,v532){
4741         checkArgs(arguments, 2);
4742         return (function(){
4743             return l218.fvalue(values, (function(){
4744                 var tmp = v532;
4745                 return tmp === l3.value? l3.value: tmp.car;
4746             })(), (function(){
4747                 var tmp = v532;
4748                 return tmp === l3.value? l3.value: tmp.cdr;
4749             })());
4750         })();
4751     }));
4752     return l232;
4753 })();
4754 var l233 = {name: "TRANSLATE-FUNCTION"};
4755 (function(){
4756     (l233).fvalue = (function(v536){
4757         ((v536)["fname"] = "TRANSLATE-FUNCTION");
4758         return v536;
4759     })((function (values,v534){
4760         checkArgs(arguments, 2);
4761         return (function(){
4762             return (function(v535){
4763                 return l173.fvalue(values, v535);
4764             })(l184.fvalue(pv, v534, (function(){
4765                 var symbol = l185;
4766                 var value = symbol.value;
4767                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4768                 return value;
4769             })(), l101));
4770         })();
4771     }));
4772     return l233;
4773 })();
4774 var l234 = {name: "FLET"};
4775 ((l203).value = ({car: l44.fvalue(pv, l234, (function (values,v538){
4776     checkArgsAtLeast(arguments, 2);
4777     var v537= l3.value;
4778     for (var i = arguments.length-1; i>=2; i--)
4779         v537 = {car: arguments[i], cdr:
4780     v537};
4781     return (function(){
4782         return (function(){
4783             try {
4784                 var v543 = l185.value;
4785                 var v539 = l73.fvalue(pv, (function(){
4786                     var symbol = l30;
4787                     var func = symbol.fvalue;
4788                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4789                     return func;
4790                 })(), v538);
4791                 var v540 = l73.fvalue(pv, (function(){
4792                     var symbol = l31;
4793                     var func = symbol.fvalue;
4794                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4795                     return func;
4796                 })(), v538);
4797                 var v541 = l73.fvalue(pv, (function(){
4798                     var symbol = l232;
4799                     var func = symbol.fvalue;
4800                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4801                     return func;
4802                 })(), v540);
4803                 ((l185).value = l183.fvalue(pv, l73.fvalue(pv, (function(){
4804                     var symbol = l231;
4805                     var func = symbol.fvalue;
4806                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4807                     return func;
4808                 })(), v539), (function(){
4809                     var symbol = l185;
4810                     var value = symbol.value;
4811                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4812                     return value;
4813                 })(), l101));
4814                 return l131.fvalue(values, "(function(", l133.fvalue(pv, l73.fvalue(pv, (function(){
4815                     var symbol = l233;
4816                     var func = symbol.fvalue;
4817                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4818                     return func;
4819                 })(), v539), ","), "){", (function(){
4820                     var symbol = l130;
4821                     var value = symbol.value;
4822                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4823                     return value;
4824                 })(), (function(v542){
4825                     return l140.fvalue(pv, v542);
4826                 })(l219.fvalue(pv, v537, l4.value)), "})(", l133.fvalue(pv, v541, ","), ")");
4827             }
4828             finally {
4829                 l185.value = v543;
4830             }
4831         })();
4832     })();
4833 })), cdr: (function(){
4834     var symbol = l203;
4835     var value = symbol.value;
4836     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4837     return value;
4838 })()}));
4839 var l235 = {name: "LABELS"};
4840 ((l203).value = ({car: l44.fvalue(pv, l235, (function (values,v545){
4841     checkArgsAtLeast(arguments, 2);
4842     var v544= l3.value;
4843     for (var i = arguments.length-1; i>=2; i--)
4844         v544 = {car: arguments[i], cdr:
4845     v544};
4846     return (function(){
4847         return (function(){
4848             try {
4849                 var v548 = l185.value;
4850                 var v546 = l73.fvalue(pv, (function(){
4851                     var symbol = l30;
4852                     var func = symbol.fvalue;
4853                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4854                     return func;
4855                 })(), v545);
4856                 ((l185).value = l183.fvalue(pv, l73.fvalue(pv, (function(){
4857                     var symbol = l231;
4858                     var func = symbol.fvalue;
4859                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4860                     return func;
4861                 })(), v546), (function(){
4862                     var symbol = l185;
4863                     var value = symbol.value;
4864                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4865                     return value;
4866                 })(), l101));
4867                 return l131.fvalue(values, "(function(){", (function(){
4868                     var symbol = l130;
4869                     var value = symbol.value;
4870                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4871                     return value;
4872                 })(), l140.fvalue(pv, l135.fvalue(pv, (function (values,v547){
4873                     checkArgs(arguments, 2);
4874                     return l131.fvalue(values, "var ", l233.fvalue(pv, (function(){
4875                         var tmp = v547;
4876                         return tmp === l3.value? l3.value: tmp.car;
4877                     })()), " = ", l218.fvalue(pv, l33.fvalue(pv, v547), l35.fvalue(pv, v547)), ";", (function(){
4878                         var symbol = l130;
4879                         var value = symbol.value;
4880                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4881                         return value;
4882                     })());
4883                 }), v545), l219.fvalue(pv, v544, l4.value)), "})()");
4884             }
4885             finally {
4886                 l185.value = v548;
4887             }
4888         })();
4889     })();
4890 })), cdr: (function(){
4891     var symbol = l203;
4892     var value = symbol.value;
4893     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4894     return value;
4895 })()}));
4896 var l236 = {name: "*COMPILING-FILE*"};
4897 (function(){
4898     (((l236.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l236).value = l3.value));
4899     return l236;
4900 })();
4901 var l237 = {name: "EVAL-WHEN-COMPILE"};
4902 var l238 = {name: "PROGN"};
4903 var l239 = {name: "EVAL"};
4904 ((l203).value = ({car: l44.fvalue(pv, l237, (function (values){
4905     var v549= l3.value;
4906     for (var i = arguments.length-1; i>=1; i--)
4907         v549 = {car: arguments[i], cdr:
4908     v549};
4909     return (function(){
4910         return ((function(){
4911             var symbol = l236;
4912             var value = symbol.value;
4913             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4914             return value;
4915         })() !== l3.value ? (function(){
4916             l239.fvalue(pv, ({car: l238, cdr: v549}));
4917             return l3.value;
4918         })() : l142.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l238), v549)));
4919     })();
4920 })), cdr: (function(){
4921     var symbol = l203;
4922     var value = symbol.value;
4923     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4924     return value;
4925 })()}));
4926 var l240 = {name: "DEFINE-TRANSFORMATION"};
4927 l240;
4928 ((l203).value = ({car: l44.fvalue(pv, l238, (function (values){
4929     var v550= l3.value;
4930     for (var i = arguments.length-1; i>=1; i--)
4931         v550 = {car: arguments[i], cdr:
4932     v550};
4933     return (function(){
4934         return (l12.fvalue(pv, (function(){
4935             var tmp = v550;
4936             return tmp === l3.value? l3.value: tmp.cdr;
4937         })()) !== l3.value ? l142.fvalue(values, (function(){
4938             var tmp = v550;
4939             return tmp === l3.value? l3.value: tmp.car;
4940         })(), (function(){
4941             var symbol = l169;
4942             var value = symbol.value;
4943             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4944             return value;
4945         })()) : l131.fvalue(values, "(function(){", (function(){
4946             var symbol = l130;
4947             var value = symbol.value;
4948             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4949             return value;
4950         })(), l140.fvalue(pv, l219.fvalue(pv, v550, l4.value)), "})()"));
4951     })();
4952 })), cdr: (function(){
4953     var symbol = l203;
4954     var value = symbol.value;
4955     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4956     return value;
4957 })()}));
4958 var l241 = {name: "SPECIAL-VARIABLE-P"};
4959 (function(){
4960     (l241).fvalue = (function(v552){
4961         ((v552)["fname"] = "SPECIAL-VARIABLE-P");
4962         return v552;
4963     })((function (values,v551){
4964         checkArgs(arguments, 2);
4965         return (function(){
4966             return (l197.fvalue(pv, v551, l102, l199) !== l3.value ? l4.value : l3.value);
4967         })();
4968     }));
4969     return l241;
4970 })();
4971 var l242 = {name: "LET-BINDING-WRAPPER"};
4972 (function(){
4973     (l242).fvalue = (function(v559){
4974         ((v559)["fname"] = "LET-BINDING-WRAPPER");
4975         return v559;
4976     })((function (values,v553,v554){
4977         checkArgs(arguments, 3);
4978         return (function(){
4979             try {
4980                 (l12.fvalue(pv, v553) !== l3.value ? (function(){
4981                     var values = mv;
4982                     throw ({type: 'block', id: 202, values: v554, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
4983                 })() : l3.value);
4984                 return l131.fvalue(values, "try {", (function(){
4985                     var symbol = l130;
4986                     var value = symbol.value;
4987                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4988                     return value;
4989                 })(), l140.fvalue(pv, "var tmp;", (function(){
4990                     var symbol = l130;
4991                     var value = symbol.value;
4992                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4993                     return value;
4994                 })(), l135.fvalue(pv, (function (values,v555){
4995                     checkArgs(arguments, 2);
4996                     return (function(v556){
4997                         return l131.fvalue(values, "tmp = ", v556, ".value;", (function(){
4998                             var symbol = l130;
4999                             var value = symbol.value;
5000                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5001                             return value;
5002                         })(), v556, ".value = ", (function(){
5003                             var tmp = v555;
5004                             return tmp === l3.value? l3.value: tmp.cdr;
5005                         })(), ";", (function(){
5006                             var symbol = l130;
5007                             var value = symbol.value;
5008                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5009                             return value;
5010                         })(), (function(){
5011                             var tmp = v555;
5012                             return tmp === l3.value? l3.value: tmp.cdr;
5013                         })(), " = tmp;", (function(){
5014                             var symbol = l130;
5015                             var value = symbol.value;
5016                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5017                             return value;
5018                         })());
5019                     })(l142.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l164), l44.fvalue(pv, (function(){
5020                         var tmp = v555;
5021                         return tmp === l3.value? l3.value: tmp.car;
5022                     })()))));
5023                 }), v553), v554, (function(){
5024                     var symbol = l130;
5025                     var value = symbol.value;
5026                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5027                     return value;
5028                 })()), "}", (function(){
5029                     var symbol = l130;
5030                     var value = symbol.value;
5031                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5032                     return value;
5033                 })(), "finally {", (function(){
5034                     var symbol = l130;
5035                     var value = symbol.value;
5036                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5037                     return value;
5038                 })(), l140.fvalue(pv, l135.fvalue(pv, (function (values,v557){
5039                     checkArgs(arguments, 2);
5040                     return (function(v558){
5041                         return l131.fvalue(values, v558, ".value", " = ", (function(){
5042                             var tmp = v557;
5043                             return tmp === l3.value? l3.value: tmp.cdr;
5044                         })(), ";", (function(){
5045                             var symbol = l130;
5046                             var value = symbol.value;
5047                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5048                             return value;
5049                         })());
5050                     })(l142.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l164), l44.fvalue(pv, (function(){
5051                         var tmp = v557;
5052                         return tmp === l3.value? l3.value: tmp.car;
5053                     })()))));
5054                 }), v553)), "}", (function(){
5055                     var symbol = l130;
5056                     var value = symbol.value;
5057                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5058                     return value;
5059                 })());
5060             }
5061             catch (cf){
5062                 if (cf.type == 'block' && cf.id == 202)
5063                     return values.apply(this, forcemv(cf.values));
5064                 else
5065                     throw cf;
5066             }
5067         })();
5068     }));
5069     return l242;
5070 })();
5071 var l243 = {name: "LET"};
5072 ((l203).value = ({car: l44.fvalue(pv, l243, (function (values,v561){
5073     checkArgsAtLeast(arguments, 2);
5074     var v560= l3.value;
5075     for (var i = arguments.length-1; i>=2; i--)
5076         v560 = {car: arguments[i], cdr:
5077     v560};
5078     return (function(){
5079         return (function(){
5080             try {
5081                 var v569 = l185.value;
5082                 var v562 = l73.fvalue(pv, (function(){
5083                     var symbol = l58;
5084                     var func = symbol.fvalue;
5085                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5086                     return func;
5087                 })(), v561);
5088                 var v563 = l73.fvalue(pv, (function(){
5089                     var symbol = l39;
5090                     var func = symbol.fvalue;
5091                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5092                     return func;
5093                 })(), v562);
5094                 var v564 = l73.fvalue(pv, (function(){
5095                     var symbol = l142;
5096                     var func = symbol.fvalue;
5097                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5098                     return func;
5099                 })(), l73.fvalue(pv, (function(){
5100                     var symbol = l40;
5101                     var func = symbol.fvalue;
5102                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5103                     return func;
5104                 })(), v562));
5105                 ((l185).value = l189.fvalue(pv, l88.fvalue(pv, (function(){
5106                     var symbol = l241;
5107                     var func = symbol.fvalue;
5108                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5109                     return func;
5110                 })(), v563)));
5111                 var v565 = l3.value;
5112                 return l131.fvalue(values, "(function(", l133.fvalue(pv, l73.fvalue(pv, (function (values,v566){
5113                     checkArgs(arguments, 2);
5114                     return (l241.fvalue(pv, v566) !== l3.value ? (function(v567){
5115                         (v565 = ({car: ({car: v566, cdr: v567}), cdr: v565}));
5116                         return v567;
5117                     })(l187.fvalue(pv, v566)) : l188.fvalue(values, v566));
5118                 }), v563), ","), "){", (function(){
5119                     var symbol = l130;
5120                     var value = symbol.value;
5121                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5122                     return value;
5123                 })(), (function(v568){
5124                     return l140.fvalue(pv, l242.fvalue(pv, v565, v568));
5125                 })(l219.fvalue(pv, v560, l4.value)), "})(", l133.fvalue(pv, v564, ","), ")");
5126             }
5127             finally {
5128                 l185.value = v569;
5129             }
5130         })();
5131     })();
5132 })), cdr: (function(){
5133     var symbol = l203;
5134     var value = symbol.value;
5135     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5136     return value;
5137 })()}));
5138 var l244 = {name: "LET*-INITIALIZE-VALUE"};
5139 (function(){
5140     (l244).fvalue = (function(v576){
5141         ((v576)["fname"] = "LET*-INITIALIZE-VALUE");
5142         return v576;
5143     })((function (values,v570){
5144         checkArgs(arguments, 2);
5145         return (function(){
5146             return (function(v571,v572){
5147                 return (l241.fvalue(pv, v571) !== l3.value ? l131.fvalue(values, l142.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l222), l44.fvalue(pv, v571), l44.fvalue(pv, v572))), ";", (function(){
5148                     var symbol = l130;
5149                     var value = symbol.value;
5150                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5151                     return value;
5152                 })()) : (function(){
5153                     var v573 = l187.fvalue(pv, v571);
5154                     var v574 = l170.fvalue(pv, v571, l102, v573);
5155                     return (function(v575){
5156                         l180.fvalue(pv, v574, (function(){
5157                             var symbol = l185;
5158                             var value = symbol.value;
5159                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5160                             return value;
5161                         })(), l102);
5162                         return v575;
5163                     })(l131.fvalue(pv, "var ", v573, " = ", l142.fvalue(pv, v572), ";", (function(){
5164                         var symbol = l130;
5165                         var value = symbol.value;
5166                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5167                         return value;
5168                     })()));
5169                 })());
5170             })(l39.fvalue(pv, v570),l40.fvalue(pv, v570));
5171         })();
5172     }));
5173     return l244;
5174 })();
5175 var l245 = {name: "LET*-BINDING-WRAPPER"};
5176 (function(){
5177     (l245).fvalue = (function(v585){
5178         ((v585)["fname"] = "LET*-BINDING-WRAPPER");
5179         return v585;
5180     })((function (values,v577,v578){
5181         checkArgs(arguments, 3);
5182         return (function(){
5183             try {
5184                 (l12.fvalue(pv, v577) !== l3.value ? (function(){
5185                     var values = mv;
5186                     throw ({type: 'block', id: 205, values: v578, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
5187                 })() : l3.value);
5188                 return (function(v580){
5189                     return l131.fvalue(values, "try {", (function(){
5190                         var symbol = l130;
5191                         var value = symbol.value;
5192                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5193                         return value;
5194                     })(), l140.fvalue(pv, l135.fvalue(pv, (function (values,v581){
5195                         checkArgs(arguments, 2);
5196                         return (function(v582){
5197                             return l131.fvalue(values, "var ", (function(){
5198                                 var tmp = v581;
5199                                 return tmp === l3.value? l3.value: tmp.cdr;
5200                             })(), " = ", v582, ".value;", (function(){
5201                                 var symbol = l130;
5202                                 var value = symbol.value;
5203                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5204                                 return value;
5205                             })());
5206                         })(l142.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l164), l44.fvalue(pv, (function(){
5207                             var tmp = v581;
5208                             return tmp === l3.value? l3.value: tmp.car;
5209                         })()))));
5210                     }), v580), v578), "}", (function(){
5211                         var symbol = l130;
5212                         var value = symbol.value;
5213                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5214                         return value;
5215                     })(), "finally {", (function(){
5216                         var symbol = l130;
5217                         var value = symbol.value;
5218                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5219                         return value;
5220                     })(), l140.fvalue(pv, l135.fvalue(pv, (function (values,v583){
5221                         checkArgs(arguments, 2);
5222                         return (function(v584){
5223                             return l131.fvalue(values, v584, ".value", " = ", (function(){
5224                                 var tmp = v583;
5225                                 return tmp === l3.value? l3.value: tmp.cdr;
5226                             })(), ";", (function(){
5227                                 var symbol = l130;
5228                                 var value = symbol.value;
5229                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5230                                 return value;
5231                             })());
5232                         })(l142.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l164), l44.fvalue(pv, (function(){
5233                             var tmp = v583;
5234                             return tmp === l3.value? l3.value: tmp.car;
5235                         })()))));
5236                     }), v580)), "}", (function(){
5237                         var symbol = l130;
5238                         var value = symbol.value;
5239                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5240                         return value;
5241                     })());
5242                 })(l73.fvalue(pv, (function (values,v579){
5243                     checkArgs(arguments, 2);
5244                     return ({car: v579, cdr: l187.fvalue(pv, v579)});
5245                 }), l89.fvalue(pv, (function(){
5246                     var symbol = l241;
5247                     var func = symbol.fvalue;
5248                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5249                     return func;
5250                 })(), v577)));
5251             }
5252             catch (cf){
5253                 if (cf.type == 'block' && cf.id == 205)
5254                     return values.apply(this, forcemv(cf.values));
5255                 else
5256                     throw cf;
5257             }
5258         })();
5259     }));
5260     return l245;
5261 })();
5262 var l246 = {name: "LET*"};
5263 ((l203).value = ({car: l44.fvalue(pv, l246, (function (values,v587){
5264     checkArgsAtLeast(arguments, 2);
5265     var v586= l3.value;
5266     for (var i = arguments.length-1; i>=2; i--)
5267         v586 = {car: arguments[i], cdr:
5268     v586};
5269     return (function(){
5270         return (function(v588,v589){
5271             try {
5272                 var tmp;
5273                 tmp = l185.value;
5274                 l185.value = v589;
5275                 v589 = tmp;
5276                 return l131.fvalue(values, "(function(){", (function(){
5277                     var symbol = l130;
5278                     var value = symbol.value;
5279                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5280                     return value;
5281                 })(), l140.fvalue(pv, (function(v590,v591){
5282                     return l245.fvalue(pv, v590, v591);
5283                 })(l89.fvalue(pv, (function(){
5284                     var symbol = l241;
5285                     var func = symbol.fvalue;
5286                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5287                     return func;
5288                 })(), l73.fvalue(pv, (function(){
5289                     var symbol = l39;
5290                     var func = symbol.fvalue;
5291                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5292                     return func;
5293                 })(), v588)),l131.fvalue(pv, l135.fvalue(pv, (function(){
5294                     var symbol = l244;
5295                     var func = symbol.fvalue;
5296                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5297                     return func;
5298                 })(), v588), l219.fvalue(pv, v586, l4.value)))), "})()");
5299             }
5300             finally {
5301                 l185.value = v589;
5302             }
5303         })(l73.fvalue(pv, (function(){
5304             var symbol = l58;
5305             var func = symbol.fvalue;
5306             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5307             return func;
5308         })(), v587),l179.fvalue(pv, (function(){
5309             var symbol = l185;
5310             var value = symbol.value;
5311             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5312             return value;
5313         })()));
5314     })();
5315 })), cdr: (function(){
5316     var symbol = l203;
5317     var value = symbol.value;
5318     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5319     return value;
5320 })()}));
5321 var l247 = {name: "*BLOCK-COUNTER*"};
5322 (function(){
5323     (((l247.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l247).value = 0));
5324     return l247;
5325 })();
5326 var l248 = {name: "MULTIPLE-VALUE"};
5327 var l249 = {name: "USED"};
5328 ((l203).value = ({car: l44.fvalue(pv, l181, (function (values,v593){
5329     checkArgsAtLeast(arguments, 2);
5330     var v592= l3.value;
5331     for (var i = arguments.length-1; i>=2; i--)
5332         v592 = {car: arguments[i], cdr:
5333     v592};
5334     return (function(){
5335         return (function(){
5336             var v594 = l17.fvalue(pv, ((l247).value = (function(){
5337                 var x1 = (function(){
5338                     var symbol = l247;
5339                     var value = symbol.value;
5340                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5341                     return value;
5342                 })();
5343                 if (typeof x1 !== 'number') throw 'Not a number!';
5344                 var x2 = 1;
5345                 if (typeof x2 !== 'number') throw 'Not a number!';
5346                 return x1+x2;
5347             })()));
5348             var v595 = l170.fvalue(pv, v593, l181, v594);
5349             ((function(){
5350                 var symbol = l169;
5351                 var value = symbol.value;
5352                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5353                 return value;
5354             })() !== l3.value ? l177.fvalue(pv, l248, v595) : l3.value);
5355             return (function(){
5356                 try {
5357                     var v597 = l185.value;
5358                     ((l185).value = l183.fvalue(pv, l44.fvalue(pv, v595), (function(){
5359                         var symbol = l185;
5360                         var value = symbol.value;
5361                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5362                         return value;
5363                     })(), l181));
5364                     var v596 = l219.fvalue(pv, v592, l4.value);
5365                     return (l86.fvalue(pv, l249, l174.fvalue(pv, v595)) !== l3.value ? l131.fvalue(values, "(function(){", (function(){
5366                         var symbol = l130;
5367                         var value = symbol.value;
5368                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5369                         return value;
5370                     })(), l140.fvalue(pv, "try {", (function(){
5371                         var symbol = l130;
5372                         var value = symbol.value;
5373                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5374                         return value;
5375                     })(), l140.fvalue(pv, v596), "}", (function(){
5376                         var symbol = l130;
5377                         var value = symbol.value;
5378                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5379                         return value;
5380                     })(), "catch (cf){", (function(){
5381                         var symbol = l130;
5382                         var value = symbol.value;
5383                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5384                         return value;
5385                     })(), "    if (cf.type == 'block' && cf.id == ", v594, ")", (function(){
5386                         var symbol = l130;
5387                         var value = symbol.value;
5388                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5389                         return value;
5390                     })(), ((function(){
5391                         var symbol = l169;
5392                         var value = symbol.value;
5393                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5394                         return value;
5395                     })() !== l3.value ? "        return values.apply(this, forcemv(cf.values));" : "        return cf.values;"), (function(){
5396                         var symbol = l130;
5397                         var value = symbol.value;
5398                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5399                         return value;
5400                     })(), "    else", (function(){
5401                         var symbol = l130;
5402                         var value = symbol.value;
5403                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5404                         return value;
5405                     })(), "        throw cf;", (function(){
5406                         var symbol = l130;
5407                         var value = symbol.value;
5408                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5409                         return value;
5410                     })(), "}", (function(){
5411                         var symbol = l130;
5412                         var value = symbol.value;
5413                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5414                         return value;
5415                     })()), "})()") : l131.fvalue(values, "(function(){", (function(){
5416                         var symbol = l130;
5417                         var value = symbol.value;
5418                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5419                         return value;
5420                     })(), l140.fvalue(pv, v596), "})()"));
5421                 }
5422                 finally {
5423                     l185.value = v597;
5424                 }
5425             })();
5426         })();
5427     })();
5428 })), cdr: (function(){
5429     var symbol = l203;
5430     var value = symbol.value;
5431     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5432     return value;
5433 })()}));
5434 var l250 = {name: "RETURN-FROM"};
5435 ((l203).value = ({car: l44.fvalue(pv, l250, (function (values,v598,v599){
5436     checkArgsAtLeast(arguments, 2);
5437     checkArgsAtMost(arguments, 3);
5438     switch(arguments.length-1){
5439     case 1:
5440     v599=l3.value;
5441     default: break;
5442     }
5443     return (function(){
5444         return (function(){
5445             var v600 = l184.fvalue(pv, v598, (function(){
5446                 var symbol = l185;
5447                 var value = symbol.value;
5448                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5449                 return value;
5450             })(), l181);
5451             var v601 = l86.fvalue(pv, l248, l174.fvalue(pv, v600));
5452             (l12.fvalue(pv, v600) !== l3.value ? (function(){
5453                 throw l131.fvalue(pv, "Unknown block `", (v598).name, "'.");
5454             })() : l3.value);
5455             l177.fvalue(pv, l249, v600);
5456             return l131.fvalue(values, "(function(){", (function(){
5457                 var symbol = l130;
5458                 var value = symbol.value;
5459                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5460                 return value;
5461             })(), l140.fvalue(pv, (v601 !== l3.value ? l131.fvalue(pv, "var values = mv;", (function(){
5462                 var symbol = l130;
5463                 var value = symbol.value;
5464                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5465                 return value;
5466             })()) : ""), "throw ({", "type: 'block', ", "id: ", l173.fvalue(pv, v600), ", ", "values: ", l142.fvalue(pv, v599, v601), ", ", "message: 'Return from unknown block ", (v598).name, ".'", "})"), "})()");
5467         })();
5468     })();
5469 })), cdr: (function(){
5470     var symbol = l203;
5471     var value = symbol.value;
5472     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5473     return value;
5474 })()}));
5475 var l251 = {name: "CATCH"};
5476 ((l203).value = ({car: l44.fvalue(pv, l251, (function (values,v603){
5477     checkArgsAtLeast(arguments, 2);
5478     var v602= l3.value;
5479     for (var i = arguments.length-1; i>=2; i--)
5480         v602 = {car: arguments[i], cdr:
5481     v602};
5482     return (function(){
5483         return l131.fvalue(values, "(function(){", (function(){
5484             var symbol = l130;
5485             var value = symbol.value;
5486             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5487             return value;
5488         })(), l140.fvalue(pv, "var id = ", l142.fvalue(pv, v603), ";", (function(){
5489             var symbol = l130;
5490             var value = symbol.value;
5491             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5492             return value;
5493         })(), "try {", (function(){
5494             var symbol = l130;
5495             var value = symbol.value;
5496             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5497             return value;
5498         })(), l140.fvalue(pv, l219.fvalue(pv, v602, l4.value)), (function(){
5499             var symbol = l130;
5500             var value = symbol.value;
5501             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5502             return value;
5503         })(), "}", (function(){
5504             var symbol = l130;
5505             var value = symbol.value;
5506             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5507             return value;
5508         })(), "catch (cf){", (function(){
5509             var symbol = l130;
5510             var value = symbol.value;
5511             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5512             return value;
5513         })(), "    if (cf.type == 'catch' && cf.id == id)", (function(){
5514             var symbol = l130;
5515             var value = symbol.value;
5516             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5517             return value;
5518         })(), ((function(){
5519             var symbol = l169;
5520             var value = symbol.value;
5521             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5522             return value;
5523         })() !== l3.value ? "        return values.apply(this, forcemv(cf.values));" : "        return pv.apply(this, forcemv(cf.values));"), (function(){
5524             var symbol = l130;
5525             var value = symbol.value;
5526             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5527             return value;
5528         })(), "    else", (function(){
5529             var symbol = l130;
5530             var value = symbol.value;
5531             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5532             return value;
5533         })(), "        throw cf;", (function(){
5534             var symbol = l130;
5535             var value = symbol.value;
5536             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5537             return value;
5538         })(), "}", (function(){
5539             var symbol = l130;
5540             var value = symbol.value;
5541             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5542             return value;
5543         })()), "})()");
5544     })();
5545 })), cdr: (function(){
5546     var symbol = l203;
5547     var value = symbol.value;
5548     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5549     return value;
5550 })()}));
5551 var l252 = {name: "THROW"};
5552 ((l203).value = ({car: l44.fvalue(pv, l252, (function (values,v604,v605){
5553     checkArgs(arguments, 3);
5554     return (function(){
5555         return l131.fvalue(values, "(function(){", (function(){
5556             var symbol = l130;
5557             var value = symbol.value;
5558             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5559             return value;
5560         })(), l140.fvalue(pv, "var values = mv;", (function(){
5561             var symbol = l130;
5562             var value = symbol.value;
5563             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5564             return value;
5565         })(), "throw ({", "type: 'catch', ", "id: ", l142.fvalue(pv, v604), ", ", "values: ", l142.fvalue(pv, v605, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
5566     })();
5567 })), cdr: (function(){
5568     var symbol = l203;
5569     var value = symbol.value;
5570     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5571     return value;
5572 })()}));
5573 var l253 = {name: "*TAGBODY-COUNTER*"};
5574 (function(){
5575     (((l253.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l253).value = 0));
5576     return l253;
5577 })();
5578 var l254 = {name: "*GO-TAG-COUNTER*"};
5579 (function(){
5580     (((l254.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l254).value = 0));
5581     return l254;
5582 })();
5583 var l255 = {name: "GO-TAG-P"};
5584 (function(){
5585     (l255).fvalue = (function(v608){
5586         ((v608)["fname"] = "GO-TAG-P");
5587         return v608;
5588     })((function (values,v606){
5589         checkArgs(arguments, 2);
5590         return (function(){
5591             return (function(v607){
5592                 return (v607 !== l3.value ? v607 : ((function(){
5593                     var tmp = v606;
5594                     return (typeof tmp == 'object' && 'name' in tmp);
5595                 })()?l4.value: l3.value));
5596             })(l79.fvalue(pv, v606));
5597         })();
5598     }));
5599     return l255;
5600 })();
5601 var l256 = {name: "DECLARE-TAGBODY-TAGS"};
5602 (function(){
5603     (l256).fvalue = (function(v614){
5604         ((v614)["fname"] = "DECLARE-TAGBODY-TAGS");
5605         return v614;
5606     })((function (values,v609,v610){
5607         checkArgs(arguments, 3);
5608         return (function(){
5609             return (function(v613){
5610                 return l183.fvalue(values, v613, (function(){
5611                     var symbol = l185;
5612                     var value = symbol.value;
5613                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5614                     return value;
5615                 })(), l182);
5616             })(l73.fvalue(pv, (function (values,v611){
5617                 checkArgs(arguments, 2);
5618                 return (function(v612){
5619                     return l170.fvalue(values, v611, l182, l44.fvalue(pv, v609, v612));
5620                 })(l17.fvalue(pv, ((l254).value = (function(){
5621                     var x1 = (function(){
5622                         var symbol = l254;
5623                         var value = symbol.value;
5624                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5625                         return value;
5626                     })();
5627                     if (typeof x1 !== 'number') throw 'Not a number!';
5628                     var x2 = 1;
5629                     if (typeof x2 !== 'number') throw 'Not a number!';
5630                     return x1+x2;
5631                 })())));
5632             }), l89.fvalue(pv, (function(){
5633                 var symbol = l255;
5634                 var func = symbol.fvalue;
5635                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5636                 return func;
5637             })(), v610)));
5638         })();
5639     }));
5640     return l256;
5641 })();
5642 var l257 = {name: "TAGBODY"};
5643 ((l203).value = ({car: l44.fvalue(pv, l257, (function (values){
5644     var v615= l3.value;
5645     for (var i = arguments.length-1; i>=1; i--)
5646         v615 = {car: arguments[i], cdr:
5647     v615};
5648     return (function(){
5649         try {
5650             (l92.fvalue(pv, (function(){
5651                 var symbol = l255;
5652                 var func = symbol.fvalue;
5653                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5654                 return func;
5655             })(), v615) !== l3.value ? l3.value : (function(){
5656                 var values = mv;
5657                 throw ({type: 'block', id: 213, values: l142.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l238), v615, l44.fvalue(pv, l3))), message: 'Return from unknown block TAGBODY.'})
5658             })());
5659             (l255.fvalue(pv, (function(){
5660                 var tmp = v615;
5661                 return tmp === l3.value? l3.value: tmp.car;
5662             })()) !== l3.value ? l3.value : (v615 = ({car: l16.fvalue(pv, "START"), cdr: v615})));
5663             return (function(v616){
5664                 return (function(v618,v617){
5665                     try {
5666                         var tmp;
5667                         tmp = l185.value;
5668                         l185.value = v618;
5669                         v618 = tmp;
5670                         (function(v619){
5671                             return (v617 = l40.fvalue(pv, l173.fvalue(pv, v619)));
5672                         })(l184.fvalue(pv, l39.fvalue(pv, v615), (function(){
5673                             var symbol = l185;
5674                             var value = symbol.value;
5675                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5676                             return value;
5677                         })(), l182));
5678                         return l131.fvalue(values, "(function(){", (function(){
5679                             var symbol = l130;
5680                             var value = symbol.value;
5681                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5682                             return value;
5683                         })(), l140.fvalue(pv, "var tagbody_", v616, " = ", v617, ";", (function(){
5684                             var symbol = l130;
5685                             var value = symbol.value;
5686                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5687                             return value;
5688                         })(), "tbloop:", (function(){
5689                             var symbol = l130;
5690                             var value = symbol.value;
5691                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5692                             return value;
5693                         })(), "while (true) {", (function(){
5694                             var symbol = l130;
5695                             var value = symbol.value;
5696                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5697                             return value;
5698                         })(), l140.fvalue(pv, "try {", (function(){
5699                             var symbol = l130;
5700                             var value = symbol.value;
5701                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5702                             return value;
5703                         })(), l140.fvalue(pv, (function(v620){
5704                             return l131.fvalue(pv, "switch(tagbody_", v616, "){", (function(){
5705                                 var symbol = l130;
5706                                 var value = symbol.value;
5707                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5708                                 return value;
5709                             })(), "case ", v617, ":", (function(){
5710                                 var symbol = l130;
5711                                 var value = symbol.value;
5712                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5713                                 return value;
5714                             })(), (function(){
5715                                 return (function(v621,v622){
5716                                     (function(){
5717                                         while(v621 !== l3.value){
5718                                             (v622 = (function(){
5719                                                 var tmp = v621;
5720                                                 return tmp === l3.value? l3.value: tmp.car;
5721                                             })());
5722                                             (function(){
5723                                                 (v620 = l131.fvalue(pv, v620, (l27.fvalue(pv, l255.fvalue(pv, v622)) !== l3.value ? l140.fvalue(pv, l142.fvalue(pv, v622), ";", (function(){
5724                                                     var symbol = l130;
5725                                                     var value = symbol.value;
5726                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5727                                                     return value;
5728                                                 })()) : (function(v623){
5729                                                     return l131.fvalue(pv, "case ", l40.fvalue(pv, l173.fvalue(pv, v623)), ":", (function(){
5730                                                         var symbol = l130;
5731                                                         var value = symbol.value;
5732                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5733                                                         return value;
5734                                                     })());
5735                                                 })(l184.fvalue(pv, v622, (function(){
5736                                                     var symbol = l185;
5737                                                     var value = symbol.value;
5738                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5739                                                     return value;
5740                                                 })(), l182)))));
5741                                                 return l3.value;
5742                                             })();
5743                                             (v621 = (function(){
5744                                                 var tmp = v621;
5745                                                 return tmp === l3.value? l3.value: tmp.cdr;
5746                                             })());
5747                                         }return l3.value;
5748                                     })();
5749                                     return v620;
5750                                 })((function(){
5751                                     var tmp = v615;
5752                                     return tmp === l3.value? l3.value: tmp.cdr;
5753                                 })(),l3.value);
5754                             })(), "default:", (function(){
5755                                 var symbol = l130;
5756                                 var value = symbol.value;
5757                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5758                                 return value;
5759                             })(), "    break tbloop;", (function(){
5760                                 var symbol = l130;
5761                                 var value = symbol.value;
5762                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5763                                 return value;
5764                             })(), "}", (function(){
5765                                 var symbol = l130;
5766                                 var value = symbol.value;
5767                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5768                                 return value;
5769                             })());
5770                         })("")), "}", (function(){
5771                             var symbol = l130;
5772                             var value = symbol.value;
5773                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5774                             return value;
5775                         })(), "catch (jump) {", (function(){
5776                             var symbol = l130;
5777                             var value = symbol.value;
5778                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5779                             return value;
5780                         })(), "    if (jump.type == 'tagbody' && jump.id == ", v616, ")", (function(){
5781                             var symbol = l130;
5782                             var value = symbol.value;
5783                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5784                             return value;
5785                         })(), "        tagbody_", v616, " = jump.label;", (function(){
5786                             var symbol = l130;
5787                             var value = symbol.value;
5788                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5789                             return value;
5790                         })(), "    else", (function(){
5791                             var symbol = l130;
5792                             var value = symbol.value;
5793                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5794                             return value;
5795                         })(), "        throw(jump);", (function(){
5796                             var symbol = l130;
5797                             var value = symbol.value;
5798                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5799                             return value;
5800                         })(), "}", (function(){
5801                             var symbol = l130;
5802                             var value = symbol.value;
5803                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5804                             return value;
5805                         })()), "}", (function(){
5806                             var symbol = l130;
5807                             var value = symbol.value;
5808                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5809                             return value;
5810                         })(), "return ", l142.fvalue(pv, l3.value), ";", (function(){
5811                             var symbol = l130;
5812                             var value = symbol.value;
5813                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5814                             return value;
5815                         })()), "})()");
5816                     }
5817                     finally {
5818                         l185.value = v618;
5819                     }
5820                 })(l256.fvalue(pv, v616, v615),l3.value);
5821             })(l17.fvalue(pv, (function(){
5822                 var symbol = l253;
5823                 var value = symbol.value;
5824                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5825                 return value;
5826             })()));
5827         }
5828         catch (cf){
5829             if (cf.type == 'block' && cf.id == 213)
5830                 return values.apply(this, forcemv(cf.values));
5831             else
5832                 throw cf;
5833         }
5834     })();
5835 })), cdr: (function(){
5836     var symbol = l203;
5837     var value = symbol.value;
5838     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5839     return value;
5840 })()}));
5841 var l258 = {name: "GO"};
5842 ((l203).value = ({car: l44.fvalue(pv, l258, (function (values,v624){
5843     checkArgs(arguments, 2);
5844     return (function(){
5845         return (function(v625,v626){
5846             return (v625 !== l3.value ? l131.fvalue(values, "(function(){", (function(){
5847                 var symbol = l130;
5848                 var value = symbol.value;
5849                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5850                 return value;
5851             })(), l140.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l39.fvalue(pv, l173.fvalue(pv, v625)), ", ", "label: ", l40.fvalue(pv, l173.fvalue(pv, v625)), ", ", "message: 'Attempt to GO to non-existing tag ", v626, "'", "})", (function(){
5852                 var symbol = l130;
5853                 var value = symbol.value;
5854                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5855                 return value;
5856             })()), "})()") : (function(){
5857                 throw l131.fvalue(pv, "Unknown tag `", v626, "'.");
5858             })());
5859         })(l184.fvalue(pv, v624, (function(){
5860             var symbol = l185;
5861             var value = symbol.value;
5862             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5863             return value;
5864         })(), l182),(((function(){
5865             var tmp = v624;
5866             return (typeof tmp == 'object' && 'name' in tmp);
5867         })()?l4.value: l3.value) !== l3.value ? (v624).name : (l79.fvalue(pv, v624) !== l3.value ? l17.fvalue(pv, v624) : l3.value)));
5868     })();
5869 })), cdr: (function(){
5870     var symbol = l203;
5871     var value = symbol.value;
5872     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5873     return value;
5874 })()}));
5875 var l259 = {name: "UNWIND-PROTECT"};
5876 ((l203).value = ({car: l44.fvalue(pv, l259, (function (values,v628){
5877     checkArgsAtLeast(arguments, 2);
5878     var v627= l3.value;
5879     for (var i = arguments.length-1; i>=2; i--)
5880         v627 = {car: arguments[i], cdr:
5881     v627};
5882     return (function(){
5883         return l131.fvalue(values, "(function(){", (function(){
5884             var symbol = l130;
5885             var value = symbol.value;
5886             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5887             return value;
5888         })(), l140.fvalue(pv, "var ret = ", l142.fvalue(pv, l3.value), ";", (function(){
5889             var symbol = l130;
5890             var value = symbol.value;
5891             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5892             return value;
5893         })(), "try {", (function(){
5894             var symbol = l130;
5895             var value = symbol.value;
5896             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5897             return value;
5898         })(), l140.fvalue(pv, "ret = ", l142.fvalue(pv, v628), ";", (function(){
5899             var symbol = l130;
5900             var value = symbol.value;
5901             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5902             return value;
5903         })()), "} finally {", (function(){
5904             var symbol = l130;
5905             var value = symbol.value;
5906             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5907             return value;
5908         })(), l140.fvalue(pv, l219.fvalue(pv, v627)), "}", (function(){
5909             var symbol = l130;
5910             var value = symbol.value;
5911             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5912             return value;
5913         })(), "return ret;", (function(){
5914             var symbol = l130;
5915             var value = symbol.value;
5916             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5917             return value;
5918         })()), "})()");
5919     })();
5920 })), cdr: (function(){
5921     var symbol = l203;
5922     var value = symbol.value;
5923     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5924     return value;
5925 })()}));
5926 var l260 = {name: "MULTIPLE-VALUE-CALL"};
5927 ((l203).value = ({car: l44.fvalue(pv, l260, (function (values,v630){
5928     checkArgsAtLeast(arguments, 2);
5929     var v629= l3.value;
5930     for (var i = arguments.length-1; i>=2; i--)
5931         v629 = {car: arguments[i], cdr:
5932     v629};
5933     return (function(){
5934         return l131.fvalue(values, "(function(){", (function(){
5935             var symbol = l130;
5936             var value = symbol.value;
5937             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5938             return value;
5939         })(), l140.fvalue(pv, "var func = ", l142.fvalue(pv, v630), ";", (function(){
5940             var symbol = l130;
5941             var value = symbol.value;
5942             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5943             return value;
5944         })(), "var args = [", ((function(){
5945             var symbol = l169;
5946             var value = symbol.value;
5947             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5948             return value;
5949         })() !== l3.value ? "values" : "pv"), "];", (function(){
5950             var symbol = l130;
5951             var value = symbol.value;
5952             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5953             return value;
5954         })(), "return ", l131.fvalue(pv, "(function(){", (function(){
5955             var symbol = l130;
5956             var value = symbol.value;
5957             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5958             return value;
5959         })(), l140.fvalue(pv, "var values = mv;", (function(){
5960             var symbol = l130;
5961             var value = symbol.value;
5962             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5963             return value;
5964         })(), "var vs;", (function(){
5965             var symbol = l130;
5966             var value = symbol.value;
5967             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5968             return value;
5969         })(), l135.fvalue(pv, (function (values,v631){
5970             checkArgs(arguments, 2);
5971             return l131.fvalue(values, "vs = ", l142.fvalue(pv, v631, l4.value), ";", (function(){
5972                 var symbol = l130;
5973                 var value = symbol.value;
5974                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5975                 return value;
5976             })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){
5977                 var symbol = l130;
5978                 var value = symbol.value;
5979                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5980                 return value;
5981             })(), l140.fvalue(pv, "args = args.concat(vs);", (function(){
5982                 var symbol = l130;
5983                 var value = symbol.value;
5984                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5985                 return value;
5986             })()), "else", (function(){
5987                 var symbol = l130;
5988                 var value = symbol.value;
5989                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5990                 return value;
5991             })(), l140.fvalue(pv, "args.push(vs);", (function(){
5992                 var symbol = l130;
5993                 var value = symbol.value;
5994                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5995                 return value;
5996             })()));
5997         }), v629), "return func.apply(window, args);", (function(){
5998             var symbol = l130;
5999             var value = symbol.value;
6000             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6001             return value;
6002         })()), "})()"), ";", (function(){
6003             var symbol = l130;
6004             var value = symbol.value;
6005             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6006             return value;
6007         })()), "})()");
6008     })();
6009 })), cdr: (function(){
6010     var symbol = l203;
6011     var value = symbol.value;
6012     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6013     return value;
6014 })()}));
6015 var l261 = {name: "MULTIPLE-VALUE-PROG1"};
6016 ((l203).value = ({car: l44.fvalue(pv, l261, (function (values,v633){
6017     checkArgsAtLeast(arguments, 2);
6018     var v632= l3.value;
6019     for (var i = arguments.length-1; i>=2; i--)
6020         v632 = {car: arguments[i], cdr:
6021     v632};
6022     return (function(){
6023         return l131.fvalue(values, "(function(){", (function(){
6024             var symbol = l130;
6025             var value = symbol.value;
6026             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6027             return value;
6028         })(), l140.fvalue(pv, "var args = ", l142.fvalue(pv, v633, (function(){
6029             var symbol = l169;
6030             var value = symbol.value;
6031             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6032             return value;
6033         })()), ";", (function(){
6034             var symbol = l130;
6035             var value = symbol.value;
6036             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6037             return value;
6038         })(), l219.fvalue(pv, v632), "return args;", (function(){
6039             var symbol = l130;
6040             var value = symbol.value;
6041             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6042             return value;
6043         })()), "})()");
6044     })();
6045 })), cdr: (function(){
6046     var symbol = l203;
6047     var value = symbol.value;
6048     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6049     return value;
6050 })()}));
6051 var l262 = {name: "BACKQUOTE-EXPAND-1"};
6052 (function(){
6053     (l262).fvalue = (function(v636){
6054         ((v636)["fname"] = "BACKQUOTE-EXPAND-1");
6055         return v636;
6056     })((function (values,v634){
6057         checkArgs(arguments, 2);
6058         return (function(){
6059             return (((function(){
6060                 var tmp = v634;
6061                 return (typeof tmp == 'object' && 'name' in tmp);
6062             })()?l4.value: l3.value) !== l3.value ? l44.fvalue(values, l164, v634) : (l45.fvalue(pv, v634) !== l3.value ? v634 : ((((function(){
6063                 var tmp = v634;
6064                 return tmp === l3.value? l3.value: tmp.car;
6065             })() === l167)?l4.value: l3.value) !== l3.value ? (function(){
6066                 var tmp = v634;
6067                 return tmp === l3.value? l3.value: tmp.car;
6068             })() : ((((function(){
6069                 var tmp = v634;
6070                 return tmp === l3.value? l3.value: tmp.car;
6071             })() === l165)?l4.value: l3.value) !== l3.value ? l262.fvalue(values, l262.fvalue(pv, l33.fvalue(pv, v634))) : ({car: l64, cdr: l73.fvalue(pv, (function (values,v635){
6072                 checkArgs(arguments, 2);
6073                 return ((l59.fvalue(pv, v635) !== l3.value ? (((function(){
6074                     var tmp = v635;
6075                     return tmp === l3.value? l3.value: tmp.car;
6076                 })() === l167)?l4.value: l3.value) : l3.value) !== l3.value ? l44.fvalue(values, l44, l33.fvalue(pv, v635)) : ((l59.fvalue(pv, v635) !== l3.value ? (((function(){
6077                     var tmp = v635;
6078                     return tmp === l3.value? l3.value: tmp.car;
6079                 })() === l166)?l4.value: l3.value) : l3.value) !== l3.value ? l33.fvalue(values, v635) : l44.fvalue(values, l44, l262.fvalue(pv, v635))));
6080             }), v634)})))));
6081         })();
6082     }));
6083     return l262;
6084 })();
6085 var l263 = {name: "BACKQUOTE-EXPAND"};
6086 (function(){
6087     (l263).fvalue = (function(v638){
6088         ((v638)["fname"] = "BACKQUOTE-EXPAND");
6089         return v638;
6090     })((function (values,v637){
6091         checkArgs(arguments, 2);
6092         return (function(){
6093             return ((l59.fvalue(pv, v637) !== l3.value ? (((function(){
6094                 var tmp = v637;
6095                 return tmp === l3.value? l3.value: tmp.car;
6096             })() === l165)?l4.value: l3.value) : l3.value) !== l3.value ? l262.fvalue(values, l33.fvalue(pv, v637)) : v637);
6097         })();
6098     }));
6099     return l263;
6100 })();
6101 l165;
6102 ((l203).value = ({car: l44.fvalue(pv, l165, (function (values,v639){
6103     checkArgs(arguments, 2);
6104     return (function(){
6105         return l142.fvalue(values, l262.fvalue(pv, v639));
6106     })();
6107 })), cdr: (function(){
6108     var symbol = l203;
6109     var value = symbol.value;
6110     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6111     return value;
6112 })()}));
6113 var l264 = {name: "*BUILTINS*"};
6114 (function(){
6115     (((l264.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l264).value = l3.value));
6116     return l264;
6117 })();
6118 var l265 = {name: "DEFINE-RAW-BUILTIN"};
6119 l265;
6120 var l266 = {name: "DEFINE-BUILTIN"};
6121 l266;
6122 var l267 = {name: "TYPE-CHECK"};
6123 l267;
6124 var l268 = {name: "VARIABLE-ARITY-CALL"};
6125 (function(){
6126     (l268).fvalue = (function(v648){
6127         ((v648)["fname"] = "VARIABLE-ARITY-CALL");
6128         return v648;
6129     })((function (values,v640,v641){
6130         checkArgs(arguments, 3);
6131         return (function(){
6132             (((function(){
6133                 var tmp = v640;
6134                 return (typeof tmp == 'object' && 'car' in tmp);
6135             })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
6136                 throw "ARGS must be a non-empty list";
6137             })());
6138             return (function(v642,v643,v644){
6139                 (function(){
6140                     return (function(v645,v646){
6141                         (function(){
6142                             while(v645 !== l3.value){
6143                                 (v646 = (function(){
6144                                     var tmp = v645;
6145                                     return tmp === l3.value? l3.value: tmp.car;
6146                                 })());
6147                                 (function(){
6148                                     (function(v647){
6149                                         (v643 = ({car: v647, cdr: v643}));
6150                                         return (v644 = l131.fvalue(pv, v644, l131.fvalue(pv, "var ", v647, " = ", l142.fvalue(pv, v646), ";", (function(){
6151                                             var symbol = l130;
6152                                             var value = symbol.value;
6153                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6154                                             return value;
6155                                         })(), "if (typeof ", v647, " !== 'number') throw 'Not a number!';", (function(){
6156                                             var symbol = l130;
6157                                             var value = symbol.value;
6158                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6159                                             return value;
6160                                         })())));
6161                                     })(l131.fvalue(pv, "x", l17.fvalue(pv, (v642 = (function(){
6162                                         var x1 = v642;
6163                                         if (typeof x1 !== 'number') throw 'Not a number!';
6164                                         var x2 = 1;
6165                                         if (typeof x2 !== 'number') throw 'Not a number!';
6166                                         return x1+x2;
6167                                     })()))));
6168                                     return l3.value;
6169                                 })();
6170                                 (v645 = (function(){
6171                                     var tmp = v645;
6172                                     return tmp === l3.value? l3.value: tmp.cdr;
6173                                 })());
6174                             }return l3.value;
6175                         })();
6176                         return l3.value;
6177                     })(v640,l3.value);
6178                 })();
6179                 return l131.fvalue(values, "(function(){", (function(){
6180                     var symbol = l130;
6181                     var value = symbol.value;
6182                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6183                     return value;
6184                 })(), l140.fvalue(pv, v644, (v641)(pv, l66.fvalue(pv, v643))), "})()");
6185             })(0,l3,"");
6186         })();
6187     }));
6188     return l268;
6189 })();
6190 var l269 = {name: "VARIABLE-ARITY"};
6191 l269;
6192 var l270 = {name: "NUM-OP-NUM"};
6193 (function(){
6194     (l270).fvalue = (function(v652){
6195         ((v652)["fname"] = "NUM-OP-NUM");
6196         return v652;
6197     })((function (values,v649,v650,v651){
6198         checkArgs(arguments, 4);
6199         return (function(){
6200             return l131.fvalue(values, "(function(){", (function(){
6201                 var symbol = l130;
6202                 var value = symbol.value;
6203                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6204                 return value;
6205             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "x", " = ", v649, ";", (function(){
6206                 var symbol = l130;
6207                 var value = symbol.value;
6208                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6209                 return value;
6210             })()), l131.fvalue(pv, "var ", "y", " = ", v651, ";", (function(){
6211                 var symbol = l130;
6212                 var value = symbol.value;
6213                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6214                 return value;
6215             })()), l131.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6216                 var symbol = l130;
6217                 var value = symbol.value;
6218                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6219                 return value;
6220             })(), l140.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6221                 var symbol = l130;
6222                 var value = symbol.value;
6223                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6224                 return value;
6225             })())), l131.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
6226                 var symbol = l130;
6227                 var value = symbol.value;
6228                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6229                 return value;
6230             })(), l140.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
6231                 var symbol = l130;
6232                 var value = symbol.value;
6233                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6234                 return value;
6235             })())), l131.fvalue(pv, "return ", l131.fvalue(pv, "x", v650, "y"), ";", (function(){
6236                 var symbol = l130;
6237                 var value = symbol.value;
6238                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6239                 return value;
6240             })())), "})()");
6241         })();
6242     }));
6243     return l270;
6244 })();
6245 ((l264).value = ({car: l44.fvalue(pv, l61, (function (values){
6246     var v653= l3.value;
6247     for (var i = arguments.length-1; i>=1; i--)
6248         v653 = {car: arguments[i], cdr:
6249     v653};
6250     return (function(){
6251         return (l12.fvalue(pv, v653) !== l3.value ? "0" : l268.fvalue(values, v653, (function (values,v654){
6252             checkArgs(arguments, 2);
6253             return l131.fvalue(values, "return ", l133.fvalue(pv, v654, "+"), ";", (function(){
6254                 var symbol = l130;
6255                 var value = symbol.value;
6256                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6257                 return value;
6258             })());
6259         })));
6260     })();
6261 })), cdr: (function(){
6262     var symbol = l264;
6263     var value = symbol.value;
6264     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6265     return value;
6266 })()}));
6267 ((l264).value = ({car: l44.fvalue(pv, l62, (function (values,v656){
6268     checkArgsAtLeast(arguments, 2);
6269     var v655= l3.value;
6270     for (var i = arguments.length-1; i>=2; i--)
6271         v655 = {car: arguments[i], cdr:
6272     v655};
6273     return (function(){
6274         return (function(v657){
6275             return l268.fvalue(values, v657, (function (values,v658){
6276                 checkArgs(arguments, 2);
6277                 return l131.fvalue(values, "return ", (l12.fvalue(pv, v655) !== l3.value ? l131.fvalue(pv, "-", (function(){
6278                     var tmp = v658;
6279                     return tmp === l3.value? l3.value: tmp.car;
6280                 })()) : l133.fvalue(pv, v658, "-")), ";", (function(){
6281                     var symbol = l130;
6282                     var value = symbol.value;
6283                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6284                     return value;
6285                 })());
6286             }));
6287         })(({car: v656, cdr: v655}));
6288     })();
6289 })), cdr: (function(){
6290     var symbol = l264;
6291     var value = symbol.value;
6292     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6293     return value;
6294 })()}));
6295 ((l264).value = ({car: l44.fvalue(pv, l20, (function (values){
6296     var v659= l3.value;
6297     for (var i = arguments.length-1; i>=1; i--)
6298         v659 = {car: arguments[i], cdr:
6299     v659};
6300     return (function(){
6301         return (l12.fvalue(pv, v659) !== l3.value ? "1" : l268.fvalue(values, v659, (function (values,v660){
6302             checkArgs(arguments, 2);
6303             return l131.fvalue(values, "return ", l133.fvalue(pv, v660, "*"), ";", (function(){
6304                 var symbol = l130;
6305                 var value = symbol.value;
6306                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6307                 return value;
6308             })());
6309         })));
6310     })();
6311 })), cdr: (function(){
6312     var symbol = l264;
6313     var value = symbol.value;
6314     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6315     return value;
6316 })()}));
6317 ((l264).value = ({car: l44.fvalue(pv, l21, (function (values,v662){
6318     checkArgsAtLeast(arguments, 2);
6319     var v661= l3.value;
6320     for (var i = arguments.length-1; i>=2; i--)
6321         v661 = {car: arguments[i], cdr:
6322     v661};
6323     return (function(){
6324         return (function(v663){
6325             return l268.fvalue(values, v663, (function (values,v664){
6326                 checkArgs(arguments, 2);
6327                 return l131.fvalue(values, "return ", (l12.fvalue(pv, v661) !== l3.value ? l131.fvalue(pv, "1 /", (function(){
6328                     var tmp = v664;
6329                     return tmp === l3.value? l3.value: tmp.car;
6330                 })()) : l133.fvalue(pv, v664, "/")), ";", (function(){
6331                     var symbol = l130;
6332                     var value = symbol.value;
6333                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6334                     return value;
6335                 })());
6336             }));
6337         })(({car: v662, cdr: v661}));
6338     })();
6339 })), cdr: (function(){
6340     var symbol = l264;
6341     var value = symbol.value;
6342     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6343     return value;
6344 })()}));
6345 var l271 = {name: "MOD"};
6346 ((l264).value = ({car: l44.fvalue(pv, l271, (function (values,v665,v666){
6347     checkArgs(arguments, 3);
6348     return (function(){
6349         return (function(v667,v668){
6350             return l270.fvalue(values, v667, "%", v668);
6351         })(l142.fvalue(pv, v665),l142.fvalue(pv, v666));
6352     })();
6353 })), cdr: (function(){
6354     var symbol = l264;
6355     var value = symbol.value;
6356     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6357     return value;
6358 })()}));
6359 var l272 = {name: "COMPARISON-CONJUNTION"};
6360 (function(){
6361     (l272).fvalue = (function(v671){
6362         ((v671)["fname"] = "COMPARISON-CONJUNTION");
6363         return v671;
6364     })((function (values,v669,v670){
6365         checkArgs(arguments, 3);
6366         return (function(){
6367             return (l12.fvalue(pv, (function(){
6368                 var tmp = v669;
6369                 return tmp === l3.value? l3.value: tmp.cdr;
6370             })()) !== l3.value ? "true" : (l12.fvalue(pv, l35.fvalue(pv, v669)) !== l3.value ? l131.fvalue(values, (function(){
6371                 var tmp = v669;
6372                 return tmp === l3.value? l3.value: tmp.car;
6373             })(), v670, l33.fvalue(pv, v669)) : l131.fvalue(values, (function(){
6374                 var tmp = v669;
6375                 return tmp === l3.value? l3.value: tmp.car;
6376             })(), v670, l33.fvalue(pv, v669), " && ", l272.fvalue(pv, (function(){
6377                 var tmp = v669;
6378                 return tmp === l3.value? l3.value: tmp.cdr;
6379             })(), v670))));
6380         })();
6381     }));
6382     return l272;
6383 })();
6384 var l273 = {name: "DEFINE-BUILTIN-COMPARISON"};
6385 l273;
6386 var l274 = {name: ">"};
6387 ((l264).value = ({car: l44.fvalue(pv, l274, (function (values,v673){
6388     checkArgsAtLeast(arguments, 2);
6389     var v672= l3.value;
6390     for (var i = arguments.length-1; i>=2; i--)
6391         v672 = {car: arguments[i], cdr:
6392     v672};
6393     return (function(){
6394         return (function(v674){
6395             return l268.fvalue(values, v674, (function (values,v675){
6396                 checkArgs(arguments, 2);
6397                 return l131.fvalue(values, "return ", l141.fvalue(pv, l272.fvalue(pv, v675, ">")), ";", (function(){
6398                     var symbol = l130;
6399                     var value = symbol.value;
6400                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6401                     return value;
6402                 })());
6403             }));
6404         })(({car: v673, cdr: v672}));
6405     })();
6406 })), cdr: (function(){
6407     var symbol = l264;
6408     var value = symbol.value;
6409     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6410     return value;
6411 })()}));
6412 var l275 = {name: "<"};
6413 ((l264).value = ({car: l44.fvalue(pv, l275, (function (values,v677){
6414     checkArgsAtLeast(arguments, 2);
6415     var v676= l3.value;
6416     for (var i = arguments.length-1; i>=2; i--)
6417         v676 = {car: arguments[i], cdr:
6418     v676};
6419     return (function(){
6420         return (function(v678){
6421             return l268.fvalue(values, v678, (function (values,v679){
6422                 checkArgs(arguments, 2);
6423                 return l131.fvalue(values, "return ", l141.fvalue(pv, l272.fvalue(pv, v679, "<")), ";", (function(){
6424                     var symbol = l130;
6425                     var value = symbol.value;
6426                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6427                     return value;
6428                 })());
6429             }));
6430         })(({car: v677, cdr: v676}));
6431     })();
6432 })), cdr: (function(){
6433     var symbol = l264;
6434     var value = symbol.value;
6435     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6436     return value;
6437 })()}));
6438 var l276 = {name: ">="};
6439 ((l264).value = ({car: l44.fvalue(pv, l276, (function (values,v681){
6440     checkArgsAtLeast(arguments, 2);
6441     var v680= l3.value;
6442     for (var i = arguments.length-1; i>=2; i--)
6443         v680 = {car: arguments[i], cdr:
6444     v680};
6445     return (function(){
6446         return (function(v682){
6447             return l268.fvalue(values, v682, (function (values,v683){
6448                 checkArgs(arguments, 2);
6449                 return l131.fvalue(values, "return ", l141.fvalue(pv, l272.fvalue(pv, v683, ">=")), ";", (function(){
6450                     var symbol = l130;
6451                     var value = symbol.value;
6452                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6453                     return value;
6454                 })());
6455             }));
6456         })(({car: v681, cdr: v680}));
6457     })();
6458 })), cdr: (function(){
6459     var symbol = l264;
6460     var value = symbol.value;
6461     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6462     return value;
6463 })()}));
6464 var l277 = {name: "<="};
6465 ((l264).value = ({car: l44.fvalue(pv, l277, (function (values,v685){
6466     checkArgsAtLeast(arguments, 2);
6467     var v684= l3.value;
6468     for (var i = arguments.length-1; i>=2; i--)
6469         v684 = {car: arguments[i], cdr:
6470     v684};
6471     return (function(){
6472         return (function(v686){
6473             return l268.fvalue(values, v686, (function (values,v687){
6474                 checkArgs(arguments, 2);
6475                 return l131.fvalue(values, "return ", l141.fvalue(pv, l272.fvalue(pv, v687, "<=")), ";", (function(){
6476                     var symbol = l130;
6477                     var value = symbol.value;
6478                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6479                     return value;
6480                 })());
6481             }));
6482         })(({car: v685, cdr: v684}));
6483     })();
6484 })), cdr: (function(){
6485     var symbol = l264;
6486     var value = symbol.value;
6487     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6488     return value;
6489 })()}));
6490 ((l264).value = ({car: l44.fvalue(pv, l19, (function (values,v689){
6491     checkArgsAtLeast(arguments, 2);
6492     var v688= l3.value;
6493     for (var i = arguments.length-1; i>=2; i--)
6494         v688 = {car: arguments[i], cdr:
6495     v688};
6496     return (function(){
6497         return (function(v690){
6498             return l268.fvalue(values, v690, (function (values,v691){
6499                 checkArgs(arguments, 2);
6500                 return l131.fvalue(values, "return ", l141.fvalue(pv, l272.fvalue(pv, v691, "==")), ";", (function(){
6501                     var symbol = l130;
6502                     var value = symbol.value;
6503                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6504                     return value;
6505                 })());
6506             }));
6507         })(({car: v689, cdr: v688}));
6508     })();
6509 })), cdr: (function(){
6510     var symbol = l264;
6511     var value = symbol.value;
6512     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6513     return value;
6514 })()}));
6515 var l278 = {name: "NUMBERP"};
6516 ((l264).value = ({car: l44.fvalue(pv, l278, (function (values,v692){
6517     checkArgs(arguments, 2);
6518     return (function(){
6519         return (function(v693){
6520             return l141.fvalue(values, l131.fvalue(pv, "(typeof (", v693, ") == \"number\")"));
6521         })(l142.fvalue(pv, v692));
6522     })();
6523 })), cdr: (function(){
6524     var symbol = l264;
6525     var value = symbol.value;
6526     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6527     return value;
6528 })()}));
6529 var l279 = {name: "FLOOR"};
6530 ((l264).value = ({car: l44.fvalue(pv, l279, (function (values,v694){
6531     checkArgs(arguments, 2);
6532     return (function(){
6533         return (function(v695){
6534             return l131.fvalue(values, "(function(){", (function(){
6535                 var symbol = l130;
6536                 var value = symbol.value;
6537                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6538                 return value;
6539             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "x", " = ", v695, ";", (function(){
6540                 var symbol = l130;
6541                 var value = symbol.value;
6542                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6543                 return value;
6544             })()), l131.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6545                 var symbol = l130;
6546                 var value = symbol.value;
6547                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6548                 return value;
6549             })(), l140.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6550                 var symbol = l130;
6551                 var value = symbol.value;
6552                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6553                 return value;
6554             })())), l131.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){
6555                 var symbol = l130;
6556                 var value = symbol.value;
6557                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6558                 return value;
6559             })())), "})()");
6560         })(l142.fvalue(pv, v694));
6561     })();
6562 })), cdr: (function(){
6563     var symbol = l264;
6564     var value = symbol.value;
6565     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6566     return value;
6567 })()}));
6568 ((l264).value = ({car: l44.fvalue(pv, l28, (function (values,v696,v697){
6569     checkArgs(arguments, 3);
6570     return (function(){
6571         return (function(v698,v699){
6572             return l131.fvalue(values, "({car: ", v698, ", cdr: ", v699, "})");
6573         })(l142.fvalue(pv, v696),l142.fvalue(pv, v697));
6574     })();
6575 })), cdr: (function(){
6576     var symbol = l264;
6577     var value = symbol.value;
6578     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6579     return value;
6580 })()}));
6581 ((l264).value = ({car: l44.fvalue(pv, l29, (function (values,v700){
6582     checkArgs(arguments, 2);
6583     return (function(){
6584         return (function(v701){
6585             return l141.fvalue(values, l131.fvalue(pv, "(function(){", (function(){
6586                 var symbol = l130;
6587                 var value = symbol.value;
6588                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6589                 return value;
6590             })(), l140.fvalue(pv, "var tmp = ", v701, ";", (function(){
6591                 var symbol = l130;
6592                 var value = symbol.value;
6593                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6594                 return value;
6595             })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
6596                 var symbol = l130;
6597                 var value = symbol.value;
6598                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6599                 return value;
6600             })()), "})()"));
6601         })(l142.fvalue(pv, v700));
6602     })();
6603 })), cdr: (function(){
6604     var symbol = l264;
6605     var value = symbol.value;
6606     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6607     return value;
6608 })()}));
6609 ((l264).value = ({car: l44.fvalue(pv, l30, (function (values,v702){
6610     checkArgs(arguments, 2);
6611     return (function(){
6612         return (function(v703){
6613             return l131.fvalue(values, "(function(){", (function(){
6614                 var symbol = l130;
6615                 var value = symbol.value;
6616                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6617                 return value;
6618             })(), l140.fvalue(pv, "var tmp = ", v703, ";", (function(){
6619                 var symbol = l130;
6620                 var value = symbol.value;
6621                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6622                 return value;
6623             })(), "return tmp === ", l142.fvalue(pv, l3.value), "? ", l142.fvalue(pv, l3.value), ": tmp.car;", (function(){
6624                 var symbol = l130;
6625                 var value = symbol.value;
6626                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6627                 return value;
6628             })()), "})()");
6629         })(l142.fvalue(pv, v702));
6630     })();
6631 })), cdr: (function(){
6632     var symbol = l264;
6633     var value = symbol.value;
6634     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6635     return value;
6636 })()}));
6637 ((l264).value = ({car: l44.fvalue(pv, l31, (function (values,v704){
6638     checkArgs(arguments, 2);
6639     return (function(){
6640         return (function(v705){
6641             return l131.fvalue(values, "(function(){", (function(){
6642                 var symbol = l130;
6643                 var value = symbol.value;
6644                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6645                 return value;
6646             })(), l140.fvalue(pv, "var tmp = ", v705, ";", (function(){
6647                 var symbol = l130;
6648                 var value = symbol.value;
6649                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6650                 return value;
6651             })(), "return tmp === ", l142.fvalue(pv, l3.value), "? ", l142.fvalue(pv, l3.value), ": tmp.cdr;", (function(){
6652                 var symbol = l130;
6653                 var value = symbol.value;
6654                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6655                 return value;
6656             })()), "})()");
6657         })(l142.fvalue(pv, v704));
6658     })();
6659 })), cdr: (function(){
6660     var symbol = l264;
6661     var value = symbol.value;
6662     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6663     return value;
6664 })()}));
6665 var l280 = {name: "RPLACA"};
6666 ((l264).value = ({car: l44.fvalue(pv, l280, (function (values,v706,v707){
6667     checkArgs(arguments, 3);
6668     return (function(){
6669         return (function(v708,v709){
6670             return l131.fvalue(values, "(function(){", (function(){
6671                 var symbol = l130;
6672                 var value = symbol.value;
6673                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6674                 return value;
6675             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "x", " = ", v708, ";", (function(){
6676                 var symbol = l130;
6677                 var value = symbol.value;
6678                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6679                 return value;
6680             })()), l131.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
6681                 var symbol = l130;
6682                 var value = symbol.value;
6683                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6684                 return value;
6685             })(), l140.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
6686                 var symbol = l130;
6687                 var value = symbol.value;
6688                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6689                 return value;
6690             })())), l131.fvalue(pv, "return ", l131.fvalue(pv, "(x.car = ", v709, ", x)"), ";", (function(){
6691                 var symbol = l130;
6692                 var value = symbol.value;
6693                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6694                 return value;
6695             })())), "})()");
6696         })(l142.fvalue(pv, v706),l142.fvalue(pv, v707));
6697     })();
6698 })), cdr: (function(){
6699     var symbol = l264;
6700     var value = symbol.value;
6701     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6702     return value;
6703 })()}));
6704 var l281 = {name: "RPLACD"};
6705 ((l264).value = ({car: l44.fvalue(pv, l281, (function (values,v710,v711){
6706     checkArgs(arguments, 3);
6707     return (function(){
6708         return (function(v712,v713){
6709             return l131.fvalue(values, "(function(){", (function(){
6710                 var symbol = l130;
6711                 var value = symbol.value;
6712                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6713                 return value;
6714             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "x", " = ", v712, ";", (function(){
6715                 var symbol = l130;
6716                 var value = symbol.value;
6717                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6718                 return value;
6719             })()), l131.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
6720                 var symbol = l130;
6721                 var value = symbol.value;
6722                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6723                 return value;
6724             })(), l140.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
6725                 var symbol = l130;
6726                 var value = symbol.value;
6727                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6728                 return value;
6729             })())), l131.fvalue(pv, "return ", l131.fvalue(pv, "(x.cdr = ", v713, ", x)"), ";", (function(){
6730                 var symbol = l130;
6731                 var value = symbol.value;
6732                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6733                 return value;
6734             })())), "})()");
6735         })(l142.fvalue(pv, v710),l142.fvalue(pv, v711));
6736     })();
6737 })), cdr: (function(){
6738     var symbol = l264;
6739     var value = symbol.value;
6740     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6741     return value;
6742 })()}));
6743 var l282 = {name: "SYMBOLP"};
6744 ((l264).value = ({car: l44.fvalue(pv, l282, (function (values,v714){
6745     checkArgs(arguments, 2);
6746     return (function(){
6747         return (function(v715){
6748             return l141.fvalue(values, l131.fvalue(pv, "(function(){", (function(){
6749                 var symbol = l130;
6750                 var value = symbol.value;
6751                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6752                 return value;
6753             })(), l140.fvalue(pv, "var tmp = ", v715, ";", (function(){
6754                 var symbol = l130;
6755                 var value = symbol.value;
6756                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6757                 return value;
6758             })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
6759                 var symbol = l130;
6760                 var value = symbol.value;
6761                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6762                 return value;
6763             })()), "})()"));
6764         })(l142.fvalue(pv, v714));
6765     })();
6766 })), cdr: (function(){
6767     var symbol = l264;
6768     var value = symbol.value;
6769     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6770     return value;
6771 })()}));
6772 var l283 = {name: "MAKE-SYMBOL"};
6773 ((l264).value = ({car: l44.fvalue(pv, l283, (function (values,v716){
6774     checkArgs(arguments, 2);
6775     return (function(){
6776         return (function(v717){
6777             return l131.fvalue(values, "(function(){", (function(){
6778                 var symbol = l130;
6779                 var value = symbol.value;
6780                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6781                 return value;
6782             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "name", " = ", v717, ";", (function(){
6783                 var symbol = l130;
6784                 var value = symbol.value;
6785                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6786                 return value;
6787             })()), l131.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){
6788                 var symbol = l130;
6789                 var value = symbol.value;
6790                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6791                 return value;
6792             })(), l140.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
6793                 var symbol = l130;
6794                 var value = symbol.value;
6795                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6796                 return value;
6797             })())), l131.fvalue(pv, "return ", "({name: name})", ";", (function(){
6798                 var symbol = l130;
6799                 var value = symbol.value;
6800                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6801                 return value;
6802             })())), "})()");
6803         })(l142.fvalue(pv, v716));
6804     })();
6805 })), cdr: (function(){
6806     var symbol = l264;
6807     var value = symbol.value;
6808     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6809     return value;
6810 })()}));
6811 var l284 = {name: "SYMBOL-NAME"};
6812 ((l264).value = ({car: l44.fvalue(pv, l284, (function (values,v718){
6813     checkArgs(arguments, 2);
6814     return (function(){
6815         return (function(v719){
6816             return l131.fvalue(values, "(", v719, ").name");
6817         })(l142.fvalue(pv, v718));
6818     })();
6819 })), cdr: (function(){
6820     var symbol = l264;
6821     var value = symbol.value;
6822     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6823     return value;
6824 })()}));
6825 ((l264).value = ({car: l44.fvalue(pv, l221, (function (values,v720,v721){
6826     checkArgs(arguments, 3);
6827     return (function(){
6828         return (function(v722,v723){
6829             return l131.fvalue(values, "(", v722, ").value = ", v723);
6830         })(l142.fvalue(pv, v720),l142.fvalue(pv, v721));
6831     })();
6832 })), cdr: (function(){
6833     var symbol = l264;
6834     var value = symbol.value;
6835     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6836     return value;
6837 })()}));
6838 var l285 = {name: "FSET"};
6839 ((l264).value = ({car: l44.fvalue(pv, l285, (function (values,v724,v725){
6840     checkArgs(arguments, 3);
6841     return (function(){
6842         return (function(v726,v727){
6843             return l131.fvalue(values, "(", v726, ").fvalue = ", v727);
6844         })(l142.fvalue(pv, v724),l142.fvalue(pv, v725));
6845     })();
6846 })), cdr: (function(){
6847     var symbol = l264;
6848     var value = symbol.value;
6849     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6850     return value;
6851 })()}));
6852 ((l264).value = ({car: l44.fvalue(pv, l18, (function (values,v728){
6853     checkArgs(arguments, 2);
6854     return (function(){
6855         return (function(v729){
6856             return l141.fvalue(values, l131.fvalue(pv, "(", v729, ".value !== undefined)"));
6857         })(l142.fvalue(pv, v728));
6858     })();
6859 })), cdr: (function(){
6860     var symbol = l264;
6861     var value = symbol.value;
6862     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6863     return value;
6864 })()}));
6865 var l286 = {name: "SYMBOL-VALUE"};
6866 ((l264).value = ({car: l44.fvalue(pv, l286, (function (values,v730){
6867     checkArgs(arguments, 2);
6868     return (function(){
6869         return (function(v731){
6870             return l131.fvalue(values, "(function(){", (function(){
6871                 var symbol = l130;
6872                 var value = symbol.value;
6873                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6874                 return value;
6875             })(), l140.fvalue(pv, "var symbol = ", v731, ";", (function(){
6876                 var symbol = l130;
6877                 var value = symbol.value;
6878                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6879                 return value;
6880             })(), "var value = symbol.value;", (function(){
6881                 var symbol = l130;
6882                 var value = symbol.value;
6883                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6884                 return value;
6885             })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
6886                 var symbol = l130;
6887                 var value = symbol.value;
6888                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6889                 return value;
6890             })(), "return value;", (function(){
6891                 var symbol = l130;
6892                 var value = symbol.value;
6893                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6894                 return value;
6895             })()), "})()");
6896         })(l142.fvalue(pv, v730));
6897     })();
6898 })), cdr: (function(){
6899     var symbol = l264;
6900     var value = symbol.value;
6901     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6902     return value;
6903 })()}));
6904 ((l264).value = ({car: l44.fvalue(pv, l230, (function (values,v732){
6905     checkArgs(arguments, 2);
6906     return (function(){
6907         return (function(v733){
6908             return l131.fvalue(values, "(function(){", (function(){
6909                 var symbol = l130;
6910                 var value = symbol.value;
6911                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6912                 return value;
6913             })(), l140.fvalue(pv, "var symbol = ", v733, ";", (function(){
6914                 var symbol = l130;
6915                 var value = symbol.value;
6916                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6917                 return value;
6918             })(), "var func = symbol.fvalue;", (function(){
6919                 var symbol = l130;
6920                 var value = symbol.value;
6921                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6922                 return value;
6923             })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
6924                 var symbol = l130;
6925                 var value = symbol.value;
6926                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6927                 return value;
6928             })(), "return func;", (function(){
6929                 var symbol = l130;
6930                 var value = symbol.value;
6931                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6932                 return value;
6933             })()), "})()");
6934         })(l142.fvalue(pv, v732));
6935     })();
6936 })), cdr: (function(){
6937     var symbol = l264;
6938     var value = symbol.value;
6939     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6940     return value;
6941 })()}));
6942 var l287 = {name: "SYMBOL-PLIST"};
6943 ((l264).value = ({car: l44.fvalue(pv, l287, (function (values,v734){
6944     checkArgs(arguments, 2);
6945     return (function(){
6946         return (function(v735){
6947             return l131.fvalue(values, "((", v735, ").plist || ", l142.fvalue(pv, l3.value), ")");
6948         })(l142.fvalue(pv, v734));
6949     })();
6950 })), cdr: (function(){
6951     var symbol = l264;
6952     var value = symbol.value;
6953     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6954     return value;
6955 })()}));
6956 var l288 = {name: "LAMBDA-CODE"};
6957 ((l264).value = ({car: l44.fvalue(pv, l288, (function (values,v736){
6958     checkArgs(arguments, 2);
6959     return (function(){
6960         return (function(v737){
6961             return l131.fvalue(values, "(", v737, ").toString()");
6962         })(l142.fvalue(pv, v736));
6963     })();
6964 })), cdr: (function(){
6965     var symbol = l264;
6966     var value = symbol.value;
6967     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6968     return value;
6969 })()}));
6970 var l289 = {name: "EQ"};
6971 ((l264).value = ({car: l44.fvalue(pv, l289, (function (values,v738,v739){
6972     checkArgs(arguments, 3);
6973     return (function(){
6974         return (function(v740,v741){
6975             return l141.fvalue(values, l131.fvalue(pv, "(", v740, " === ", v741, ")"));
6976         })(l142.fvalue(pv, v738),l142.fvalue(pv, v739));
6977     })();
6978 })), cdr: (function(){
6979     var symbol = l264;
6980     var value = symbol.value;
6981     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6982     return value;
6983 })()}));
6984 var l290 = {name: "EQUAL"};
6985 ((l264).value = ({car: l44.fvalue(pv, l290, (function (values,v742,v743){
6986     checkArgs(arguments, 3);
6987     return (function(){
6988         return (function(v744,v745){
6989             return l141.fvalue(values, l131.fvalue(pv, "(", v744, " == ", v745, ")"));
6990         })(l142.fvalue(pv, v742),l142.fvalue(pv, v743));
6991     })();
6992 })), cdr: (function(){
6993     var symbol = l264;
6994     var value = symbol.value;
6995     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6996     return value;
6997 })()}));
6998 var l291 = {name: "CHAR-TO-STRING"};
6999 ((l264).value = ({car: l44.fvalue(pv, l291, (function (values,v746){
7000     checkArgs(arguments, 2);
7001     return (function(){
7002         return (function(v747){
7003             return l131.fvalue(values, "(function(){", (function(){
7004                 var symbol = l130;
7005                 var value = symbol.value;
7006                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7007                 return value;
7008             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "x", " = ", v747, ";", (function(){
7009                 var symbol = l130;
7010                 var value = symbol.value;
7011                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7012                 return value;
7013             })()), l131.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7014                 var symbol = l130;
7015                 var value = symbol.value;
7016                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7017                 return value;
7018             })(), l140.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7019                 var symbol = l130;
7020                 var value = symbol.value;
7021                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7022                 return value;
7023             })())), l131.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){
7024                 var symbol = l130;
7025                 var value = symbol.value;
7026                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7027                 return value;
7028             })())), "})()");
7029         })(l142.fvalue(pv, v746));
7030     })();
7031 })), cdr: (function(){
7032     var symbol = l264;
7033     var value = symbol.value;
7034     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7035     return value;
7036 })()}));
7037 var l292 = {name: "STRINGP"};
7038 ((l264).value = ({car: l44.fvalue(pv, l292, (function (values,v748){
7039     checkArgs(arguments, 2);
7040     return (function(){
7041         return (function(v749){
7042             return l141.fvalue(values, l131.fvalue(pv, "(typeof(", v749, ") == \"string\")"));
7043         })(l142.fvalue(pv, v748));
7044     })();
7045 })), cdr: (function(){
7046     var symbol = l264;
7047     var value = symbol.value;
7048     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7049     return value;
7050 })()}));
7051 var l293 = {name: "STRING-UPCASE"};
7052 ((l264).value = ({car: l44.fvalue(pv, l293, (function (values,v750){
7053     checkArgs(arguments, 2);
7054     return (function(){
7055         return (function(v751){
7056             return l131.fvalue(values, "(function(){", (function(){
7057                 var symbol = l130;
7058                 var value = symbol.value;
7059                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7060                 return value;
7061             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "x", " = ", v751, ";", (function(){
7062                 var symbol = l130;
7063                 var value = symbol.value;
7064                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7065                 return value;
7066             })()), l131.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7067                 var symbol = l130;
7068                 var value = symbol.value;
7069                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7070                 return value;
7071             })(), l140.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7072                 var symbol = l130;
7073                 var value = symbol.value;
7074                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7075                 return value;
7076             })())), l131.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){
7077                 var symbol = l130;
7078                 var value = symbol.value;
7079                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7080                 return value;
7081             })())), "})()");
7082         })(l142.fvalue(pv, v750));
7083     })();
7084 })), cdr: (function(){
7085     var symbol = l264;
7086     var value = symbol.value;
7087     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7088     return value;
7089 })()}));
7090 var l294 = {name: "STRING-LENGTH"};
7091 ((l264).value = ({car: l44.fvalue(pv, l294, (function (values,v752){
7092     checkArgs(arguments, 2);
7093     return (function(){
7094         return (function(v753){
7095             return l131.fvalue(values, "(function(){", (function(){
7096                 var symbol = l130;
7097                 var value = symbol.value;
7098                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7099                 return value;
7100             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "x", " = ", v753, ";", (function(){
7101                 var symbol = l130;
7102                 var value = symbol.value;
7103                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7104                 return value;
7105             })()), l131.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7106                 var symbol = l130;
7107                 var value = symbol.value;
7108                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7109                 return value;
7110             })(), l140.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7111                 var symbol = l130;
7112                 var value = symbol.value;
7113                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7114                 return value;
7115             })())), l131.fvalue(pv, "return ", "x.length", ";", (function(){
7116                 var symbol = l130;
7117                 var value = symbol.value;
7118                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7119                 return value;
7120             })())), "})()");
7121         })(l142.fvalue(pv, v752));
7122     })();
7123 })), cdr: (function(){
7124     var symbol = l264;
7125     var value = symbol.value;
7126     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7127     return value;
7128 })()}));
7129 var l295 = {name: "SLICE"};
7130 ((l264).value = ({car: l44.fvalue(pv, l295, (function (values,v754,v755,v756){
7131     checkArgsAtLeast(arguments, 3);
7132     checkArgsAtMost(arguments, 4);
7133     switch(arguments.length-1){
7134     case 2:
7135     v756=l3.value;
7136     default: break;
7137     }
7138     return (function(){
7139         return l131.fvalue(values, "(function(){", (function(){
7140             var symbol = l130;
7141             var value = symbol.value;
7142             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7143             return value;
7144         })(), l140.fvalue(pv, "var str = ", l142.fvalue(pv, v754), ";", (function(){
7145             var symbol = l130;
7146             var value = symbol.value;
7147             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7148             return value;
7149         })(), "var a = ", l142.fvalue(pv, v755), ";", (function(){
7150             var symbol = l130;
7151             var value = symbol.value;
7152             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7153             return value;
7154         })(), "var b;", (function(){
7155             var symbol = l130;
7156             var value = symbol.value;
7157             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7158             return value;
7159         })(), (v756 !== l3.value ? l131.fvalue(pv, "b = ", l142.fvalue(pv, v756), ";", (function(){
7160             var symbol = l130;
7161             var value = symbol.value;
7162             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7163             return value;
7164         })()) : ""), "return str.slice(a,b);", (function(){
7165             var symbol = l130;
7166             var value = symbol.value;
7167             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7168             return value;
7169         })()), "})()");
7170     })();
7171 })), cdr: (function(){
7172     var symbol = l264;
7173     var value = symbol.value;
7174     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7175     return value;
7176 })()}));
7177 var l296 = {name: "CHAR"};
7178 ((l264).value = ({car: l44.fvalue(pv, l296, (function (values,v757,v758){
7179     checkArgs(arguments, 3);
7180     return (function(){
7181         return (function(v759,v760){
7182             return l131.fvalue(values, "(function(){", (function(){
7183                 var symbol = l130;
7184                 var value = symbol.value;
7185                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7186                 return value;
7187             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "string", " = ", v759, ";", (function(){
7188                 var symbol = l130;
7189                 var value = symbol.value;
7190                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7191                 return value;
7192             })()), l131.fvalue(pv, "var ", "index", " = ", v760, ";", (function(){
7193                 var symbol = l130;
7194                 var value = symbol.value;
7195                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7196                 return value;
7197             })()), l131.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7198                 var symbol = l130;
7199                 var value = symbol.value;
7200                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7201                 return value;
7202             })(), l140.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7203                 var symbol = l130;
7204                 var value = symbol.value;
7205                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7206                 return value;
7207             })())), l131.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){
7208                 var symbol = l130;
7209                 var value = symbol.value;
7210                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7211                 return value;
7212             })(), l140.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
7213                 var symbol = l130;
7214                 var value = symbol.value;
7215                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7216                 return value;
7217             })())), l131.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){
7218                 var symbol = l130;
7219                 var value = symbol.value;
7220                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7221                 return value;
7222             })())), "})()");
7223         })(l142.fvalue(pv, v757),l142.fvalue(pv, v758));
7224     })();
7225 })), cdr: (function(){
7226     var symbol = l264;
7227     var value = symbol.value;
7228     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7229     return value;
7230 })()}));
7231 ((l264).value = ({car: l44.fvalue(pv, l72, (function (values,v761,v762){
7232     checkArgs(arguments, 3);
7233     return (function(){
7234         return (function(v763,v764){
7235             return l131.fvalue(values, "(function(){", (function(){
7236                 var symbol = l130;
7237                 var value = symbol.value;
7238                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7239                 return value;
7240             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "string1", " = ", v763, ";", (function(){
7241                 var symbol = l130;
7242                 var value = symbol.value;
7243                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7244                 return value;
7245             })()), l131.fvalue(pv, "var ", "string2", " = ", v764, ";", (function(){
7246                 var symbol = l130;
7247                 var value = symbol.value;
7248                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7249                 return value;
7250             })()), l131.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){
7251                 var symbol = l130;
7252                 var value = symbol.value;
7253                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7254                 return value;
7255             })(), l140.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
7256                 var symbol = l130;
7257                 var value = symbol.value;
7258                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7259                 return value;
7260             })())), l131.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){
7261                 var symbol = l130;
7262                 var value = symbol.value;
7263                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7264                 return value;
7265             })(), l140.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
7266                 var symbol = l130;
7267                 var value = symbol.value;
7268                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7269                 return value;
7270             })())), l131.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){
7271                 var symbol = l130;
7272                 var value = symbol.value;
7273                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7274                 return value;
7275             })())), "})()");
7276         })(l142.fvalue(pv, v761),l142.fvalue(pv, v762));
7277     })();
7278 })), cdr: (function(){
7279     var symbol = l264;
7280     var value = symbol.value;
7281     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7282     return value;
7283 })()}));
7284 var l297 = {name: "FUNCALL"};
7285 ((l264).value = ({car: l44.fvalue(pv, l297, (function (values,v766){
7286     checkArgsAtLeast(arguments, 2);
7287     var v765= l3.value;
7288     for (var i = arguments.length-1; i>=2; i--)
7289         v765 = {car: arguments[i], cdr:
7290     v765};
7291     return (function(){
7292         return l131.fvalue(values, "(", l142.fvalue(pv, v766), ")(", l133.fvalue(pv, ({car: ((function(){
7293             var symbol = l169;
7294             var value = symbol.value;
7295             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7296             return value;
7297         })() !== l3.value ? "values" : "pv"), cdr: l73.fvalue(pv, (function(){
7298             var symbol = l142;
7299             var func = symbol.fvalue;
7300             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7301             return func;
7302         })(), v765)}), ", "), ")");
7303     })();
7304 })), cdr: (function(){
7305     var symbol = l264;
7306     var value = symbol.value;
7307     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7308     return value;
7309 })()}));
7310 var l298 = {name: "APPLY"};
7311 ((l264).value = ({car: l44.fvalue(pv, l298, (function (values,v768){
7312     checkArgsAtLeast(arguments, 2);
7313     var v767= l3.value;
7314     for (var i = arguments.length-1; i>=2; i--)
7315         v767 = {car: arguments[i], cdr:
7316     v767};
7317     return (function(){
7318         return (l12.fvalue(pv, v767) !== l3.value ? l131.fvalue(values, "(", l142.fvalue(pv, v768), ")()") : (function(v769,v770){
7319             return l131.fvalue(values, "(function(){", (function(){
7320                 var symbol = l130;
7321                 var value = symbol.value;
7322                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7323                 return value;
7324             })(), l140.fvalue(pv, "var f = ", l142.fvalue(pv, v768), ";", (function(){
7325                 var symbol = l130;
7326                 var value = symbol.value;
7327                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7328                 return value;
7329             })(), "var args = [", l133.fvalue(pv, ({car: ((function(){
7330                 var symbol = l169;
7331                 var value = symbol.value;
7332                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7333                 return value;
7334             })() !== l3.value ? "values" : "pv"), cdr: l73.fvalue(pv, (function(){
7335                 var symbol = l142;
7336                 var func = symbol.fvalue;
7337                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7338                 return func;
7339             })(), v769)}), ", "), "];", (function(){
7340                 var symbol = l130;
7341                 var value = symbol.value;
7342                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7343                 return value;
7344             })(), "var tail = (", l142.fvalue(pv, v770), ");", (function(){
7345                 var symbol = l130;
7346                 var value = symbol.value;
7347                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7348                 return value;
7349             })(), "while (tail != ", l142.fvalue(pv, l3.value), "){", (function(){
7350                 var symbol = l130;
7351                 var value = symbol.value;
7352                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7353                 return value;
7354             })(), "    args.push(tail.car);", (function(){
7355                 var symbol = l130;
7356                 var value = symbol.value;
7357                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7358                 return value;
7359             })(), "    tail = tail.cdr;", (function(){
7360                 var symbol = l130;
7361                 var value = symbol.value;
7362                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7363                 return value;
7364             })(), "}", (function(){
7365                 var symbol = l130;
7366                 var value = symbol.value;
7367                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7368                 return value;
7369             })(), "return f.apply(this, args);", (function(){
7370                 var symbol = l130;
7371                 var value = symbol.value;
7372                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7373                 return value;
7374             })()), "})()");
7375         })(l85.fvalue(pv, v767),(function(){
7376             var tmp = l84.fvalue(pv, v767);
7377             return tmp === l3.value? l3.value: tmp.car;
7378         })()));
7379     })();
7380 })), cdr: (function(){
7381     var symbol = l264;
7382     var value = symbol.value;
7383     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7384     return value;
7385 })()}));
7386 var l299 = {name: "JS-EVAL"};
7387 ((l264).value = ({car: l44.fvalue(pv, l299, (function (values,v771){
7388     checkArgs(arguments, 2);
7389     return (function(){
7390         return (function(v772){
7391             return l131.fvalue(values, "(function(){", (function(){
7392                 var symbol = l130;
7393                 var value = symbol.value;
7394                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7395                 return value;
7396             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "string", " = ", v772, ";", (function(){
7397                 var symbol = l130;
7398                 var value = symbol.value;
7399                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7400                 return value;
7401             })()), l131.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7402                 var symbol = l130;
7403                 var value = symbol.value;
7404                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7405                 return value;
7406             })(), l140.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7407                 var symbol = l130;
7408                 var value = symbol.value;
7409                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7410                 return value;
7411             })())), l131.fvalue(pv, "return ", ((function(){
7412                 var symbol = l169;
7413                 var value = symbol.value;
7414                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7415                 return value;
7416             })() !== l3.value ? l131.fvalue(pv, "(function(){", (function(){
7417                 var symbol = l130;
7418                 var value = symbol.value;
7419                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7420                 return value;
7421             })(), l140.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){
7422                 var symbol = l130;
7423                 var value = symbol.value;
7424                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7425                 return value;
7426             })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){
7427                 var symbol = l130;
7428                 var value = symbol.value;
7429                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7430                 return value;
7431             })(), l140.fvalue(pv, "v = [v];", (function(){
7432                 var symbol = l130;
7433                 var value = symbol.value;
7434                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7435                 return value;
7436             })(), "v['multiple-value'] = true;", (function(){
7437                 var symbol = l130;
7438                 var value = symbol.value;
7439                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7440                 return value;
7441             })()), "}", (function(){
7442                 var symbol = l130;
7443                 var value = symbol.value;
7444                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7445                 return value;
7446             })(), "return values.apply(this, v);", (function(){
7447                 var symbol = l130;
7448                 var value = symbol.value;
7449                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7450                 return value;
7451             })()), "})()") : "eval.apply(window, [string])"), ";", (function(){
7452                 var symbol = l130;
7453                 var value = symbol.value;
7454                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7455                 return value;
7456             })())), "})()");
7457         })(l142.fvalue(pv, v771));
7458     })();
7459 })), cdr: (function(){
7460     var symbol = l264;
7461     var value = symbol.value;
7462     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7463     return value;
7464 })()}));
7465 var l300 = {name: "ERROR"};
7466 ((l264).value = ({car: l44.fvalue(pv, l300, (function (values,v773){
7467     checkArgs(arguments, 2);
7468     return (function(){
7469         return (function(v774){
7470             return l131.fvalue(values, "(function(){", (function(){
7471                 var symbol = l130;
7472                 var value = symbol.value;
7473                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7474                 return value;
7475             })(), l140.fvalue(pv, "throw ", v774, ";", (function(){
7476                 var symbol = l130;
7477                 var value = symbol.value;
7478                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7479                 return value;
7480             })()), "})()");
7481         })(l142.fvalue(pv, v773));
7482     })();
7483 })), cdr: (function(){
7484     var symbol = l264;
7485     var value = symbol.value;
7486     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7487     return value;
7488 })()}));
7489 var l301 = {name: "NEW"};
7490 ((l264).value = ({car: l44.fvalue(pv, l301, (function (values){
7491     checkArgsAtMost(arguments, 1);
7492     return (function(){
7493         return (function(){
7494             return "{}";
7495         })();
7496     })();
7497 })), cdr: (function(){
7498     var symbol = l264;
7499     var value = symbol.value;
7500     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7501     return value;
7502 })()}));
7503 var l302 = {name: "OBJECTP"};
7504 ((l264).value = ({car: l44.fvalue(pv, l302, (function (values,v775){
7505     checkArgs(arguments, 2);
7506     return (function(){
7507         return (function(v776){
7508             return l141.fvalue(values, l131.fvalue(pv, "(typeof (", v776, ") === 'object')"));
7509         })(l142.fvalue(pv, v775));
7510     })();
7511 })), cdr: (function(){
7512     var symbol = l264;
7513     var value = symbol.value;
7514     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7515     return value;
7516 })()}));
7517 var l303 = {name: "OGET"};
7518 ((l264).value = ({car: l44.fvalue(pv, l303, (function (values,v777,v778){
7519     checkArgs(arguments, 3);
7520     return (function(){
7521         return (function(v779,v780){
7522             return l131.fvalue(values, "(function(){", (function(){
7523                 var symbol = l130;
7524                 var value = symbol.value;
7525                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7526                 return value;
7527             })(), l140.fvalue(pv, "var tmp = ", "(", v779, ")[", v780, "];", (function(){
7528                 var symbol = l130;
7529                 var value = symbol.value;
7530                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7531                 return value;
7532             })(), "return tmp == undefined? ", l142.fvalue(pv, l3.value), ": tmp ;", (function(){
7533                 var symbol = l130;
7534                 var value = symbol.value;
7535                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7536                 return value;
7537             })()), "})()");
7538         })(l142.fvalue(pv, v777),l142.fvalue(pv, v778));
7539     })();
7540 })), cdr: (function(){
7541     var symbol = l264;
7542     var value = symbol.value;
7543     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7544     return value;
7545 })()}));
7546 var l304 = {name: "OSET"};
7547 ((l264).value = ({car: l44.fvalue(pv, l304, (function (values,v781,v782,v783){
7548     checkArgs(arguments, 4);
7549     return (function(){
7550         return (function(v784,v785,v786){
7551             return l131.fvalue(values, "((", v784, ")[", v785, "] = ", v786, ")");
7552         })(l142.fvalue(pv, v781),l142.fvalue(pv, v782),l142.fvalue(pv, v783));
7553     })();
7554 })), cdr: (function(){
7555     var symbol = l264;
7556     var value = symbol.value;
7557     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7558     return value;
7559 })()}));
7560 var l305 = {name: "IN"};
7561 ((l264).value = ({car: l44.fvalue(pv, l305, (function (values,v787,v788){
7562     checkArgs(arguments, 3);
7563     return (function(){
7564         return (function(v789,v790){
7565             return l141.fvalue(values, l131.fvalue(pv, "((", v789, ") in (", v790, "))"));
7566         })(l142.fvalue(pv, v787),l142.fvalue(pv, v788));
7567     })();
7568 })), cdr: (function(){
7569     var symbol = l264;
7570     var value = symbol.value;
7571     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7572     return value;
7573 })()}));
7574 var l306 = {name: "FUNCTIONP"};
7575 ((l264).value = ({car: l44.fvalue(pv, l306, (function (values,v791){
7576     checkArgs(arguments, 2);
7577     return (function(){
7578         return (function(v792){
7579             return l141.fvalue(values, l131.fvalue(pv, "(typeof ", v792, " == 'function')"));
7580         })(l142.fvalue(pv, v791));
7581     })();
7582 })), cdr: (function(){
7583     var symbol = l264;
7584     var value = symbol.value;
7585     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7586     return value;
7587 })()}));
7588 var l307 = {name: "WRITE-STRING"};
7589 ((l264).value = ({car: l44.fvalue(pv, l307, (function (values,v793){
7590     checkArgs(arguments, 2);
7591     return (function(){
7592         return (function(v794){
7593             return l131.fvalue(values, "(function(){", (function(){
7594                 var symbol = l130;
7595                 var value = symbol.value;
7596                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7597                 return value;
7598             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "x", " = ", v794, ";", (function(){
7599                 var symbol = l130;
7600                 var value = symbol.value;
7601                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7602                 return value;
7603             })()), l131.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7604                 var symbol = l130;
7605                 var value = symbol.value;
7606                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7607                 return value;
7608             })(), l140.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7609                 var symbol = l130;
7610                 var value = symbol.value;
7611                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7612                 return value;
7613             })())), l131.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){
7614                 var symbol = l130;
7615                 var value = symbol.value;
7616                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7617                 return value;
7618             })())), "})()");
7619         })(l142.fvalue(pv, v793));
7620     })();
7621 })), cdr: (function(){
7622     var symbol = l264;
7623     var value = symbol.value;
7624     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7625     return value;
7626 })()}));
7627 var l308 = {name: "MAKE-ARRAY"};
7628 ((l264).value = ({car: l44.fvalue(pv, l308, (function (values,v795){
7629     checkArgs(arguments, 2);
7630     return (function(){
7631         return (function(v796){
7632             return l131.fvalue(values, "(function(){", (function(){
7633                 var symbol = l130;
7634                 var value = symbol.value;
7635                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7636                 return value;
7637             })(), l140.fvalue(pv, "var r = [];", (function(){
7638                 var symbol = l130;
7639                 var value = symbol.value;
7640                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7641                 return value;
7642             })(), "for (var i = 0; i < ", v796, "; i++)", (function(){
7643                 var symbol = l130;
7644                 var value = symbol.value;
7645                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7646                 return value;
7647             })(), l140.fvalue(pv, "r.push(", l142.fvalue(pv, l3.value), ");", (function(){
7648                 var symbol = l130;
7649                 var value = symbol.value;
7650                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7651                 return value;
7652             })()), "return r;", (function(){
7653                 var symbol = l130;
7654                 var value = symbol.value;
7655                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7656                 return value;
7657             })()), "})()");
7658         })(l142.fvalue(pv, v795));
7659     })();
7660 })), cdr: (function(){
7661     var symbol = l264;
7662     var value = symbol.value;
7663     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7664     return value;
7665 })()}));
7666 var l309 = {name: "ARRAYP"};
7667 ((l264).value = ({car: l44.fvalue(pv, l309, (function (values,v797){
7668     checkArgs(arguments, 2);
7669     return (function(){
7670         return (function(v798){
7671             return l141.fvalue(values, l131.fvalue(pv, "(function(){", (function(){
7672                 var symbol = l130;
7673                 var value = symbol.value;
7674                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7675                 return value;
7676             })(), l140.fvalue(pv, "var x = ", v798, ";", (function(){
7677                 var symbol = l130;
7678                 var value = symbol.value;
7679                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7680                 return value;
7681             })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
7682         })(l142.fvalue(pv, v797));
7683     })();
7684 })), cdr: (function(){
7685     var symbol = l264;
7686     var value = symbol.value;
7687     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7688     return value;
7689 })()}));
7690 var l310 = {name: "AREF"};
7691 ((l264).value = ({car: l44.fvalue(pv, l310, (function (values,v799,v800){
7692     checkArgs(arguments, 3);
7693     return (function(){
7694         return (function(v801,v802){
7695             return l131.fvalue(values, "(function(){", (function(){
7696                 var symbol = l130;
7697                 var value = symbol.value;
7698                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7699                 return value;
7700             })(), l140.fvalue(pv, "var x = ", "(", v801, ")[", v802, "];", (function(){
7701                 var symbol = l130;
7702                 var value = symbol.value;
7703                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7704                 return value;
7705             })(), "if (x === undefined) throw 'Out of range';", (function(){
7706                 var symbol = l130;
7707                 var value = symbol.value;
7708                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7709                 return value;
7710             })(), "return x;", (function(){
7711                 var symbol = l130;
7712                 var value = symbol.value;
7713                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7714                 return value;
7715             })()), "})()");
7716         })(l142.fvalue(pv, v799),l142.fvalue(pv, v800));
7717     })();
7718 })), cdr: (function(){
7719     var symbol = l264;
7720     var value = symbol.value;
7721     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7722     return value;
7723 })()}));
7724 var l311 = {name: "ASET"};
7725 ((l264).value = ({car: l44.fvalue(pv, l311, (function (values,v803,v804,v805){
7726     checkArgs(arguments, 4);
7727     return (function(){
7728         return (function(v806,v807,v808){
7729             return l131.fvalue(values, "(function(){", (function(){
7730                 var symbol = l130;
7731                 var value = symbol.value;
7732                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7733                 return value;
7734             })(), l140.fvalue(pv, "var x = ", v806, ";", (function(){
7735                 var symbol = l130;
7736                 var value = symbol.value;
7737                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7738                 return value;
7739             })(), "var i = ", v807, ";", (function(){
7740                 var symbol = l130;
7741                 var value = symbol.value;
7742                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7743                 return value;
7744             })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
7745                 var symbol = l130;
7746                 var value = symbol.value;
7747                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7748                 return value;
7749             })(), "return x[i] = ", v808, ";", (function(){
7750                 var symbol = l130;
7751                 var value = symbol.value;
7752                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7753                 return value;
7754             })()), "})()");
7755         })(l142.fvalue(pv, v803),l142.fvalue(pv, v804),l142.fvalue(pv, v805));
7756     })();
7757 })), cdr: (function(){
7758     var symbol = l264;
7759     var value = symbol.value;
7760     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7761     return value;
7762 })()}));
7763 var l312 = {name: "GET-UNIX-TIME"};
7764 ((l264).value = ({car: l44.fvalue(pv, l312, (function (values){
7765     checkArgsAtMost(arguments, 1);
7766     return (function(){
7767         return (function(){
7768             return l131.fvalue(values, "(Math.round(new Date() / 1000))");
7769         })();
7770     })();
7771 })), cdr: (function(){
7772     var symbol = l264;
7773     var value = symbol.value;
7774     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7775     return value;
7776 })()}));
7777 var l313 = {name: "VALUES-ARRAY"};
7778 ((l264).value = ({car: l44.fvalue(pv, l313, (function (values,v809){
7779     checkArgs(arguments, 2);
7780     return (function(){
7781         return (function(v810){
7782             return ((function(){
7783                 var symbol = l169;
7784                 var value = symbol.value;
7785                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7786                 return value;
7787             })() !== l3.value ? l131.fvalue(values, "values.apply(this, ", v810, ")") : l131.fvalue(values, "pv.apply(this, ", v810, ")"));
7788         })(l142.fvalue(pv, v809));
7789     })();
7790 })), cdr: (function(){
7791     var symbol = l264;
7792     var value = symbol.value;
7793     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7794     return value;
7795 })()}));
7796 ((l264).value = ({car: l44.fvalue(pv, l139, (function (values){
7797     var v811= l3.value;
7798     for (var i = arguments.length-1; i>=1; i--)
7799         v811 = {car: arguments[i], cdr:
7800     v811};
7801     return (function(){
7802         return ((function(){
7803             var symbol = l169;
7804             var value = symbol.value;
7805             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7806             return value;
7807         })() !== l3.value ? l131.fvalue(values, "values(", l133.fvalue(pv, l73.fvalue(pv, (function(){
7808             var symbol = l142;
7809             var func = symbol.fvalue;
7810             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7811             return func;
7812         })(), v811), ", "), ")") : l131.fvalue(values, "pv(", l133.fvalue(pv, l73.fvalue(pv, (function(){
7813             var symbol = l142;
7814             var func = symbol.fvalue;
7815             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7816             return func;
7817         })(), v811), ", "), ")"));
7818     })();
7819 })), cdr: (function(){
7820     var symbol = l264;
7821     var value = symbol.value;
7822     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7823     return value;
7824 })()}));
7825 (function(){
7826     (l195).fvalue = (function(v814){
7827         ((v814)["fname"] = "MACRO");
7828         return v814;
7829     })((function (values,v812){
7830         checkArgs(arguments, 2);
7831         return (function(){
7832             return (((function(){
7833                 var tmp = v812;
7834                 return (typeof tmp == 'object' && 'name' in tmp);
7835             })()?l4.value: l3.value) !== l3.value ? (function(v813){
7836                 return (((l172.fvalue(pv, v813) === l195)?l4.value: l3.value) !== l3.value ? v813 : l3.value);
7837             })(l184.fvalue(pv, v812, (function(){
7838                 var symbol = l185;
7839                 var value = symbol.value;
7840                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7841                 return value;
7842             })(), l101)) : l3.value);
7843         })();
7844     }));
7845     return l195;
7846 })();
7847 var l314 = {name: "LS-MACROEXPAND-1"};
7848 (function(){
7849     (l314).fvalue = (function(v819){
7850         ((v819)["fname"] = "LS-MACROEXPAND-1");
7851         return v819;
7852     })((function (values,v815){
7853         checkArgs(arguments, 2);
7854         return (function(){
7855             return (function(v816){
7856                 return (v816 !== l3.value ? (function(v817){
7857                     (l59.fvalue(pv, v817) !== l3.value ? (function(v818){
7858                         l175.fvalue(pv, v816, v818);
7859                         return (v817 = v818);
7860                     })(l239.fvalue(pv, v817)) : l3.value);
7861                     return (function(){
7862                         var f = v817;
7863                         var args = [values];
7864                         var tail = ((function(){
7865                             var tmp = v815;
7866                             return tmp === l3.value? l3.value: tmp.cdr;
7867                         })());
7868                         while (tail != l3.value){
7869                             args.push(tail.car);
7870                             tail = tail.cdr;
7871                         }
7872                         return f.apply(this, args);
7873                     })();
7874                 })(l173.fvalue(pv, v816)) : v815);
7875             })(l195.fvalue(pv, (function(){
7876                 var tmp = v815;
7877                 return tmp === l3.value? l3.value: tmp.car;
7878             })()));
7879         })();
7880     }));
7881     return l314;
7882 })();
7883 var l315 = {name: "COMPILE-FUNCALL"};
7884 var l316 = {name: "G796"};
7885 (function(){
7886     (l315).fvalue = (function(v824){
7887         ((v824)["fname"] = "COMPILE-FUNCALL");
7888         return v824;
7889     })((function (values,v820,v821){
7890         checkArgs(arguments, 3);
7891         return (function(){
7892             return (function(){
7893                 var v822 = ((function(){
7894                     var symbol = l169;
7895                     var value = symbol.value;
7896                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7897                     return value;
7898                 })() !== l3.value ? "values" : "pv");
7899                 var v823 = l131.fvalue(pv, "(", l133.fvalue(pv, ({car: v822, cdr: l73.fvalue(pv, (function(){
7900                     var symbol = l142;
7901                     var func = symbol.fvalue;
7902                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7903                     return func;
7904                 })(), v821)}), ", "), ")");
7905                 return (l233.fvalue(pv, v820) !== l3.value ? l131.fvalue(values, l233.fvalue(pv, v820), v823) : ((((function(){
7906                     var tmp = v820;
7907                     return (typeof tmp == 'object' && 'name' in tmp);
7908                 })()?l4.value: l3.value) !== l3.value ? (((l119.fvalue(pv, v820) === l110.fvalue(pv, "COMMON-LISP"))?l4.value: l3.value) !== l3.value ? (function(){
7909                     var symbol = l316;
7910                     var value = symbol.value;
7911                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7912                     return value;
7913                 })() : l3.value) : l3.value) !== l3.value ? l131.fvalue(values, l142.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l164), l44.fvalue(pv, v820))), ".fvalue", v823) : l131.fvalue(values, l142.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l101), l44.fvalue(pv, v820))), v823)));
7914             })();
7915         })();
7916     }));
7917     return l315;
7918 })();
7919 (function(){
7920     (l219).fvalue = (function(v827){
7921         ((v827)["fname"] = "LS-COMPILE-BLOCK");
7922         return v827;
7923     })((function (values,v825,v826){
7924         checkArgsAtLeast(arguments, 2);
7925         checkArgsAtMost(arguments, 3);
7926         switch(arguments.length-1){
7927         case 1:
7928         v826=l3.value;
7929         default: break;
7930         }
7931         return (function(){
7932             return (v826 !== l3.value ? l131.fvalue(values, l219.fvalue(pv, l85.fvalue(pv, v825)), "return ", l142.fvalue(pv, (function(){
7933                 var tmp = l84.fvalue(pv, v825);
7934                 return tmp === l3.value? l3.value: tmp.car;
7935             })(), (function(){
7936                 var symbol = l169;
7937                 var value = symbol.value;
7938                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7939                 return value;
7940             })()), ";") : l134.fvalue(values, l88.fvalue(pv, (function(){
7941                 var symbol = l192;
7942                 var func = symbol.fvalue;
7943                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7944                 return func;
7945             })(), l73.fvalue(pv, (function(){
7946                 var symbol = l142;
7947                 var func = symbol.fvalue;
7948                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7949                 return func;
7950             })(), v825)), l131.fvalue(pv, ";", (function(){
7951                 var symbol = l130;
7952                 var value = symbol.value;
7953                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7954                 return value;
7955             })())));
7956         })();
7957     }));
7958     return l219;
7959 })();
7960 (function(){
7961     (l142).fvalue = (function(v837){
7962         ((v837)["fname"] = "LS-COMPILE");
7963         return v837;
7964     })((function (values,v828,v829){
7965         checkArgsAtLeast(arguments, 2);
7966         checkArgsAtMost(arguments, 3);
7967         switch(arguments.length-1){
7968         case 1:
7969         v829=l3.value;
7970         default: break;
7971         }
7972         return (function(){
7973             return (function(v830){
7974                 try {
7975                     var tmp;
7976                     tmp = l169.value;
7977                     l169.value = v830;
7978                     v830 = tmp;
7979                     return (((function(){
7980                         var tmp = v828;
7981                         return (typeof tmp == 'object' && 'name' in tmp);
7982                     })()?l4.value: l3.value) !== l3.value ? (function(v831){
7983                         return ((v831 !== l3.value ? l27.fvalue(pv, l86.fvalue(pv, l199, l174.fvalue(pv, v831))) : l3.value) !== l3.value ? l173.fvalue(values, v831) : ((function(v832){
7984                             return (v832 !== l3.value ? v832 : l86.fvalue(pv, l201, l174.fvalue(pv, v831)));
7985                         })(l118.fvalue(pv, v828)) !== l3.value ? l131.fvalue(values, l142.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l164), l44.fvalue(pv, v828))), ".value") : l142.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l286), l44.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l164), l44.fvalue(pv, v828)))))));
7986                     })(l184.fvalue(pv, v828, (function(){
7987                         var symbol = l185;
7988                         var value = symbol.value;
7989                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7990                         return value;
7991                     })(), l102)) : (l79.fvalue(pv, v828) !== l3.value ? l17.fvalue(values, v828) : (((typeof(v828) == "string")?l4.value: l3.value) !== l3.value ? l131.fvalue(values, "\"", l145.fvalue(pv, v828), "\"") : (((function(){
7992                         var x = v828;
7993                         return typeof x === 'object' && 'length' in x;
7994                     })()?l4.value: l3.value) !== l3.value ? l228.fvalue(values, v828) : (l59.fvalue(pv, v828) !== l3.value ? (function(v833,v834){
7995                         return (l94.fvalue(pv, v833, (function(){
7996                             var symbol = l203;
7997                             var value = symbol.value;
7998                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7999                             return value;
8000                         })()) !== l3.value ? (function(v835){
8001                             return (function(){
8002                                 var f = v835;
8003                                 var args = [values];
8004                                 var tail = (v834);
8005                                 while (tail != l3.value){
8006                                     args.push(tail.car);
8007                                     tail = tail.cdr;
8008                                 }
8009                                 return f.apply(this, args);
8010                             })();
8011                         })(l40.fvalue(pv, l94.fvalue(pv, v833, (function(){
8012                             var symbol = l203;
8013                             var value = symbol.value;
8014                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8015                             return value;
8016                         })()))) : ((l94.fvalue(pv, v833, (function(){
8017                             var symbol = l264;
8018                             var value = symbol.value;
8019                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8020                             return value;
8021                         })()) !== l3.value ? l27.fvalue(pv, l197.fvalue(pv, v833, l101, l200)) : l3.value) !== l3.value ? (function(v836){
8022                             return (function(){
8023                                 var f = v836;
8024                                 var args = [values];
8025                                 var tail = (v834);
8026                                 while (tail != l3.value){
8027                                     args.push(tail.car);
8028                                     tail = tail.cdr;
8029                                 }
8030                                 return f.apply(this, args);
8031                             })();
8032                         })(l40.fvalue(pv, l94.fvalue(pv, v833, (function(){
8033                             var symbol = l264;
8034                             var value = symbol.value;
8035                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8036                             return value;
8037                         })()))) : (l195.fvalue(pv, v833) !== l3.value ? l142.fvalue(values, l314.fvalue(pv, v828), v829) : l315.fvalue(values, v833, v834))));
8038                     })((function(){
8039                         var tmp = v828;
8040                         return tmp === l3.value? l3.value: tmp.car;
8041                     })(),(function(){
8042                         var tmp = v828;
8043                         return tmp === l3.value? l3.value: tmp.cdr;
8044                     })()) : (function(){
8045                         throw "How should I compile this?";
8046                     })())))));
8047                 }
8048                 finally {
8049                     l169.value = v830;
8050                 }
8051             })(v829);
8052         })();
8053     }));
8054     return l142;
8055 })();
8056 var l317 = {name: "LS-COMPILE-TOPLEVEL"};
8057 (function(){
8058     (l317).fvalue = (function(v844){
8059         ((v844)["fname"] = "LS-COMPILE-TOPLEVEL");
8060         return v844;
8061     })((function (values,v838,v839){
8062         checkArgsAtLeast(arguments, 2);
8063         checkArgsAtMost(arguments, 3);
8064         switch(arguments.length-1){
8065         case 1:
8066         v839=l3.value;
8067         default: break;
8068         }
8069         return (function(){
8070             return (function(v840){
8071                 try {
8072                     var tmp;
8073                     tmp = l190.value;
8074                     l190.value = v840;
8075                     v840 = tmp;
8076                     return ((((function(){
8077                         var tmp = v838;
8078                         return (typeof tmp == 'object' && 'car' in tmp);
8079                     })()?l4.value: l3.value) !== l3.value ? (((function(){
8080                         var tmp = v838;
8081                         return tmp === l3.value? l3.value: tmp.car;
8082                     })() === l238)?l4.value: l3.value) : l3.value) !== l3.value ? (function(v842){
8083                         return l133.fvalue(values, l88.fvalue(pv, (function(){
8084                             var symbol = l192;
8085                             var func = symbol.fvalue;
8086                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8087                             return func;
8088                         })(), v842));
8089                     })(l73.fvalue(pv, (function (values,v841){
8090                         checkArgs(arguments, 2);
8091                         return l317.fvalue(values, v841, l4.value);
8092                     }), (function(){
8093                         var tmp = v838;
8094                         return tmp === l3.value? l3.value: tmp.cdr;
8095                     })())) : (function(v843){
8096                         return l131.fvalue(values, l134.fvalue(pv, l193.fvalue(pv), l131.fvalue(pv, ";", (function(){
8097                             var symbol = l130;
8098                             var value = symbol.value;
8099                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8100                             return value;
8101                         })())), (v843 !== l3.value ? l131.fvalue(pv, v843, ";", (function(){
8102                             var symbol = l130;
8103                             var value = symbol.value;
8104                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8105                             return value;
8106                         })()) : ""));
8107                     })(l142.fvalue(pv, v838, v839)));
8108                 }
8109                 finally {
8110                     l190.value = v840;
8111                 }
8112             })(l3.value);
8113         })();
8114     }));
8115     return l317;
8116 })();
8117 (function(){
8118     (l239).fvalue = (function(v846){
8119         ((v846)["fname"] = "EVAL");
8120         return v846;
8121     })((function (values,v845){
8122         checkArgs(arguments, 2);
8123         return (function(){
8124             return (function(){
8125                 var string = l317.fvalue(pv, v845, l4.value);
8126                 if (typeof string != 'string')
8127                     throw 'The value ' + string + ' is not a type string.';
8128                 return (function(){
8129                     var v = eval.apply(window, [string]);
8130                     if (typeof v !== 'object' || !('multiple-value' in v)){
8131                         v = [v];
8132                         v['multiple-value'] = true;
8133                     }
8134                     return values.apply(this, v);
8135                 })();
8136             })();
8137         })();
8138     }));
8139     return l239;
8140 })();
8141 var l318 = {name: "&BODY"};
8142 var l319 = QIList(l208,l207,l318,l20,l15,l120,l61,l62,l21,l22,l23,l275,l277,l19,l19,l274,l276,l54,l64,l298,l310,l309,l311,l94,l45,l181,l18,l18,l85,l32,l38,l36,l33,l30,l30,l52,l251,l34,l37,l35,l31,l31,l296,l77,l78,l76,l51,l28,l29,l75,l47,l2,l9,l11,l1,l8,l90,l98,l68,l69,l100,l49,l50,l53,l289,l26,l290,l300,l239,l93,l128,l97,l110,l123,l39,l234,l42,l285,l297,l101,l306,l16,l129,l258,l74,l205,l121,l46,l79,l79,l127,l118,l235,l5,l84,l71,l243,l246,l106,l44,l59,l308,l107,l283,l73,l86,l81,l271,l103,l260,l104,l261,l3,l27,l83,l82,l12,l278,l55,l111,l113,l109,l162,l80,l144,l147,l202,l56,l57,l238,l67,l48,l164,l87,l88,l89,l13,l250,l65,l66,l280,l281,l40,l221,l222,l92,l293,l95,l96,l292,l91,l230,l284,l119,l287,l286,l282,l4,l257,l41,l252,l25,l7,l259,l139,l138,l102,l146,l6,l99,l307,l24,l3);
8143 l128.fvalue(values, l319);
8144 ((l120).value = (function(){
8145     var symbol = l116;
8146     var value = symbol.value;
8147     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8148     return value;
8149 })());
8150 (function(){
8151     var string = "var lisp";
8152     if (typeof string != 'string')
8153         throw 'The value ' + string + ' is not a type string.';
8154     return (function(){
8155         var v = eval.apply(window, [string]);
8156         if (typeof v !== 'object' || !('multiple-value' in v)){
8157             v = [v];
8158             v['multiple-value'] = true;
8159         }
8160         return values.apply(this, v);
8161     })();
8162 })();
8163 (lisp = {});
8164 (lisp.read = (function(){
8165     var symbol = l168;
8166     var func = symbol.fvalue;
8167     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8168     return func;
8169 })());
8170 (lisp.print = (function(){
8171     var symbol = l144;
8172     var func = symbol.fvalue;
8173     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8174     return func;
8175 })());
8176 (lisp.eval = (function(){
8177     var symbol = l239;
8178     var func = symbol.fvalue;
8179     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8180     return func;
8181 })());
8182 (lisp.compile = (function (values,v847){
8183     checkArgs(arguments, 2);
8184     return l317.fvalue(values, v847, l4.value);
8185 }));
8186 (lisp.evalString = (function (values,v848){
8187     checkArgs(arguments, 2);
8188     return l239.fvalue(values, l168.fvalue(pv, v848));
8189 }));
8190 (lisp.compileString = (function (values,v849){
8191     checkArgs(arguments, 2);
8192     return l317.fvalue(values, l168.fvalue(pv, v849), l4.value);
8193 }));
8194 var l320 = QIList(QIList(l318,"l318"),QIList(l317,"l317"),QIList(l316,"l316"),QIList(l315,"l315"),QIList(l314,"l314"),QIList(l313,"l313"),QIList(l312,"l312"),QIList(l311,"l311"),QIList(l310,"l310"),QIList(l309,"l309"),QIList(l308,"l308"),QIList(l307,"l307"),QIList(l306,"l306"),QIList(l305,"l305"),QIList(l304,"l304"),QIList(l303,"l303"),QIList(l302,"l302"),QIList(l301,"l301"),QIList(l300,"l300"),QIList(l299,"l299"),QIList(l298,"l298"),QIList(l297,"l297"),QIList(l296,"l296"),QIList(l295,"l295"),QIList(l294,"l294"),QIList(l293,"l293"),QIList(l292,"l292"),QIList(l291,"l291"),QIList(l290,"l290"),QIList(l289,"l289"),QIList(l288,"l288"),QIList(l287,"l287"),QIList(l286,"l286"),QIList(l285,"l285"),QIList(l284,"l284"),QIList(l283,"l283"),QIList(l282,"l282"),QIList(l281,"l281"),QIList(l280,"l280"),QIList(l279,"l279"),QIList(l278,"l278"),QIList(l277,"l277"),QIList(l276,"l276"),QIList(l275,"l275"),QIList(l274,"l274"),QIList(l273,"l273"),QIList(l272,"l272"),QIList(l271,"l271"),QIList(l270,"l270"),QIList(l269,"l269"),QIList(l268,"l268"),QIList(l267,"l267"),QIList(l266,"l266"),QIList(l265,"l265"),QIList(l264,"l264"),QIList(l263,"l263"),QIList(l262,"l262"),QIList(l261,"l261"),QIList(l260,"l260"),QIList(l259,"l259"),QIList(l258,"l258"),QIList(l257,"l257"),QIList(l256,"l256"),QIList(l255,"l255"),QIList(l254,"l254"),QIList(l253,"l253"),QIList(l252,"l252"),QIList(l251,"l251"),QIList(l250,"l250"),QIList(l249,"l249"),QIList(l248,"l248"),QIList(l247,"l247"),QIList(l246,"l246"),QIList(l245,"l245"),QIList(l244,"l244"),QIList(l243,"l243"),QIList(l242,"l242"),QIList(l241,"l241"),QIList(l240,"l240"),QIList(l239,"l239"),QIList(l238,"l238"),QIList(l237,"l237"),QIList(l236,"l236"),QIList(l235,"l235"),QIList(l234,"l234"),QIList(l233,"l233"),QIList(l232,"l232"),QIList(l231,"l231"),QIList(l230,"l230"),QIList(l229,"l229"),QIList(l228,"l228"),QIList(l227,"l227"),QIList(l226,"l226"),QIList(l225,"l225"),QIList(l224,"l224"),QIList(l223,"l223"),QIList(l222,"l222"),QIList(l221,"l221"),QIList(l220,"l220"),QIList(l219,"l219"),QIList(l218,"l218"),QIList(l217,"l217"),QIList(l216,"l216"),QIList(l215,"l215"),QIList(l214,"l214"),QIList(l213,"l213"),QIList(l212,"l212"),QIList(l211,"l211"),QIList(l210,"l210"),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);
8195 var l321 = {name: "OP"};
8196 var l322 = {name: "SYM"};
8197 var l323 = {name: "X"};
8198 var l324 = {name: "ARGS"};
8199 var l325 = {name: "BODY"};
8200 var l326 = {name: "DECLS"};
8201 var l327 = {name: "DECL"};
8202 var l328 = {name: "NAME"};
8203 var l329 = {name: "ARG"};
8204 var l330 = {name: "FORM"};
8205 var l331 = {name: "PACKAGE-DESIGNATOR"};
8206 var l332 = {name: "VALUE-FROM"};
8207 var l333 = {name: "VARIABLES"};
8208 var l334 = {name: "VARLIST"};
8209 var l335 = {name: "ENDLIST"};
8210 var l336 = {name: "V"};
8211 var l337 = {name: "PAIRS"};
8212 var l338 = {name: "ASSIGNMENTS"};
8213 var l339 = {name: "VALUE"};
8214 var l340 = {name: "FORM1"};
8215 var l341 = {name: "RESULT"};
8216 var l342 = {name: "FORMS"};
8217 var l343 = {name: "G"};
8218 var l344 = {name: "CLAUSULES"};
8219 var l345 = {name: "!FORM"};
8220 var l346 = {name: "CLAUSULE"};
8221 var l347 = {name: "ITER"};
8222 var l348 = {name: "G!TO"};
8223 var l349 = {name: "VAR"};
8224 var l350 = {name: "TO"};
8225 var l351 = {name: "G!LIST"};
8226 var l352 = {name: "PLACE"};
8227 var l353 = {name: "DELTA"};
8228 var l354 = {name: "CONDITION"};
8229 var l355 = {name: "DOCSTRING"};
8230 var l356 = QIList(QIList(QIList(l264,l102,l3,QIList(l199,l3),l3),QIList(l254,l102,l3,QIList(l199,l3),l3),QIList(l253,l102,l3,QIList(l199,l3),l3),QIList(l247,l102,l3,QIList(l199,l3),l3),QIList(l236,l102,l3,QIList(l199,l3),l3),QIList(l226,l102,l3,QIList(l199,l3),l3),QIList(l225,l102,l3,QIList(l199,l3),l3),QIList(l206,l102,l3,QIList(l199,l3),l3),QIList(l203,l102,l3,QIList(l199,l3),l3),QIList(l190,l102,l3,QIList(l199,l3),l3),QIList(l186,l102,l3,QIList(l199,l3),l3),QIList(l185,l102,l3,QIList(l199,l3),l3),QIList(l169,l102,l3,QIList(l199,l3),l3),QIList(l163,l102,l3,QIList(l199,l3),l3),QIList(l130,l102,l3,QIList(l199,l3),l3),QIList(l120,l102,l3,QIList(l199,l3),l3),QIList(l117,l102,l3,QIList(l199,l3),l3),QIList(l116,l102,l3,QIList(l199,l3),l3),QIList(l115,l102,l3,QIList(l199,l3),l3),QIList(l105,l102,l3,QIList(l199,l3),l3),QIList(l15,l102,l3,QIList(l199,l3),l3),QIList(l4,l102,l3,QIList(l199,l201,l3),l3),QIList(l3,l102,l3,QIList(l199,l201,l3),l3),l3),QIList(QIList(l273,l195,QIList(l101,QIList(l5,QIList(l321,l322,l3),QIList(l165,QIList(l265,QIList(l167,l321,l3),QIList(l323,l208,l324,l3),QIList(l243,QIList(QIList(l324,QIList(l28,l323,l324,l3),l3),l3),QIList(l269,l324,QIList(l141,QIList(l272,l324,QIList(l167,l322,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l269,l195,QIList(l101,QIList(l5,QIList(l324,l208,l325,l3),QIList(l7,QIList(l282,l324,l3),QIList(l300,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l3),l3),QIList(l165,QIList(l268,QIList(l167,l324,l3),QIList(l5,QIList(QIList(l167,l324,l3),l3),QIList(l131,"return ",QIList(l166,l325,l3),";",l130,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l267,l195,QIList(l101,QIList(l5,QIList(l326,l208,l325,l3),QIList(l165,QIList(l143,QIList(l166,QIList(l73,QIList(l5,QIList(l327,l3),QIList(l165,QIList(l131,"var ",QIList(l167,QIList(l39,l327,l3),l3)," = ",QIList(l167,QIList(l41,l327,l3),l3),";",l130,l3),l3),l3),l326,l3),l3),QIList(l166,QIList(l73,QIList(l5,QIList(l327,l3),QIList(l165,QIList(l131,"if (typeof ",QIList(l167,QIList(l39,l327,l3),l3)," != '",QIList(l167,QIList(l40,l327,l3),l3),"')",l130,QIList(l140,"throw 'The value ' + ",QIList(l167,QIList(l39,l327,l3),l3)," + ' is not a type ",QIList(l167,QIList(l40,l327,l3),l3),".';",l130,l3),l3),l3),l3),l326,l3),l3),QIList(l131,"return ",QIList(l238,QIList(l166,l325,l3),l3),";",l130,l3),l3),l3),l3),l3),l3,l3),QIList(l266,l195,QIList(l101,QIList(l5,QIList(l328,l324,l208,l325,l3),QIList(l165,QIList(l238,QIList(l265,QIList(l167,l328,l3),QIList(l167,l324,l3),QIList(l243,QIList(l167,QIList(l73,QIList(l5,QIList(l329,l3),QIList(l165,QIList(QIList(l167,l329,l3),QIList(l142,QIList(l167,l329,l3),l3),l3),l3),l3),l324,l3),l3),QIList(l166,l325,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l265,l195,QIList(l101,QIList(l5,QIList(l328,l324,l208,l325,l3),QIList(l165,QIList(l48,QIList(l44,QIList(l164,QIList(l167,l328,l3),l3),QIList(l5,QIList(l167,l324,l3),QIList(l181,QIList(l167,l328,l3),QIList(l166,l325,l3),l3),l3),l3),l264,l3),l3),l3),l3),l3,l3),QIList(l165,l195,QIList(l101,QIList(l5,QIList(l330,l3),QIList(l262,l330,l3),l3),l3),l3,l3),QIList(l240,l195,QIList(l101,QIList(l5,QIList(l328,l324,l330,l3),QIList(l165,QIList(l204,QIList(l167,l328,l3),QIList(l167,l324,l3),QIList(l142,QIList(l167,l330,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l204,l195,QIList(l101,QIList(l5,QIList(l328,l324,l208,l325,l3),QIList(l165,QIList(l48,QIList(l44,QIList(l164,QIList(l167,l328,l3),l3),QIList(l5,QIList(l167,l324,l3),QIList(l181,QIList(l167,l328,l3),QIList(l166,l325,l3),l3),l3),l3),l203,l3),l3),l3),l3),l3,l3),QIList(l143,l195,QIList(l101,QIList(l5,QIList(l208,l325,l3),QIList(l165,QIList(l131,"(function(){",l130,QIList(l140,QIList(l166,l325,l3),l3),"})()",l3),l3),l3),l3),l3,l3),QIList(l132,l195,QIList(l101,QIList(l5,QIList(l102,l208,l330,l3),QIList(l165,QIList(l222,QIList(l167,l102,l3),QIList(l131,QIList(l167,l102,l3),QIList(l238,QIList(l166,l330,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l121,l195,QIList(l101,QIList(l5,QIList(l331,l3),QIList(l165,QIList(l237,QIList(l222,l120,QIList(l108,QIList(l167,l331,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l104,l195,QIList(l101,QIList(l5,QIList(l332,l3),QIList(l165,QIList(l260,QIList(l101,l44,l3),QIList(l167,l332,l3),l3),l3),l3),l3),l3,l3),QIList(l103,l195,QIList(l101,QIList(l5,QIList(l333,l332,l208,l325,l3),QIList(l165,QIList(l260,QIList(l5,QIList(l207,QIList(l166,l333,l3),l208,QIList(l167,QIList(l16,l3),l3),l3),QIList(l166,l325,l3),l3),QIList(l167,l332,l3),l3),l3),l3),l3),l3,l3),QIList(l69,l195,QIList(l101,QIList(l5,QIList(l334,l335,l208,l325,l3),QIList(l165,QIList(l181,l3,QIList(l246,QIList(l167,QIList(l73,QIList(l5,QIList(l323,l3),QIList(l44,QIList(l39,l323,l3),QIList(l40,l323,l3),l3),l3),l334,l3),l3),QIList(l14,l4,QIList(l6,QIList(l167,QIList(l30,l335,l3),l3),QIList(l13,QIList(l238,QIList(l167,QIList(l31,l335,l3),l3),l3),l3),l3),QIList(l257,QIList(l166,l325,l3),l3),QIList(l222,QIList(l166,QIList(l298,QIList(l101,l64,l3),QIList(l73,QIList(l5,QIList(l336,l3),QIList(l54,QIList(l29,QIList(l35,l336,l3),l3),QIList(l44,QIList(l39,l336,l3),QIList(l41,l336,l3),l3),l3),l3),l334,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l68,l195,QIList(l101,QIList(l5,QIList(l334,l335,l208,l325,l3),QIList(l165,QIList(l181,l3,QIList(l243,QIList(l167,QIList(l73,QIList(l5,QIList(l323,l3),QIList(l44,QIList(l39,l323,l3),QIList(l40,l323,l3),l3),l3),l334,l3),l3),QIList(l14,l4,QIList(l6,QIList(l167,QIList(l30,l335,l3),l3),QIList(l13,QIList(l238,QIList(l167,QIList(l31,l335,l3),l3),l3),l3),l3),QIList(l257,QIList(l166,l325,l3),l3),QIList(l67,QIList(l166,QIList(l298,QIList(l101,l64,l3),QIList(l73,QIList(l5,QIList(l336,l3),QIList(l54,QIList(l29,QIList(l35,l336,l3),l3),QIList(l44,QIList(l39,l336,l3),QIList(l41,l336,l3),l3),l3),l3),l334,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l67,l195,QIList(l101,QIList(l5,QIList(l208,l337,l3),QIList(l243,QIList(QIList(l338,QIList(l164,l3,l3),l3),l3),QIList(l14,l4,QIList(l51,QIList(QIList(l12,l337,l3),QIList(l13,l3),l3),QIList(QIList(l12,QIList(l31,l337,l3),l3),QIList(l300,"Odd paris in PSETQ",l3),l3),QIList(l4,QIList(l243,QIList(QIList(l102,QIList(l30,l337,l3),l3),QIList(l339,QIList(l33,l337,l3),l3),l3),QIList(l48,QIList(l165,QIList(QIList(l167,l102,l3),QIList(l167,QIList(l16,l3),l3),QIList(l167,l339,l3),l3),l3),l338,l3),QIList(l222,l337,QIList(l35,l337,l3),l3),l3),l3),l3),l3),QIList(l222,l338,QIList(l66,l338,l3),l3),QIList(l165,QIList(l243,QIList(l167,QIList(l73,QIList(l101,l31,l3),l338,l3),l3),QIList(l222,QIList(l166,QIList(l60,QIList(l101,l64,l3),QIList(l73,QIList(l101,l85,l3),l338,l3),QIList(l164,l3,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l57,l195,QIList(l101,QIList(l5,QIList(l340,l341,l208,l325,l3),QIList(l165,QIList(l56,QIList(l238,QIList(l167,l340,l3),QIList(l167,l341,l3),l3),QIList(l166,l325,l3),l3),l3),l3),l3),l3,l3),QIList(l56,l195,QIList(l101,QIList(l5,QIList(l330,l208,l325,l3),QIList(l243,QIList(QIList(l339,QIList(l16,l3),l3),l3),QIList(l165,QIList(l243,QIList(QIList(QIList(l167,l339,l3),QIList(l167,l330,l3),l3),l3),QIList(l166,l325,l3),QIList(l167,l339,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l55,l195,QIList(l101,QIList(l5,QIList(l208,l342,l3),QIList(l51,QIList(QIList(l12,l342,l3),l3,l3),QIList(QIList(l12,QIList(l31,l342,l3),l3),QIList(l30,l342,l3),l3),QIList(l4,QIList(l243,QIList(QIList(l343,QIList(l16,l3),l3),l3),QIList(l165,QIList(l243,QIList(QIList(QIList(l167,l343,l3),QIList(l167,QIList(l30,l342,l3),l3),l3),l3),QIList(l205,QIList(l167,l343,l3),QIList(l167,l343,l3),QIList(l55,QIList(l166,QIList(l31,l342,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l54,l195,QIList(l101,QIList(l5,QIList(l208,l342,l3),QIList(l51,QIList(QIList(l12,l342,l3),l4,l3),QIList(QIList(l12,QIList(l31,l342,l3),l3),QIList(l30,l342,l3),l3),QIList(l4,QIList(l165,QIList(l205,QIList(l167,QIList(l30,l342,l3),l3),QIList(l54,QIList(l166,QIList(l31,l342,l3),l3),l3),l3,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l53,l195,QIList(l101,QIList(l5,QIList(l330,l208,l344,l3),QIList(l165,QIList(l52,QIList(l167,l330,l3),QIList(l166,QIList(l64,l344,QIList(l165,QIList(QIList(l4,QIList(l300,"ECASE expression failed.",l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l52,l195,QIList(l101,QIList(l5,QIList(l330,l208,l344,l3),QIList(l243,QIList(QIList(l345,QIList(l16,l3),l3),l3),QIList(l165,QIList(l243,QIList(QIList(QIList(l167,l345,l3),QIList(l167,l330,l3),l3),l3),QIList(l51,QIList(l166,QIList(l73,QIList(l5,QIList(l346,l3),QIList(l205,QIList(l289,QIList(l30,l346,l3),l4,l3),l346,QIList(l165,QIList(QIList(l26,QIList(l167,l345,l3),QIList(l164,QIList(l167,QIList(l30,l346,l3),l3),l3),l3),QIList(l166,QIList(l31,l346,l3),l3),l3),l3),l3),l3),l344,l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l51,l195,QIList(l101,QIList(l5,QIList(l208,l344,l3),QIList(l205,QIList(l12,l344,l3),l3,QIList(l205,QIList(l289,QIList(l32,l344,l3),l4,l3),QIList(l165,QIList(l238,QIList(l166,QIList(l34,l344,l3),l3),l3),l3),QIList(l165,QIList(l205,QIList(l167,QIList(l32,l344,l3),l3),QIList(l238,QIList(l166,QIList(l34,l344,l3),l3),l3),QIList(l51,QIList(l166,QIList(l31,l344,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l50,l195,QIList(l101,QIList(l5,QIList(l347,l208,l325,l3),QIList(l243,QIList(QIList(l348,QIList(l16,l3),l3),QIList(l349,QIList(l39,l347,l3),l3),QIList(l350,QIList(l40,l347,l3),l3),QIList(l341,QIList(l41,l347,l3),l3),l3),QIList(l165,QIList(l181,l3,QIList(l243,QIList(QIList(QIList(l167,l349,l3),0,l3),QIList(QIList(l167,l348,l3),QIList(l167,l350,l3),l3),l3),QIList(l229,QIList(l275,QIList(l167,l349,l3),QIList(l167,l348,l3),l3),QIList(l257,QIList(l166,l325,l3),l3),QIList(l46,QIList(l167,l349,l3),l3),l3),QIList(l167,l341,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l49,l195,QIList(l101,QIList(l5,QIList(l347,l208,l325,l3),QIList(l243,QIList(QIList(l349,QIList(l39,l347,l3),l3),QIList(l351,QIList(l16,l3),l3),l3),QIList(l165,QIList(l181,l3,QIList(l243,QIList(QIList(QIList(l167,l351,l3),QIList(l167,QIList(l40,l347,l3),l3),l3),QIList(QIList(l167,l349,l3),l3,l3),l3),QIList(l229,QIList(l167,l351,l3),QIList(l222,QIList(l167,l349,l3),QIList(l30,QIList(l167,l351,l3),l3),l3),QIList(l257,QIList(l166,l325,l3),l3),QIList(l222,QIList(l167,l351,l3),QIList(l31,QIList(l167,l351,l3),l3),l3),l3),QIList(l167,QIList(l41,l347,l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l48,l195,QIList(l101,QIList(l5,QIList(l323,l352,l3),QIList(l165,QIList(l222,QIList(l167,l352,l3),QIList(l28,QIList(l167,l323,l3),QIList(l167,l352,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l47,l195,QIList(l101,QIList(l5,QIList(l323,l207,QIList(l353,1,l3),l3),QIList(l165,QIList(l222,QIList(l167,l323,l3),QIList(l62,QIList(l167,l323,l3),QIList(l167,l353,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l46,l195,QIList(l101,QIList(l5,QIList(l323,l207,QIList(l353,1,l3),l3),QIList(l165,QIList(l222,QIList(l167,l323,l3),QIList(l61,QIList(l167,l323,l3),QIList(l167,l353,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l14,l195,QIList(l101,QIList(l5,QIList(l354,l208,l325,l3),QIList(l165,QIList(l181,l3,QIList(l229,QIList(l167,l354,l3),QIList(l166,l325,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l13,l195,QIList(l101,QIList(l5,QIList(l207,l339,l3),QIList(l165,QIList(l250,l3,QIList(l167,l339,l3),l3),l3),l3),l3),l3,l3),QIList(l11,l195,QIList(l101,QIList(l5,QIList(l328,l324,l208,l325,l3),QIList(l165,QIList(l238,QIList(l285,QIList(l164,QIList(l167,l328,l3),l3),QIList(l10,QIList(l167,QIList(l284,l328,l3),l3),QIList(l167,l324,l3),QIList(l166,QIList(l205,QIList(l54,QIList(l292,QIList(l30,l325,l3),l3),QIList(l27,QIList(l12,QIList(l31,l325,l3),l3),l3),l3),QIList(l165,QIList(QIList(l167,QIList(l30,l325,l3),l3),QIList(l181,QIList(l167,l328,l3),QIList(l166,QIList(l31,l325,l3),l3),l3),l3),l3),QIList(l165,QIList(QIList(l181,QIList(l167,l328,l3),QIList(l166,l325,l3),l3),l3),l3),l3),l3),l3),l3),QIList(l164,QIList(l167,l328,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l10,l195,QIList(l101,QIList(l5,QIList(l328,l324,l208,l325,l3),QIList(l243,QIList(QIList(l323,QIList(l16,"FN",l3),l3),l3),QIList(l165,QIList(l243,QIList(QIList(QIList(l167,l323,l3),QIList(l5,QIList(l167,l324,l3),QIList(l166,l325,l3),l3),l3),l3),QIList(l304,QIList(l167,l323,l3),"fname",QIList(l167,l328,l3),l3),QIList(l167,l323,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l9,l195,QIList(l101,QIList(l5,QIList(l328,l339,l207,l355,l3),QIList(l165,QIList(l238,QIList(l222,QIList(l167,l328,l3),QIList(l167,l339,l3),l3),QIList(l166,QIList(l6,QIList(l292,l355,l3),QIList(l165,QIList(QIList(l304,QIList(l164,QIList(l167,l328,l3),l3),"vardoc",QIList(l167,l355,l3),l3),l3),l3),l3),l3),QIList(l164,QIList(l167,l328,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l8,l195,QIList(l101,QIList(l5,QIList(l328,l339,l207,l355,l3),QIList(l165,QIList(l238,QIList(l2,QIList(l199,QIList(l167,l328,l3),l3),l3),QIList(l7,QIList(l18,QIList(l164,QIList(l167,l328,l3),l3),l3),QIList(l222,QIList(l167,l328,l3),QIList(l167,l339,l3),l3),l3),QIList(l166,QIList(l6,QIList(l292,l355,l3),QIList(l165,QIList(QIList(l304,QIList(l164,QIList(l167,l328,l3),l3),"vardoc",QIList(l167,l355,l3),l3),l3),l3),l3),l3),QIList(l164,QIList(l167,l328,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l7,l195,QIList(l101,QIList(l5,QIList(l354,l208,l325,l3),QIList(l165,QIList(l205,QIList(l167,l354,l3),l3,QIList(l238,QIList(l166,l325,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l6,l195,QIList(l101,QIList(l5,QIList(l354,l208,l325,l3),QIList(l165,QIList(l205,QIList(l167,l354,l3),QIList(l238,QIList(l166,l325,l3),l3),l3,l3),l3),l3),l3),l3,l3),QIList(l5,l195,QIList(l101,QIList(l5,QIList(l324,l208,l325,l3),QIList(l165,QIList(l101,QIList(l5,QIList(l167,l324,l3),QIList(l166,l325,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l2,l195,QIList(l101,QIList(l5,QIList(l208,l326,l3),QIList(l165,QIList(l237,QIList(l166,QIList(l73,QIList(l5,QIList(l327,l3),QIList(l165,QIList(l198,QIList(l164,QIList(l167,l327,l3),l3),l3),l3),l3),l326,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l1,l195,QIList(l101,QIList(l5,QIList(l328,l324,l208,l325,l3),QIList(l165,QIList(l237,QIList(l194,QIList(l164,QIList(l167,l328,l3),l3),QIList(l164,QIList(l101,QIList(l5,QIList(l167,QIList(l73,QIList(l101,QIList(l5,QIList(l323,l3),QIList(l205,QIList(l289,l323,QIList(l164,l318,l3),l3),QIList(l164,l208,l3),l323,l3),l3),l3),l324,l3),l3),QIList(l166,l325,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),l3),l3,l3,l3);
8231 (function(){
8232     l122.fvalue(pv, l318);
8233     l122.fvalue(pv, l317);
8234     l122.fvalue(pv, l316);
8235     l122.fvalue(pv, l315);
8236     l122.fvalue(pv, l314);
8237     l122.fvalue(pv, l313);
8238     l122.fvalue(pv, l312);
8239     l122.fvalue(pv, l311);
8240     l122.fvalue(pv, l310);
8241     l122.fvalue(pv, l309);
8242     l122.fvalue(pv, l308);
8243     l122.fvalue(pv, l307);
8244     l122.fvalue(pv, l306);
8245     l122.fvalue(pv, l305);
8246     l122.fvalue(pv, l304);
8247     l122.fvalue(pv, l303);
8248     l122.fvalue(pv, l302);
8249     l122.fvalue(pv, l301);
8250     l122.fvalue(pv, l300);
8251     l122.fvalue(pv, l299);
8252     l122.fvalue(pv, l298);
8253     l122.fvalue(pv, l297);
8254     l122.fvalue(pv, l296);
8255     l122.fvalue(pv, l295);
8256     l122.fvalue(pv, l294);
8257     l122.fvalue(pv, l293);
8258     l122.fvalue(pv, l292);
8259     l122.fvalue(pv, l291);
8260     l122.fvalue(pv, l290);
8261     l122.fvalue(pv, l289);
8262     l122.fvalue(pv, l288);
8263     l122.fvalue(pv, l287);
8264     l122.fvalue(pv, l286);
8265     l122.fvalue(pv, l285);
8266     l122.fvalue(pv, l284);
8267     l122.fvalue(pv, l283);
8268     l122.fvalue(pv, l282);
8269     l122.fvalue(pv, l281);
8270     l122.fvalue(pv, l280);
8271     l122.fvalue(pv, l279);
8272     l122.fvalue(pv, l278);
8273     l122.fvalue(pv, l277);
8274     l122.fvalue(pv, l276);
8275     l122.fvalue(pv, l275);
8276     l122.fvalue(pv, l274);
8277     l122.fvalue(pv, l273);
8278     l122.fvalue(pv, l272);
8279     l122.fvalue(pv, l271);
8280     l122.fvalue(pv, l270);
8281     l122.fvalue(pv, l269);
8282     l122.fvalue(pv, l268);
8283     l122.fvalue(pv, l267);
8284     l122.fvalue(pv, l266);
8285     l122.fvalue(pv, l265);
8286     l122.fvalue(pv, l264);
8287     l122.fvalue(pv, l263);
8288     l122.fvalue(pv, l262);
8289     l122.fvalue(pv, l261);
8290     l122.fvalue(pv, l260);
8291     l122.fvalue(pv, l259);
8292     l122.fvalue(pv, l258);
8293     l122.fvalue(pv, l257);
8294     l122.fvalue(pv, l256);
8295     l122.fvalue(pv, l255);
8296     l122.fvalue(pv, l254);
8297     l122.fvalue(pv, l253);
8298     l122.fvalue(pv, l252);
8299     l122.fvalue(pv, l251);
8300     l122.fvalue(pv, l250);
8301     l122.fvalue(pv, l249);
8302     l122.fvalue(pv, l248);
8303     l122.fvalue(pv, l247);
8304     l122.fvalue(pv, l246);
8305     l122.fvalue(pv, l245);
8306     l122.fvalue(pv, l244);
8307     l122.fvalue(pv, l243);
8308     l122.fvalue(pv, l242);
8309     l122.fvalue(pv, l241);
8310     l122.fvalue(pv, l240);
8311     l122.fvalue(pv, l239);
8312     l122.fvalue(pv, l238);
8313     l122.fvalue(pv, l237);
8314     l122.fvalue(pv, l236);
8315     l122.fvalue(pv, l235);
8316     l122.fvalue(pv, l234);
8317     l122.fvalue(pv, l233);
8318     l122.fvalue(pv, l232);
8319     l122.fvalue(pv, l231);
8320     l122.fvalue(pv, l230);
8321     l122.fvalue(pv, l229);
8322     l122.fvalue(pv, l228);
8323     l122.fvalue(pv, l227);
8324     l122.fvalue(pv, l226);
8325     l122.fvalue(pv, l225);
8326     l122.fvalue(pv, l224);
8327     l122.fvalue(pv, l223);
8328     l122.fvalue(pv, l222);
8329     l122.fvalue(pv, l221);
8330     l122.fvalue(pv, l220);
8331     l122.fvalue(pv, l219);
8332     l122.fvalue(pv, l218);
8333     l122.fvalue(pv, l217);
8334     l122.fvalue(pv, l216);
8335     l122.fvalue(pv, l215);
8336     l122.fvalue(pv, l214);
8337     l122.fvalue(pv, l213);
8338     l122.fvalue(pv, l212);
8339     l122.fvalue(pv, l211);
8340     l122.fvalue(pv, l210);
8341     l122.fvalue(pv, l208);
8342     l122.fvalue(pv, l207);
8343     l122.fvalue(pv, l206);
8344     l122.fvalue(pv, l205);
8345     l122.fvalue(pv, l204);
8346     l122.fvalue(pv, l203);
8347     l122.fvalue(pv, l202);
8348     l122.fvalue(pv, l201);
8349     l122.fvalue(pv, l200);
8350     l122.fvalue(pv, l199);
8351     l122.fvalue(pv, l198);
8352     l122.fvalue(pv, l197);
8353     l122.fvalue(pv, l196);
8354     l122.fvalue(pv, l195);
8355     l122.fvalue(pv, l194);
8356     l122.fvalue(pv, l193);
8357     l122.fvalue(pv, l192);
8358     l122.fvalue(pv, l191);
8359     l122.fvalue(pv, l190);
8360     l122.fvalue(pv, l189);
8361     l122.fvalue(pv, l188);
8362     l122.fvalue(pv, l187);
8363     l122.fvalue(pv, l186);
8364     l122.fvalue(pv, l185);
8365     l122.fvalue(pv, l184);
8366     l122.fvalue(pv, l183);
8367     l122.fvalue(pv, l182);
8368     l122.fvalue(pv, l181);
8369     l122.fvalue(pv, l180);
8370     l122.fvalue(pv, l179);
8371     l122.fvalue(pv, l178);
8372     l122.fvalue(pv, l177);
8373     l122.fvalue(pv, l176);
8374     l122.fvalue(pv, l175);
8375     l122.fvalue(pv, l174);
8376     l122.fvalue(pv, l173);
8377     l122.fvalue(pv, l172);
8378     l122.fvalue(pv, l171);
8379     l122.fvalue(pv, l170);
8380     l122.fvalue(pv, l169);
8381     l122.fvalue(pv, l168);
8382     l122.fvalue(pv, l167);
8383     l122.fvalue(pv, l166);
8384     l122.fvalue(pv, l165);
8385     l122.fvalue(pv, l164);
8386     l122.fvalue(pv, l163);
8387     l122.fvalue(pv, l162);
8388     l122.fvalue(pv, l161);
8389     l122.fvalue(pv, l160);
8390     l122.fvalue(pv, l159);
8391     l122.fvalue(pv, l158);
8392     l122.fvalue(pv, l157);
8393     l122.fvalue(pv, l156);
8394     l122.fvalue(pv, l155);
8395     l122.fvalue(pv, l154);
8396     l122.fvalue(pv, l153);
8397     l122.fvalue(pv, l152);
8398     l122.fvalue(pv, l151);
8399     l122.fvalue(pv, l150);
8400     l122.fvalue(pv, l149);
8401     l122.fvalue(pv, l148);
8402     l122.fvalue(pv, l147);
8403     l122.fvalue(pv, l146);
8404     l122.fvalue(pv, l145);
8405     l122.fvalue(pv, l144);
8406     l122.fvalue(pv, l143);
8407     l122.fvalue(pv, l142);
8408     l122.fvalue(pv, l141);
8409     l122.fvalue(pv, l140);
8410     l122.fvalue(pv, l139);
8411     l122.fvalue(pv, l138);
8412     l122.fvalue(pv, l137);
8413     l122.fvalue(pv, l136);
8414     l122.fvalue(pv, l135);
8415     l122.fvalue(pv, l134);
8416     l122.fvalue(pv, l133);
8417     l122.fvalue(pv, l132);
8418     l122.fvalue(pv, l131);
8419     l122.fvalue(pv, l130);
8420     l122.fvalue(pv, l129);
8421     l122.fvalue(pv, l128);
8422     l122.fvalue(pv, l127);
8423     l122.fvalue(pv, l126);
8424     l122.fvalue(pv, l125);
8425     l122.fvalue(pv, l124);
8426     l122.fvalue(pv, l123);
8427     l122.fvalue(pv, l122);
8428     l122.fvalue(pv, l121);
8429     l122.fvalue(pv, l120);
8430     l122.fvalue(pv, l119);
8431     l122.fvalue(pv, l118);
8432     l122.fvalue(pv, l117);
8433     l122.fvalue(pv, l116);
8434     l122.fvalue(pv, l115);
8435     l122.fvalue(pv, l114);
8436     l122.fvalue(pv, l113);
8437     l122.fvalue(pv, l112);
8438     l122.fvalue(pv, l111);
8439     l122.fvalue(pv, l110);
8440     l122.fvalue(pv, l109);
8441     l122.fvalue(pv, l108);
8442     l122.fvalue(pv, l107);
8443     l122.fvalue(pv, l106);
8444     l122.fvalue(pv, l105);
8445     l122.fvalue(pv, l104);
8446     l122.fvalue(pv, l103);
8447     l122.fvalue(pv, l102);
8448     l122.fvalue(pv, l101);
8449     l122.fvalue(pv, l100);
8450     l122.fvalue(pv, l99);
8451     l122.fvalue(pv, l98);
8452     l122.fvalue(pv, l97);
8453     l122.fvalue(pv, l96);
8454     l122.fvalue(pv, l95);
8455     l122.fvalue(pv, l94);
8456     l122.fvalue(pv, l93);
8457     l122.fvalue(pv, l92);
8458     l122.fvalue(pv, l91);
8459     l122.fvalue(pv, l90);
8460     l122.fvalue(pv, l89);
8461     l122.fvalue(pv, l88);
8462     l122.fvalue(pv, l87);
8463     l122.fvalue(pv, l86);
8464     l122.fvalue(pv, l85);
8465     l122.fvalue(pv, l84);
8466     l122.fvalue(pv, l83);
8467     l122.fvalue(pv, l82);
8468     l122.fvalue(pv, l81);
8469     l122.fvalue(pv, l80);
8470     l122.fvalue(pv, l79);
8471     l122.fvalue(pv, l78);
8472     l122.fvalue(pv, l77);
8473     l122.fvalue(pv, l76);
8474     l122.fvalue(pv, l75);
8475     l122.fvalue(pv, l74);
8476     l122.fvalue(pv, l73);
8477     l122.fvalue(pv, l72);
8478     l122.fvalue(pv, l71);
8479     l122.fvalue(pv, l70);
8480     l122.fvalue(pv, l69);
8481     l122.fvalue(pv, l68);
8482     l122.fvalue(pv, l67);
8483     l122.fvalue(pv, l66);
8484     l122.fvalue(pv, l65);
8485     l122.fvalue(pv, l64);
8486     l122.fvalue(pv, l63);
8487     l122.fvalue(pv, l62);
8488     l122.fvalue(pv, l61);
8489     l122.fvalue(pv, l60);
8490     l122.fvalue(pv, l59);
8491     l122.fvalue(pv, l58);
8492     l122.fvalue(pv, l57);
8493     l122.fvalue(pv, l56);
8494     l122.fvalue(pv, l55);
8495     l122.fvalue(pv, l54);
8496     l122.fvalue(pv, l53);
8497     l122.fvalue(pv, l52);
8498     l122.fvalue(pv, l51);
8499     l122.fvalue(pv, l50);
8500     l122.fvalue(pv, l49);
8501     l122.fvalue(pv, l48);
8502     l122.fvalue(pv, l47);
8503     l122.fvalue(pv, l46);
8504     l122.fvalue(pv, l45);
8505     l122.fvalue(pv, l44);
8506     l122.fvalue(pv, l43);
8507     l122.fvalue(pv, l42);
8508     l122.fvalue(pv, l41);
8509     l122.fvalue(pv, l40);
8510     l122.fvalue(pv, l39);
8511     l122.fvalue(pv, l38);
8512     l122.fvalue(pv, l37);
8513     l122.fvalue(pv, l36);
8514     l122.fvalue(pv, l35);
8515     l122.fvalue(pv, l34);
8516     l122.fvalue(pv, l33);
8517     l122.fvalue(pv, l32);
8518     l122.fvalue(pv, l31);
8519     l122.fvalue(pv, l30);
8520     l122.fvalue(pv, l29);
8521     l122.fvalue(pv, l28);
8522     l122.fvalue(pv, l27);
8523     l122.fvalue(pv, l26);
8524     l122.fvalue(pv, l25);
8525     l122.fvalue(pv, l24);
8526     l122.fvalue(pv, l23);
8527     l122.fvalue(pv, l22);
8528     l122.fvalue(pv, l21);
8529     l122.fvalue(pv, l20);
8530     l122.fvalue(pv, l19);
8531     l122.fvalue(pv, l18);
8532     l122.fvalue(pv, l17);
8533     l122.fvalue(pv, l16);
8534     l122.fvalue(pv, l15);
8535     l122.fvalue(pv, l14);
8536     l122.fvalue(pv, l13);
8537     l122.fvalue(pv, l12);
8538     l122.fvalue(pv, l11);
8539     l122.fvalue(pv, l10);
8540     l122.fvalue(pv, l9);
8541     l122.fvalue(pv, l8);
8542     l122.fvalue(pv, l7);
8543     l122.fvalue(pv, l6);
8544     l122.fvalue(pv, l5);
8545     l122.fvalue(pv, l4);
8546     l122.fvalue(pv, l3);
8547     l122.fvalue(pv, l2);
8548     l122.fvalue(pv, l1);
8549     ((l225).value = l320);
8550     ((l185).value = l356);
8551     ((l186).value = 849);
8552     ((l15).value = 217);
8553     return ((l247).value = 287);
8554 })();
8555 ((l226).value = 356);