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 ? l142.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l230), l44.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l164), l44.fvalue(pv, v528))))) : l3.value));
4708     })();
4709 })), cdr: (function(){
4710     var symbol = l203;
4711     var value = symbol.value;
4712     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4713     return value;
4714 })()}));
4715 var l231 = {name: "MAKE-FUNCTION-BINDING"};
4716 (function(){
4717     (l231).fvalue = (function(v530){
4718         ((v530)["fname"] = "MAKE-FUNCTION-BINDING");
4719         return v530;
4720     })((function (values,v529){
4721         checkArgs(arguments, 2);
4722         return (function(){
4723             return l170.fvalue(values, v529, l101, l187.fvalue(pv, v529));
4724         })();
4725     }));
4726     return l231;
4727 })();
4728 var l232 = {name: "COMPILE-FUNCTION-DEFINITION"};
4729 (function(){
4730     (l232).fvalue = (function(v532){
4731         ((v532)["fname"] = "COMPILE-FUNCTION-DEFINITION");
4732         return v532;
4733     })((function (values,v531){
4734         checkArgs(arguments, 2);
4735         return (function(){
4736             return l218.fvalue(values, (function(){
4737                 var tmp = v531;
4738                 return tmp === l3.value? l3.value: tmp.car;
4739             })(), (function(){
4740                 var tmp = v531;
4741                 return tmp === l3.value? l3.value: tmp.cdr;
4742             })());
4743         })();
4744     }));
4745     return l232;
4746 })();
4747 var l233 = {name: "TRANSLATE-FUNCTION"};
4748 (function(){
4749     (l233).fvalue = (function(v535){
4750         ((v535)["fname"] = "TRANSLATE-FUNCTION");
4751         return v535;
4752     })((function (values,v533){
4753         checkArgs(arguments, 2);
4754         return (function(){
4755             return (function(v534){
4756                 return l173.fvalue(values, v534);
4757             })(l184.fvalue(pv, v533, (function(){
4758                 var symbol = l185;
4759                 var value = symbol.value;
4760                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4761                 return value;
4762             })(), l101));
4763         })();
4764     }));
4765     return l233;
4766 })();
4767 var l234 = {name: "FLET"};
4768 ((l203).value = ({car: l44.fvalue(pv, l234, (function (values,v537){
4769     checkArgsAtLeast(arguments, 2);
4770     var v536= l3.value;
4771     for (var i = arguments.length-1; i>=2; i--)
4772         v536 = {car: arguments[i], cdr:
4773     v536};
4774     return (function(){
4775         return (function(){
4776             try {
4777                 var v542 = l185.value;
4778                 var v538 = l73.fvalue(pv, (function(){
4779                     var symbol = l30;
4780                     var func = symbol.fvalue;
4781                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4782                     return func;
4783                 })(), v537);
4784                 var v539 = l73.fvalue(pv, (function(){
4785                     var symbol = l31;
4786                     var func = symbol.fvalue;
4787                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4788                     return func;
4789                 })(), v537);
4790                 var v540 = l73.fvalue(pv, (function(){
4791                     var symbol = l232;
4792                     var func = symbol.fvalue;
4793                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4794                     return func;
4795                 })(), v539);
4796                 ((l185).value = l183.fvalue(pv, l73.fvalue(pv, (function(){
4797                     var symbol = l231;
4798                     var func = symbol.fvalue;
4799                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4800                     return func;
4801                 })(), v538), (function(){
4802                     var symbol = l185;
4803                     var value = symbol.value;
4804                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4805                     return value;
4806                 })(), l101));
4807                 return l131.fvalue(values, "(function(", l133.fvalue(pv, l73.fvalue(pv, (function(){
4808                     var symbol = l233;
4809                     var func = symbol.fvalue;
4810                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4811                     return func;
4812                 })(), v538), ","), "){", (function(){
4813                     var symbol = l130;
4814                     var value = symbol.value;
4815                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4816                     return value;
4817                 })(), (function(v541){
4818                     return l140.fvalue(pv, v541);
4819                 })(l219.fvalue(pv, v536, l4.value)), "})(", l133.fvalue(pv, v540, ","), ")");
4820             }
4821             finally {
4822                 l185.value = v542;
4823             }
4824         })();
4825     })();
4826 })), cdr: (function(){
4827     var symbol = l203;
4828     var value = symbol.value;
4829     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4830     return value;
4831 })()}));
4832 var l235 = {name: "LABELS"};
4833 ((l203).value = ({car: l44.fvalue(pv, l235, (function (values,v544){
4834     checkArgsAtLeast(arguments, 2);
4835     var v543= l3.value;
4836     for (var i = arguments.length-1; i>=2; i--)
4837         v543 = {car: arguments[i], cdr:
4838     v543};
4839     return (function(){
4840         return (function(){
4841             try {
4842                 var v547 = l185.value;
4843                 var v545 = l73.fvalue(pv, (function(){
4844                     var symbol = l30;
4845                     var func = symbol.fvalue;
4846                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4847                     return func;
4848                 })(), v544);
4849                 ((l185).value = l183.fvalue(pv, l73.fvalue(pv, (function(){
4850                     var symbol = l231;
4851                     var func = symbol.fvalue;
4852                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4853                     return func;
4854                 })(), v545), (function(){
4855                     var symbol = l185;
4856                     var value = symbol.value;
4857                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4858                     return value;
4859                 })(), l101));
4860                 return l131.fvalue(values, "(function(){", (function(){
4861                     var symbol = l130;
4862                     var value = symbol.value;
4863                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4864                     return value;
4865                 })(), l140.fvalue(pv, l135.fvalue(pv, (function (values,v546){
4866                     checkArgs(arguments, 2);
4867                     return l131.fvalue(values, "var ", l233.fvalue(pv, (function(){
4868                         var tmp = v546;
4869                         return tmp === l3.value? l3.value: tmp.car;
4870                     })()), " = ", l218.fvalue(pv, l33.fvalue(pv, v546), l35.fvalue(pv, v546)), ";", (function(){
4871                         var symbol = l130;
4872                         var value = symbol.value;
4873                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4874                         return value;
4875                     })());
4876                 }), v544), l219.fvalue(pv, v543, l4.value)), "})()");
4877             }
4878             finally {
4879                 l185.value = v547;
4880             }
4881         })();
4882     })();
4883 })), cdr: (function(){
4884     var symbol = l203;
4885     var value = symbol.value;
4886     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4887     return value;
4888 })()}));
4889 var l236 = {name: "*COMPILING-FILE*"};
4890 (function(){
4891     (((l236.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l236).value = l3.value));
4892     return l236;
4893 })();
4894 var l237 = {name: "EVAL-WHEN-COMPILE"};
4895 var l238 = {name: "PROGN"};
4896 var l239 = {name: "EVAL"};
4897 ((l203).value = ({car: l44.fvalue(pv, l237, (function (values){
4898     var v548= l3.value;
4899     for (var i = arguments.length-1; i>=1; i--)
4900         v548 = {car: arguments[i], cdr:
4901     v548};
4902     return (function(){
4903         return ((function(){
4904             var symbol = l236;
4905             var value = symbol.value;
4906             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4907             return value;
4908         })() !== l3.value ? (function(){
4909             l239.fvalue(pv, ({car: l238, cdr: v548}));
4910             return l3.value;
4911         })() : l142.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l238), v548)));
4912     })();
4913 })), cdr: (function(){
4914     var symbol = l203;
4915     var value = symbol.value;
4916     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4917     return value;
4918 })()}));
4919 var l240 = {name: "DEFINE-TRANSFORMATION"};
4920 l240;
4921 ((l203).value = ({car: l44.fvalue(pv, l238, (function (values){
4922     var v549= l3.value;
4923     for (var i = arguments.length-1; i>=1; i--)
4924         v549 = {car: arguments[i], cdr:
4925     v549};
4926     return (function(){
4927         return (l12.fvalue(pv, (function(){
4928             var tmp = v549;
4929             return tmp === l3.value? l3.value: tmp.cdr;
4930         })()) !== l3.value ? l142.fvalue(values, (function(){
4931             var tmp = v549;
4932             return tmp === l3.value? l3.value: tmp.car;
4933         })(), (function(){
4934             var symbol = l169;
4935             var value = symbol.value;
4936             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4937             return value;
4938         })()) : l131.fvalue(values, "(function(){", (function(){
4939             var symbol = l130;
4940             var value = symbol.value;
4941             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4942             return value;
4943         })(), l140.fvalue(pv, l219.fvalue(pv, v549, l4.value)), "})()"));
4944     })();
4945 })), cdr: (function(){
4946     var symbol = l203;
4947     var value = symbol.value;
4948     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4949     return value;
4950 })()}));
4951 var l241 = {name: "SPECIAL-VARIABLE-P"};
4952 (function(){
4953     (l241).fvalue = (function(v551){
4954         ((v551)["fname"] = "SPECIAL-VARIABLE-P");
4955         return v551;
4956     })((function (values,v550){
4957         checkArgs(arguments, 2);
4958         return (function(){
4959             return (l197.fvalue(pv, v550, l102, l199) !== l3.value ? l4.value : l3.value);
4960         })();
4961     }));
4962     return l241;
4963 })();
4964 var l242 = {name: "LET-BINDING-WRAPPER"};
4965 (function(){
4966     (l242).fvalue = (function(v558){
4967         ((v558)["fname"] = "LET-BINDING-WRAPPER");
4968         return v558;
4969     })((function (values,v552,v553){
4970         checkArgs(arguments, 3);
4971         return (function(){
4972             try {
4973                 (l12.fvalue(pv, v552) !== l3.value ? (function(){
4974                     var values = mv;
4975                     throw ({type: 'block', id: 202, values: v553, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
4976                 })() : l3.value);
4977                 return l131.fvalue(values, "try {", (function(){
4978                     var symbol = l130;
4979                     var value = symbol.value;
4980                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4981                     return value;
4982                 })(), l140.fvalue(pv, "var tmp;", (function(){
4983                     var symbol = l130;
4984                     var value = symbol.value;
4985                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4986                     return value;
4987                 })(), l135.fvalue(pv, (function (values,v554){
4988                     checkArgs(arguments, 2);
4989                     return (function(v555){
4990                         return l131.fvalue(values, "tmp = ", v555, ".value;", (function(){
4991                             var symbol = l130;
4992                             var value = symbol.value;
4993                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4994                             return value;
4995                         })(), v555, ".value = ", (function(){
4996                             var tmp = v554;
4997                             return tmp === l3.value? l3.value: tmp.cdr;
4998                         })(), ";", (function(){
4999                             var symbol = l130;
5000                             var value = symbol.value;
5001                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5002                             return value;
5003                         })(), (function(){
5004                             var tmp = v554;
5005                             return tmp === l3.value? l3.value: tmp.cdr;
5006                         })(), " = tmp;", (function(){
5007                             var symbol = l130;
5008                             var value = symbol.value;
5009                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5010                             return value;
5011                         })());
5012                     })(l142.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l164), l44.fvalue(pv, (function(){
5013                         var tmp = v554;
5014                         return tmp === l3.value? l3.value: tmp.car;
5015                     })()))));
5016                 }), v552), v553, (function(){
5017                     var symbol = l130;
5018                     var value = symbol.value;
5019                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5020                     return value;
5021                 })()), "}", (function(){
5022                     var symbol = l130;
5023                     var value = symbol.value;
5024                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5025                     return value;
5026                 })(), "finally {", (function(){
5027                     var symbol = l130;
5028                     var value = symbol.value;
5029                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5030                     return value;
5031                 })(), l140.fvalue(pv, l135.fvalue(pv, (function (values,v556){
5032                     checkArgs(arguments, 2);
5033                     return (function(v557){
5034                         return l131.fvalue(values, v557, ".value", " = ", (function(){
5035                             var tmp = v556;
5036                             return tmp === l3.value? l3.value: tmp.cdr;
5037                         })(), ";", (function(){
5038                             var symbol = l130;
5039                             var value = symbol.value;
5040                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5041                             return value;
5042                         })());
5043                     })(l142.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l164), l44.fvalue(pv, (function(){
5044                         var tmp = v556;
5045                         return tmp === l3.value? l3.value: tmp.car;
5046                     })()))));
5047                 }), v552)), "}", (function(){
5048                     var symbol = l130;
5049                     var value = symbol.value;
5050                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5051                     return value;
5052                 })());
5053             }
5054             catch (cf){
5055                 if (cf.type == 'block' && cf.id == 202)
5056                     return values.apply(this, forcemv(cf.values));
5057                 else
5058                     throw cf;
5059             }
5060         })();
5061     }));
5062     return l242;
5063 })();
5064 var l243 = {name: "LET"};
5065 ((l203).value = ({car: l44.fvalue(pv, l243, (function (values,v560){
5066     checkArgsAtLeast(arguments, 2);
5067     var v559= l3.value;
5068     for (var i = arguments.length-1; i>=2; i--)
5069         v559 = {car: arguments[i], cdr:
5070     v559};
5071     return (function(){
5072         return (function(){
5073             try {
5074                 var v568 = l185.value;
5075                 var v561 = l73.fvalue(pv, (function(){
5076                     var symbol = l58;
5077                     var func = symbol.fvalue;
5078                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5079                     return func;
5080                 })(), v560);
5081                 var v562 = l73.fvalue(pv, (function(){
5082                     var symbol = l39;
5083                     var func = symbol.fvalue;
5084                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5085                     return func;
5086                 })(), v561);
5087                 var v563 = l73.fvalue(pv, (function(){
5088                     var symbol = l142;
5089                     var func = symbol.fvalue;
5090                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5091                     return func;
5092                 })(), l73.fvalue(pv, (function(){
5093                     var symbol = l40;
5094                     var func = symbol.fvalue;
5095                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5096                     return func;
5097                 })(), v561));
5098                 ((l185).value = l189.fvalue(pv, l88.fvalue(pv, (function(){
5099                     var symbol = l241;
5100                     var func = symbol.fvalue;
5101                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5102                     return func;
5103                 })(), v562)));
5104                 var v564 = l3.value;
5105                 return l131.fvalue(values, "(function(", l133.fvalue(pv, l73.fvalue(pv, (function (values,v565){
5106                     checkArgs(arguments, 2);
5107                     return (l241.fvalue(pv, v565) !== l3.value ? (function(v566){
5108                         (v564 = ({car: ({car: v565, cdr: v566}), cdr: v564}));
5109                         return v566;
5110                     })(l187.fvalue(pv, v565)) : l188.fvalue(values, v565));
5111                 }), v562), ","), "){", (function(){
5112                     var symbol = l130;
5113                     var value = symbol.value;
5114                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5115                     return value;
5116                 })(), (function(v567){
5117                     return l140.fvalue(pv, l242.fvalue(pv, v564, v567));
5118                 })(l219.fvalue(pv, v559, l4.value)), "})(", l133.fvalue(pv, v563, ","), ")");
5119             }
5120             finally {
5121                 l185.value = v568;
5122             }
5123         })();
5124     })();
5125 })), cdr: (function(){
5126     var symbol = l203;
5127     var value = symbol.value;
5128     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5129     return value;
5130 })()}));
5131 var l244 = {name: "LET*-INITIALIZE-VALUE"};
5132 (function(){
5133     (l244).fvalue = (function(v575){
5134         ((v575)["fname"] = "LET*-INITIALIZE-VALUE");
5135         return v575;
5136     })((function (values,v569){
5137         checkArgs(arguments, 2);
5138         return (function(){
5139             return (function(v570,v571){
5140                 return (l241.fvalue(pv, v570) !== l3.value ? l131.fvalue(values, l142.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l222), l44.fvalue(pv, v570), l44.fvalue(pv, v571))), ";", (function(){
5141                     var symbol = l130;
5142                     var value = symbol.value;
5143                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5144                     return value;
5145                 })()) : (function(){
5146                     var v572 = l187.fvalue(pv, v570);
5147                     var v573 = l170.fvalue(pv, v570, l102, v572);
5148                     return (function(v574){
5149                         l180.fvalue(pv, v573, (function(){
5150                             var symbol = l185;
5151                             var value = symbol.value;
5152                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5153                             return value;
5154                         })(), l102);
5155                         return v574;
5156                     })(l131.fvalue(pv, "var ", v572, " = ", l142.fvalue(pv, v571), ";", (function(){
5157                         var symbol = l130;
5158                         var value = symbol.value;
5159                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5160                         return value;
5161                     })()));
5162                 })());
5163             })(l39.fvalue(pv, v569),l40.fvalue(pv, v569));
5164         })();
5165     }));
5166     return l244;
5167 })();
5168 var l245 = {name: "LET*-BINDING-WRAPPER"};
5169 (function(){
5170     (l245).fvalue = (function(v584){
5171         ((v584)["fname"] = "LET*-BINDING-WRAPPER");
5172         return v584;
5173     })((function (values,v576,v577){
5174         checkArgs(arguments, 3);
5175         return (function(){
5176             try {
5177                 (l12.fvalue(pv, v576) !== l3.value ? (function(){
5178                     var values = mv;
5179                     throw ({type: 'block', id: 205, values: v577, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
5180                 })() : l3.value);
5181                 return (function(v579){
5182                     return l131.fvalue(values, "try {", (function(){
5183                         var symbol = l130;
5184                         var value = symbol.value;
5185                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5186                         return value;
5187                     })(), l140.fvalue(pv, l135.fvalue(pv, (function (values,v580){
5188                         checkArgs(arguments, 2);
5189                         return (function(v581){
5190                             return l131.fvalue(values, "var ", (function(){
5191                                 var tmp = v580;
5192                                 return tmp === l3.value? l3.value: tmp.cdr;
5193                             })(), " = ", v581, ".value;", (function(){
5194                                 var symbol = l130;
5195                                 var value = symbol.value;
5196                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5197                                 return value;
5198                             })());
5199                         })(l142.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l164), l44.fvalue(pv, (function(){
5200                             var tmp = v580;
5201                             return tmp === l3.value? l3.value: tmp.car;
5202                         })()))));
5203                     }), v579), v577), "}", (function(){
5204                         var symbol = l130;
5205                         var value = symbol.value;
5206                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5207                         return value;
5208                     })(), "finally {", (function(){
5209                         var symbol = l130;
5210                         var value = symbol.value;
5211                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5212                         return value;
5213                     })(), l140.fvalue(pv, l135.fvalue(pv, (function (values,v582){
5214                         checkArgs(arguments, 2);
5215                         return (function(v583){
5216                             return l131.fvalue(values, v583, ".value", " = ", (function(){
5217                                 var tmp = v582;
5218                                 return tmp === l3.value? l3.value: tmp.cdr;
5219                             })(), ";", (function(){
5220                                 var symbol = l130;
5221                                 var value = symbol.value;
5222                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5223                                 return value;
5224                             })());
5225                         })(l142.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l164), l44.fvalue(pv, (function(){
5226                             var tmp = v582;
5227                             return tmp === l3.value? l3.value: tmp.car;
5228                         })()))));
5229                     }), v579)), "}", (function(){
5230                         var symbol = l130;
5231                         var value = symbol.value;
5232                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5233                         return value;
5234                     })());
5235                 })(l73.fvalue(pv, (function (values,v578){
5236                     checkArgs(arguments, 2);
5237                     return ({car: v578, cdr: l187.fvalue(pv, v578)});
5238                 }), l89.fvalue(pv, (function(){
5239                     var symbol = l241;
5240                     var func = symbol.fvalue;
5241                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5242                     return func;
5243                 })(), v576)));
5244             }
5245             catch (cf){
5246                 if (cf.type == 'block' && cf.id == 205)
5247                     return values.apply(this, forcemv(cf.values));
5248                 else
5249                     throw cf;
5250             }
5251         })();
5252     }));
5253     return l245;
5254 })();
5255 var l246 = {name: "LET*"};
5256 ((l203).value = ({car: l44.fvalue(pv, l246, (function (values,v586){
5257     checkArgsAtLeast(arguments, 2);
5258     var v585= l3.value;
5259     for (var i = arguments.length-1; i>=2; i--)
5260         v585 = {car: arguments[i], cdr:
5261     v585};
5262     return (function(){
5263         return (function(v587,v588){
5264             try {
5265                 var tmp;
5266                 tmp = l185.value;
5267                 l185.value = v588;
5268                 v588 = tmp;
5269                 return l131.fvalue(values, "(function(){", (function(){
5270                     var symbol = l130;
5271                     var value = symbol.value;
5272                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5273                     return value;
5274                 })(), l140.fvalue(pv, (function(v589,v590){
5275                     return l245.fvalue(pv, v589, v590);
5276                 })(l89.fvalue(pv, (function(){
5277                     var symbol = l241;
5278                     var func = symbol.fvalue;
5279                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5280                     return func;
5281                 })(), l73.fvalue(pv, (function(){
5282                     var symbol = l39;
5283                     var func = symbol.fvalue;
5284                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5285                     return func;
5286                 })(), v587)),l131.fvalue(pv, l135.fvalue(pv, (function(){
5287                     var symbol = l244;
5288                     var func = symbol.fvalue;
5289                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5290                     return func;
5291                 })(), v587), l219.fvalue(pv, v585, l4.value)))), "})()");
5292             }
5293             finally {
5294                 l185.value = v588;
5295             }
5296         })(l73.fvalue(pv, (function(){
5297             var symbol = l58;
5298             var func = symbol.fvalue;
5299             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5300             return func;
5301         })(), v586),l179.fvalue(pv, (function(){
5302             var symbol = l185;
5303             var value = symbol.value;
5304             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5305             return value;
5306         })()));
5307     })();
5308 })), cdr: (function(){
5309     var symbol = l203;
5310     var value = symbol.value;
5311     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5312     return value;
5313 })()}));
5314 var l247 = {name: "*BLOCK-COUNTER*"};
5315 (function(){
5316     (((l247.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l247).value = 0));
5317     return l247;
5318 })();
5319 var l248 = {name: "MULTIPLE-VALUE"};
5320 var l249 = {name: "USED"};
5321 ((l203).value = ({car: l44.fvalue(pv, l181, (function (values,v592){
5322     checkArgsAtLeast(arguments, 2);
5323     var v591= l3.value;
5324     for (var i = arguments.length-1; i>=2; i--)
5325         v591 = {car: arguments[i], cdr:
5326     v591};
5327     return (function(){
5328         return (function(){
5329             var v593 = l17.fvalue(pv, ((l247).value = (function(){
5330                 var x1 = (function(){
5331                     var symbol = l247;
5332                     var value = symbol.value;
5333                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5334                     return value;
5335                 })();
5336                 if (typeof x1 !== 'number') throw 'Not a number!';
5337                 var x2 = 1;
5338                 if (typeof x2 !== 'number') throw 'Not a number!';
5339                 return x1+x2;
5340             })()));
5341             var v594 = l170.fvalue(pv, v592, l181, v593);
5342             ((function(){
5343                 var symbol = l169;
5344                 var value = symbol.value;
5345                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5346                 return value;
5347             })() !== l3.value ? l177.fvalue(pv, l248, v594) : l3.value);
5348             return (function(){
5349                 try {
5350                     var v596 = l185.value;
5351                     ((l185).value = l183.fvalue(pv, l44.fvalue(pv, v594), (function(){
5352                         var symbol = l185;
5353                         var value = symbol.value;
5354                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5355                         return value;
5356                     })(), l181));
5357                     var v595 = l219.fvalue(pv, v591, l4.value);
5358                     return (l86.fvalue(pv, l249, l174.fvalue(pv, v594)) !== l3.value ? l131.fvalue(values, "(function(){", (function(){
5359                         var symbol = l130;
5360                         var value = symbol.value;
5361                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5362                         return value;
5363                     })(), l140.fvalue(pv, "try {", (function(){
5364                         var symbol = l130;
5365                         var value = symbol.value;
5366                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5367                         return value;
5368                     })(), l140.fvalue(pv, v595), "}", (function(){
5369                         var symbol = l130;
5370                         var value = symbol.value;
5371                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5372                         return value;
5373                     })(), "catch (cf){", (function(){
5374                         var symbol = l130;
5375                         var value = symbol.value;
5376                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5377                         return value;
5378                     })(), "    if (cf.type == 'block' && cf.id == ", v593, ")", (function(){
5379                         var symbol = l130;
5380                         var value = symbol.value;
5381                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5382                         return value;
5383                     })(), ((function(){
5384                         var symbol = l169;
5385                         var value = symbol.value;
5386                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5387                         return value;
5388                     })() !== l3.value ? "        return values.apply(this, forcemv(cf.values));" : "        return cf.values;"), (function(){
5389                         var symbol = l130;
5390                         var value = symbol.value;
5391                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5392                         return value;
5393                     })(), "    else", (function(){
5394                         var symbol = l130;
5395                         var value = symbol.value;
5396                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5397                         return value;
5398                     })(), "        throw cf;", (function(){
5399                         var symbol = l130;
5400                         var value = symbol.value;
5401                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5402                         return value;
5403                     })(), "}", (function(){
5404                         var symbol = l130;
5405                         var value = symbol.value;
5406                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5407                         return value;
5408                     })()), "})()") : l131.fvalue(values, "(function(){", (function(){
5409                         var symbol = l130;
5410                         var value = symbol.value;
5411                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5412                         return value;
5413                     })(), l140.fvalue(pv, v595), "})()"));
5414                 }
5415                 finally {
5416                     l185.value = v596;
5417                 }
5418             })();
5419         })();
5420     })();
5421 })), cdr: (function(){
5422     var symbol = l203;
5423     var value = symbol.value;
5424     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5425     return value;
5426 })()}));
5427 var l250 = {name: "RETURN-FROM"};
5428 ((l203).value = ({car: l44.fvalue(pv, l250, (function (values,v597,v598){
5429     checkArgsAtLeast(arguments, 2);
5430     checkArgsAtMost(arguments, 3);
5431     switch(arguments.length-1){
5432     case 1:
5433     v598=l3.value;
5434     default: break;
5435     }
5436     return (function(){
5437         return (function(){
5438             var v599 = l184.fvalue(pv, v597, (function(){
5439                 var symbol = l185;
5440                 var value = symbol.value;
5441                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5442                 return value;
5443             })(), l181);
5444             var v600 = l86.fvalue(pv, l248, l174.fvalue(pv, v599));
5445             (l12.fvalue(pv, v599) !== l3.value ? (function(){
5446                 throw l131.fvalue(pv, "Unknown block `", (v597).name, "'.");
5447             })() : l3.value);
5448             l177.fvalue(pv, l249, v599);
5449             return l131.fvalue(values, "(function(){", (function(){
5450                 var symbol = l130;
5451                 var value = symbol.value;
5452                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5453                 return value;
5454             })(), l140.fvalue(pv, (v600 !== l3.value ? l131.fvalue(pv, "var values = mv;", (function(){
5455                 var symbol = l130;
5456                 var value = symbol.value;
5457                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5458                 return value;
5459             })()) : ""), "throw ({", "type: 'block', ", "id: ", l173.fvalue(pv, v599), ", ", "values: ", l142.fvalue(pv, v598, v600), ", ", "message: 'Return from unknown block ", (v597).name, ".'", "})"), "})()");
5460         })();
5461     })();
5462 })), cdr: (function(){
5463     var symbol = l203;
5464     var value = symbol.value;
5465     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5466     return value;
5467 })()}));
5468 var l251 = {name: "CATCH"};
5469 ((l203).value = ({car: l44.fvalue(pv, l251, (function (values,v602){
5470     checkArgsAtLeast(arguments, 2);
5471     var v601= l3.value;
5472     for (var i = arguments.length-1; i>=2; i--)
5473         v601 = {car: arguments[i], cdr:
5474     v601};
5475     return (function(){
5476         return l131.fvalue(values, "(function(){", (function(){
5477             var symbol = l130;
5478             var value = symbol.value;
5479             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5480             return value;
5481         })(), l140.fvalue(pv, "var id = ", l142.fvalue(pv, v602), ";", (function(){
5482             var symbol = l130;
5483             var value = symbol.value;
5484             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5485             return value;
5486         })(), "try {", (function(){
5487             var symbol = l130;
5488             var value = symbol.value;
5489             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5490             return value;
5491         })(), l140.fvalue(pv, l219.fvalue(pv, v601, l4.value)), (function(){
5492             var symbol = l130;
5493             var value = symbol.value;
5494             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5495             return value;
5496         })(), "}", (function(){
5497             var symbol = l130;
5498             var value = symbol.value;
5499             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5500             return value;
5501         })(), "catch (cf){", (function(){
5502             var symbol = l130;
5503             var value = symbol.value;
5504             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5505             return value;
5506         })(), "    if (cf.type == 'catch' && cf.id == id)", (function(){
5507             var symbol = l130;
5508             var value = symbol.value;
5509             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5510             return value;
5511         })(), ((function(){
5512             var symbol = l169;
5513             var value = symbol.value;
5514             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5515             return value;
5516         })() !== l3.value ? "        return values.apply(this, forcemv(cf.values));" : "        return pv.apply(this, forcemv(cf.values));"), (function(){
5517             var symbol = l130;
5518             var value = symbol.value;
5519             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5520             return value;
5521         })(), "    else", (function(){
5522             var symbol = l130;
5523             var value = symbol.value;
5524             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5525             return value;
5526         })(), "        throw cf;", (function(){
5527             var symbol = l130;
5528             var value = symbol.value;
5529             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5530             return value;
5531         })(), "}", (function(){
5532             var symbol = l130;
5533             var value = symbol.value;
5534             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5535             return value;
5536         })()), "})()");
5537     })();
5538 })), cdr: (function(){
5539     var symbol = l203;
5540     var value = symbol.value;
5541     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5542     return value;
5543 })()}));
5544 var l252 = {name: "THROW"};
5545 ((l203).value = ({car: l44.fvalue(pv, l252, (function (values,v603,v604){
5546     checkArgs(arguments, 3);
5547     return (function(){
5548         return l131.fvalue(values, "(function(){", (function(){
5549             var symbol = l130;
5550             var value = symbol.value;
5551             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5552             return value;
5553         })(), l140.fvalue(pv, "var values = mv;", (function(){
5554             var symbol = l130;
5555             var value = symbol.value;
5556             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5557             return value;
5558         })(), "throw ({", "type: 'catch', ", "id: ", l142.fvalue(pv, v603), ", ", "values: ", l142.fvalue(pv, v604, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
5559     })();
5560 })), cdr: (function(){
5561     var symbol = l203;
5562     var value = symbol.value;
5563     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5564     return value;
5565 })()}));
5566 var l253 = {name: "*TAGBODY-COUNTER*"};
5567 (function(){
5568     (((l253.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l253).value = 0));
5569     return l253;
5570 })();
5571 var l254 = {name: "*GO-TAG-COUNTER*"};
5572 (function(){
5573     (((l254.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l254).value = 0));
5574     return l254;
5575 })();
5576 var l255 = {name: "GO-TAG-P"};
5577 (function(){
5578     (l255).fvalue = (function(v607){
5579         ((v607)["fname"] = "GO-TAG-P");
5580         return v607;
5581     })((function (values,v605){
5582         checkArgs(arguments, 2);
5583         return (function(){
5584             return (function(v606){
5585                 return (v606 !== l3.value ? v606 : ((function(){
5586                     var tmp = v605;
5587                     return (typeof tmp == 'object' && 'name' in tmp);
5588                 })()?l4.value: l3.value));
5589             })(l79.fvalue(pv, v605));
5590         })();
5591     }));
5592     return l255;
5593 })();
5594 var l256 = {name: "DECLARE-TAGBODY-TAGS"};
5595 (function(){
5596     (l256).fvalue = (function(v613){
5597         ((v613)["fname"] = "DECLARE-TAGBODY-TAGS");
5598         return v613;
5599     })((function (values,v608,v609){
5600         checkArgs(arguments, 3);
5601         return (function(){
5602             return (function(v612){
5603                 return l183.fvalue(values, v612, (function(){
5604                     var symbol = l185;
5605                     var value = symbol.value;
5606                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5607                     return value;
5608                 })(), l182);
5609             })(l73.fvalue(pv, (function (values,v610){
5610                 checkArgs(arguments, 2);
5611                 return (function(v611){
5612                     return l170.fvalue(values, v610, l182, l44.fvalue(pv, v608, v611));
5613                 })(l17.fvalue(pv, ((l254).value = (function(){
5614                     var x1 = (function(){
5615                         var symbol = l254;
5616                         var value = symbol.value;
5617                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5618                         return value;
5619                     })();
5620                     if (typeof x1 !== 'number') throw 'Not a number!';
5621                     var x2 = 1;
5622                     if (typeof x2 !== 'number') throw 'Not a number!';
5623                     return x1+x2;
5624                 })())));
5625             }), l89.fvalue(pv, (function(){
5626                 var symbol = l255;
5627                 var func = symbol.fvalue;
5628                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5629                 return func;
5630             })(), v609)));
5631         })();
5632     }));
5633     return l256;
5634 })();
5635 var l257 = {name: "TAGBODY"};
5636 ((l203).value = ({car: l44.fvalue(pv, l257, (function (values){
5637     var v614= l3.value;
5638     for (var i = arguments.length-1; i>=1; i--)
5639         v614 = {car: arguments[i], cdr:
5640     v614};
5641     return (function(){
5642         try {
5643             (l92.fvalue(pv, (function(){
5644                 var symbol = l255;
5645                 var func = symbol.fvalue;
5646                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5647                 return func;
5648             })(), v614) !== l3.value ? l3.value : (function(){
5649                 var values = mv;
5650                 throw ({type: 'block', id: 213, values: l142.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l238), v614, l44.fvalue(pv, l3))), message: 'Return from unknown block TAGBODY.'})
5651             })());
5652             (l255.fvalue(pv, (function(){
5653                 var tmp = v614;
5654                 return tmp === l3.value? l3.value: tmp.car;
5655             })()) !== l3.value ? l3.value : (v614 = ({car: l16.fvalue(pv, "START"), cdr: v614})));
5656             return (function(v615){
5657                 return (function(v617,v616){
5658                     try {
5659                         var tmp;
5660                         tmp = l185.value;
5661                         l185.value = v617;
5662                         v617 = tmp;
5663                         (function(v618){
5664                             return (v616 = l40.fvalue(pv, l173.fvalue(pv, v618)));
5665                         })(l184.fvalue(pv, l39.fvalue(pv, v614), (function(){
5666                             var symbol = l185;
5667                             var value = symbol.value;
5668                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5669                             return value;
5670                         })(), l182));
5671                         return l131.fvalue(values, "(function(){", (function(){
5672                             var symbol = l130;
5673                             var value = symbol.value;
5674                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5675                             return value;
5676                         })(), l140.fvalue(pv, "var tagbody_", v615, " = ", v616, ";", (function(){
5677                             var symbol = l130;
5678                             var value = symbol.value;
5679                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5680                             return value;
5681                         })(), "tbloop:", (function(){
5682                             var symbol = l130;
5683                             var value = symbol.value;
5684                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5685                             return value;
5686                         })(), "while (true) {", (function(){
5687                             var symbol = l130;
5688                             var value = symbol.value;
5689                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5690                             return value;
5691                         })(), l140.fvalue(pv, "try {", (function(){
5692                             var symbol = l130;
5693                             var value = symbol.value;
5694                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5695                             return value;
5696                         })(), l140.fvalue(pv, (function(v619){
5697                             return l131.fvalue(pv, "switch(tagbody_", v615, "){", (function(){
5698                                 var symbol = l130;
5699                                 var value = symbol.value;
5700                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5701                                 return value;
5702                             })(), "case ", v616, ":", (function(){
5703                                 var symbol = l130;
5704                                 var value = symbol.value;
5705                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5706                                 return value;
5707                             })(), (function(){
5708                                 return (function(v620,v621){
5709                                     (function(){
5710                                         while(v620 !== l3.value){
5711                                             (v621 = (function(){
5712                                                 var tmp = v620;
5713                                                 return tmp === l3.value? l3.value: tmp.car;
5714                                             })());
5715                                             (function(){
5716                                                 (v619 = l131.fvalue(pv, v619, (l27.fvalue(pv, l255.fvalue(pv, v621)) !== l3.value ? l140.fvalue(pv, l142.fvalue(pv, v621), ";", (function(){
5717                                                     var symbol = l130;
5718                                                     var value = symbol.value;
5719                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5720                                                     return value;
5721                                                 })()) : (function(v622){
5722                                                     return l131.fvalue(pv, "case ", l40.fvalue(pv, l173.fvalue(pv, v622)), ":", (function(){
5723                                                         var symbol = l130;
5724                                                         var value = symbol.value;
5725                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5726                                                         return value;
5727                                                     })());
5728                                                 })(l184.fvalue(pv, v621, (function(){
5729                                                     var symbol = l185;
5730                                                     var value = symbol.value;
5731                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5732                                                     return value;
5733                                                 })(), l182)))));
5734                                                 return l3.value;
5735                                             })();
5736                                             (v620 = (function(){
5737                                                 var tmp = v620;
5738                                                 return tmp === l3.value? l3.value: tmp.cdr;
5739                                             })());
5740                                         }return l3.value;
5741                                     })();
5742                                     return v619;
5743                                 })((function(){
5744                                     var tmp = v614;
5745                                     return tmp === l3.value? l3.value: tmp.cdr;
5746                                 })(),l3.value);
5747                             })(), "default:", (function(){
5748                                 var symbol = l130;
5749                                 var value = symbol.value;
5750                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5751                                 return value;
5752                             })(), "    break tbloop;", (function(){
5753                                 var symbol = l130;
5754                                 var value = symbol.value;
5755                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5756                                 return value;
5757                             })(), "}", (function(){
5758                                 var symbol = l130;
5759                                 var value = symbol.value;
5760                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5761                                 return value;
5762                             })());
5763                         })("")), "}", (function(){
5764                             var symbol = l130;
5765                             var value = symbol.value;
5766                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5767                             return value;
5768                         })(), "catch (jump) {", (function(){
5769                             var symbol = l130;
5770                             var value = symbol.value;
5771                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5772                             return value;
5773                         })(), "    if (jump.type == 'tagbody' && jump.id == ", v615, ")", (function(){
5774                             var symbol = l130;
5775                             var value = symbol.value;
5776                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5777                             return value;
5778                         })(), "        tagbody_", v615, " = jump.label;", (function(){
5779                             var symbol = l130;
5780                             var value = symbol.value;
5781                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5782                             return value;
5783                         })(), "    else", (function(){
5784                             var symbol = l130;
5785                             var value = symbol.value;
5786                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5787                             return value;
5788                         })(), "        throw(jump);", (function(){
5789                             var symbol = l130;
5790                             var value = symbol.value;
5791                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5792                             return value;
5793                         })(), "}", (function(){
5794                             var symbol = l130;
5795                             var value = symbol.value;
5796                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5797                             return value;
5798                         })()), "}", (function(){
5799                             var symbol = l130;
5800                             var value = symbol.value;
5801                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5802                             return value;
5803                         })(), "return ", l142.fvalue(pv, l3.value), ";", (function(){
5804                             var symbol = l130;
5805                             var value = symbol.value;
5806                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5807                             return value;
5808                         })()), "})()");
5809                     }
5810                     finally {
5811                         l185.value = v617;
5812                     }
5813                 })(l256.fvalue(pv, v615, v614),l3.value);
5814             })(l17.fvalue(pv, (function(){
5815                 var symbol = l253;
5816                 var value = symbol.value;
5817                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5818                 return value;
5819             })()));
5820         }
5821         catch (cf){
5822             if (cf.type == 'block' && cf.id == 213)
5823                 return values.apply(this, forcemv(cf.values));
5824             else
5825                 throw cf;
5826         }
5827     })();
5828 })), cdr: (function(){
5829     var symbol = l203;
5830     var value = symbol.value;
5831     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5832     return value;
5833 })()}));
5834 var l258 = {name: "GO"};
5835 ((l203).value = ({car: l44.fvalue(pv, l258, (function (values,v623){
5836     checkArgs(arguments, 2);
5837     return (function(){
5838         return (function(v624,v625){
5839             return (v624 !== l3.value ? l131.fvalue(values, "(function(){", (function(){
5840                 var symbol = l130;
5841                 var value = symbol.value;
5842                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5843                 return value;
5844             })(), l140.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l39.fvalue(pv, l173.fvalue(pv, v624)), ", ", "label: ", l40.fvalue(pv, l173.fvalue(pv, v624)), ", ", "message: 'Attempt to GO to non-existing tag ", v625, "'", "})", (function(){
5845                 var symbol = l130;
5846                 var value = symbol.value;
5847                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5848                 return value;
5849             })()), "})()") : (function(){
5850                 throw l131.fvalue(pv, "Unknown tag `", v625, "'.");
5851             })());
5852         })(l184.fvalue(pv, v623, (function(){
5853             var symbol = l185;
5854             var value = symbol.value;
5855             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5856             return value;
5857         })(), l182),(((function(){
5858             var tmp = v623;
5859             return (typeof tmp == 'object' && 'name' in tmp);
5860         })()?l4.value: l3.value) !== l3.value ? (v623).name : (l79.fvalue(pv, v623) !== l3.value ? l17.fvalue(pv, v623) : l3.value)));
5861     })();
5862 })), cdr: (function(){
5863     var symbol = l203;
5864     var value = symbol.value;
5865     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5866     return value;
5867 })()}));
5868 var l259 = {name: "UNWIND-PROTECT"};
5869 ((l203).value = ({car: l44.fvalue(pv, l259, (function (values,v627){
5870     checkArgsAtLeast(arguments, 2);
5871     var v626= l3.value;
5872     for (var i = arguments.length-1; i>=2; i--)
5873         v626 = {car: arguments[i], cdr:
5874     v626};
5875     return (function(){
5876         return l131.fvalue(values, "(function(){", (function(){
5877             var symbol = l130;
5878             var value = symbol.value;
5879             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5880             return value;
5881         })(), l140.fvalue(pv, "var ret = ", l142.fvalue(pv, l3.value), ";", (function(){
5882             var symbol = l130;
5883             var value = symbol.value;
5884             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5885             return value;
5886         })(), "try {", (function(){
5887             var symbol = l130;
5888             var value = symbol.value;
5889             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5890             return value;
5891         })(), l140.fvalue(pv, "ret = ", l142.fvalue(pv, v627), ";", (function(){
5892             var symbol = l130;
5893             var value = symbol.value;
5894             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5895             return value;
5896         })()), "} finally {", (function(){
5897             var symbol = l130;
5898             var value = symbol.value;
5899             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5900             return value;
5901         })(), l140.fvalue(pv, l219.fvalue(pv, v626)), "}", (function(){
5902             var symbol = l130;
5903             var value = symbol.value;
5904             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5905             return value;
5906         })(), "return ret;", (function(){
5907             var symbol = l130;
5908             var value = symbol.value;
5909             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5910             return value;
5911         })()), "})()");
5912     })();
5913 })), cdr: (function(){
5914     var symbol = l203;
5915     var value = symbol.value;
5916     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5917     return value;
5918 })()}));
5919 var l260 = {name: "MULTIPLE-VALUE-CALL"};
5920 ((l203).value = ({car: l44.fvalue(pv, l260, (function (values,v629){
5921     checkArgsAtLeast(arguments, 2);
5922     var v628= l3.value;
5923     for (var i = arguments.length-1; i>=2; i--)
5924         v628 = {car: arguments[i], cdr:
5925     v628};
5926     return (function(){
5927         return l131.fvalue(values, "(function(){", (function(){
5928             var symbol = l130;
5929             var value = symbol.value;
5930             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5931             return value;
5932         })(), l140.fvalue(pv, "var func = ", l142.fvalue(pv, v629), ";", (function(){
5933             var symbol = l130;
5934             var value = symbol.value;
5935             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5936             return value;
5937         })(), "var args = [", ((function(){
5938             var symbol = l169;
5939             var value = symbol.value;
5940             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5941             return value;
5942         })() !== l3.value ? "values" : "pv"), "];", (function(){
5943             var symbol = l130;
5944             var value = symbol.value;
5945             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5946             return value;
5947         })(), "return ", l131.fvalue(pv, "(function(){", (function(){
5948             var symbol = l130;
5949             var value = symbol.value;
5950             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5951             return value;
5952         })(), l140.fvalue(pv, "var values = mv;", (function(){
5953             var symbol = l130;
5954             var value = symbol.value;
5955             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5956             return value;
5957         })(), "var vs;", (function(){
5958             var symbol = l130;
5959             var value = symbol.value;
5960             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5961             return value;
5962         })(), l135.fvalue(pv, (function (values,v630){
5963             checkArgs(arguments, 2);
5964             return l131.fvalue(values, "vs = ", l142.fvalue(pv, v630, l4.value), ";", (function(){
5965                 var symbol = l130;
5966                 var value = symbol.value;
5967                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5968                 return value;
5969             })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){
5970                 var symbol = l130;
5971                 var value = symbol.value;
5972                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5973                 return value;
5974             })(), l140.fvalue(pv, "args = args.concat(vs);", (function(){
5975                 var symbol = l130;
5976                 var value = symbol.value;
5977                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5978                 return value;
5979             })()), "else", (function(){
5980                 var symbol = l130;
5981                 var value = symbol.value;
5982                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5983                 return value;
5984             })(), l140.fvalue(pv, "args.push(vs);", (function(){
5985                 var symbol = l130;
5986                 var value = symbol.value;
5987                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5988                 return value;
5989             })()));
5990         }), v628), "return func.apply(window, args);", (function(){
5991             var symbol = l130;
5992             var value = symbol.value;
5993             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5994             return value;
5995         })()), "})()"), ";", (function(){
5996             var symbol = l130;
5997             var value = symbol.value;
5998             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5999             return value;
6000         })()), "})()");
6001     })();
6002 })), cdr: (function(){
6003     var symbol = l203;
6004     var value = symbol.value;
6005     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6006     return value;
6007 })()}));
6008 var l261 = {name: "MULTIPLE-VALUE-PROG1"};
6009 ((l203).value = ({car: l44.fvalue(pv, l261, (function (values,v632){
6010     checkArgsAtLeast(arguments, 2);
6011     var v631= l3.value;
6012     for (var i = arguments.length-1; i>=2; i--)
6013         v631 = {car: arguments[i], cdr:
6014     v631};
6015     return (function(){
6016         return l131.fvalue(values, "(function(){", (function(){
6017             var symbol = l130;
6018             var value = symbol.value;
6019             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6020             return value;
6021         })(), l140.fvalue(pv, "var args = ", l142.fvalue(pv, v632, (function(){
6022             var symbol = l169;
6023             var value = symbol.value;
6024             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6025             return value;
6026         })()), ";", (function(){
6027             var symbol = l130;
6028             var value = symbol.value;
6029             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6030             return value;
6031         })(), l219.fvalue(pv, v631), "return args;", (function(){
6032             var symbol = l130;
6033             var value = symbol.value;
6034             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6035             return value;
6036         })()), "})()");
6037     })();
6038 })), cdr: (function(){
6039     var symbol = l203;
6040     var value = symbol.value;
6041     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6042     return value;
6043 })()}));
6044 var l262 = {name: "BACKQUOTE-EXPAND-1"};
6045 (function(){
6046     (l262).fvalue = (function(v635){
6047         ((v635)["fname"] = "BACKQUOTE-EXPAND-1");
6048         return v635;
6049     })((function (values,v633){
6050         checkArgs(arguments, 2);
6051         return (function(){
6052             return (((function(){
6053                 var tmp = v633;
6054                 return (typeof tmp == 'object' && 'name' in tmp);
6055             })()?l4.value: l3.value) !== l3.value ? l44.fvalue(values, l164, v633) : (l45.fvalue(pv, v633) !== l3.value ? v633 : ((((function(){
6056                 var tmp = v633;
6057                 return tmp === l3.value? l3.value: tmp.car;
6058             })() === l167)?l4.value: l3.value) !== l3.value ? (function(){
6059                 var tmp = v633;
6060                 return tmp === l3.value? l3.value: tmp.car;
6061             })() : ((((function(){
6062                 var tmp = v633;
6063                 return tmp === l3.value? l3.value: tmp.car;
6064             })() === l165)?l4.value: l3.value) !== l3.value ? l262.fvalue(values, l262.fvalue(pv, l33.fvalue(pv, v633))) : ({car: l64, cdr: l73.fvalue(pv, (function (values,v634){
6065                 checkArgs(arguments, 2);
6066                 return ((l59.fvalue(pv, v634) !== l3.value ? (((function(){
6067                     var tmp = v634;
6068                     return tmp === l3.value? l3.value: tmp.car;
6069                 })() === l167)?l4.value: l3.value) : l3.value) !== l3.value ? l44.fvalue(values, l44, l33.fvalue(pv, v634)) : ((l59.fvalue(pv, v634) !== l3.value ? (((function(){
6070                     var tmp = v634;
6071                     return tmp === l3.value? l3.value: tmp.car;
6072                 })() === l166)?l4.value: l3.value) : l3.value) !== l3.value ? l33.fvalue(values, v634) : l44.fvalue(values, l44, l262.fvalue(pv, v634))));
6073             }), v633)})))));
6074         })();
6075     }));
6076     return l262;
6077 })();
6078 var l263 = {name: "BACKQUOTE-EXPAND"};
6079 (function(){
6080     (l263).fvalue = (function(v637){
6081         ((v637)["fname"] = "BACKQUOTE-EXPAND");
6082         return v637;
6083     })((function (values,v636){
6084         checkArgs(arguments, 2);
6085         return (function(){
6086             return ((l59.fvalue(pv, v636) !== l3.value ? (((function(){
6087                 var tmp = v636;
6088                 return tmp === l3.value? l3.value: tmp.car;
6089             })() === l165)?l4.value: l3.value) : l3.value) !== l3.value ? l262.fvalue(values, l33.fvalue(pv, v636)) : v636);
6090         })();
6091     }));
6092     return l263;
6093 })();
6094 l165;
6095 ((l203).value = ({car: l44.fvalue(pv, l165, (function (values,v638){
6096     checkArgs(arguments, 2);
6097     return (function(){
6098         return l142.fvalue(values, l262.fvalue(pv, v638));
6099     })();
6100 })), cdr: (function(){
6101     var symbol = l203;
6102     var value = symbol.value;
6103     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6104     return value;
6105 })()}));
6106 var l264 = {name: "*BUILTINS*"};
6107 (function(){
6108     (((l264.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l264).value = l3.value));
6109     return l264;
6110 })();
6111 var l265 = {name: "DEFINE-RAW-BUILTIN"};
6112 l265;
6113 var l266 = {name: "DEFINE-BUILTIN"};
6114 l266;
6115 var l267 = {name: "TYPE-CHECK"};
6116 l267;
6117 var l268 = {name: "VARIABLE-ARITY-CALL"};
6118 (function(){
6119     (l268).fvalue = (function(v647){
6120         ((v647)["fname"] = "VARIABLE-ARITY-CALL");
6121         return v647;
6122     })((function (values,v639,v640){
6123         checkArgs(arguments, 3);
6124         return (function(){
6125             (((function(){
6126                 var tmp = v639;
6127                 return (typeof tmp == 'object' && 'car' in tmp);
6128             })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
6129                 throw "ARGS must be a non-empty list";
6130             })());
6131             return (function(v641,v642,v643){
6132                 (function(){
6133                     return (function(v644,v645){
6134                         (function(){
6135                             while(v644 !== l3.value){
6136                                 (v645 = (function(){
6137                                     var tmp = v644;
6138                                     return tmp === l3.value? l3.value: tmp.car;
6139                                 })());
6140                                 (function(){
6141                                     (function(v646){
6142                                         (v642 = ({car: v646, cdr: v642}));
6143                                         return (v643 = l131.fvalue(pv, v643, l131.fvalue(pv, "var ", v646, " = ", l142.fvalue(pv, v645), ";", (function(){
6144                                             var symbol = l130;
6145                                             var value = symbol.value;
6146                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6147                                             return value;
6148                                         })(), "if (typeof ", v646, " !== 'number') throw 'Not a number!';", (function(){
6149                                             var symbol = l130;
6150                                             var value = symbol.value;
6151                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6152                                             return value;
6153                                         })())));
6154                                     })(l131.fvalue(pv, "x", l17.fvalue(pv, (v641 = (function(){
6155                                         var x1 = v641;
6156                                         if (typeof x1 !== 'number') throw 'Not a number!';
6157                                         var x2 = 1;
6158                                         if (typeof x2 !== 'number') throw 'Not a number!';
6159                                         return x1+x2;
6160                                     })()))));
6161                                     return l3.value;
6162                                 })();
6163                                 (v644 = (function(){
6164                                     var tmp = v644;
6165                                     return tmp === l3.value? l3.value: tmp.cdr;
6166                                 })());
6167                             }return l3.value;
6168                         })();
6169                         return l3.value;
6170                     })(v639,l3.value);
6171                 })();
6172                 return l131.fvalue(values, "(function(){", (function(){
6173                     var symbol = l130;
6174                     var value = symbol.value;
6175                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6176                     return value;
6177                 })(), l140.fvalue(pv, v643, (v640)(pv, l66.fvalue(pv, v642))), "})()");
6178             })(0,l3,"");
6179         })();
6180     }));
6181     return l268;
6182 })();
6183 var l269 = {name: "VARIABLE-ARITY"};
6184 l269;
6185 var l270 = {name: "NUM-OP-NUM"};
6186 (function(){
6187     (l270).fvalue = (function(v651){
6188         ((v651)["fname"] = "NUM-OP-NUM");
6189         return v651;
6190     })((function (values,v648,v649,v650){
6191         checkArgs(arguments, 4);
6192         return (function(){
6193             return l131.fvalue(values, "(function(){", (function(){
6194                 var symbol = l130;
6195                 var value = symbol.value;
6196                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6197                 return value;
6198             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "x", " = ", v648, ";", (function(){
6199                 var symbol = l130;
6200                 var value = symbol.value;
6201                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6202                 return value;
6203             })()), l131.fvalue(pv, "var ", "y", " = ", v650, ";", (function(){
6204                 var symbol = l130;
6205                 var value = symbol.value;
6206                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6207                 return value;
6208             })()), l131.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6209                 var symbol = l130;
6210                 var value = symbol.value;
6211                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6212                 return value;
6213             })(), l140.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6214                 var symbol = l130;
6215                 var value = symbol.value;
6216                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6217                 return value;
6218             })())), l131.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
6219                 var symbol = l130;
6220                 var value = symbol.value;
6221                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6222                 return value;
6223             })(), l140.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
6224                 var symbol = l130;
6225                 var value = symbol.value;
6226                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6227                 return value;
6228             })())), l131.fvalue(pv, "return ", l131.fvalue(pv, "x", v649, "y"), ";", (function(){
6229                 var symbol = l130;
6230                 var value = symbol.value;
6231                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6232                 return value;
6233             })())), "})()");
6234         })();
6235     }));
6236     return l270;
6237 })();
6238 ((l264).value = ({car: l44.fvalue(pv, l61, (function (values){
6239     var v652= l3.value;
6240     for (var i = arguments.length-1; i>=1; i--)
6241         v652 = {car: arguments[i], cdr:
6242     v652};
6243     return (function(){
6244         return (l12.fvalue(pv, v652) !== l3.value ? "0" : l268.fvalue(values, v652, (function (values,v653){
6245             checkArgs(arguments, 2);
6246             return l131.fvalue(values, "return ", l133.fvalue(pv, v653, "+"), ";", (function(){
6247                 var symbol = l130;
6248                 var value = symbol.value;
6249                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6250                 return value;
6251             })());
6252         })));
6253     })();
6254 })), cdr: (function(){
6255     var symbol = l264;
6256     var value = symbol.value;
6257     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6258     return value;
6259 })()}));
6260 ((l264).value = ({car: l44.fvalue(pv, l62, (function (values,v655){
6261     checkArgsAtLeast(arguments, 2);
6262     var v654= l3.value;
6263     for (var i = arguments.length-1; i>=2; i--)
6264         v654 = {car: arguments[i], cdr:
6265     v654};
6266     return (function(){
6267         return (function(v656){
6268             return l268.fvalue(values, v656, (function (values,v657){
6269                 checkArgs(arguments, 2);
6270                 return l131.fvalue(values, "return ", (l12.fvalue(pv, v654) !== l3.value ? l131.fvalue(pv, "-", (function(){
6271                     var tmp = v657;
6272                     return tmp === l3.value? l3.value: tmp.car;
6273                 })()) : l133.fvalue(pv, v657, "-")), ";", (function(){
6274                     var symbol = l130;
6275                     var value = symbol.value;
6276                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6277                     return value;
6278                 })());
6279             }));
6280         })(({car: v655, cdr: v654}));
6281     })();
6282 })), cdr: (function(){
6283     var symbol = l264;
6284     var value = symbol.value;
6285     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6286     return value;
6287 })()}));
6288 ((l264).value = ({car: l44.fvalue(pv, l20, (function (values){
6289     var v658= l3.value;
6290     for (var i = arguments.length-1; i>=1; i--)
6291         v658 = {car: arguments[i], cdr:
6292     v658};
6293     return (function(){
6294         return (l12.fvalue(pv, v658) !== l3.value ? "1" : l268.fvalue(values, v658, (function (values,v659){
6295             checkArgs(arguments, 2);
6296             return l131.fvalue(values, "return ", l133.fvalue(pv, v659, "*"), ";", (function(){
6297                 var symbol = l130;
6298                 var value = symbol.value;
6299                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6300                 return value;
6301             })());
6302         })));
6303     })();
6304 })), cdr: (function(){
6305     var symbol = l264;
6306     var value = symbol.value;
6307     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6308     return value;
6309 })()}));
6310 ((l264).value = ({car: l44.fvalue(pv, l21, (function (values,v661){
6311     checkArgsAtLeast(arguments, 2);
6312     var v660= l3.value;
6313     for (var i = arguments.length-1; i>=2; i--)
6314         v660 = {car: arguments[i], cdr:
6315     v660};
6316     return (function(){
6317         return (function(v662){
6318             return l268.fvalue(values, v662, (function (values,v663){
6319                 checkArgs(arguments, 2);
6320                 return l131.fvalue(values, "return ", (l12.fvalue(pv, v660) !== l3.value ? l131.fvalue(pv, "1 /", (function(){
6321                     var tmp = v663;
6322                     return tmp === l3.value? l3.value: tmp.car;
6323                 })()) : l133.fvalue(pv, v663, "/")), ";", (function(){
6324                     var symbol = l130;
6325                     var value = symbol.value;
6326                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6327                     return value;
6328                 })());
6329             }));
6330         })(({car: v661, cdr: v660}));
6331     })();
6332 })), cdr: (function(){
6333     var symbol = l264;
6334     var value = symbol.value;
6335     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6336     return value;
6337 })()}));
6338 var l271 = {name: "MOD"};
6339 ((l264).value = ({car: l44.fvalue(pv, l271, (function (values,v664,v665){
6340     checkArgs(arguments, 3);
6341     return (function(){
6342         return (function(v666,v667){
6343             return l270.fvalue(values, v666, "%", v667);
6344         })(l142.fvalue(pv, v664),l142.fvalue(pv, v665));
6345     })();
6346 })), cdr: (function(){
6347     var symbol = l264;
6348     var value = symbol.value;
6349     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6350     return value;
6351 })()}));
6352 var l272 = {name: "COMPARISON-CONJUNTION"};
6353 (function(){
6354     (l272).fvalue = (function(v670){
6355         ((v670)["fname"] = "COMPARISON-CONJUNTION");
6356         return v670;
6357     })((function (values,v668,v669){
6358         checkArgs(arguments, 3);
6359         return (function(){
6360             return (l12.fvalue(pv, (function(){
6361                 var tmp = v668;
6362                 return tmp === l3.value? l3.value: tmp.cdr;
6363             })()) !== l3.value ? "true" : (l12.fvalue(pv, l35.fvalue(pv, v668)) !== l3.value ? l131.fvalue(values, (function(){
6364                 var tmp = v668;
6365                 return tmp === l3.value? l3.value: tmp.car;
6366             })(), v669, l33.fvalue(pv, v668)) : l131.fvalue(values, (function(){
6367                 var tmp = v668;
6368                 return tmp === l3.value? l3.value: tmp.car;
6369             })(), v669, l33.fvalue(pv, v668), " && ", l272.fvalue(pv, (function(){
6370                 var tmp = v668;
6371                 return tmp === l3.value? l3.value: tmp.cdr;
6372             })(), v669))));
6373         })();
6374     }));
6375     return l272;
6376 })();
6377 var l273 = {name: "DEFINE-BUILTIN-COMPARISON"};
6378 l273;
6379 var l274 = {name: ">"};
6380 ((l264).value = ({car: l44.fvalue(pv, l274, (function (values,v672){
6381     checkArgsAtLeast(arguments, 2);
6382     var v671= l3.value;
6383     for (var i = arguments.length-1; i>=2; i--)
6384         v671 = {car: arguments[i], cdr:
6385     v671};
6386     return (function(){
6387         return (function(v673){
6388             return l268.fvalue(values, v673, (function (values,v674){
6389                 checkArgs(arguments, 2);
6390                 return l131.fvalue(values, "return ", l141.fvalue(pv, l272.fvalue(pv, v674, ">")), ";", (function(){
6391                     var symbol = l130;
6392                     var value = symbol.value;
6393                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6394                     return value;
6395                 })());
6396             }));
6397         })(({car: v672, cdr: v671}));
6398     })();
6399 })), cdr: (function(){
6400     var symbol = l264;
6401     var value = symbol.value;
6402     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6403     return value;
6404 })()}));
6405 var l275 = {name: "<"};
6406 ((l264).value = ({car: l44.fvalue(pv, l275, (function (values,v676){
6407     checkArgsAtLeast(arguments, 2);
6408     var v675= l3.value;
6409     for (var i = arguments.length-1; i>=2; i--)
6410         v675 = {car: arguments[i], cdr:
6411     v675};
6412     return (function(){
6413         return (function(v677){
6414             return l268.fvalue(values, v677, (function (values,v678){
6415                 checkArgs(arguments, 2);
6416                 return l131.fvalue(values, "return ", l141.fvalue(pv, l272.fvalue(pv, v678, "<")), ";", (function(){
6417                     var symbol = l130;
6418                     var value = symbol.value;
6419                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6420                     return value;
6421                 })());
6422             }));
6423         })(({car: v676, cdr: v675}));
6424     })();
6425 })), cdr: (function(){
6426     var symbol = l264;
6427     var value = symbol.value;
6428     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6429     return value;
6430 })()}));
6431 var l276 = {name: ">="};
6432 ((l264).value = ({car: l44.fvalue(pv, l276, (function (values,v680){
6433     checkArgsAtLeast(arguments, 2);
6434     var v679= l3.value;
6435     for (var i = arguments.length-1; i>=2; i--)
6436         v679 = {car: arguments[i], cdr:
6437     v679};
6438     return (function(){
6439         return (function(v681){
6440             return l268.fvalue(values, v681, (function (values,v682){
6441                 checkArgs(arguments, 2);
6442                 return l131.fvalue(values, "return ", l141.fvalue(pv, l272.fvalue(pv, v682, ">=")), ";", (function(){
6443                     var symbol = l130;
6444                     var value = symbol.value;
6445                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6446                     return value;
6447                 })());
6448             }));
6449         })(({car: v680, cdr: v679}));
6450     })();
6451 })), cdr: (function(){
6452     var symbol = l264;
6453     var value = symbol.value;
6454     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6455     return value;
6456 })()}));
6457 var l277 = {name: "<="};
6458 ((l264).value = ({car: l44.fvalue(pv, l277, (function (values,v684){
6459     checkArgsAtLeast(arguments, 2);
6460     var v683= l3.value;
6461     for (var i = arguments.length-1; i>=2; i--)
6462         v683 = {car: arguments[i], cdr:
6463     v683};
6464     return (function(){
6465         return (function(v685){
6466             return l268.fvalue(values, v685, (function (values,v686){
6467                 checkArgs(arguments, 2);
6468                 return l131.fvalue(values, "return ", l141.fvalue(pv, l272.fvalue(pv, v686, "<=")), ";", (function(){
6469                     var symbol = l130;
6470                     var value = symbol.value;
6471                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6472                     return value;
6473                 })());
6474             }));
6475         })(({car: v684, cdr: v683}));
6476     })();
6477 })), cdr: (function(){
6478     var symbol = l264;
6479     var value = symbol.value;
6480     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6481     return value;
6482 })()}));
6483 ((l264).value = ({car: l44.fvalue(pv, l19, (function (values,v688){
6484     checkArgsAtLeast(arguments, 2);
6485     var v687= l3.value;
6486     for (var i = arguments.length-1; i>=2; i--)
6487         v687 = {car: arguments[i], cdr:
6488     v687};
6489     return (function(){
6490         return (function(v689){
6491             return l268.fvalue(values, v689, (function (values,v690){
6492                 checkArgs(arguments, 2);
6493                 return l131.fvalue(values, "return ", l141.fvalue(pv, l272.fvalue(pv, v690, "==")), ";", (function(){
6494                     var symbol = l130;
6495                     var value = symbol.value;
6496                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6497                     return value;
6498                 })());
6499             }));
6500         })(({car: v688, cdr: v687}));
6501     })();
6502 })), cdr: (function(){
6503     var symbol = l264;
6504     var value = symbol.value;
6505     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6506     return value;
6507 })()}));
6508 var l278 = {name: "NUMBERP"};
6509 ((l264).value = ({car: l44.fvalue(pv, l278, (function (values,v691){
6510     checkArgs(arguments, 2);
6511     return (function(){
6512         return (function(v692){
6513             return l141.fvalue(values, l131.fvalue(pv, "(typeof (", v692, ") == \"number\")"));
6514         })(l142.fvalue(pv, v691));
6515     })();
6516 })), cdr: (function(){
6517     var symbol = l264;
6518     var value = symbol.value;
6519     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6520     return value;
6521 })()}));
6522 var l279 = {name: "FLOOR"};
6523 ((l264).value = ({car: l44.fvalue(pv, l279, (function (values,v693){
6524     checkArgs(arguments, 2);
6525     return (function(){
6526         return (function(v694){
6527             return l131.fvalue(values, "(function(){", (function(){
6528                 var symbol = l130;
6529                 var value = symbol.value;
6530                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6531                 return value;
6532             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "x", " = ", v694, ";", (function(){
6533                 var symbol = l130;
6534                 var value = symbol.value;
6535                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6536                 return value;
6537             })()), l131.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6538                 var symbol = l130;
6539                 var value = symbol.value;
6540                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6541                 return value;
6542             })(), l140.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6543                 var symbol = l130;
6544                 var value = symbol.value;
6545                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6546                 return value;
6547             })())), l131.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){
6548                 var symbol = l130;
6549                 var value = symbol.value;
6550                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6551                 return value;
6552             })())), "})()");
6553         })(l142.fvalue(pv, v693));
6554     })();
6555 })), cdr: (function(){
6556     var symbol = l264;
6557     var value = symbol.value;
6558     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6559     return value;
6560 })()}));
6561 ((l264).value = ({car: l44.fvalue(pv, l28, (function (values,v695,v696){
6562     checkArgs(arguments, 3);
6563     return (function(){
6564         return (function(v697,v698){
6565             return l131.fvalue(values, "({car: ", v697, ", cdr: ", v698, "})");
6566         })(l142.fvalue(pv, v695),l142.fvalue(pv, v696));
6567     })();
6568 })), cdr: (function(){
6569     var symbol = l264;
6570     var value = symbol.value;
6571     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6572     return value;
6573 })()}));
6574 ((l264).value = ({car: l44.fvalue(pv, l29, (function (values,v699){
6575     checkArgs(arguments, 2);
6576     return (function(){
6577         return (function(v700){
6578             return l141.fvalue(values, l131.fvalue(pv, "(function(){", (function(){
6579                 var symbol = l130;
6580                 var value = symbol.value;
6581                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6582                 return value;
6583             })(), l140.fvalue(pv, "var tmp = ", v700, ";", (function(){
6584                 var symbol = l130;
6585                 var value = symbol.value;
6586                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6587                 return value;
6588             })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
6589                 var symbol = l130;
6590                 var value = symbol.value;
6591                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6592                 return value;
6593             })()), "})()"));
6594         })(l142.fvalue(pv, v699));
6595     })();
6596 })), cdr: (function(){
6597     var symbol = l264;
6598     var value = symbol.value;
6599     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6600     return value;
6601 })()}));
6602 ((l264).value = ({car: l44.fvalue(pv, l30, (function (values,v701){
6603     checkArgs(arguments, 2);
6604     return (function(){
6605         return (function(v702){
6606             return l131.fvalue(values, "(function(){", (function(){
6607                 var symbol = l130;
6608                 var value = symbol.value;
6609                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6610                 return value;
6611             })(), l140.fvalue(pv, "var tmp = ", v702, ";", (function(){
6612                 var symbol = l130;
6613                 var value = symbol.value;
6614                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6615                 return value;
6616             })(), "return tmp === ", l142.fvalue(pv, l3.value), "? ", l142.fvalue(pv, l3.value), ": tmp.car;", (function(){
6617                 var symbol = l130;
6618                 var value = symbol.value;
6619                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6620                 return value;
6621             })()), "})()");
6622         })(l142.fvalue(pv, v701));
6623     })();
6624 })), cdr: (function(){
6625     var symbol = l264;
6626     var value = symbol.value;
6627     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6628     return value;
6629 })()}));
6630 ((l264).value = ({car: l44.fvalue(pv, l31, (function (values,v703){
6631     checkArgs(arguments, 2);
6632     return (function(){
6633         return (function(v704){
6634             return l131.fvalue(values, "(function(){", (function(){
6635                 var symbol = l130;
6636                 var value = symbol.value;
6637                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6638                 return value;
6639             })(), l140.fvalue(pv, "var tmp = ", v704, ";", (function(){
6640                 var symbol = l130;
6641                 var value = symbol.value;
6642                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6643                 return value;
6644             })(), "return tmp === ", l142.fvalue(pv, l3.value), "? ", l142.fvalue(pv, l3.value), ": tmp.cdr;", (function(){
6645                 var symbol = l130;
6646                 var value = symbol.value;
6647                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6648                 return value;
6649             })()), "})()");
6650         })(l142.fvalue(pv, v703));
6651     })();
6652 })), cdr: (function(){
6653     var symbol = l264;
6654     var value = symbol.value;
6655     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6656     return value;
6657 })()}));
6658 var l280 = {name: "RPLACA"};
6659 ((l264).value = ({car: l44.fvalue(pv, l280, (function (values,v705,v706){
6660     checkArgs(arguments, 3);
6661     return (function(){
6662         return (function(v707,v708){
6663             return l131.fvalue(values, "(function(){", (function(){
6664                 var symbol = l130;
6665                 var value = symbol.value;
6666                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6667                 return value;
6668             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "x", " = ", v707, ";", (function(){
6669                 var symbol = l130;
6670                 var value = symbol.value;
6671                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6672                 return value;
6673             })()), l131.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
6674                 var symbol = l130;
6675                 var value = symbol.value;
6676                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6677                 return value;
6678             })(), l140.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
6679                 var symbol = l130;
6680                 var value = symbol.value;
6681                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6682                 return value;
6683             })())), l131.fvalue(pv, "return ", l131.fvalue(pv, "(x.car = ", v708, ", x)"), ";", (function(){
6684                 var symbol = l130;
6685                 var value = symbol.value;
6686                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6687                 return value;
6688             })())), "})()");
6689         })(l142.fvalue(pv, v705),l142.fvalue(pv, v706));
6690     })();
6691 })), cdr: (function(){
6692     var symbol = l264;
6693     var value = symbol.value;
6694     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6695     return value;
6696 })()}));
6697 var l281 = {name: "RPLACD"};
6698 ((l264).value = ({car: l44.fvalue(pv, l281, (function (values,v709,v710){
6699     checkArgs(arguments, 3);
6700     return (function(){
6701         return (function(v711,v712){
6702             return l131.fvalue(values, "(function(){", (function(){
6703                 var symbol = l130;
6704                 var value = symbol.value;
6705                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6706                 return value;
6707             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "x", " = ", v711, ";", (function(){
6708                 var symbol = l130;
6709                 var value = symbol.value;
6710                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6711                 return value;
6712             })()), l131.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
6713                 var symbol = l130;
6714                 var value = symbol.value;
6715                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6716                 return value;
6717             })(), l140.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
6718                 var symbol = l130;
6719                 var value = symbol.value;
6720                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6721                 return value;
6722             })())), l131.fvalue(pv, "return ", l131.fvalue(pv, "(x.cdr = ", v712, ", x)"), ";", (function(){
6723                 var symbol = l130;
6724                 var value = symbol.value;
6725                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6726                 return value;
6727             })())), "})()");
6728         })(l142.fvalue(pv, v709),l142.fvalue(pv, v710));
6729     })();
6730 })), cdr: (function(){
6731     var symbol = l264;
6732     var value = symbol.value;
6733     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6734     return value;
6735 })()}));
6736 var l282 = {name: "SYMBOLP"};
6737 ((l264).value = ({car: l44.fvalue(pv, l282, (function (values,v713){
6738     checkArgs(arguments, 2);
6739     return (function(){
6740         return (function(v714){
6741             return l141.fvalue(values, l131.fvalue(pv, "(function(){", (function(){
6742                 var symbol = l130;
6743                 var value = symbol.value;
6744                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6745                 return value;
6746             })(), l140.fvalue(pv, "var tmp = ", v714, ";", (function(){
6747                 var symbol = l130;
6748                 var value = symbol.value;
6749                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6750                 return value;
6751             })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
6752                 var symbol = l130;
6753                 var value = symbol.value;
6754                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6755                 return value;
6756             })()), "})()"));
6757         })(l142.fvalue(pv, v713));
6758     })();
6759 })), cdr: (function(){
6760     var symbol = l264;
6761     var value = symbol.value;
6762     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6763     return value;
6764 })()}));
6765 var l283 = {name: "MAKE-SYMBOL"};
6766 ((l264).value = ({car: l44.fvalue(pv, l283, (function (values,v715){
6767     checkArgs(arguments, 2);
6768     return (function(){
6769         return (function(v716){
6770             return l131.fvalue(values, "(function(){", (function(){
6771                 var symbol = l130;
6772                 var value = symbol.value;
6773                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6774                 return value;
6775             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "name", " = ", v716, ";", (function(){
6776                 var symbol = l130;
6777                 var value = symbol.value;
6778                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6779                 return value;
6780             })()), l131.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){
6781                 var symbol = l130;
6782                 var value = symbol.value;
6783                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6784                 return value;
6785             })(), l140.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
6786                 var symbol = l130;
6787                 var value = symbol.value;
6788                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6789                 return value;
6790             })())), l131.fvalue(pv, "return ", "({name: name})", ";", (function(){
6791                 var symbol = l130;
6792                 var value = symbol.value;
6793                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6794                 return value;
6795             })())), "})()");
6796         })(l142.fvalue(pv, v715));
6797     })();
6798 })), cdr: (function(){
6799     var symbol = l264;
6800     var value = symbol.value;
6801     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6802     return value;
6803 })()}));
6804 var l284 = {name: "SYMBOL-NAME"};
6805 ((l264).value = ({car: l44.fvalue(pv, l284, (function (values,v717){
6806     checkArgs(arguments, 2);
6807     return (function(){
6808         return (function(v718){
6809             return l131.fvalue(values, "(", v718, ").name");
6810         })(l142.fvalue(pv, v717));
6811     })();
6812 })), cdr: (function(){
6813     var symbol = l264;
6814     var value = symbol.value;
6815     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6816     return value;
6817 })()}));
6818 ((l264).value = ({car: l44.fvalue(pv, l221, (function (values,v719,v720){
6819     checkArgs(arguments, 3);
6820     return (function(){
6821         return (function(v721,v722){
6822             return l131.fvalue(values, "(", v721, ").value = ", v722);
6823         })(l142.fvalue(pv, v719),l142.fvalue(pv, v720));
6824     })();
6825 })), cdr: (function(){
6826     var symbol = l264;
6827     var value = symbol.value;
6828     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6829     return value;
6830 })()}));
6831 var l285 = {name: "FSET"};
6832 ((l264).value = ({car: l44.fvalue(pv, l285, (function (values,v723,v724){
6833     checkArgs(arguments, 3);
6834     return (function(){
6835         return (function(v725,v726){
6836             return l131.fvalue(values, "(", v725, ").fvalue = ", v726);
6837         })(l142.fvalue(pv, v723),l142.fvalue(pv, v724));
6838     })();
6839 })), cdr: (function(){
6840     var symbol = l264;
6841     var value = symbol.value;
6842     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6843     return value;
6844 })()}));
6845 ((l264).value = ({car: l44.fvalue(pv, l18, (function (values,v727){
6846     checkArgs(arguments, 2);
6847     return (function(){
6848         return (function(v728){
6849             return l141.fvalue(values, l131.fvalue(pv, "(", v728, ".value !== undefined)"));
6850         })(l142.fvalue(pv, v727));
6851     })();
6852 })), cdr: (function(){
6853     var symbol = l264;
6854     var value = symbol.value;
6855     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6856     return value;
6857 })()}));
6858 var l286 = {name: "SYMBOL-VALUE"};
6859 ((l264).value = ({car: l44.fvalue(pv, l286, (function (values,v729){
6860     checkArgs(arguments, 2);
6861     return (function(){
6862         return (function(v730){
6863             return l131.fvalue(values, "(function(){", (function(){
6864                 var symbol = l130;
6865                 var value = symbol.value;
6866                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6867                 return value;
6868             })(), l140.fvalue(pv, "var symbol = ", v730, ";", (function(){
6869                 var symbol = l130;
6870                 var value = symbol.value;
6871                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6872                 return value;
6873             })(), "var value = symbol.value;", (function(){
6874                 var symbol = l130;
6875                 var value = symbol.value;
6876                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6877                 return value;
6878             })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
6879                 var symbol = l130;
6880                 var value = symbol.value;
6881                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6882                 return value;
6883             })(), "return value;", (function(){
6884                 var symbol = l130;
6885                 var value = symbol.value;
6886                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6887                 return value;
6888             })()), "})()");
6889         })(l142.fvalue(pv, v729));
6890     })();
6891 })), cdr: (function(){
6892     var symbol = l264;
6893     var value = symbol.value;
6894     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6895     return value;
6896 })()}));
6897 ((l264).value = ({car: l44.fvalue(pv, l230, (function (values,v731){
6898     checkArgs(arguments, 2);
6899     return (function(){
6900         return (function(v732){
6901             return l131.fvalue(values, "(function(){", (function(){
6902                 var symbol = l130;
6903                 var value = symbol.value;
6904                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6905                 return value;
6906             })(), l140.fvalue(pv, "var symbol = ", v732, ";", (function(){
6907                 var symbol = l130;
6908                 var value = symbol.value;
6909                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6910                 return value;
6911             })(), "var func = symbol.fvalue;", (function(){
6912                 var symbol = l130;
6913                 var value = symbol.value;
6914                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6915                 return value;
6916             })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
6917                 var symbol = l130;
6918                 var value = symbol.value;
6919                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6920                 return value;
6921             })(), "return func;", (function(){
6922                 var symbol = l130;
6923                 var value = symbol.value;
6924                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6925                 return value;
6926             })()), "})()");
6927         })(l142.fvalue(pv, v731));
6928     })();
6929 })), cdr: (function(){
6930     var symbol = l264;
6931     var value = symbol.value;
6932     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6933     return value;
6934 })()}));
6935 var l287 = {name: "SYMBOL-PLIST"};
6936 ((l264).value = ({car: l44.fvalue(pv, l287, (function (values,v733){
6937     checkArgs(arguments, 2);
6938     return (function(){
6939         return (function(v734){
6940             return l131.fvalue(values, "((", v734, ").plist || ", l142.fvalue(pv, l3.value), ")");
6941         })(l142.fvalue(pv, v733));
6942     })();
6943 })), cdr: (function(){
6944     var symbol = l264;
6945     var value = symbol.value;
6946     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6947     return value;
6948 })()}));
6949 var l288 = {name: "LAMBDA-CODE"};
6950 ((l264).value = ({car: l44.fvalue(pv, l288, (function (values,v735){
6951     checkArgs(arguments, 2);
6952     return (function(){
6953         return (function(v736){
6954             return l131.fvalue(values, "(", v736, ").toString()");
6955         })(l142.fvalue(pv, v735));
6956     })();
6957 })), cdr: (function(){
6958     var symbol = l264;
6959     var value = symbol.value;
6960     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6961     return value;
6962 })()}));
6963 var l289 = {name: "EQ"};
6964 ((l264).value = ({car: l44.fvalue(pv, l289, (function (values,v737,v738){
6965     checkArgs(arguments, 3);
6966     return (function(){
6967         return (function(v739,v740){
6968             return l141.fvalue(values, l131.fvalue(pv, "(", v739, " === ", v740, ")"));
6969         })(l142.fvalue(pv, v737),l142.fvalue(pv, v738));
6970     })();
6971 })), cdr: (function(){
6972     var symbol = l264;
6973     var value = symbol.value;
6974     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6975     return value;
6976 })()}));
6977 var l290 = {name: "EQUAL"};
6978 ((l264).value = ({car: l44.fvalue(pv, l290, (function (values,v741,v742){
6979     checkArgs(arguments, 3);
6980     return (function(){
6981         return (function(v743,v744){
6982             return l141.fvalue(values, l131.fvalue(pv, "(", v743, " == ", v744, ")"));
6983         })(l142.fvalue(pv, v741),l142.fvalue(pv, v742));
6984     })();
6985 })), cdr: (function(){
6986     var symbol = l264;
6987     var value = symbol.value;
6988     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6989     return value;
6990 })()}));
6991 var l291 = {name: "CHAR-TO-STRING"};
6992 ((l264).value = ({car: l44.fvalue(pv, l291, (function (values,v745){
6993     checkArgs(arguments, 2);
6994     return (function(){
6995         return (function(v746){
6996             return l131.fvalue(values, "(function(){", (function(){
6997                 var symbol = l130;
6998                 var value = symbol.value;
6999                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7000                 return value;
7001             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "x", " = ", v746, ";", (function(){
7002                 var symbol = l130;
7003                 var value = symbol.value;
7004                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7005                 return value;
7006             })()), l131.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7007                 var symbol = l130;
7008                 var value = symbol.value;
7009                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7010                 return value;
7011             })(), l140.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7012                 var symbol = l130;
7013                 var value = symbol.value;
7014                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7015                 return value;
7016             })())), l131.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){
7017                 var symbol = l130;
7018                 var value = symbol.value;
7019                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7020                 return value;
7021             })())), "})()");
7022         })(l142.fvalue(pv, v745));
7023     })();
7024 })), cdr: (function(){
7025     var symbol = l264;
7026     var value = symbol.value;
7027     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7028     return value;
7029 })()}));
7030 var l292 = {name: "STRINGP"};
7031 ((l264).value = ({car: l44.fvalue(pv, l292, (function (values,v747){
7032     checkArgs(arguments, 2);
7033     return (function(){
7034         return (function(v748){
7035             return l141.fvalue(values, l131.fvalue(pv, "(typeof(", v748, ") == \"string\")"));
7036         })(l142.fvalue(pv, v747));
7037     })();
7038 })), cdr: (function(){
7039     var symbol = l264;
7040     var value = symbol.value;
7041     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7042     return value;
7043 })()}));
7044 var l293 = {name: "STRING-UPCASE"};
7045 ((l264).value = ({car: l44.fvalue(pv, l293, (function (values,v749){
7046     checkArgs(arguments, 2);
7047     return (function(){
7048         return (function(v750){
7049             return l131.fvalue(values, "(function(){", (function(){
7050                 var symbol = l130;
7051                 var value = symbol.value;
7052                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7053                 return value;
7054             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "x", " = ", v750, ";", (function(){
7055                 var symbol = l130;
7056                 var value = symbol.value;
7057                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7058                 return value;
7059             })()), l131.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7060                 var symbol = l130;
7061                 var value = symbol.value;
7062                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7063                 return value;
7064             })(), l140.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7065                 var symbol = l130;
7066                 var value = symbol.value;
7067                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7068                 return value;
7069             })())), l131.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){
7070                 var symbol = l130;
7071                 var value = symbol.value;
7072                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7073                 return value;
7074             })())), "})()");
7075         })(l142.fvalue(pv, v749));
7076     })();
7077 })), cdr: (function(){
7078     var symbol = l264;
7079     var value = symbol.value;
7080     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7081     return value;
7082 })()}));
7083 var l294 = {name: "STRING-LENGTH"};
7084 ((l264).value = ({car: l44.fvalue(pv, l294, (function (values,v751){
7085     checkArgs(arguments, 2);
7086     return (function(){
7087         return (function(v752){
7088             return l131.fvalue(values, "(function(){", (function(){
7089                 var symbol = l130;
7090                 var value = symbol.value;
7091                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7092                 return value;
7093             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "x", " = ", v752, ";", (function(){
7094                 var symbol = l130;
7095                 var value = symbol.value;
7096                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7097                 return value;
7098             })()), l131.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7099                 var symbol = l130;
7100                 var value = symbol.value;
7101                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7102                 return value;
7103             })(), l140.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7104                 var symbol = l130;
7105                 var value = symbol.value;
7106                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7107                 return value;
7108             })())), l131.fvalue(pv, "return ", "x.length", ";", (function(){
7109                 var symbol = l130;
7110                 var value = symbol.value;
7111                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7112                 return value;
7113             })())), "})()");
7114         })(l142.fvalue(pv, v751));
7115     })();
7116 })), cdr: (function(){
7117     var symbol = l264;
7118     var value = symbol.value;
7119     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7120     return value;
7121 })()}));
7122 var l295 = {name: "SLICE"};
7123 ((l264).value = ({car: l44.fvalue(pv, l295, (function (values,v753,v754,v755){
7124     checkArgsAtLeast(arguments, 3);
7125     checkArgsAtMost(arguments, 4);
7126     switch(arguments.length-1){
7127     case 2:
7128     v755=l3.value;
7129     default: break;
7130     }
7131     return (function(){
7132         return l131.fvalue(values, "(function(){", (function(){
7133             var symbol = l130;
7134             var value = symbol.value;
7135             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7136             return value;
7137         })(), l140.fvalue(pv, "var str = ", l142.fvalue(pv, v753), ";", (function(){
7138             var symbol = l130;
7139             var value = symbol.value;
7140             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7141             return value;
7142         })(), "var a = ", l142.fvalue(pv, v754), ";", (function(){
7143             var symbol = l130;
7144             var value = symbol.value;
7145             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7146             return value;
7147         })(), "var b;", (function(){
7148             var symbol = l130;
7149             var value = symbol.value;
7150             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7151             return value;
7152         })(), (v755 !== l3.value ? l131.fvalue(pv, "b = ", l142.fvalue(pv, v755), ";", (function(){
7153             var symbol = l130;
7154             var value = symbol.value;
7155             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7156             return value;
7157         })()) : ""), "return str.slice(a,b);", (function(){
7158             var symbol = l130;
7159             var value = symbol.value;
7160             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7161             return value;
7162         })()), "})()");
7163     })();
7164 })), cdr: (function(){
7165     var symbol = l264;
7166     var value = symbol.value;
7167     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7168     return value;
7169 })()}));
7170 var l296 = {name: "CHAR"};
7171 ((l264).value = ({car: l44.fvalue(pv, l296, (function (values,v756,v757){
7172     checkArgs(arguments, 3);
7173     return (function(){
7174         return (function(v758,v759){
7175             return l131.fvalue(values, "(function(){", (function(){
7176                 var symbol = l130;
7177                 var value = symbol.value;
7178                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7179                 return value;
7180             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "string", " = ", v758, ";", (function(){
7181                 var symbol = l130;
7182                 var value = symbol.value;
7183                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7184                 return value;
7185             })()), l131.fvalue(pv, "var ", "index", " = ", v759, ";", (function(){
7186                 var symbol = l130;
7187                 var value = symbol.value;
7188                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7189                 return value;
7190             })()), l131.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7191                 var symbol = l130;
7192                 var value = symbol.value;
7193                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7194                 return value;
7195             })(), l140.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7196                 var symbol = l130;
7197                 var value = symbol.value;
7198                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7199                 return value;
7200             })())), l131.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){
7201                 var symbol = l130;
7202                 var value = symbol.value;
7203                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7204                 return value;
7205             })(), l140.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
7206                 var symbol = l130;
7207                 var value = symbol.value;
7208                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7209                 return value;
7210             })())), l131.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){
7211                 var symbol = l130;
7212                 var value = symbol.value;
7213                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7214                 return value;
7215             })())), "})()");
7216         })(l142.fvalue(pv, v756),l142.fvalue(pv, v757));
7217     })();
7218 })), cdr: (function(){
7219     var symbol = l264;
7220     var value = symbol.value;
7221     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7222     return value;
7223 })()}));
7224 ((l264).value = ({car: l44.fvalue(pv, l72, (function (values,v760,v761){
7225     checkArgs(arguments, 3);
7226     return (function(){
7227         return (function(v762,v763){
7228             return l131.fvalue(values, "(function(){", (function(){
7229                 var symbol = l130;
7230                 var value = symbol.value;
7231                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7232                 return value;
7233             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "string1", " = ", v762, ";", (function(){
7234                 var symbol = l130;
7235                 var value = symbol.value;
7236                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7237                 return value;
7238             })()), l131.fvalue(pv, "var ", "string2", " = ", v763, ";", (function(){
7239                 var symbol = l130;
7240                 var value = symbol.value;
7241                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7242                 return value;
7243             })()), l131.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){
7244                 var symbol = l130;
7245                 var value = symbol.value;
7246                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7247                 return value;
7248             })(), l140.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
7249                 var symbol = l130;
7250                 var value = symbol.value;
7251                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7252                 return value;
7253             })())), l131.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){
7254                 var symbol = l130;
7255                 var value = symbol.value;
7256                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7257                 return value;
7258             })(), l140.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
7259                 var symbol = l130;
7260                 var value = symbol.value;
7261                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7262                 return value;
7263             })())), l131.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){
7264                 var symbol = l130;
7265                 var value = symbol.value;
7266                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7267                 return value;
7268             })())), "})()");
7269         })(l142.fvalue(pv, v760),l142.fvalue(pv, v761));
7270     })();
7271 })), cdr: (function(){
7272     var symbol = l264;
7273     var value = symbol.value;
7274     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7275     return value;
7276 })()}));
7277 var l297 = {name: "FUNCALL"};
7278 ((l264).value = ({car: l44.fvalue(pv, l297, (function (values,v765){
7279     checkArgsAtLeast(arguments, 2);
7280     var v764= l3.value;
7281     for (var i = arguments.length-1; i>=2; i--)
7282         v764 = {car: arguments[i], cdr:
7283     v764};
7284     return (function(){
7285         return l131.fvalue(values, "(", l142.fvalue(pv, v765), ")(", l133.fvalue(pv, ({car: ((function(){
7286             var symbol = l169;
7287             var value = symbol.value;
7288             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7289             return value;
7290         })() !== l3.value ? "values" : "pv"), cdr: l73.fvalue(pv, (function(){
7291             var symbol = l142;
7292             var func = symbol.fvalue;
7293             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7294             return func;
7295         })(), v764)}), ", "), ")");
7296     })();
7297 })), cdr: (function(){
7298     var symbol = l264;
7299     var value = symbol.value;
7300     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7301     return value;
7302 })()}));
7303 var l298 = {name: "APPLY"};
7304 ((l264).value = ({car: l44.fvalue(pv, l298, (function (values,v767){
7305     checkArgsAtLeast(arguments, 2);
7306     var v766= l3.value;
7307     for (var i = arguments.length-1; i>=2; i--)
7308         v766 = {car: arguments[i], cdr:
7309     v766};
7310     return (function(){
7311         return (l12.fvalue(pv, v766) !== l3.value ? l131.fvalue(values, "(", l142.fvalue(pv, v767), ")()") : (function(v768,v769){
7312             return l131.fvalue(values, "(function(){", (function(){
7313                 var symbol = l130;
7314                 var value = symbol.value;
7315                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7316                 return value;
7317             })(), l140.fvalue(pv, "var f = ", l142.fvalue(pv, v767), ";", (function(){
7318                 var symbol = l130;
7319                 var value = symbol.value;
7320                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7321                 return value;
7322             })(), "var args = [", l133.fvalue(pv, ({car: ((function(){
7323                 var symbol = l169;
7324                 var value = symbol.value;
7325                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7326                 return value;
7327             })() !== l3.value ? "values" : "pv"), cdr: l73.fvalue(pv, (function(){
7328                 var symbol = l142;
7329                 var func = symbol.fvalue;
7330                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7331                 return func;
7332             })(), v768)}), ", "), "];", (function(){
7333                 var symbol = l130;
7334                 var value = symbol.value;
7335                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7336                 return value;
7337             })(), "var tail = (", l142.fvalue(pv, v769), ");", (function(){
7338                 var symbol = l130;
7339                 var value = symbol.value;
7340                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7341                 return value;
7342             })(), "while (tail != ", l142.fvalue(pv, l3.value), "){", (function(){
7343                 var symbol = l130;
7344                 var value = symbol.value;
7345                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7346                 return value;
7347             })(), "    args.push(tail.car);", (function(){
7348                 var symbol = l130;
7349                 var value = symbol.value;
7350                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7351                 return value;
7352             })(), "    tail = tail.cdr;", (function(){
7353                 var symbol = l130;
7354                 var value = symbol.value;
7355                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7356                 return value;
7357             })(), "}", (function(){
7358                 var symbol = l130;
7359                 var value = symbol.value;
7360                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7361                 return value;
7362             })(), "return f.apply(this, args);", (function(){
7363                 var symbol = l130;
7364                 var value = symbol.value;
7365                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7366                 return value;
7367             })()), "})()");
7368         })(l85.fvalue(pv, v766),(function(){
7369             var tmp = l84.fvalue(pv, v766);
7370             return tmp === l3.value? l3.value: tmp.car;
7371         })()));
7372     })();
7373 })), cdr: (function(){
7374     var symbol = l264;
7375     var value = symbol.value;
7376     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7377     return value;
7378 })()}));
7379 var l299 = {name: "JS-EVAL"};
7380 ((l264).value = ({car: l44.fvalue(pv, l299, (function (values,v770){
7381     checkArgs(arguments, 2);
7382     return (function(){
7383         return (function(v771){
7384             return l131.fvalue(values, "(function(){", (function(){
7385                 var symbol = l130;
7386                 var value = symbol.value;
7387                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7388                 return value;
7389             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "string", " = ", v771, ";", (function(){
7390                 var symbol = l130;
7391                 var value = symbol.value;
7392                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7393                 return value;
7394             })()), l131.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7395                 var symbol = l130;
7396                 var value = symbol.value;
7397                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7398                 return value;
7399             })(), l140.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7400                 var symbol = l130;
7401                 var value = symbol.value;
7402                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7403                 return value;
7404             })())), l131.fvalue(pv, "return ", ((function(){
7405                 var symbol = l169;
7406                 var value = symbol.value;
7407                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7408                 return value;
7409             })() !== l3.value ? l131.fvalue(pv, "(function(){", (function(){
7410                 var symbol = l130;
7411                 var value = symbol.value;
7412                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7413                 return value;
7414             })(), l140.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){
7415                 var symbol = l130;
7416                 var value = symbol.value;
7417                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7418                 return value;
7419             })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){
7420                 var symbol = l130;
7421                 var value = symbol.value;
7422                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7423                 return value;
7424             })(), l140.fvalue(pv, "v = [v];", (function(){
7425                 var symbol = l130;
7426                 var value = symbol.value;
7427                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7428                 return value;
7429             })(), "v['multiple-value'] = true;", (function(){
7430                 var symbol = l130;
7431                 var value = symbol.value;
7432                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7433                 return value;
7434             })()), "}", (function(){
7435                 var symbol = l130;
7436                 var value = symbol.value;
7437                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7438                 return value;
7439             })(), "return values.apply(this, v);", (function(){
7440                 var symbol = l130;
7441                 var value = symbol.value;
7442                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7443                 return value;
7444             })()), "})()") : "eval.apply(window, [string])"), ";", (function(){
7445                 var symbol = l130;
7446                 var value = symbol.value;
7447                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7448                 return value;
7449             })())), "})()");
7450         })(l142.fvalue(pv, v770));
7451     })();
7452 })), cdr: (function(){
7453     var symbol = l264;
7454     var value = symbol.value;
7455     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7456     return value;
7457 })()}));
7458 var l300 = {name: "ERROR"};
7459 ((l264).value = ({car: l44.fvalue(pv, l300, (function (values,v772){
7460     checkArgs(arguments, 2);
7461     return (function(){
7462         return (function(v773){
7463             return l131.fvalue(values, "(function(){", (function(){
7464                 var symbol = l130;
7465                 var value = symbol.value;
7466                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7467                 return value;
7468             })(), l140.fvalue(pv, "throw ", v773, ";", (function(){
7469                 var symbol = l130;
7470                 var value = symbol.value;
7471                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7472                 return value;
7473             })()), "})()");
7474         })(l142.fvalue(pv, v772));
7475     })();
7476 })), cdr: (function(){
7477     var symbol = l264;
7478     var value = symbol.value;
7479     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7480     return value;
7481 })()}));
7482 var l301 = {name: "NEW"};
7483 ((l264).value = ({car: l44.fvalue(pv, l301, (function (values){
7484     checkArgsAtMost(arguments, 1);
7485     return (function(){
7486         return (function(){
7487             return "{}";
7488         })();
7489     })();
7490 })), cdr: (function(){
7491     var symbol = l264;
7492     var value = symbol.value;
7493     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7494     return value;
7495 })()}));
7496 var l302 = {name: "OBJECTP"};
7497 ((l264).value = ({car: l44.fvalue(pv, l302, (function (values,v774){
7498     checkArgs(arguments, 2);
7499     return (function(){
7500         return (function(v775){
7501             return l141.fvalue(values, l131.fvalue(pv, "(typeof (", v775, ") === 'object')"));
7502         })(l142.fvalue(pv, v774));
7503     })();
7504 })), cdr: (function(){
7505     var symbol = l264;
7506     var value = symbol.value;
7507     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7508     return value;
7509 })()}));
7510 var l303 = {name: "OGET"};
7511 ((l264).value = ({car: l44.fvalue(pv, l303, (function (values,v776,v777){
7512     checkArgs(arguments, 3);
7513     return (function(){
7514         return (function(v778,v779){
7515             return l131.fvalue(values, "(function(){", (function(){
7516                 var symbol = l130;
7517                 var value = symbol.value;
7518                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7519                 return value;
7520             })(), l140.fvalue(pv, "var tmp = ", "(", v778, ")[", v779, "];", (function(){
7521                 var symbol = l130;
7522                 var value = symbol.value;
7523                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7524                 return value;
7525             })(), "return tmp == undefined? ", l142.fvalue(pv, l3.value), ": tmp ;", (function(){
7526                 var symbol = l130;
7527                 var value = symbol.value;
7528                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7529                 return value;
7530             })()), "})()");
7531         })(l142.fvalue(pv, v776),l142.fvalue(pv, v777));
7532     })();
7533 })), cdr: (function(){
7534     var symbol = l264;
7535     var value = symbol.value;
7536     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7537     return value;
7538 })()}));
7539 var l304 = {name: "OSET"};
7540 ((l264).value = ({car: l44.fvalue(pv, l304, (function (values,v780,v781,v782){
7541     checkArgs(arguments, 4);
7542     return (function(){
7543         return (function(v783,v784,v785){
7544             return l131.fvalue(values, "((", v783, ")[", v784, "] = ", v785, ")");
7545         })(l142.fvalue(pv, v780),l142.fvalue(pv, v781),l142.fvalue(pv, v782));
7546     })();
7547 })), cdr: (function(){
7548     var symbol = l264;
7549     var value = symbol.value;
7550     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7551     return value;
7552 })()}));
7553 var l305 = {name: "IN"};
7554 ((l264).value = ({car: l44.fvalue(pv, l305, (function (values,v786,v787){
7555     checkArgs(arguments, 3);
7556     return (function(){
7557         return (function(v788,v789){
7558             return l141.fvalue(values, l131.fvalue(pv, "((", v788, ") in (", v789, "))"));
7559         })(l142.fvalue(pv, v786),l142.fvalue(pv, v787));
7560     })();
7561 })), cdr: (function(){
7562     var symbol = l264;
7563     var value = symbol.value;
7564     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7565     return value;
7566 })()}));
7567 var l306 = {name: "FUNCTIONP"};
7568 ((l264).value = ({car: l44.fvalue(pv, l306, (function (values,v790){
7569     checkArgs(arguments, 2);
7570     return (function(){
7571         return (function(v791){
7572             return l141.fvalue(values, l131.fvalue(pv, "(typeof ", v791, " == 'function')"));
7573         })(l142.fvalue(pv, v790));
7574     })();
7575 })), cdr: (function(){
7576     var symbol = l264;
7577     var value = symbol.value;
7578     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7579     return value;
7580 })()}));
7581 var l307 = {name: "WRITE-STRING"};
7582 ((l264).value = ({car: l44.fvalue(pv, l307, (function (values,v792){
7583     checkArgs(arguments, 2);
7584     return (function(){
7585         return (function(v793){
7586             return l131.fvalue(values, "(function(){", (function(){
7587                 var symbol = l130;
7588                 var value = symbol.value;
7589                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7590                 return value;
7591             })(), l140.fvalue(pv, l131.fvalue(pv, "var ", "x", " = ", v793, ";", (function(){
7592                 var symbol = l130;
7593                 var value = symbol.value;
7594                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7595                 return value;
7596             })()), l131.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7597                 var symbol = l130;
7598                 var value = symbol.value;
7599                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7600                 return value;
7601             })(), l140.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7602                 var symbol = l130;
7603                 var value = symbol.value;
7604                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7605                 return value;
7606             })())), l131.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){
7607                 var symbol = l130;
7608                 var value = symbol.value;
7609                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7610                 return value;
7611             })())), "})()");
7612         })(l142.fvalue(pv, v792));
7613     })();
7614 })), cdr: (function(){
7615     var symbol = l264;
7616     var value = symbol.value;
7617     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7618     return value;
7619 })()}));
7620 var l308 = {name: "MAKE-ARRAY"};
7621 ((l264).value = ({car: l44.fvalue(pv, l308, (function (values,v794){
7622     checkArgs(arguments, 2);
7623     return (function(){
7624         return (function(v795){
7625             return l131.fvalue(values, "(function(){", (function(){
7626                 var symbol = l130;
7627                 var value = symbol.value;
7628                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7629                 return value;
7630             })(), l140.fvalue(pv, "var r = [];", (function(){
7631                 var symbol = l130;
7632                 var value = symbol.value;
7633                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7634                 return value;
7635             })(), "for (var i = 0; i < ", v795, "; i++)", (function(){
7636                 var symbol = l130;
7637                 var value = symbol.value;
7638                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7639                 return value;
7640             })(), l140.fvalue(pv, "r.push(", l142.fvalue(pv, l3.value), ");", (function(){
7641                 var symbol = l130;
7642                 var value = symbol.value;
7643                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7644                 return value;
7645             })()), "return r;", (function(){
7646                 var symbol = l130;
7647                 var value = symbol.value;
7648                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7649                 return value;
7650             })()), "})()");
7651         })(l142.fvalue(pv, v794));
7652     })();
7653 })), cdr: (function(){
7654     var symbol = l264;
7655     var value = symbol.value;
7656     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7657     return value;
7658 })()}));
7659 var l309 = {name: "ARRAYP"};
7660 ((l264).value = ({car: l44.fvalue(pv, l309, (function (values,v796){
7661     checkArgs(arguments, 2);
7662     return (function(){
7663         return (function(v797){
7664             return l141.fvalue(values, l131.fvalue(pv, "(function(){", (function(){
7665                 var symbol = l130;
7666                 var value = symbol.value;
7667                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7668                 return value;
7669             })(), l140.fvalue(pv, "var x = ", v797, ";", (function(){
7670                 var symbol = l130;
7671                 var value = symbol.value;
7672                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7673                 return value;
7674             })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
7675         })(l142.fvalue(pv, v796));
7676     })();
7677 })), cdr: (function(){
7678     var symbol = l264;
7679     var value = symbol.value;
7680     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7681     return value;
7682 })()}));
7683 var l310 = {name: "AREF"};
7684 ((l264).value = ({car: l44.fvalue(pv, l310, (function (values,v798,v799){
7685     checkArgs(arguments, 3);
7686     return (function(){
7687         return (function(v800,v801){
7688             return l131.fvalue(values, "(function(){", (function(){
7689                 var symbol = l130;
7690                 var value = symbol.value;
7691                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7692                 return value;
7693             })(), l140.fvalue(pv, "var x = ", "(", v800, ")[", v801, "];", (function(){
7694                 var symbol = l130;
7695                 var value = symbol.value;
7696                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7697                 return value;
7698             })(), "if (x === undefined) throw 'Out of range';", (function(){
7699                 var symbol = l130;
7700                 var value = symbol.value;
7701                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7702                 return value;
7703             })(), "return x;", (function(){
7704                 var symbol = l130;
7705                 var value = symbol.value;
7706                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7707                 return value;
7708             })()), "})()");
7709         })(l142.fvalue(pv, v798),l142.fvalue(pv, v799));
7710     })();
7711 })), cdr: (function(){
7712     var symbol = l264;
7713     var value = symbol.value;
7714     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7715     return value;
7716 })()}));
7717 var l311 = {name: "ASET"};
7718 ((l264).value = ({car: l44.fvalue(pv, l311, (function (values,v802,v803,v804){
7719     checkArgs(arguments, 4);
7720     return (function(){
7721         return (function(v805,v806,v807){
7722             return l131.fvalue(values, "(function(){", (function(){
7723                 var symbol = l130;
7724                 var value = symbol.value;
7725                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7726                 return value;
7727             })(), l140.fvalue(pv, "var x = ", v805, ";", (function(){
7728                 var symbol = l130;
7729                 var value = symbol.value;
7730                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7731                 return value;
7732             })(), "var i = ", v806, ";", (function(){
7733                 var symbol = l130;
7734                 var value = symbol.value;
7735                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7736                 return value;
7737             })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
7738                 var symbol = l130;
7739                 var value = symbol.value;
7740                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7741                 return value;
7742             })(), "return x[i] = ", v807, ";", (function(){
7743                 var symbol = l130;
7744                 var value = symbol.value;
7745                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7746                 return value;
7747             })()), "})()");
7748         })(l142.fvalue(pv, v802),l142.fvalue(pv, v803),l142.fvalue(pv, v804));
7749     })();
7750 })), cdr: (function(){
7751     var symbol = l264;
7752     var value = symbol.value;
7753     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7754     return value;
7755 })()}));
7756 var l312 = {name: "GET-UNIX-TIME"};
7757 ((l264).value = ({car: l44.fvalue(pv, l312, (function (values){
7758     checkArgsAtMost(arguments, 1);
7759     return (function(){
7760         return (function(){
7761             return l131.fvalue(values, "(Math.round(new Date() / 1000))");
7762         })();
7763     })();
7764 })), cdr: (function(){
7765     var symbol = l264;
7766     var value = symbol.value;
7767     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7768     return value;
7769 })()}));
7770 var l313 = {name: "VALUES-ARRAY"};
7771 ((l264).value = ({car: l44.fvalue(pv, l313, (function (values,v808){
7772     checkArgs(arguments, 2);
7773     return (function(){
7774         return (function(v809){
7775             return ((function(){
7776                 var symbol = l169;
7777                 var value = symbol.value;
7778                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7779                 return value;
7780             })() !== l3.value ? l131.fvalue(values, "values.apply(this, ", v809, ")") : l131.fvalue(values, "pv.apply(this, ", v809, ")"));
7781         })(l142.fvalue(pv, v808));
7782     })();
7783 })), cdr: (function(){
7784     var symbol = l264;
7785     var value = symbol.value;
7786     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7787     return value;
7788 })()}));
7789 ((l264).value = ({car: l44.fvalue(pv, l139, (function (values){
7790     var v810= l3.value;
7791     for (var i = arguments.length-1; i>=1; i--)
7792         v810 = {car: arguments[i], cdr:
7793     v810};
7794     return (function(){
7795         return ((function(){
7796             var symbol = l169;
7797             var value = symbol.value;
7798             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7799             return value;
7800         })() !== l3.value ? l131.fvalue(values, "values(", l133.fvalue(pv, l73.fvalue(pv, (function(){
7801             var symbol = l142;
7802             var func = symbol.fvalue;
7803             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7804             return func;
7805         })(), v810), ", "), ")") : l131.fvalue(values, "pv(", l133.fvalue(pv, l73.fvalue(pv, (function(){
7806             var symbol = l142;
7807             var func = symbol.fvalue;
7808             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7809             return func;
7810         })(), v810), ", "), ")"));
7811     })();
7812 })), cdr: (function(){
7813     var symbol = l264;
7814     var value = symbol.value;
7815     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7816     return value;
7817 })()}));
7818 (function(){
7819     (l195).fvalue = (function(v813){
7820         ((v813)["fname"] = "MACRO");
7821         return v813;
7822     })((function (values,v811){
7823         checkArgs(arguments, 2);
7824         return (function(){
7825             return (((function(){
7826                 var tmp = v811;
7827                 return (typeof tmp == 'object' && 'name' in tmp);
7828             })()?l4.value: l3.value) !== l3.value ? (function(v812){
7829                 return (((l172.fvalue(pv, v812) === l195)?l4.value: l3.value) !== l3.value ? v812 : l3.value);
7830             })(l184.fvalue(pv, v811, (function(){
7831                 var symbol = l185;
7832                 var value = symbol.value;
7833                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7834                 return value;
7835             })(), l101)) : l3.value);
7836         })();
7837     }));
7838     return l195;
7839 })();
7840 var l314 = {name: "LS-MACROEXPAND-1"};
7841 (function(){
7842     (l314).fvalue = (function(v818){
7843         ((v818)["fname"] = "LS-MACROEXPAND-1");
7844         return v818;
7845     })((function (values,v814){
7846         checkArgs(arguments, 2);
7847         return (function(){
7848             return (function(v815){
7849                 return (v815 !== l3.value ? (function(v816){
7850                     (l59.fvalue(pv, v816) !== l3.value ? (function(v817){
7851                         l175.fvalue(pv, v815, v817);
7852                         return (v816 = v817);
7853                     })(l239.fvalue(pv, v816)) : l3.value);
7854                     return (function(){
7855                         var f = v816;
7856                         var args = [values];
7857                         var tail = ((function(){
7858                             var tmp = v814;
7859                             return tmp === l3.value? l3.value: tmp.cdr;
7860                         })());
7861                         while (tail != l3.value){
7862                             args.push(tail.car);
7863                             tail = tail.cdr;
7864                         }
7865                         return f.apply(this, args);
7866                     })();
7867                 })(l173.fvalue(pv, v815)) : v814);
7868             })(l195.fvalue(pv, (function(){
7869                 var tmp = v814;
7870                 return tmp === l3.value? l3.value: tmp.car;
7871             })()));
7872         })();
7873     }));
7874     return l314;
7875 })();
7876 var l315 = {name: "COMPILE-FUNCALL"};
7877 var l316 = {name: "G796"};
7878 (function(){
7879     (l315).fvalue = (function(v823){
7880         ((v823)["fname"] = "COMPILE-FUNCALL");
7881         return v823;
7882     })((function (values,v819,v820){
7883         checkArgs(arguments, 3);
7884         return (function(){
7885             return (function(){
7886                 var v821 = ((function(){
7887                     var symbol = l169;
7888                     var value = symbol.value;
7889                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7890                     return value;
7891                 })() !== l3.value ? "values" : "pv");
7892                 var v822 = l131.fvalue(pv, "(", l133.fvalue(pv, ({car: v821, cdr: l73.fvalue(pv, (function(){
7893                     var symbol = l142;
7894                     var func = symbol.fvalue;
7895                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7896                     return func;
7897                 })(), v820)}), ", "), ")");
7898                 return (l233.fvalue(pv, v819) !== l3.value ? l131.fvalue(values, l233.fvalue(pv, v819), v822) : ((((function(){
7899                     var tmp = v819;
7900                     return (typeof tmp == 'object' && 'name' in tmp);
7901                 })()?l4.value: l3.value) !== l3.value ? (((l119.fvalue(pv, v819) === l110.fvalue(pv, "COMMON-LISP"))?l4.value: l3.value) !== l3.value ? (function(){
7902                     var symbol = l316;
7903                     var value = symbol.value;
7904                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7905                     return value;
7906                 })() : l3.value) : l3.value) !== l3.value ? l131.fvalue(values, l142.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l164), l44.fvalue(pv, v819))), ".fvalue", v822) : l131.fvalue(values, l142.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l101), l44.fvalue(pv, v819))), v822)));
7907             })();
7908         })();
7909     }));
7910     return l315;
7911 })();
7912 (function(){
7913     (l219).fvalue = (function(v826){
7914         ((v826)["fname"] = "LS-COMPILE-BLOCK");
7915         return v826;
7916     })((function (values,v824,v825){
7917         checkArgsAtLeast(arguments, 2);
7918         checkArgsAtMost(arguments, 3);
7919         switch(arguments.length-1){
7920         case 1:
7921         v825=l3.value;
7922         default: break;
7923         }
7924         return (function(){
7925             return (v825 !== l3.value ? l131.fvalue(values, l219.fvalue(pv, l85.fvalue(pv, v824)), "return ", l142.fvalue(pv, (function(){
7926                 var tmp = l84.fvalue(pv, v824);
7927                 return tmp === l3.value? l3.value: tmp.car;
7928             })(), (function(){
7929                 var symbol = l169;
7930                 var value = symbol.value;
7931                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7932                 return value;
7933             })()), ";") : l134.fvalue(values, l88.fvalue(pv, (function(){
7934                 var symbol = l192;
7935                 var func = symbol.fvalue;
7936                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7937                 return func;
7938             })(), l73.fvalue(pv, (function(){
7939                 var symbol = l142;
7940                 var func = symbol.fvalue;
7941                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7942                 return func;
7943             })(), v824)), l131.fvalue(pv, ";", (function(){
7944                 var symbol = l130;
7945                 var value = symbol.value;
7946                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7947                 return value;
7948             })())));
7949         })();
7950     }));
7951     return l219;
7952 })();
7953 (function(){
7954     (l142).fvalue = (function(v836){
7955         ((v836)["fname"] = "LS-COMPILE");
7956         return v836;
7957     })((function (values,v827,v828){
7958         checkArgsAtLeast(arguments, 2);
7959         checkArgsAtMost(arguments, 3);
7960         switch(arguments.length-1){
7961         case 1:
7962         v828=l3.value;
7963         default: break;
7964         }
7965         return (function(){
7966             return (function(v829){
7967                 try {
7968                     var tmp;
7969                     tmp = l169.value;
7970                     l169.value = v829;
7971                     v829 = tmp;
7972                     return (((function(){
7973                         var tmp = v827;
7974                         return (typeof tmp == 'object' && 'name' in tmp);
7975                     })()?l4.value: l3.value) !== l3.value ? (function(v830){
7976                         return ((v830 !== l3.value ? l27.fvalue(pv, l86.fvalue(pv, l199, l174.fvalue(pv, v830))) : l3.value) !== l3.value ? l173.fvalue(values, v830) : ((function(v831){
7977                             return (v831 !== l3.value ? v831 : l86.fvalue(pv, l201, l174.fvalue(pv, v830)));
7978                         })(l118.fvalue(pv, v827)) !== l3.value ? l131.fvalue(values, l142.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l164), l44.fvalue(pv, v827))), ".value") : l142.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l286), l44.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l164), l44.fvalue(pv, v827)))))));
7979                     })(l184.fvalue(pv, v827, (function(){
7980                         var symbol = l185;
7981                         var value = symbol.value;
7982                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7983                         return value;
7984                     })(), l102)) : (l79.fvalue(pv, v827) !== l3.value ? l17.fvalue(values, v827) : (((typeof(v827) == "string")?l4.value: l3.value) !== l3.value ? l131.fvalue(values, "\"", l145.fvalue(pv, v827), "\"") : (((function(){
7985                         var x = v827;
7986                         return typeof x === 'object' && 'length' in x;
7987                     })()?l4.value: l3.value) !== l3.value ? l228.fvalue(values, v827) : (l59.fvalue(pv, v827) !== l3.value ? (function(v832,v833){
7988                         return (l94.fvalue(pv, v832, (function(){
7989                             var symbol = l203;
7990                             var value = symbol.value;
7991                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7992                             return value;
7993                         })()) !== l3.value ? (function(v834){
7994                             return (function(){
7995                                 var f = v834;
7996                                 var args = [values];
7997                                 var tail = (v833);
7998                                 while (tail != l3.value){
7999                                     args.push(tail.car);
8000                                     tail = tail.cdr;
8001                                 }
8002                                 return f.apply(this, args);
8003                             })();
8004                         })(l40.fvalue(pv, l94.fvalue(pv, v832, (function(){
8005                             var symbol = l203;
8006                             var value = symbol.value;
8007                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8008                             return value;
8009                         })()))) : ((l94.fvalue(pv, v832, (function(){
8010                             var symbol = l264;
8011                             var value = symbol.value;
8012                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8013                             return value;
8014                         })()) !== l3.value ? l27.fvalue(pv, l197.fvalue(pv, v832, l101, l200)) : l3.value) !== l3.value ? (function(v835){
8015                             return (function(){
8016                                 var f = v835;
8017                                 var args = [values];
8018                                 var tail = (v833);
8019                                 while (tail != l3.value){
8020                                     args.push(tail.car);
8021                                     tail = tail.cdr;
8022                                 }
8023                                 return f.apply(this, args);
8024                             })();
8025                         })(l40.fvalue(pv, l94.fvalue(pv, v832, (function(){
8026                             var symbol = l264;
8027                             var value = symbol.value;
8028                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8029                             return value;
8030                         })()))) : (l195.fvalue(pv, v832) !== l3.value ? l142.fvalue(values, l314.fvalue(pv, v827), v828) : l315.fvalue(values, v832, v833))));
8031                     })((function(){
8032                         var tmp = v827;
8033                         return tmp === l3.value? l3.value: tmp.car;
8034                     })(),(function(){
8035                         var tmp = v827;
8036                         return tmp === l3.value? l3.value: tmp.cdr;
8037                     })()) : (function(){
8038                         throw "How should I compile this?";
8039                     })())))));
8040                 }
8041                 finally {
8042                     l169.value = v829;
8043                 }
8044             })(v828);
8045         })();
8046     }));
8047     return l142;
8048 })();
8049 var l317 = {name: "LS-COMPILE-TOPLEVEL"};
8050 (function(){
8051     (l317).fvalue = (function(v843){
8052         ((v843)["fname"] = "LS-COMPILE-TOPLEVEL");
8053         return v843;
8054     })((function (values,v837,v838){
8055         checkArgsAtLeast(arguments, 2);
8056         checkArgsAtMost(arguments, 3);
8057         switch(arguments.length-1){
8058         case 1:
8059         v838=l3.value;
8060         default: break;
8061         }
8062         return (function(){
8063             return (function(v839){
8064                 try {
8065                     var tmp;
8066                     tmp = l190.value;
8067                     l190.value = v839;
8068                     v839 = tmp;
8069                     return ((((function(){
8070                         var tmp = v837;
8071                         return (typeof tmp == 'object' && 'car' in tmp);
8072                     })()?l4.value: l3.value) !== l3.value ? (((function(){
8073                         var tmp = v837;
8074                         return tmp === l3.value? l3.value: tmp.car;
8075                     })() === l238)?l4.value: l3.value) : l3.value) !== l3.value ? (function(v841){
8076                         return l133.fvalue(values, l88.fvalue(pv, (function(){
8077                             var symbol = l192;
8078                             var func = symbol.fvalue;
8079                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8080                             return func;
8081                         })(), v841));
8082                     })(l73.fvalue(pv, (function (values,v840){
8083                         checkArgs(arguments, 2);
8084                         return l317.fvalue(values, v840, l4.value);
8085                     }), (function(){
8086                         var tmp = v837;
8087                         return tmp === l3.value? l3.value: tmp.cdr;
8088                     })())) : (function(v842){
8089                         return l131.fvalue(values, l134.fvalue(pv, l193.fvalue(pv), l131.fvalue(pv, ";", (function(){
8090                             var symbol = l130;
8091                             var value = symbol.value;
8092                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8093                             return value;
8094                         })())), (v842 !== l3.value ? l131.fvalue(pv, v842, ";", (function(){
8095                             var symbol = l130;
8096                             var value = symbol.value;
8097                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8098                             return value;
8099                         })()) : ""));
8100                     })(l142.fvalue(pv, v837, v838)));
8101                 }
8102                 finally {
8103                     l190.value = v839;
8104                 }
8105             })(l3.value);
8106         })();
8107     }));
8108     return l317;
8109 })();
8110 (function(){
8111     (l239).fvalue = (function(v845){
8112         ((v845)["fname"] = "EVAL");
8113         return v845;
8114     })((function (values,v844){
8115         checkArgs(arguments, 2);
8116         return (function(){
8117             return (function(){
8118                 var string = l317.fvalue(pv, v844, l4.value);
8119                 if (typeof string != 'string')
8120                     throw 'The value ' + string + ' is not a type string.';
8121                 return (function(){
8122                     var v = eval.apply(window, [string]);
8123                     if (typeof v !== 'object' || !('multiple-value' in v)){
8124                         v = [v];
8125                         v['multiple-value'] = true;
8126                     }
8127                     return values.apply(this, v);
8128                 })();
8129             })();
8130         })();
8131     }));
8132     return l239;
8133 })();
8134 var l318 = {name: "&BODY"};
8135 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);
8136 l128.fvalue(values, l319);
8137 ((l120).value = (function(){
8138     var symbol = l116;
8139     var value = symbol.value;
8140     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8141     return value;
8142 })());
8143 (function(){
8144     var string = "var lisp";
8145     if (typeof string != 'string')
8146         throw 'The value ' + string + ' is not a type string.';
8147     return (function(){
8148         var v = eval.apply(window, [string]);
8149         if (typeof v !== 'object' || !('multiple-value' in v)){
8150             v = [v];
8151             v['multiple-value'] = true;
8152         }
8153         return values.apply(this, v);
8154     })();
8155 })();
8156 (lisp = {});
8157 (lisp.read = (function(){
8158     var symbol = l168;
8159     var func = symbol.fvalue;
8160     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8161     return func;
8162 })());
8163 (lisp.print = (function(){
8164     var symbol = l144;
8165     var func = symbol.fvalue;
8166     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8167     return func;
8168 })());
8169 (lisp.eval = (function(){
8170     var symbol = l239;
8171     var func = symbol.fvalue;
8172     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8173     return func;
8174 })());
8175 (lisp.compile = (function (values,v846){
8176     checkArgs(arguments, 2);
8177     return l317.fvalue(values, v846, l4.value);
8178 }));
8179 (lisp.evalString = (function (values,v847){
8180     checkArgs(arguments, 2);
8181     return l239.fvalue(values, l168.fvalue(pv, v847));
8182 }));
8183 (lisp.compileString = (function (values,v848){
8184     checkArgs(arguments, 2);
8185     return l317.fvalue(values, l168.fvalue(pv, v848), l4.value);
8186 }));
8187 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);
8188 var l321 = {name: "OP"};
8189 var l322 = {name: "SYM"};
8190 var l323 = {name: "X"};
8191 var l324 = {name: "ARGS"};
8192 var l325 = {name: "BODY"};
8193 var l326 = {name: "DECLS"};
8194 var l327 = {name: "DECL"};
8195 var l328 = {name: "NAME"};
8196 var l329 = {name: "ARG"};
8197 var l330 = {name: "FORM"};
8198 var l331 = {name: "PACKAGE-DESIGNATOR"};
8199 var l332 = {name: "VALUE-FROM"};
8200 var l333 = {name: "VARIABLES"};
8201 var l334 = {name: "VARLIST"};
8202 var l335 = {name: "ENDLIST"};
8203 var l336 = {name: "V"};
8204 var l337 = {name: "PAIRS"};
8205 var l338 = {name: "ASSIGNMENTS"};
8206 var l339 = {name: "VALUE"};
8207 var l340 = {name: "FORM1"};
8208 var l341 = {name: "RESULT"};
8209 var l342 = {name: "FORMS"};
8210 var l343 = {name: "G"};
8211 var l344 = {name: "CLAUSULES"};
8212 var l345 = {name: "!FORM"};
8213 var l346 = {name: "CLAUSULE"};
8214 var l347 = {name: "ITER"};
8215 var l348 = {name: "G!TO"};
8216 var l349 = {name: "VAR"};
8217 var l350 = {name: "TO"};
8218 var l351 = {name: "G!LIST"};
8219 var l352 = {name: "PLACE"};
8220 var l353 = {name: "DELTA"};
8221 var l354 = {name: "CONDITION"};
8222 var l355 = {name: "DOCSTRING"};
8223 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);
8224 (function(){
8225     l122.fvalue(pv, l318);
8226     l122.fvalue(pv, l317);
8227     l122.fvalue(pv, l316);
8228     l122.fvalue(pv, l315);
8229     l122.fvalue(pv, l314);
8230     l122.fvalue(pv, l313);
8231     l122.fvalue(pv, l312);
8232     l122.fvalue(pv, l311);
8233     l122.fvalue(pv, l310);
8234     l122.fvalue(pv, l309);
8235     l122.fvalue(pv, l308);
8236     l122.fvalue(pv, l307);
8237     l122.fvalue(pv, l306);
8238     l122.fvalue(pv, l305);
8239     l122.fvalue(pv, l304);
8240     l122.fvalue(pv, l303);
8241     l122.fvalue(pv, l302);
8242     l122.fvalue(pv, l301);
8243     l122.fvalue(pv, l300);
8244     l122.fvalue(pv, l299);
8245     l122.fvalue(pv, l298);
8246     l122.fvalue(pv, l297);
8247     l122.fvalue(pv, l296);
8248     l122.fvalue(pv, l295);
8249     l122.fvalue(pv, l294);
8250     l122.fvalue(pv, l293);
8251     l122.fvalue(pv, l292);
8252     l122.fvalue(pv, l291);
8253     l122.fvalue(pv, l290);
8254     l122.fvalue(pv, l289);
8255     l122.fvalue(pv, l288);
8256     l122.fvalue(pv, l287);
8257     l122.fvalue(pv, l286);
8258     l122.fvalue(pv, l285);
8259     l122.fvalue(pv, l284);
8260     l122.fvalue(pv, l283);
8261     l122.fvalue(pv, l282);
8262     l122.fvalue(pv, l281);
8263     l122.fvalue(pv, l280);
8264     l122.fvalue(pv, l279);
8265     l122.fvalue(pv, l278);
8266     l122.fvalue(pv, l277);
8267     l122.fvalue(pv, l276);
8268     l122.fvalue(pv, l275);
8269     l122.fvalue(pv, l274);
8270     l122.fvalue(pv, l273);
8271     l122.fvalue(pv, l272);
8272     l122.fvalue(pv, l271);
8273     l122.fvalue(pv, l270);
8274     l122.fvalue(pv, l269);
8275     l122.fvalue(pv, l268);
8276     l122.fvalue(pv, l267);
8277     l122.fvalue(pv, l266);
8278     l122.fvalue(pv, l265);
8279     l122.fvalue(pv, l264);
8280     l122.fvalue(pv, l263);
8281     l122.fvalue(pv, l262);
8282     l122.fvalue(pv, l261);
8283     l122.fvalue(pv, l260);
8284     l122.fvalue(pv, l259);
8285     l122.fvalue(pv, l258);
8286     l122.fvalue(pv, l257);
8287     l122.fvalue(pv, l256);
8288     l122.fvalue(pv, l255);
8289     l122.fvalue(pv, l254);
8290     l122.fvalue(pv, l253);
8291     l122.fvalue(pv, l252);
8292     l122.fvalue(pv, l251);
8293     l122.fvalue(pv, l250);
8294     l122.fvalue(pv, l249);
8295     l122.fvalue(pv, l248);
8296     l122.fvalue(pv, l247);
8297     l122.fvalue(pv, l246);
8298     l122.fvalue(pv, l245);
8299     l122.fvalue(pv, l244);
8300     l122.fvalue(pv, l243);
8301     l122.fvalue(pv, l242);
8302     l122.fvalue(pv, l241);
8303     l122.fvalue(pv, l240);
8304     l122.fvalue(pv, l239);
8305     l122.fvalue(pv, l238);
8306     l122.fvalue(pv, l237);
8307     l122.fvalue(pv, l236);
8308     l122.fvalue(pv, l235);
8309     l122.fvalue(pv, l234);
8310     l122.fvalue(pv, l233);
8311     l122.fvalue(pv, l232);
8312     l122.fvalue(pv, l231);
8313     l122.fvalue(pv, l230);
8314     l122.fvalue(pv, l229);
8315     l122.fvalue(pv, l228);
8316     l122.fvalue(pv, l227);
8317     l122.fvalue(pv, l226);
8318     l122.fvalue(pv, l225);
8319     l122.fvalue(pv, l224);
8320     l122.fvalue(pv, l223);
8321     l122.fvalue(pv, l222);
8322     l122.fvalue(pv, l221);
8323     l122.fvalue(pv, l220);
8324     l122.fvalue(pv, l219);
8325     l122.fvalue(pv, l218);
8326     l122.fvalue(pv, l217);
8327     l122.fvalue(pv, l216);
8328     l122.fvalue(pv, l215);
8329     l122.fvalue(pv, l214);
8330     l122.fvalue(pv, l213);
8331     l122.fvalue(pv, l212);
8332     l122.fvalue(pv, l211);
8333     l122.fvalue(pv, l210);
8334     l122.fvalue(pv, l208);
8335     l122.fvalue(pv, l207);
8336     l122.fvalue(pv, l206);
8337     l122.fvalue(pv, l205);
8338     l122.fvalue(pv, l204);
8339     l122.fvalue(pv, l203);
8340     l122.fvalue(pv, l202);
8341     l122.fvalue(pv, l201);
8342     l122.fvalue(pv, l200);
8343     l122.fvalue(pv, l199);
8344     l122.fvalue(pv, l198);
8345     l122.fvalue(pv, l197);
8346     l122.fvalue(pv, l196);
8347     l122.fvalue(pv, l195);
8348     l122.fvalue(pv, l194);
8349     l122.fvalue(pv, l193);
8350     l122.fvalue(pv, l192);
8351     l122.fvalue(pv, l191);
8352     l122.fvalue(pv, l190);
8353     l122.fvalue(pv, l189);
8354     l122.fvalue(pv, l188);
8355     l122.fvalue(pv, l187);
8356     l122.fvalue(pv, l186);
8357     l122.fvalue(pv, l185);
8358     l122.fvalue(pv, l184);
8359     l122.fvalue(pv, l183);
8360     l122.fvalue(pv, l182);
8361     l122.fvalue(pv, l181);
8362     l122.fvalue(pv, l180);
8363     l122.fvalue(pv, l179);
8364     l122.fvalue(pv, l178);
8365     l122.fvalue(pv, l177);
8366     l122.fvalue(pv, l176);
8367     l122.fvalue(pv, l175);
8368     l122.fvalue(pv, l174);
8369     l122.fvalue(pv, l173);
8370     l122.fvalue(pv, l172);
8371     l122.fvalue(pv, l171);
8372     l122.fvalue(pv, l170);
8373     l122.fvalue(pv, l169);
8374     l122.fvalue(pv, l168);
8375     l122.fvalue(pv, l167);
8376     l122.fvalue(pv, l166);
8377     l122.fvalue(pv, l165);
8378     l122.fvalue(pv, l164);
8379     l122.fvalue(pv, l163);
8380     l122.fvalue(pv, l162);
8381     l122.fvalue(pv, l161);
8382     l122.fvalue(pv, l160);
8383     l122.fvalue(pv, l159);
8384     l122.fvalue(pv, l158);
8385     l122.fvalue(pv, l157);
8386     l122.fvalue(pv, l156);
8387     l122.fvalue(pv, l155);
8388     l122.fvalue(pv, l154);
8389     l122.fvalue(pv, l153);
8390     l122.fvalue(pv, l152);
8391     l122.fvalue(pv, l151);
8392     l122.fvalue(pv, l150);
8393     l122.fvalue(pv, l149);
8394     l122.fvalue(pv, l148);
8395     l122.fvalue(pv, l147);
8396     l122.fvalue(pv, l146);
8397     l122.fvalue(pv, l145);
8398     l122.fvalue(pv, l144);
8399     l122.fvalue(pv, l143);
8400     l122.fvalue(pv, l142);
8401     l122.fvalue(pv, l141);
8402     l122.fvalue(pv, l140);
8403     l122.fvalue(pv, l139);
8404     l122.fvalue(pv, l138);
8405     l122.fvalue(pv, l137);
8406     l122.fvalue(pv, l136);
8407     l122.fvalue(pv, l135);
8408     l122.fvalue(pv, l134);
8409     l122.fvalue(pv, l133);
8410     l122.fvalue(pv, l132);
8411     l122.fvalue(pv, l131);
8412     l122.fvalue(pv, l130);
8413     l122.fvalue(pv, l129);
8414     l122.fvalue(pv, l128);
8415     l122.fvalue(pv, l127);
8416     l122.fvalue(pv, l126);
8417     l122.fvalue(pv, l125);
8418     l122.fvalue(pv, l124);
8419     l122.fvalue(pv, l123);
8420     l122.fvalue(pv, l122);
8421     l122.fvalue(pv, l121);
8422     l122.fvalue(pv, l120);
8423     l122.fvalue(pv, l119);
8424     l122.fvalue(pv, l118);
8425     l122.fvalue(pv, l117);
8426     l122.fvalue(pv, l116);
8427     l122.fvalue(pv, l115);
8428     l122.fvalue(pv, l114);
8429     l122.fvalue(pv, l113);
8430     l122.fvalue(pv, l112);
8431     l122.fvalue(pv, l111);
8432     l122.fvalue(pv, l110);
8433     l122.fvalue(pv, l109);
8434     l122.fvalue(pv, l108);
8435     l122.fvalue(pv, l107);
8436     l122.fvalue(pv, l106);
8437     l122.fvalue(pv, l105);
8438     l122.fvalue(pv, l104);
8439     l122.fvalue(pv, l103);
8440     l122.fvalue(pv, l102);
8441     l122.fvalue(pv, l101);
8442     l122.fvalue(pv, l100);
8443     l122.fvalue(pv, l99);
8444     l122.fvalue(pv, l98);
8445     l122.fvalue(pv, l97);
8446     l122.fvalue(pv, l96);
8447     l122.fvalue(pv, l95);
8448     l122.fvalue(pv, l94);
8449     l122.fvalue(pv, l93);
8450     l122.fvalue(pv, l92);
8451     l122.fvalue(pv, l91);
8452     l122.fvalue(pv, l90);
8453     l122.fvalue(pv, l89);
8454     l122.fvalue(pv, l88);
8455     l122.fvalue(pv, l87);
8456     l122.fvalue(pv, l86);
8457     l122.fvalue(pv, l85);
8458     l122.fvalue(pv, l84);
8459     l122.fvalue(pv, l83);
8460     l122.fvalue(pv, l82);
8461     l122.fvalue(pv, l81);
8462     l122.fvalue(pv, l80);
8463     l122.fvalue(pv, l79);
8464     l122.fvalue(pv, l78);
8465     l122.fvalue(pv, l77);
8466     l122.fvalue(pv, l76);
8467     l122.fvalue(pv, l75);
8468     l122.fvalue(pv, l74);
8469     l122.fvalue(pv, l73);
8470     l122.fvalue(pv, l72);
8471     l122.fvalue(pv, l71);
8472     l122.fvalue(pv, l70);
8473     l122.fvalue(pv, l69);
8474     l122.fvalue(pv, l68);
8475     l122.fvalue(pv, l67);
8476     l122.fvalue(pv, l66);
8477     l122.fvalue(pv, l65);
8478     l122.fvalue(pv, l64);
8479     l122.fvalue(pv, l63);
8480     l122.fvalue(pv, l62);
8481     l122.fvalue(pv, l61);
8482     l122.fvalue(pv, l60);
8483     l122.fvalue(pv, l59);
8484     l122.fvalue(pv, l58);
8485     l122.fvalue(pv, l57);
8486     l122.fvalue(pv, l56);
8487     l122.fvalue(pv, l55);
8488     l122.fvalue(pv, l54);
8489     l122.fvalue(pv, l53);
8490     l122.fvalue(pv, l52);
8491     l122.fvalue(pv, l51);
8492     l122.fvalue(pv, l50);
8493     l122.fvalue(pv, l49);
8494     l122.fvalue(pv, l48);
8495     l122.fvalue(pv, l47);
8496     l122.fvalue(pv, l46);
8497     l122.fvalue(pv, l45);
8498     l122.fvalue(pv, l44);
8499     l122.fvalue(pv, l43);
8500     l122.fvalue(pv, l42);
8501     l122.fvalue(pv, l41);
8502     l122.fvalue(pv, l40);
8503     l122.fvalue(pv, l39);
8504     l122.fvalue(pv, l38);
8505     l122.fvalue(pv, l37);
8506     l122.fvalue(pv, l36);
8507     l122.fvalue(pv, l35);
8508     l122.fvalue(pv, l34);
8509     l122.fvalue(pv, l33);
8510     l122.fvalue(pv, l32);
8511     l122.fvalue(pv, l31);
8512     l122.fvalue(pv, l30);
8513     l122.fvalue(pv, l29);
8514     l122.fvalue(pv, l28);
8515     l122.fvalue(pv, l27);
8516     l122.fvalue(pv, l26);
8517     l122.fvalue(pv, l25);
8518     l122.fvalue(pv, l24);
8519     l122.fvalue(pv, l23);
8520     l122.fvalue(pv, l22);
8521     l122.fvalue(pv, l21);
8522     l122.fvalue(pv, l20);
8523     l122.fvalue(pv, l19);
8524     l122.fvalue(pv, l18);
8525     l122.fvalue(pv, l17);
8526     l122.fvalue(pv, l16);
8527     l122.fvalue(pv, l15);
8528     l122.fvalue(pv, l14);
8529     l122.fvalue(pv, l13);
8530     l122.fvalue(pv, l12);
8531     l122.fvalue(pv, l11);
8532     l122.fvalue(pv, l10);
8533     l122.fvalue(pv, l9);
8534     l122.fvalue(pv, l8);
8535     l122.fvalue(pv, l7);
8536     l122.fvalue(pv, l6);
8537     l122.fvalue(pv, l5);
8538     l122.fvalue(pv, l4);
8539     l122.fvalue(pv, l3);
8540     l122.fvalue(pv, l2);
8541     l122.fvalue(pv, l1);
8542     ((l225).value = l320);
8543     ((l185).value = l356);
8544     ((l186).value = 848);
8545     ((l15).value = 217);
8546     return ((l247).value = 287);
8547 })();
8548 ((l226).value = 356);