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