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: "WHEN"};
  59 l5;
  60 var l6 = {name: "UNLESS"};
  61 l6;
  62 var l7 = {name: "DEFVAR"};
  63 l7;
  64 var l8 = {name: "DEFPARAMETER"};
  65 l8;
  66 var l9 = {name: "NAMED-LAMBDA"};
  67 l9;
  68 var l10 = {name: "DEFUN"};
  69 l10;
  70 var l11 = {name: "NULL"};
  71 (function(){
  72     (l11).fvalue = (function(v2){
  73         ((v2)["fname"] = "NULL");
  74         return v2;
  75     })((function (values,v1){
  76         checkArgs(arguments, 2);
  77         return (function(){
  78             return ((v1 === l3.value)?l4.value: l3.value);
  79         })();
  80     }));
  81     return l11;
  82 })();
  83 var l12 = {name: "RETURN"};
  84 l12;
  85 var l13 = {name: "WHILE"};
  86 l13;
  87 var l14 = {name: "*GENSYM-COUNTER*"};
  88 (function(){
  89     (((l14.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l14).value = 0));
  90     return l14;
  91 })();
  92 var l15 = {name: "GENSYM"};
  93 var l16 = {name: "INTEGER-TO-STRING"};
  94 (function(){
  95     (l15).fvalue = (function(v4){
  96         ((v4)["fname"] = "GENSYM");
  97         return v4;
  98     })((function (values,v3){
  99         checkArgsAtMost(arguments, 2);
 100         switch(arguments.length-1){
 101         case 0:
 102         v3="G";
 103         default: break;
 104         }
 105         return (function(){
 106             ((l14).value = (function(){
 107                 var x1 = (function(){
 108                     var symbol = l14;
 109                     var value = symbol.value;
 110                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 111                     return value;
 112                 })();
 113                 if (typeof x1 !== 'number') throw 'Not a number!';
 114                 var x2 = 1;
 115                 if (typeof x2 !== 'number') throw 'Not a number!';
 116                 return x1+x2;
 117             })());
 118             return (function(){
 119                 var name = (function(){
 120                     var string1 = v3;
 121                     var string2 = l16.fvalue(pv, (function(){
 122                         var symbol = l14;
 123                         var value = symbol.value;
 124                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 125                         return value;
 126                     })());
 127                     if (typeof string1 != 'string')
 128                         throw 'The value ' + string1 + ' is not a type string.';
 129                     if (typeof string2 != 'string')
 130                         throw 'The value ' + string2 + ' is not a type string.';
 131                     return string1.concat(string2);
 132                 })();
 133                 if (typeof name != 'string')
 134                     throw 'The value ' + name + ' is not a type string.';
 135                 return ({name: name});
 136             })();
 137         })();
 138     }));
 139     return l15;
 140 })();
 141 var l17 = {name: "BOUNDP"};
 142 (function(){
 143     (l17).fvalue = (function(v6){
 144         ((v6)["fname"] = "BOUNDP");
 145         return v6;
 146     })((function (values,v5){
 147         checkArgs(arguments, 2);
 148         return (function(){
 149             return ((v5.value !== undefined)?l4.value: l3.value);
 150         })();
 151     }));
 152     return l17;
 153 })();
 154 var l18 = {name: "="};
 155 (function(){
 156     (l18).fvalue = (function(v9){
 157         ((v9)["fname"] = "=");
 158         return v9;
 159     })((function (values,v7,v8){
 160         checkArgs(arguments, 3);
 161         return (function(){
 162             return (function(){
 163                 var x1 = v7;
 164                 if (typeof x1 !== 'number') throw 'Not a number!';
 165                 var x2 = v8;
 166                 if (typeof x2 !== 'number') throw 'Not a number!';
 167                 return (x1==x2?l4.value: l3.value);
 168             })();
 169         })();
 170     }));
 171     return l18;
 172 })();
 173 var l19 = {name: "*"};
 174 (function(){
 175     (l19).fvalue = (function(v12){
 176         ((v12)["fname"] = "*");
 177         return v12;
 178     })((function (values,v10,v11){
 179         checkArgs(arguments, 3);
 180         return (function(){
 181             return (function(){
 182                 var x1 = v10;
 183                 if (typeof x1 !== 'number') throw 'Not a number!';
 184                 var x2 = v11;
 185                 if (typeof x2 !== 'number') throw 'Not a number!';
 186                 return x1*x2;
 187             })();
 188         })();
 189     }));
 190     return l19;
 191 })();
 192 var l20 = {name: "/"};
 193 (function(){
 194     (l20).fvalue = (function(v15){
 195         ((v15)["fname"] = "/");
 196         return v15;
 197     })((function (values,v13,v14){
 198         checkArgs(arguments, 3);
 199         return (function(){
 200             return (function(){
 201                 var x1 = v13;
 202                 if (typeof x1 !== 'number') throw 'Not a number!';
 203                 var x2 = v14;
 204                 if (typeof x2 !== 'number') throw 'Not a number!';
 205                 return x1/x2;
 206             })();
 207         })();
 208     }));
 209     return l20;
 210 })();
 211 var l21 = {name: "1+"};
 212 (function(){
 213     (l21).fvalue = (function(v17){
 214         ((v17)["fname"] = "1+");
 215         return v17;
 216     })((function (values,v16){
 217         checkArgs(arguments, 2);
 218         return (function(){
 219             return (function(){
 220                 var x1 = v16;
 221                 if (typeof x1 !== 'number') throw 'Not a number!';
 222                 var x2 = 1;
 223                 if (typeof x2 !== 'number') throw 'Not a number!';
 224                 return x1+x2;
 225             })();
 226         })();
 227     }));
 228     return l21;
 229 })();
 230 var l22 = {name: "1-"};
 231 (function(){
 232     (l22).fvalue = (function(v19){
 233         ((v19)["fname"] = "1-");
 234         return v19;
 235     })((function (values,v18){
 236         checkArgs(arguments, 2);
 237         return (function(){
 238             return (function(){
 239                 var x1 = v18;
 240                 if (typeof x1 !== 'number') throw 'Not a number!';
 241                 var x2 = 1;
 242                 if (typeof x2 !== 'number') throw 'Not a number!';
 243                 return x1-x2;
 244             })();
 245         })();
 246     }));
 247     return l22;
 248 })();
 249 var l23 = {name: "ZEROP"};
 250 (function(){
 251     (l23).fvalue = (function(v21){
 252         ((v21)["fname"] = "ZEROP");
 253         return v21;
 254     })((function (values,v20){
 255         checkArgs(arguments, 2);
 256         return (function(){
 257             return (function(){
 258                 var x1 = v20;
 259                 if (typeof x1 !== 'number') throw 'Not a number!';
 260                 var x2 = 0;
 261                 if (typeof x2 !== 'number') throw 'Not a number!';
 262                 return (x1==x2?l4.value: l3.value);
 263             })();
 264         })();
 265     }));
 266     return l23;
 267 })();
 268 var l24 = {name: "TRUNCATE"};
 269 (function(){
 270     (l24).fvalue = (function(v24){
 271         ((v24)["fname"] = "TRUNCATE");
 272         return v24;
 273     })((function (values,v22,v23){
 274         checkArgs(arguments, 3);
 275         return (function(){
 276             return (function(){
 277                 var x = (function(){
 278                     var x1 = v22;
 279                     if (typeof x1 !== 'number') throw 'Not a number!';
 280                     var x2 = v23;
 281                     if (typeof x2 !== 'number') throw 'Not a number!';
 282                     return x1/x2;
 283                 })();
 284                 if (typeof x != 'number')
 285                     throw 'The value ' + x + ' is not a type number.';
 286                 return Math.floor(x);
 287             })();
 288         })();
 289     }));
 290     return l24;
 291 })();
 292 var l25 = {name: "EQL"};
 293 (function(){
 294     (l25).fvalue = (function(v27){
 295         ((v27)["fname"] = "EQL");
 296         return v27;
 297     })((function (values,v25,v26){
 298         checkArgs(arguments, 3);
 299         return (function(){
 300             return ((v25 === v26)?l4.value: l3.value);
 301         })();
 302     }));
 303     return l25;
 304 })();
 305 var l26 = {name: "NOT"};
 306 (function(){
 307     (l26).fvalue = (function(v29){
 308         ((v29)["fname"] = "NOT");
 309         return v29;
 310     })((function (values,v28){
 311         checkArgs(arguments, 2);
 312         return (function(){
 313             return (v28 !== l3.value ? l3.value : l4.value);
 314         })();
 315     }));
 316     return l26;
 317 })();
 318 var l27 = {name: "CONS"};
 319 (function(){
 320     (l27).fvalue = (function(v32){
 321         ((v32)["fname"] = "CONS");
 322         return v32;
 323     })((function (values,v30,v31){
 324         checkArgs(arguments, 3);
 325         return (function(){
 326             return ({car: v30, cdr: v31});
 327         })();
 328     }));
 329     return l27;
 330 })();
 331 var l28 = {name: "CONSP"};
 332 (function(){
 333     (l28).fvalue = (function(v34){
 334         ((v34)["fname"] = "CONSP");
 335         return v34;
 336     })((function (values,v33){
 337         checkArgs(arguments, 2);
 338         return (function(){
 339             return ((function(){
 340                 var tmp = v33;
 341                 return (typeof tmp == 'object' && 'car' in tmp);
 342             })()?l4.value: l3.value);
 343         })();
 344     }));
 345     return l28;
 346 })();
 347 var l29 = {name: "CAR"};
 348 (function(){
 349     (l29).fvalue = (function(v36){
 350         ((v36)["fname"] = "CAR");
 351         return v36;
 352     })((function(){
 353         var func = (function (values,v35){
 354             checkArgs(arguments, 2);
 355             return (function(){
 356                 return (function(){
 357                     var tmp = v35;
 358                     return tmp === l3.value? l3.value: tmp.car;
 359                 })();
 360             })();
 361         });
 362         func.docstring = 'Return the CAR part of a cons, or NIL if X is null.';
 363         return func;
 364     })());
 365     return l29;
 366 })();
 367 var l30 = {name: "CDR"};
 368 (function(){
 369     (l30).fvalue = (function(v38){
 370         ((v38)["fname"] = "CDR");
 371         return v38;
 372     })((function (values,v37){
 373         checkArgs(arguments, 2);
 374         return (function(){
 375             return (function(){
 376                 var tmp = v37;
 377                 return tmp === l3.value? l3.value: tmp.cdr;
 378             })();
 379         })();
 380     }));
 381     return l30;
 382 })();
 383 var l31 = {name: "CAAR"};
 384 (function(){
 385     (l31).fvalue = (function(v40){
 386         ((v40)["fname"] = "CAAR");
 387         return v40;
 388     })((function (values,v39){
 389         checkArgs(arguments, 2);
 390         return (function(){
 391             return (function(){
 392                 var tmp = (function(){
 393                     var tmp = v39;
 394                     return tmp === l3.value? l3.value: tmp.car;
 395                 })();
 396                 return tmp === l3.value? l3.value: tmp.car;
 397             })();
 398         })();
 399     }));
 400     return l31;
 401 })();
 402 var l32 = {name: "CADR"};
 403 (function(){
 404     (l32).fvalue = (function(v42){
 405         ((v42)["fname"] = "CADR");
 406         return v42;
 407     })((function (values,v41){
 408         checkArgs(arguments, 2);
 409         return (function(){
 410             return (function(){
 411                 var tmp = (function(){
 412                     var tmp = v41;
 413                     return tmp === l3.value? l3.value: tmp.cdr;
 414                 })();
 415                 return tmp === l3.value? l3.value: tmp.car;
 416             })();
 417         })();
 418     }));
 419     return l32;
 420 })();
 421 var l33 = {name: "CDAR"};
 422 (function(){
 423     (l33).fvalue = (function(v44){
 424         ((v44)["fname"] = "CDAR");
 425         return v44;
 426     })((function (values,v43){
 427         checkArgs(arguments, 2);
 428         return (function(){
 429             return (function(){
 430                 var tmp = (function(){
 431                     var tmp = v43;
 432                     return tmp === l3.value? l3.value: tmp.car;
 433                 })();
 434                 return tmp === l3.value? l3.value: tmp.cdr;
 435             })();
 436         })();
 437     }));
 438     return l33;
 439 })();
 440 var l34 = {name: "CDDR"};
 441 (function(){
 442     (l34).fvalue = (function(v46){
 443         ((v46)["fname"] = "CDDR");
 444         return v46;
 445     })((function (values,v45){
 446         checkArgs(arguments, 2);
 447         return (function(){
 448             return (function(){
 449                 var tmp = (function(){
 450                     var tmp = v45;
 451                     return tmp === l3.value? l3.value: tmp.cdr;
 452                 })();
 453                 return tmp === l3.value? l3.value: tmp.cdr;
 454             })();
 455         })();
 456     }));
 457     return l34;
 458 })();
 459 var l35 = {name: "CADDR"};
 460 (function(){
 461     (l35).fvalue = (function(v48){
 462         ((v48)["fname"] = "CADDR");
 463         return v48;
 464     })((function (values,v47){
 465         checkArgs(arguments, 2);
 466         return (function(){
 467             return (function(){
 468                 var tmp = (function(){
 469                     var tmp = (function(){
 470                         var tmp = v47;
 471                         return tmp === l3.value? l3.value: tmp.cdr;
 472                     })();
 473                     return tmp === l3.value? l3.value: tmp.cdr;
 474                 })();
 475                 return tmp === l3.value? l3.value: tmp.car;
 476             })();
 477         })();
 478     }));
 479     return l35;
 480 })();
 481 var l36 = {name: "CDDDR"};
 482 (function(){
 483     (l36).fvalue = (function(v50){
 484         ((v50)["fname"] = "CDDDR");
 485         return v50;
 486     })((function (values,v49){
 487         checkArgs(arguments, 2);
 488         return (function(){
 489             return (function(){
 490                 var tmp = (function(){
 491                     var tmp = (function(){
 492                         var tmp = v49;
 493                         return tmp === l3.value? l3.value: tmp.cdr;
 494                     })();
 495                     return tmp === l3.value? l3.value: tmp.cdr;
 496                 })();
 497                 return tmp === l3.value? l3.value: tmp.cdr;
 498             })();
 499         })();
 500     }));
 501     return l36;
 502 })();
 503 var l37 = {name: "CADDDR"};
 504 (function(){
 505     (l37).fvalue = (function(v52){
 506         ((v52)["fname"] = "CADDDR");
 507         return v52;
 508     })((function (values,v51){
 509         checkArgs(arguments, 2);
 510         return (function(){
 511             return (function(){
 512                 var tmp = (function(){
 513                     var tmp = (function(){
 514                         var tmp = (function(){
 515                             var tmp = v51;
 516                             return tmp === l3.value? l3.value: tmp.cdr;
 517                         })();
 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.car;
 523             })();
 524         })();
 525     }));
 526     return l37;
 527 })();
 528 var l38 = {name: "FIRST"};
 529 (function(){
 530     (l38).fvalue = (function(v54){
 531         ((v54)["fname"] = "FIRST");
 532         return v54;
 533     })((function (values,v53){
 534         checkArgs(arguments, 2);
 535         return (function(){
 536             return (function(){
 537                 var tmp = v53;
 538                 return tmp === l3.value? l3.value: tmp.car;
 539             })();
 540         })();
 541     }));
 542     return l38;
 543 })();
 544 var l39 = {name: "SECOND"};
 545 (function(){
 546     (l39).fvalue = (function(v56){
 547         ((v56)["fname"] = "SECOND");
 548         return v56;
 549     })((function (values,v55){
 550         checkArgs(arguments, 2);
 551         return (function(){
 552             return l32.fvalue(values, v55);
 553         })();
 554     }));
 555     return l39;
 556 })();
 557 var l40 = {name: "THIRD"};
 558 (function(){
 559     (l40).fvalue = (function(v58){
 560         ((v58)["fname"] = "THIRD");
 561         return v58;
 562     })((function (values,v57){
 563         checkArgs(arguments, 2);
 564         return (function(){
 565             return l35.fvalue(values, v57);
 566         })();
 567     }));
 568     return l40;
 569 })();
 570 var l41 = {name: "FOURTH"};
 571 (function(){
 572     (l41).fvalue = (function(v60){
 573         ((v60)["fname"] = "FOURTH");
 574         return v60;
 575     })((function (values,v59){
 576         checkArgs(arguments, 2);
 577         return (function(){
 578             return l37.fvalue(values, v59);
 579         })();
 580     }));
 581     return l41;
 582 })();
 583 var l42 = {name: "LIST"};
 584 (function(){
 585     (l42).fvalue = (function(v62){
 586         ((v62)["fname"] = "LIST");
 587         return v62;
 588     })((function (values){
 589         var v61= l3.value;
 590         for (var i = arguments.length-1; i>=1; i--)
 591             v61 = {car: arguments[i], cdr:
 592         v61};
 593         return (function(){
 594             return v61;
 595         })();
 596     }));
 597     return l42;
 598 })();
 599 var l43 = {name: "ATOM"};
 600 (function(){
 601     (l43).fvalue = (function(v64){
 602         ((v64)["fname"] = "ATOM");
 603         return v64;
 604     })((function (values,v63){
 605         checkArgs(arguments, 2);
 606         return (function(){
 607             return l26.fvalue(values, ((function(){
 608                 var tmp = v63;
 609                 return (typeof tmp == 'object' && 'car' in tmp);
 610             })()?l4.value: l3.value));
 611         })();
 612     }));
 613     return l43;
 614 })();
 615 var l44 = {name: "INCF"};
 616 l44;
 617 var l45 = {name: "DECF"};
 618 l45;
 619 var l46 = {name: "PUSH"};
 620 l46;
 621 var l47 = {name: "DOLIST"};
 622 l47;
 623 var l48 = {name: "DOTIMES"};
 624 l48;
 625 var l49 = {name: "COND"};
 626 l49;
 627 var l50 = {name: "CASE"};
 628 l50;
 629 var l51 = {name: "ECASE"};
 630 l51;
 631 var l52 = {name: "AND"};
 632 l52;
 633 var l53 = {name: "OR"};
 634 l53;
 635 var l54 = {name: "PROG1"};
 636 l54;
 637 var l55 = {name: "PROG2"};
 638 l55;
 639 var l56 = {name: "ENSURE-LIST"};
 640 var l57 = {name: "LISTP"};
 641 (function(){
 642     (l56).fvalue = (function(v66){
 643         ((v66)["fname"] = "ENSURE-LIST");
 644         return v66;
 645     })((function (values,v65){
 646         checkArgs(arguments, 2);
 647         return (function(){
 648             return (l57.fvalue(pv, v65) !== l3.value ? v65 : l42.fvalue(values, v65));
 649         })();
 650     }));
 651     return l56;
 652 })();
 653 var l58 = {name: "!REDUCE"};
 654 (function(){
 655     (l58).fvalue = (function(v70){
 656         ((v70)["fname"] = "!REDUCE");
 657         return v70;
 658     })((function (values,v67,v68,v69){
 659         checkArgs(arguments, 4);
 660         return (function(){
 661             return (l11.fvalue(pv, v68) !== l3.value ? v69 : l58.fvalue(values, v67, (function(){
 662                 var tmp = v68;
 663                 return tmp === l3.value? l3.value: tmp.cdr;
 664             })(), (v67)(pv, v69, (function(){
 665                 var tmp = v68;
 666                 return tmp === l3.value? l3.value: tmp.car;
 667             })())));
 668         })();
 669     }));
 670     return l58;
 671 })();
 672 var l59 = {name: "+"};
 673 (function(){
 674     (l59).fvalue = (function(v75){
 675         ((v75)["fname"] = "+");
 676         return v75;
 677     })((function (values){
 678         var v71= l3.value;
 679         for (var i = arguments.length-1; i>=1; i--)
 680             v71 = {car: arguments[i], cdr:
 681         v71};
 682         return (function(){
 683             return (function(v72){
 684                 return (function(){
 685                     return (function(v73,v74){
 686                         (function(){
 687                             while(v73 !== l3.value){
 688                                 (v74 = (function(){
 689                                     var tmp = v73;
 690                                     return tmp === l3.value? l3.value: tmp.car;
 691                                 })());
 692                                 (function(){
 693                                     (v72 = (function(){
 694                                         var x1 = v72;
 695                                         if (typeof x1 !== 'number') throw 'Not a number!';
 696                                         var x2 = v74;
 697                                         if (typeof x2 !== 'number') throw 'Not a number!';
 698                                         return x1+x2;
 699                                     })());
 700                                     return l3.value;
 701                                 })();
 702                                 (v73 = (function(){
 703                                     var tmp = v73;
 704                                     return tmp === l3.value? l3.value: tmp.cdr;
 705                                 })());
 706                             }return l3.value;
 707                         })();
 708                         return v72;
 709                     })(v71,l3.value);
 710                 })();
 711             })(0);
 712         })();
 713     }));
 714     return l59;
 715 })();
 716 var l60 = {name: "-"};
 717 (function(){
 718     (l60).fvalue = (function(v81){
 719         ((v81)["fname"] = "-");
 720         return v81;
 721     })((function (values,v77){
 722         checkArgsAtLeast(arguments, 2);
 723         var v76= l3.value;
 724         for (var i = arguments.length-1; i>=2; i--)
 725             v76 = {car: arguments[i], cdr:
 726         v76};
 727         return (function(){
 728             return (l11.fvalue(pv, v76) !== l3.value ? (function(){
 729                 var x1 = v77;
 730                 if (typeof x1 !== 'number') throw 'Not a number!';
 731                 return -x1;
 732             })() : (function(v78){
 733                 return (function(){
 734                     return (function(v79,v80){
 735                         (function(){
 736                             while(v79 !== l3.value){
 737                                 (v80 = (function(){
 738                                     var tmp = v79;
 739                                     return tmp === l3.value? l3.value: tmp.car;
 740                                 })());
 741                                 (function(){
 742                                     (v78 = (function(){
 743                                         var x1 = v78;
 744                                         if (typeof x1 !== 'number') throw 'Not a number!';
 745                                         var x2 = v80;
 746                                         if (typeof x2 !== 'number') throw 'Not a number!';
 747                                         return x1-x2;
 748                                     })());
 749                                     return l3.value;
 750                                 })();
 751                                 (v79 = (function(){
 752                                     var tmp = v79;
 753                                     return tmp === l3.value? l3.value: tmp.cdr;
 754                                 })());
 755                             }return l3.value;
 756                         })();
 757                         return v78;
 758                     })(v76,l3.value);
 759                 })();
 760             })(v77));
 761         })();
 762     }));
 763     return l60;
 764 })();
 765 var l61 = {name: "APPEND-TWO"};
 766 var l62 = {name: "APPEND"};
 767 (function(){
 768     (l61).fvalue = (function(v84){
 769         ((v84)["fname"] = "APPEND-TWO");
 770         return v84;
 771     })((function (values,v82,v83){
 772         checkArgs(arguments, 3);
 773         return (function(){
 774             return (l11.fvalue(pv, v82) !== l3.value ? v83 : ({car: (function(){
 775                 var tmp = v82;
 776                 return tmp === l3.value? l3.value: tmp.car;
 777             })(), cdr: l62.fvalue(pv, (function(){
 778                 var tmp = v82;
 779                 return tmp === l3.value? l3.value: tmp.cdr;
 780             })(), v83)}));
 781         })();
 782     }));
 783     return l61;
 784 })();
 785 (function(){
 786     (l62).fvalue = (function(v86){
 787         ((v86)["fname"] = "APPEND");
 788         return v86;
 789     })((function (values){
 790         var v85= l3.value;
 791         for (var i = arguments.length-1; i>=1; i--)
 792             v85 = {car: arguments[i], cdr:
 793         v85};
 794         return (function(){
 795             return l58.fvalue(values, (function(){
 796                 var symbol = l61;
 797                 var func = symbol.fvalue;
 798                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
 799                 return func;
 800             })(), v85, l3);
 801         })();
 802     }));
 803     return l62;
 804 })();
 805 var l63 = {name: "REVAPPEND"};
 806 (function(){
 807     (l63).fvalue = (function(v89){
 808         ((v89)["fname"] = "REVAPPEND");
 809         return v89;
 810     })((function (values,v87,v88){
 811         checkArgs(arguments, 3);
 812         return (function(){
 813             (function(){
 814                 return (function(){
 815                     while(v87 !== l3.value){
 816                         (v88 = ({car: (function(){
 817                             var tmp = v87;
 818                             return tmp === l3.value? l3.value: tmp.car;
 819                         })(), cdr: v88}));
 820                         (v87 = (function(){
 821                             var tmp = v87;
 822                             return tmp === l3.value? l3.value: tmp.cdr;
 823                         })());
 824                     }return l3.value;
 825                 })();
 826             })();
 827             return v88;
 828         })();
 829     }));
 830     return l63;
 831 })();
 832 var l64 = {name: "REVERSE"};
 833 (function(){
 834     (l64).fvalue = (function(v91){
 835         ((v91)["fname"] = "REVERSE");
 836         return v91;
 837     })((function (values,v90){
 838         checkArgs(arguments, 2);
 839         return (function(){
 840             return l63.fvalue(values, v90, l3);
 841         })();
 842     }));
 843     return l64;
 844 })();
 845 var l65 = {name: "PSETQ"};
 846 l65;
 847 var l66 = {name: "LIST-LENGTH"};
 848 (function(){
 849     (l66).fvalue = (function(v94){
 850         ((v94)["fname"] = "LIST-LENGTH");
 851         return v94;
 852     })((function (values,v92){
 853         checkArgs(arguments, 2);
 854         return (function(){
 855             return (function(v93){
 856                 (function(){
 857                     return (function(){
 858                         while(l26.fvalue(pv, l11.fvalue(pv, v92)) !== l3.value){
 859                             (v93 = (function(){
 860                                 var x1 = v93;
 861                                 if (typeof x1 !== 'number') throw 'Not a number!';
 862                                 var x2 = 1;
 863                                 if (typeof x2 !== 'number') throw 'Not a number!';
 864                                 return x1+x2;
 865                             })());
 866                             (v92 = (function(){
 867                                 var tmp = v92;
 868                                 return tmp === l3.value? l3.value: tmp.cdr;
 869                             })());
 870                         }return l3.value;
 871                     })();
 872                 })();
 873                 return v93;
 874             })(0);
 875         })();
 876     }));
 877     return l66;
 878 })();
 879 var l67 = {name: "LENGTH"};
 880 (function(){
 881     (l67).fvalue = (function(v96){
 882         ((v96)["fname"] = "LENGTH");
 883         return v96;
 884     })((function (values,v95){
 885         checkArgs(arguments, 2);
 886         return (function(){
 887             return (((typeof(v95) == "string")?l4.value: l3.value) !== l3.value ? (function(){
 888                 var x = v95;
 889                 if (typeof x != 'string')
 890                     throw 'The value ' + x + ' is not a type string.';
 891                 return x.length;
 892             })() : (((function(){
 893                 var x = v95;
 894                 return typeof x === 'object' && 'length' in x;
 895             })()?l4.value: l3.value) !== l3.value ? (function(){
 896                 var tmp = (v95)["length"];
 897                 return tmp == undefined? l3.value: tmp ;
 898             })() : (l57.fvalue(pv, v95) !== l3.value ? l66.fvalue(values, v95) : l3.value)));
 899         })();
 900     }));
 901     return l67;
 902 })();
 903 var l68 = {name: "CONCAT-TWO"};
 904 (function(){
 905     (l68).fvalue = (function(v99){
 906         ((v99)["fname"] = "CONCAT-TWO");
 907         return v99;
 908     })((function (values,v97,v98){
 909         checkArgs(arguments, 3);
 910         return (function(){
 911             return (function(){
 912                 var string1 = v97;
 913                 var string2 = v98;
 914                 if (typeof string1 != 'string')
 915                     throw 'The value ' + string1 + ' is not a type string.';
 916                 if (typeof string2 != 'string')
 917                     throw 'The value ' + string2 + ' is not a type string.';
 918                 return string1.concat(string2);
 919             })();
 920         })();
 921     }));
 922     return l68;
 923 })();
 924 var l69 = {name: "MAPCAR"};
 925 (function(){
 926     (l69).fvalue = (function(v102){
 927         ((v102)["fname"] = "MAPCAR");
 928         return v102;
 929     })((function (values,v100,v101){
 930         checkArgs(arguments, 3);
 931         return (function(){
 932             return (l11.fvalue(pv, v101) !== l3.value ? l3 : ({car: (v100)(pv, (function(){
 933                 var tmp = v101;
 934                 return tmp === l3.value? l3.value: tmp.car;
 935             })()), cdr: l69.fvalue(pv, v100, (function(){
 936                 var tmp = v101;
 937                 return tmp === l3.value? l3.value: tmp.cdr;
 938             })())}));
 939         })();
 940     }));
 941     return l69;
 942 })();
 943 var l70 = {name: "IDENTITY"};
 944 (function(){
 945     (l70).fvalue = (function(v104){
 946         ((v104)["fname"] = "IDENTITY");
 947         return v104;
 948     })((function (values,v103){
 949         checkArgs(arguments, 2);
 950         return (function(){
 951             return v103;
 952         })();
 953     }));
 954     return l70;
 955 })();
 956 var l71 = {name: "COPY-LIST"};
 957 (function(){
 958     (l71).fvalue = (function(v106){
 959         ((v106)["fname"] = "COPY-LIST");
 960         return v106;
 961     })((function (values,v105){
 962         checkArgs(arguments, 2);
 963         return (function(){
 964             return l69.fvalue(values, (function(){
 965                 var symbol = l70;
 966                 var func = symbol.fvalue;
 967                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
 968                 return func;
 969             })(), v105);
 970         })();
 971     }));
 972     return l71;
 973 })();
 974 var l72 = {name: "CODE-CHAR"};
 975 (function(){
 976     (l72).fvalue = (function(v108){
 977         ((v108)["fname"] = "CODE-CHAR");
 978         return v108;
 979     })((function (values,v107){
 980         checkArgs(arguments, 2);
 981         return (function(){
 982             return v107;
 983         })();
 984     }));
 985     return l72;
 986 })();
 987 var l73 = {name: "CHAR-CODE"};
 988 (function(){
 989     (l73).fvalue = (function(v110){
 990         ((v110)["fname"] = "CHAR-CODE");
 991         return v110;
 992     })((function (values,v109){
 993         checkArgs(arguments, 2);
 994         return (function(){
 995             return v109;
 996         })();
 997     }));
 998     return l73;
 999 })();
1000 var l74 = {name: "CHAR="};
1001 (function(){
1002     (l74).fvalue = (function(v113){
1003         ((v113)["fname"] = "CHAR=");
1004         return v113;
1005     })((function (values,v111,v112){
1006         checkArgs(arguments, 3);
1007         return (function(){
1008             return (function(){
1009                 var x1 = v111;
1010                 if (typeof x1 !== 'number') throw 'Not a number!';
1011                 var x2 = v112;
1012                 if (typeof x2 !== 'number') throw 'Not a number!';
1013                 return (x1==x2?l4.value: l3.value);
1014             })();
1015         })();
1016     }));
1017     return l74;
1018 })();
1019 var l75 = {name: "INTEGERP"};
1020 (function(){
1021     (l75).fvalue = (function(v115){
1022         ((v115)["fname"] = "INTEGERP");
1023         return v115;
1024     })((function (values,v114){
1025         checkArgs(arguments, 2);
1026         return (function(){
1027             return (((typeof (v114) == "number")?l4.value: l3.value) !== l3.value ? (function(){
1028                 var x1 = (function(){
1029                     var x = v114;
1030                     if (typeof x != 'number')
1031                         throw 'The value ' + x + ' is not a type number.';
1032                     return Math.floor(x);
1033                 })();
1034                 if (typeof x1 !== 'number') throw 'Not a number!';
1035                 var x2 = v114;
1036                 if (typeof x2 !== 'number') throw 'Not a number!';
1037                 return (x1==x2?l4.value: l3.value);
1038             })() : l3.value);
1039         })();
1040     }));
1041     return l75;
1042 })();
1043 var l76 = {name: "PLUSP"};
1044 (function(){
1045     (l76).fvalue = (function(v117){
1046         ((v117)["fname"] = "PLUSP");
1047         return v117;
1048     })((function (values,v116){
1049         checkArgs(arguments, 2);
1050         return (function(){
1051             return (function(){
1052                 var x1 = 0;
1053                 if (typeof x1 !== 'number') throw 'Not a number!';
1054                 var x2 = v116;
1055                 if (typeof x2 !== 'number') throw 'Not a number!';
1056                 return (x1<x2?l4.value: l3.value);
1057             })();
1058         })();
1059     }));
1060     return l76;
1061 })();
1062 var l77 = {name: "MINUSP"};
1063 (function(){
1064     (l77).fvalue = (function(v119){
1065         ((v119)["fname"] = "MINUSP");
1066         return v119;
1067     })((function (values,v118){
1068         checkArgs(arguments, 2);
1069         return (function(){
1070             return (function(){
1071                 var x1 = v118;
1072                 if (typeof x1 !== 'number') throw 'Not a number!';
1073                 var x2 = 0;
1074                 if (typeof x2 !== 'number') throw 'Not a number!';
1075                 return (x1<x2?l4.value: l3.value);
1076             })();
1077         })();
1078     }));
1079     return l77;
1080 })();
1081 (function(){
1082     (l57).fvalue = (function(v122){
1083         ((v122)["fname"] = "LISTP");
1084         return v122;
1085     })((function (values,v120){
1086         checkArgs(arguments, 2);
1087         return (function(){
1088             return (function(v121){
1089                 return (v121 !== l3.value ? v121 : l11.fvalue(values, v120));
1090             })(((function(){
1091                 var tmp = v120;
1092                 return (typeof tmp == 'object' && 'car' in tmp);
1093             })()?l4.value: l3.value));
1094         })();
1095     }));
1096     return l57;
1097 })();
1098 var l78 = {name: "NTHCDR"};
1099 (function(){
1100     (l78).fvalue = (function(v125){
1101         ((v125)["fname"] = "NTHCDR");
1102         return v125;
1103     })((function (values,v123,v124){
1104         checkArgs(arguments, 3);
1105         return (function(){
1106             (function(){
1107                 return (function(){
1108                     while((l76.fvalue(pv, v123) !== l3.value ? v124 : l3.value) !== l3.value){
1109                         (v123 = l22.fvalue(pv, v123));
1110                         (v124 = (function(){
1111                             var tmp = v124;
1112                             return tmp === l3.value? l3.value: tmp.cdr;
1113                         })());
1114                     }return l3.value;
1115                 })();
1116             })();
1117             return v124;
1118         })();
1119     }));
1120     return l78;
1121 })();
1122 var l79 = {name: "NTH"};
1123 (function(){
1124     (l79).fvalue = (function(v128){
1125         ((v128)["fname"] = "NTH");
1126         return v128;
1127     })((function (values,v126,v127){
1128         checkArgs(arguments, 3);
1129         return (function(){
1130             return (function(){
1131                 var tmp = l78.fvalue(pv, v126, v127);
1132                 return tmp === l3.value? l3.value: tmp.car;
1133             })();
1134         })();
1135     }));
1136     return l79;
1137 })();
1138 var l80 = {name: "LAST"};
1139 (function(){
1140     (l80).fvalue = (function(v130){
1141         ((v130)["fname"] = "LAST");
1142         return v130;
1143     })((function (values,v129){
1144         checkArgs(arguments, 2);
1145         return (function(){
1146             (function(){
1147                 return (function(){
1148                     while(((function(){
1149                         var tmp = (function(){
1150                             var tmp = v129;
1151                             return tmp === l3.value? l3.value: tmp.cdr;
1152                         })();
1153                         return (typeof tmp == 'object' && 'car' in tmp);
1154                     })()?l4.value: l3.value) !== l3.value){
1155                         (v129 = (function(){
1156                             var tmp = v129;
1157                             return tmp === l3.value? l3.value: tmp.cdr;
1158                         })());
1159                     }return l3.value;
1160                 })();
1161             })();
1162             return v129;
1163         })();
1164     }));
1165     return l80;
1166 })();
1167 var l81 = {name: "BUTLAST"};
1168 (function(){
1169     (l81).fvalue = (function(v132){
1170         ((v132)["fname"] = "BUTLAST");
1171         return v132;
1172     })((function (values,v131){
1173         checkArgs(arguments, 2);
1174         return (function(){
1175             return (((function(){
1176                 var tmp = (function(){
1177                     var tmp = v131;
1178                     return tmp === l3.value? l3.value: tmp.cdr;
1179                 })();
1180                 return (typeof tmp == 'object' && 'car' in tmp);
1181             })()?l4.value: l3.value) !== l3.value ? ({car: (function(){
1182                 var tmp = v131;
1183                 return tmp === l3.value? l3.value: tmp.car;
1184             })(), cdr: l81.fvalue(pv, (function(){
1185                 var tmp = v131;
1186                 return tmp === l3.value? l3.value: tmp.cdr;
1187             })())}) : l3.value);
1188         })();
1189     }));
1190     return l81;
1191 })();
1192 var l82 = {name: "MEMBER"};
1193 (function(){
1194     (l82).fvalue = (function(v135){
1195         ((v135)["fname"] = "MEMBER");
1196         return v135;
1197     })((function (values,v133,v134){
1198         checkArgs(arguments, 3);
1199         return (function(){
1200             return (function(){
1201                 try {
1202                     return (function(){
1203                         while(v134 !== l3.value){
1204                             (l25.fvalue(pv, v133, (function(){
1205                                 var tmp = v134;
1206                                 return tmp === l3.value? l3.value: tmp.car;
1207                             })()) !== l3.value ? (function(){
1208                                 var values = mv;
1209                                 throw ({type: 'block', id: 62, values: v134, message: 'Return from unknown block NIL.'})
1210                             })() : l3.value);
1211                             (v134 = (function(){
1212                                 var tmp = v134;
1213                                 return tmp === l3.value? l3.value: tmp.cdr;
1214                             })());
1215                         }return l3.value;
1216                     })();
1217                 }
1218                 catch (cf){
1219                     if (cf.type == 'block' && cf.id == 62)
1220                         return values.apply(this, forcemv(cf.values));
1221                     else
1222                         throw cf;
1223                 }
1224             })();
1225         })();
1226     }));
1227     return l82;
1228 })();
1229 var l83 = {name: "REMOVE"};
1230 (function(){
1231     (l83).fvalue = (function(v138){
1232         ((v138)["fname"] = "REMOVE");
1233         return v138;
1234     })((function (values,v136,v137){
1235         checkArgs(arguments, 3);
1236         return (function(){
1237             return (l11.fvalue(pv, v137) !== l3.value ? l3.value : (l25.fvalue(pv, v136, (function(){
1238                 var tmp = v137;
1239                 return tmp === l3.value? l3.value: tmp.car;
1240             })()) !== l3.value ? l83.fvalue(values, v136, (function(){
1241                 var tmp = v137;
1242                 return tmp === l3.value? l3.value: tmp.cdr;
1243             })()) : ({car: (function(){
1244                 var tmp = v137;
1245                 return tmp === l3.value? l3.value: tmp.car;
1246             })(), cdr: l83.fvalue(pv, v136, (function(){
1247                 var tmp = v137;
1248                 return tmp === l3.value? l3.value: tmp.cdr;
1249             })())})));
1250         })();
1251     }));
1252     return l83;
1253 })();
1254 var l84 = {name: "REMOVE-IF"};
1255 (function(){
1256     (l84).fvalue = (function(v141){
1257         ((v141)["fname"] = "REMOVE-IF");
1258         return v141;
1259     })((function (values,v139,v140){
1260         checkArgs(arguments, 3);
1261         return (function(){
1262             return (l11.fvalue(pv, v140) !== l3.value ? l3.value : ((v139)(pv, (function(){
1263                 var tmp = v140;
1264                 return tmp === l3.value? l3.value: tmp.car;
1265             })()) !== l3.value ? l84.fvalue(values, v139, (function(){
1266                 var tmp = v140;
1267                 return tmp === l3.value? l3.value: tmp.cdr;
1268             })()) : ({car: (function(){
1269                 var tmp = v140;
1270                 return tmp === l3.value? l3.value: tmp.car;
1271             })(), cdr: l84.fvalue(pv, v139, (function(){
1272                 var tmp = v140;
1273                 return tmp === l3.value? l3.value: tmp.cdr;
1274             })())})));
1275         })();
1276     }));
1277     return l84;
1278 })();
1279 var l85 = {name: "REMOVE-IF-NOT"};
1280 (function(){
1281     (l85).fvalue = (function(v144){
1282         ((v144)["fname"] = "REMOVE-IF-NOT");
1283         return v144;
1284     })((function (values,v142,v143){
1285         checkArgs(arguments, 3);
1286         return (function(){
1287             return (l11.fvalue(pv, v143) !== l3.value ? l3.value : ((v142)(pv, (function(){
1288                 var tmp = v143;
1289                 return tmp === l3.value? l3.value: tmp.car;
1290             })()) !== l3.value ? ({car: (function(){
1291                 var tmp = v143;
1292                 return tmp === l3.value? l3.value: tmp.car;
1293             })(), cdr: l85.fvalue(pv, v142, (function(){
1294                 var tmp = v143;
1295                 return tmp === l3.value? l3.value: tmp.cdr;
1296             })())}) : l85.fvalue(values, v142, (function(){
1297                 var tmp = v143;
1298                 return tmp === l3.value? l3.value: tmp.cdr;
1299             })())));
1300         })();
1301     }));
1302     return l85;
1303 })();
1304 var l86 = {name: "DIGIT-CHAR-P"};
1305 (function(){
1306     (l86).fvalue = (function(v146){
1307         ((v146)["fname"] = "DIGIT-CHAR-P");
1308         return v146;
1309     })((function (values,v145){
1310         checkArgs(arguments, 2);
1311         return (function(){
1312             return (((function(){
1313                 var x1 = 48;
1314                 if (typeof x1 !== 'number') throw 'Not a number!';
1315                 var x2 = v145;
1316                 if (typeof x2 !== 'number') throw 'Not a number!';
1317                 return (x1<=x2?l4.value: l3.value);
1318             })() !== l3.value ? (function(){
1319                 var x1 = v145;
1320                 if (typeof x1 !== 'number') throw 'Not a number!';
1321                 var x2 = 57;
1322                 if (typeof x2 !== 'number') throw 'Not a number!';
1323                 return (x1<=x2?l4.value: l3.value);
1324             })() : l3.value) !== l3.value ? (function(){
1325                 var x1 = v145;
1326                 if (typeof x1 !== 'number') throw 'Not a number!';
1327                 var x2 = 48;
1328                 if (typeof x2 !== 'number') throw 'Not a number!';
1329                 return x1-x2;
1330             })() : l3.value);
1331         })();
1332     }));
1333     return l86;
1334 })();
1335 var l87 = {name: "SUBSEQ"};
1336 (function(){
1337     (l87).fvalue = (function(v150){
1338         ((v150)["fname"] = "SUBSEQ");
1339         return v150;
1340     })((function (values,v147,v148,v149){
1341         checkArgsAtLeast(arguments, 3);
1342         checkArgsAtMost(arguments, 4);
1343         switch(arguments.length-1){
1344         case 2:
1345         v149=l3.value;
1346         default: break;
1347         }
1348         return (function(){
1349             return (((typeof(v147) == "string")?l4.value: l3.value) !== l3.value ? (v149 !== l3.value ? (function(){
1350                 var str = v147;
1351                 var a = v148;
1352                 var b;
1353                 b = v149;
1354                 return str.slice(a,b);
1355             })() : (function(){
1356                 var str = v147;
1357                 var a = v148;
1358                 var b;
1359                 return str.slice(a,b);
1360             })()) : (function(){
1361                 throw "Unsupported argument.";
1362             })());
1363         })();
1364     }));
1365     return l87;
1366 })();
1367 var l88 = {name: "PARSE-INTEGER"};
1368 (function(){
1369     (l88).fvalue = (function(v155){
1370         ((v155)["fname"] = "PARSE-INTEGER");
1371         return v155;
1372     })((function (values,v151){
1373         checkArgs(arguments, 2);
1374         return (function(){
1375             return (function(v152,v153,v154){
1376                 (function(){
1377                     return (function(){
1378                         while((function(){
1379                             var x1 = v153;
1380                             if (typeof x1 !== 'number') throw 'Not a number!';
1381                             var x2 = v154;
1382                             if (typeof x2 !== 'number') throw 'Not a number!';
1383                             return (x1<x2?l4.value: l3.value);
1384                         })() !== l3.value){
1385                             (v152 = (function(){
1386                                 var x1 = (function(){
1387                                     var x1 = v152;
1388                                     if (typeof x1 !== 'number') throw 'Not a number!';
1389                                     var x2 = 10;
1390                                     if (typeof x2 !== 'number') throw 'Not a number!';
1391                                     return x1*x2;
1392                                 })();
1393                                 if (typeof x1 !== 'number') throw 'Not a number!';
1394                                 var x2 = l86.fvalue(pv, (function(){
1395                                     var string = v151;
1396                                     var index = v153;
1397                                     if (typeof string != 'string')
1398                                         throw 'The value ' + string + ' is not a type string.';
1399                                     if (typeof index != 'number')
1400                                         throw 'The value ' + index + ' is not a type number.';
1401                                     return string.charCodeAt(index);
1402                                 })());
1403                                 if (typeof x2 !== 'number') throw 'Not a number!';
1404                                 return x1+x2;
1405                             })());
1406                             (v153 = (function(){
1407                                 var x1 = v153;
1408                                 if (typeof x1 !== 'number') throw 'Not a number!';
1409                                 var x2 = 1;
1410                                 if (typeof x2 !== 'number') throw 'Not a number!';
1411                                 return x1+x2;
1412                             })());
1413                         }return l3.value;
1414                     })();
1415                 })();
1416                 return v152;
1417             })(0,0,l67.fvalue(pv, v151));
1418         })();
1419     }));
1420     return l88;
1421 })();
1422 var l89 = {name: "SOME"};
1423 (function(){
1424     (l89).fvalue = (function(v162){
1425         ((v162)["fname"] = "SOME");
1426         return v162;
1427     })((function (values,v156,v157){
1428         checkArgs(arguments, 3);
1429         return (function(){
1430             try {
1431                 return (((typeof(v157) == "string")?l4.value: l3.value) !== l3.value ? (function(v158,v159){
1432                     (function(){
1433                         return (function(){
1434                             while((function(){
1435                                 var x1 = v158;
1436                                 if (typeof x1 !== 'number') throw 'Not a number!';
1437                                 var x2 = v159;
1438                                 if (typeof x2 !== 'number') throw 'Not a number!';
1439                                 return (x1<x2?l4.value: l3.value);
1440                             })() !== l3.value){
1441                                 ((v156)(pv, (function(){
1442                                     var string = v157;
1443                                     var index = v158;
1444                                     if (typeof string != 'string')
1445                                         throw 'The value ' + string + ' is not a type string.';
1446                                     if (typeof index != 'number')
1447                                         throw 'The value ' + index + ' is not a type number.';
1448                                     return string.charCodeAt(index);
1449                                 })()) !== l3.value ? (function(){
1450                                     var values = mv;
1451                                     throw ({type: 'block', id: 70, values: l4.value, message: 'Return from unknown block SOME.'})
1452                                 })() : l3.value);
1453                                 (v158 = (function(){
1454                                     var x1 = v158;
1455                                     if (typeof x1 !== 'number') throw 'Not a number!';
1456                                     var x2 = 1;
1457                                     if (typeof x2 !== 'number') throw 'Not a number!';
1458                                     return x1+x2;
1459                                 })());
1460                             }return l3.value;
1461                         })();
1462                     })();
1463                     return l3.value;
1464                 })(0,l67.fvalue(pv, v157)) : (l57.fvalue(pv, v157) !== l3.value ? (function(){
1465                     try {
1466                         return (function(v160,v161){
1467                             (function(){
1468                                 while(v160 !== l3.value){
1469                                     (v161 = (function(){
1470                                         var tmp = v160;
1471                                         return tmp === l3.value? l3.value: tmp.car;
1472                                     })());
1473                                     (function(){
1474                                         ((v156)(pv, v161) !== l3.value ? (function(){
1475                                             var values = mv;
1476                                             throw ({type: 'block', id: 72, values: l4.value, message: 'Return from unknown block NIL.'})
1477                                         })() : l3.value);
1478                                         return l3.value;
1479                                     })();
1480                                     (v160 = (function(){
1481                                         var tmp = v160;
1482                                         return tmp === l3.value? l3.value: tmp.cdr;
1483                                     })());
1484                                 }return l3.value;
1485                             })();
1486                             return l3.value;
1487                         })(v157,l3.value);
1488                     }
1489                     catch (cf){
1490                         if (cf.type == 'block' && cf.id == 72)
1491                             return values.apply(this, forcemv(cf.values));
1492                         else
1493                             throw cf;
1494                     }
1495                 })() : (function(){
1496                     throw "Unknown sequence.";
1497                 })()));
1498             }
1499             catch (cf){
1500                 if (cf.type == 'block' && cf.id == 70)
1501                     return values.apply(this, forcemv(cf.values));
1502                 else
1503                     throw cf;
1504             }
1505         })();
1506     }));
1507     return l89;
1508 })();
1509 var l90 = {name: "EVERY"};
1510 (function(){
1511     (l90).fvalue = (function(v169){
1512         ((v169)["fname"] = "EVERY");
1513         return v169;
1514     })((function (values,v163,v164){
1515         checkArgs(arguments, 3);
1516         return (function(){
1517             try {
1518                 return (((typeof(v164) == "string")?l4.value: l3.value) !== l3.value ? (function(v165,v166){
1519                     (function(){
1520                         return (function(){
1521                             while((function(){
1522                                 var x1 = v165;
1523                                 if (typeof x1 !== 'number') throw 'Not a number!';
1524                                 var x2 = v166;
1525                                 if (typeof x2 !== 'number') throw 'Not a number!';
1526                                 return (x1<x2?l4.value: l3.value);
1527                             })() !== l3.value){
1528                                 ((v163)(pv, (function(){
1529                                     var string = v164;
1530                                     var index = v165;
1531                                     if (typeof string != 'string')
1532                                         throw 'The value ' + string + ' is not a type string.';
1533                                     if (typeof index != 'number')
1534                                         throw 'The value ' + index + ' is not a type number.';
1535                                     return string.charCodeAt(index);
1536                                 })()) !== l3.value ? l3.value : (function(){
1537                                     var values = mv;
1538                                     throw ({type: 'block', id: 73, values: l3.value, message: 'Return from unknown block EVERY.'})
1539                                 })());
1540                                 (v165 = (function(){
1541                                     var x1 = v165;
1542                                     if (typeof x1 !== 'number') throw 'Not a number!';
1543                                     var x2 = 1;
1544                                     if (typeof x2 !== 'number') throw 'Not a number!';
1545                                     return x1+x2;
1546                                 })());
1547                             }return l3.value;
1548                         })();
1549                     })();
1550                     return l4.value;
1551                 })(0,l67.fvalue(pv, v164)) : (l57.fvalue(pv, v164) !== l3.value ? (function(){
1552                     try {
1553                         return (function(v167,v168){
1554                             (function(){
1555                                 while(v167 !== l3.value){
1556                                     (v168 = (function(){
1557                                         var tmp = v167;
1558                                         return tmp === l3.value? l3.value: tmp.car;
1559                                     })());
1560                                     (function(){
1561                                         ((v163)(pv, v168) !== l3.value ? l3.value : (function(){
1562                                             var values = mv;
1563                                             throw ({type: 'block', id: 75, values: l3.value, message: 'Return from unknown block NIL.'})
1564                                         })());
1565                                         return l3.value;
1566                                     })();
1567                                     (v167 = (function(){
1568                                         var tmp = v167;
1569                                         return tmp === l3.value? l3.value: tmp.cdr;
1570                                     })());
1571                                 }return l3.value;
1572                             })();
1573                             return l4.value;
1574                         })(v164,l3.value);
1575                     }
1576                     catch (cf){
1577                         if (cf.type == 'block' && cf.id == 75)
1578                             return values.apply(this, forcemv(cf.values));
1579                         else
1580                             throw cf;
1581                     }
1582                 })() : (function(){
1583                     throw "Unknown sequence.";
1584                 })()));
1585             }
1586             catch (cf){
1587                 if (cf.type == 'block' && cf.id == 73)
1588                     return values.apply(this, forcemv(cf.values));
1589                 else
1590                     throw cf;
1591             }
1592         })();
1593     }));
1594     return l90;
1595 })();
1596 var l91 = {name: "ASSOC"};
1597 (function(){
1598     (l91).fvalue = (function(v172){
1599         ((v172)["fname"] = "ASSOC");
1600         return v172;
1601     })((function (values,v170,v171){
1602         checkArgs(arguments, 3);
1603         return (function(){
1604             (function(){
1605                 try {
1606                     return (function(){
1607                         while(v171 !== l3.value){
1608                             (l25.fvalue(pv, v170, l31.fvalue(pv, v171)) !== l3.value ? (function(){
1609                                 throw ({type: 'block', id: 77, values: l3.value, message: 'Return from unknown block NIL.'})
1610                             })() : (v171 = (function(){
1611                                 var tmp = v171;
1612                                 return tmp === l3.value? l3.value: tmp.cdr;
1613                             })()));
1614                         }return l3.value;
1615                     })();
1616                 }
1617                 catch (cf){
1618                     if (cf.type == 'block' && cf.id == 77)
1619                         return cf.values;
1620                     else
1621                         throw cf;
1622                 }
1623             })();
1624             return (function(){
1625                 var tmp = v171;
1626                 return tmp === l3.value? l3.value: tmp.car;
1627             })();
1628         })();
1629     }));
1630     return l91;
1631 })();
1632 var l92 = {name: "STRING"};
1633 (function(){
1634     (l92).fvalue = (function(v174){
1635         ((v174)["fname"] = "STRING");
1636         return v174;
1637     })((function (values,v173){
1638         checkArgs(arguments, 2);
1639         return (function(){
1640             return (((typeof(v173) == "string")?l4.value: l3.value) !== l3.value ? v173 : (((function(){
1641                 var tmp = v173;
1642                 return (typeof tmp == 'object' && 'name' in tmp);
1643             })()?l4.value: l3.value) !== l3.value ? (v173).name : (function(){
1644                 var x = v173;
1645                 if (typeof x != 'number')
1646                     throw 'The value ' + x + ' is not a type number.';
1647                 return String.fromCharCode(x);
1648             })()));
1649         })();
1650     }));
1651     return l92;
1652 })();
1653 var l93 = {name: "STRING="};
1654 (function(){
1655     (l93).fvalue = (function(v177){
1656         ((v177)["fname"] = "STRING=");
1657         return v177;
1658     })((function (values,v175,v176){
1659         checkArgs(arguments, 3);
1660         return (function(){
1661             return ((v175 == v176)?l4.value: l3.value);
1662         })();
1663     }));
1664     return l93;
1665 })();
1666 var l94 = {name: "FDEFINITION"};
1667 (function(){
1668     (l94).fvalue = (function(v179){
1669         ((v179)["fname"] = "FDEFINITION");
1670         return v179;
1671     })((function (values,v178){
1672         checkArgs(arguments, 2);
1673         return (function(){
1674             return (((typeof v178 == 'function')?l4.value: l3.value) !== l3.value ? v178 : (((function(){
1675                 var tmp = v178;
1676                 return (typeof tmp == 'object' && 'name' in tmp);
1677             })()?l4.value: l3.value) !== l3.value ? (function(){
1678                 var symbol = v178;
1679                 var func = symbol.fvalue;
1680                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1681                 return func;
1682             })() : (function(){
1683                 throw "Invalid function";
1684             })()));
1685         })();
1686     }));
1687     return l94;
1688 })();
1689 var l95 = {name: "DISASSEMBLE"};
1690 var l96 = {name: "WRITE-LINE"};
1691 (function(){
1692     (l95).fvalue = (function(v181){
1693         ((v181)["fname"] = "DISASSEMBLE");
1694         return v181;
1695     })((function (values,v180){
1696         checkArgs(arguments, 2);
1697         return (function(){
1698             l96.fvalue(pv, (l94.fvalue(pv, v180)).toString());
1699             return l3.value;
1700         })();
1701     }));
1702     return l95;
1703 })();
1704 var l97 = {name: "DOCUMENTATION"};
1705 var l98 = {name: "FUNCTION"};
1706 var l99 = {name: "VARIABLE"};
1707 (function(){
1708     (l97).fvalue = (function(v186){
1709         ((v186)["fname"] = "DOCUMENTATION");
1710         return v186;
1711     })((function(){
1712         var func = (function (values,v182,v183){
1713             checkArgs(arguments, 3);
1714             return (function(){
1715                 return (function(v184){
1716                     return (l25.fvalue(pv, v184, l98) !== l3.value ? (function(v185){
1717                         return (function(){
1718                             var tmp = (v185)["docstring"];
1719                             return tmp == undefined? l3.value: tmp ;
1720                         })();
1721                     })(l94.fvalue(pv, v182)) : (l25.fvalue(pv, v184, l99) !== l3.value ? (function(){
1722                         (((function(){
1723                             var tmp = v182;
1724                             return (typeof tmp == 'object' && 'name' in tmp);
1725                         })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
1726                             throw "Wrong argument type! it should be a symbol";
1727                         })());
1728                         return (function(){
1729                             var tmp = (v182)["vardoc"];
1730                             return tmp == undefined? l3.value: tmp ;
1731                         })();
1732                     })() : (function(){
1733                         throw "ECASE expression failed.";
1734                     })()));
1735                 })(v183);
1736             })();
1737         });
1738         func.docstring = 'Return the documentation of X. TYPE must be the symbol VARIABLE or FUNCTION.';
1739         return func;
1740     })());
1741     return l97;
1742 })();
1743 var l100 = {name: "*PACKAGE-LIST*"};
1744 (function(){
1745     (((l100.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l100).value = l3.value));
1746     return l100;
1747 })();
1748 var l101 = {name: "LIST-ALL-PACKAGES"};
1749 (function(){
1750     (l101).fvalue = (function(v187){
1751         ((v187)["fname"] = "LIST-ALL-PACKAGES");
1752         return v187;
1753     })((function (values){
1754         checkArgsAtMost(arguments, 1);
1755         return (function(){
1756             return (function(){
1757                 var symbol = l100;
1758                 var value = symbol.value;
1759                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1760                 return value;
1761             })();
1762         })();
1763     }));
1764     return l101;
1765 })();
1766 var l102 = {name: "MAKE-PACKAGE"};
1767 var l103 = {name: "FIND-PACKAGE-OR-FAIL"};
1768 (function(){
1769     (l102).fvalue = (function(v192){
1770         ((v192)["fname"] = "MAKE-PACKAGE");
1771         return v192;
1772     })((function (values,v188,v189){
1773         checkArgsAtLeast(arguments, 2);
1774         checkArgsAtMost(arguments, 3);
1775         switch(arguments.length-1){
1776         case 1:
1777         v189=l3.value;
1778         default: break;
1779         }
1780         return (function(){
1781             return (function(v190,v191){
1782                 ((v190)["packageName"] = v188);
1783                 ((v190)["symbols"] = {});
1784                 ((v190)["exports"] = {});
1785                 ((v190)["use"] = v191);
1786                 ((l100).value = ({car: v190, cdr: (function(){
1787                     var symbol = l100;
1788                     var value = symbol.value;
1789                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1790                     return value;
1791                 })()}));
1792                 return v190;
1793             })({},l69.fvalue(pv, (function(){
1794                 var symbol = l103;
1795                 var func = symbol.fvalue;
1796                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1797                 return func;
1798             })(), v189));
1799         })();
1800     }));
1801     return l102;
1802 })();
1803 var l104 = {name: "PACKAGEP"};
1804 (function(){
1805     (l104).fvalue = (function(v194){
1806         ((v194)["fname"] = "PACKAGEP");
1807         return v194;
1808     })((function (values,v193){
1809         checkArgs(arguments, 2);
1810         return (function(){
1811             return (((typeof (v193) === 'object')?l4.value: l3.value) !== l3.value ? ((("symbols") in (v193))?l4.value: l3.value) : l3.value);
1812         })();
1813     }));
1814     return l104;
1815 })();
1816 var l105 = {name: "FIND-PACKAGE"};
1817 var l106 = {name: "PACKAGE-NAME"};
1818 (function(){
1819     (l105).fvalue = (function(v199){
1820         ((v199)["fname"] = "FIND-PACKAGE");
1821         return v199;
1822     })((function (values,v195){
1823         checkArgs(arguments, 2);
1824         return (function(){
1825             try {
1826                 (l104.fvalue(pv, v195) !== l3.value ? (function(){
1827                     var values = mv;
1828                     throw ({type: 'block', id: 86, values: v195, message: 'Return from unknown block FIND-PACKAGE.'})
1829                 })() : l3.value);
1830                 return (function(v196){
1831                     return (function(){
1832                         try {
1833                             return (function(v197,v198){
1834                                 (function(){
1835                                     while(v197 !== l3.value){
1836                                         (v198 = (function(){
1837                                             var tmp = v197;
1838                                             return tmp === l3.value? l3.value: tmp.car;
1839                                         })());
1840                                         (function(){
1841                                             (l93.fvalue(pv, l106.fvalue(pv, v198), v196) !== l3.value ? (function(){
1842                                                 var values = mv;
1843                                                 throw ({type: 'block', id: 87, values: v198, message: 'Return from unknown block NIL.'})
1844                                             })() : l3.value);
1845                                             return l3.value;
1846                                         })();
1847                                         (v197 = (function(){
1848                                             var tmp = v197;
1849                                             return tmp === l3.value? l3.value: tmp.cdr;
1850                                         })());
1851                                     }return l3.value;
1852                                 })();
1853                                 return l3.value;
1854                             })((function(){
1855                                 var symbol = l100;
1856                                 var value = symbol.value;
1857                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1858                                 return value;
1859                             })(),l3.value);
1860                         }
1861                         catch (cf){
1862                             if (cf.type == 'block' && cf.id == 87)
1863                                 return values.apply(this, forcemv(cf.values));
1864                             else
1865                                 throw cf;
1866                         }
1867                     })();
1868                 })(l92.fvalue(pv, v195));
1869             }
1870             catch (cf){
1871                 if (cf.type == 'block' && cf.id == 86)
1872                     return values.apply(this, forcemv(cf.values));
1873                 else
1874                     throw cf;
1875             }
1876         })();
1877     }));
1878     return l105;
1879 })();
1880 (function(){
1881     (l103).fvalue = (function(v202){
1882         ((v202)["fname"] = "FIND-PACKAGE-OR-FAIL");
1883         return v202;
1884     })((function (values,v200){
1885         checkArgs(arguments, 2);
1886         return (function(){
1887             return (function(v201){
1888                 return (v201 !== l3.value ? v201 : (function(){
1889                     throw "Package unknown.";
1890                 })());
1891             })(l105.fvalue(pv, v200));
1892         })();
1893     }));
1894     return l103;
1895 })();
1896 (function(){
1897     (l106).fvalue = (function(v205){
1898         ((v205)["fname"] = "PACKAGE-NAME");
1899         return v205;
1900     })((function (values,v203){
1901         checkArgs(arguments, 2);
1902         return (function(){
1903             return (function(v204){
1904                 return (function(){
1905                     var tmp = (v204)["packageName"];
1906                     return tmp == undefined? l3.value: tmp ;
1907                 })();
1908             })(l103.fvalue(pv, v203));
1909         })();
1910     }));
1911     return l106;
1912 })();
1913 var l107 = {name: "%PACKAGE-SYMBOLS"};
1914 (function(){
1915     (l107).fvalue = (function(v208){
1916         ((v208)["fname"] = "%PACKAGE-SYMBOLS");
1917         return v208;
1918     })((function (values,v206){
1919         checkArgs(arguments, 2);
1920         return (function(){
1921             return (function(v207){
1922                 return (function(){
1923                     var tmp = (v207)["symbols"];
1924                     return tmp == undefined? l3.value: tmp ;
1925                 })();
1926             })(l103.fvalue(pv, v206));
1927         })();
1928     }));
1929     return l107;
1930 })();
1931 var l108 = {name: "PACKAGE-USE-LIST"};
1932 (function(){
1933     (l108).fvalue = (function(v211){
1934         ((v211)["fname"] = "PACKAGE-USE-LIST");
1935         return v211;
1936     })((function (values,v209){
1937         checkArgs(arguments, 2);
1938         return (function(){
1939             return (function(v210){
1940                 return (function(){
1941                     var tmp = (v210)["use"];
1942                     return tmp == undefined? l3.value: tmp ;
1943                 })();
1944             })(l103.fvalue(pv, v209));
1945         })();
1946     }));
1947     return l108;
1948 })();
1949 var l109 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
1950 (function(){
1951     (l109).fvalue = (function(v214){
1952         ((v214)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
1953         return v214;
1954     })((function (values,v212){
1955         checkArgs(arguments, 2);
1956         return (function(){
1957             return (function(v213){
1958                 return (function(){
1959                     var tmp = (v213)["exports"];
1960                     return tmp == undefined? l3.value: tmp ;
1961                 })();
1962             })(l103.fvalue(pv, v212));
1963         })();
1964     }));
1965     return l109;
1966 })();
1967 var l110 = {name: "*COMMON-LISP-PACKAGE*"};
1968 (function(){
1969     (((l110.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l110).value = l102.fvalue(pv, "CL")));
1970     return l110;
1971 })();
1972 var l111 = {name: "*USER-PACKAGE*"};
1973 (function(){
1974     (((l111.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l111).value = l102.fvalue(pv, "CL-USER", l42.fvalue(pv, (function(){
1975         var symbol = l110;
1976         var value = symbol.value;
1977         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1978         return value;
1979     })()))));
1980     return l111;
1981 })();
1982 var l112 = {name: "*KEYWORD-PACKAGE*"};
1983 (function(){
1984     (((l112.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l112).value = l102.fvalue(pv, "KEYWORD")));
1985     return l112;
1986 })();
1987 var l113 = {name: "KEYWORDP"};
1988 var l114 = {name: "SYMBOL-PACKAGE"};
1989 (function(){
1990     (l113).fvalue = (function(v216){
1991         ((v216)["fname"] = "KEYWORDP");
1992         return v216;
1993     })((function (values,v215){
1994         checkArgs(arguments, 2);
1995         return (function(){
1996             return (((function(){
1997                 var tmp = v215;
1998                 return (typeof tmp == 'object' && 'name' in tmp);
1999             })()?l4.value: l3.value) !== l3.value ? ((l114.fvalue(pv, v215) === (function(){
2000                 var symbol = l112;
2001                 var value = symbol.value;
2002                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2003                 return value;
2004             })())?l4.value: l3.value) : l3.value);
2005         })();
2006     }));
2007     return l113;
2008 })();
2009 var l115 = {name: "*PACKAGE*"};
2010 (function(){
2011     (((l115.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l115).value = (function(){
2012         var symbol = l110;
2013         var value = symbol.value;
2014         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2015         return value;
2016     })()));
2017     return l115;
2018 })();
2019 var l116 = {name: "IN-PACKAGE"};
2020 l116;
2021 var l117 = {name: "%INTERN-SYMBOL"};
2022 (function(){
2023     (l117).fvalue = (function(v219){
2024         ((v219)["fname"] = "%INTERN-SYMBOL");
2025         return v219;
2026     })((function (values,v217){
2027         checkArgs(arguments, 2);
2028         return (function(){
2029             return (function(v218){
2030                 ((v217)["package"] = (function(){
2031                     var symbol = l110;
2032                     var value = symbol.value;
2033                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2034                     return value;
2035                 })());
2036                 return ((v218)[(v217).name] = v217);
2037             })(l107.fvalue(pv, (function(){
2038                 var symbol = l110;
2039                 var value = symbol.value;
2040                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2041                 return value;
2042             })()));
2043         })();
2044     }));
2045     return l117;
2046 })();
2047 var l118 = {name: "%FIND-SYMBOL"};
2048 (function(){
2049     (l118).fvalue = (function(v227){
2050         ((v227)["fname"] = "%FIND-SYMBOL");
2051         return v227;
2052     })((function (values,v220,v221){
2053         checkArgs(arguments, 3);
2054         return (function(){
2055             try {
2056                 return (function(v222){
2057                     return (function(v223){
2058                         return ((((v220) in (v223))?l4.value: l3.value) !== l3.value ? ({car: (function(){
2059                             var tmp = (v223)[v220];
2060                             return tmp == undefined? l3.value: tmp ;
2061                         })(), cdr: l4.value}) : (function(){
2062                             return (function(v224,v225){
2063                                 (function(){
2064                                     while(v224 !== l3.value){
2065                                         (v225 = (function(){
2066                                             var tmp = v224;
2067                                             return tmp === l3.value? l3.value: tmp.car;
2068                                         })());
2069                                         (function(){
2070                                             (function(v226){
2071                                                 return ((((v220) in (v226))?l4.value: l3.value) !== l3.value ? (function(){
2072                                                     var values = mv;
2073                                                     throw ({type: 'block', id: 95, values: ({car: (function(){
2074                                                         var tmp = (v226)[v220];
2075                                                         return tmp == undefined? l3.value: tmp ;
2076                                                     })(), cdr: l4.value}), message: 'Return from unknown block %FIND-SYMBOL.'})
2077                                                 })() : l3.value);
2078                                             })(l109.fvalue(pv, v225));
2079                                             return l3.value;
2080                                         })();
2081                                         (v224 = (function(){
2082                                             var tmp = v224;
2083                                             return tmp === l3.value? l3.value: tmp.cdr;
2084                                         })());
2085                                     }return l3.value;
2086                                 })();
2087                                 return ({car: l3.value, cdr: l3.value});
2088                             })(l108.fvalue(pv, v222),l3.value);
2089                         })());
2090                     })(l107.fvalue(pv, v222));
2091                 })(l103.fvalue(pv, v221));
2092             }
2093             catch (cf){
2094                 if (cf.type == 'block' && cf.id == 95)
2095                     return values.apply(this, forcemv(cf.values));
2096                 else
2097                     throw cf;
2098             }
2099         })();
2100     }));
2101     return l118;
2102 })();
2103 var l119 = {name: "FIND-SYMBOL"};
2104 (function(){
2105     (l119).fvalue = (function(v230){
2106         ((v230)["fname"] = "FIND-SYMBOL");
2107         return v230;
2108     })((function (values,v228,v229){
2109         checkArgsAtLeast(arguments, 2);
2110         checkArgsAtMost(arguments, 3);
2111         switch(arguments.length-1){
2112         case 1:
2113         v229=(function(){
2114             var symbol = l115;
2115             var value = symbol.value;
2116             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2117             return value;
2118         })();
2119         default: break;
2120         }
2121         return (function(){
2122             return (function(){
2123                 var tmp = l118.fvalue(pv, v228, v229);
2124                 return tmp === l3.value? l3.value: tmp.car;
2125             })();
2126         })();
2127     }));
2128     return l119;
2129 })();
2130 var l120 = {name: "INTERN"};
2131 var l121 = {name: "EXPORT"};
2132 (function(){
2133     (l120).fvalue = (function(v237){
2134         ((v237)["fname"] = "INTERN");
2135         return v237;
2136     })((function (values,v231,v232){
2137         checkArgsAtLeast(arguments, 2);
2138         checkArgsAtMost(arguments, 3);
2139         switch(arguments.length-1){
2140         case 1:
2141         v232=(function(){
2142             var symbol = l115;
2143             var value = symbol.value;
2144             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2145             return value;
2146         })();
2147         default: break;
2148         }
2149         return (function(){
2150             return (function(v233){
2151                 return (function(v234){
2152                     return ((function(){
2153                         var tmp = v234;
2154                         return tmp === l3.value? l3.value: tmp.cdr;
2155                     })() !== l3.value ? (function(){
2156                         var tmp = v234;
2157                         return tmp === l3.value? l3.value: tmp.car;
2158                     })() : (function(v235){
2159                         (function(){
2160                             var tmp = (v235)[v231];
2161                             return tmp == undefined? l3.value: tmp ;
2162                         })();
2163                         return (function(v236){
2164                             ((v236)["package"] = v233);
2165                             (((v233 === (function(){
2166                                 var symbol = l112;
2167                                 var value = symbol.value;
2168                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2169                                 return value;
2170                             })())?l4.value: l3.value) !== l3.value ? (function(){
2171                                 ((v236)["value"] = v236);
2172                                 return l121.fvalue(pv, l42.fvalue(pv, v236), v233);
2173                             })() : l3.value);
2174                             return ((v235)[v231] = v236);
2175                         })((function(){
2176                             var name = v231;
2177                             if (typeof name != 'string')
2178                                 throw 'The value ' + name + ' is not a type string.';
2179                             return ({name: name});
2180                         })());
2181                     })(l107.fvalue(pv, v233)));
2182                 })(l118.fvalue(pv, v231, v233));
2183             })(l103.fvalue(pv, v232));
2184         })();
2185     }));
2186     return l120;
2187 })();
2188 (function(){
2189     (l114).fvalue = (function(v239){
2190         ((v239)["fname"] = "SYMBOL-PACKAGE");
2191         return v239;
2192     })((function (values,v238){
2193         checkArgs(arguments, 2);
2194         return (function(){
2195             (((function(){
2196                 var tmp = v238;
2197                 return (typeof tmp == 'object' && 'name' in tmp);
2198             })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
2199                 throw "it is not a symbol";
2200             })());
2201             return (function(){
2202                 var tmp = (v238)["package"];
2203                 return tmp == undefined? l3.value: tmp ;
2204             })();
2205         })();
2206     }));
2207     return l114;
2208 })();
2209 (function(){
2210     (l121).fvalue = (function(v245){
2211         ((v245)["fname"] = "EXPORT");
2212         return v245;
2213     })((function (values,v240,v241){
2214         checkArgsAtLeast(arguments, 2);
2215         checkArgsAtMost(arguments, 3);
2216         switch(arguments.length-1){
2217         case 1:
2218         v241=(function(){
2219             var symbol = l115;
2220             var value = symbol.value;
2221             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2222             return value;
2223         })();
2224         default: break;
2225         }
2226         return (function(){
2227             return (function(v242){
2228                 return (function(){
2229                     return (function(v243,v244){
2230                         (function(){
2231                             while(v243 !== l3.value){
2232                                 (v244 = (function(){
2233                                     var tmp = v243;
2234                                     return tmp === l3.value? l3.value: tmp.car;
2235                                 })());
2236                                 (function(){
2237                                     ((v242)[(v244).name] = v244);
2238                                     return l3.value;
2239                                 })();
2240                                 (v243 = (function(){
2241                                     var tmp = v243;
2242                                     return tmp === l3.value? l3.value: tmp.cdr;
2243                                 })());
2244                             }return l3.value;
2245                         })();
2246                         return l4.value;
2247                     })(v240,l3.value);
2248                 })();
2249             })(l109.fvalue(pv, v241));
2250         })();
2251     }));
2252     return l121;
2253 })();
2254 var l122 = {name: "GET-UNIVERSAL-TIME"};
2255 (function(){
2256     (l122).fvalue = (function(v246){
2257         ((v246)["fname"] = "GET-UNIVERSAL-TIME");
2258         return v246;
2259     })((function (values){
2260         checkArgsAtMost(arguments, 1);
2261         return (function(){
2262             return (function(){
2263                 var x1 = (Math.round(new Date() / 1000));
2264                 if (typeof x1 !== 'number') throw 'Not a number!';
2265                 var x2 = 2208988800;
2266                 if (typeof x2 !== 'number') throw 'Not a number!';
2267                 return x1+x2;
2268             })();
2269         })();
2270     }));
2271     return l122;
2272 })();
2273 var l123 = {name: "*NEWLINE*"};
2274 (function(){
2275     (((l123.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l123).value = l92.fvalue(pv, l72.fvalue(pv, 10))));
2276     return l123;
2277 })();
2278 var l124 = {name: "CONCAT"};
2279 (function(){
2280     (l124).fvalue = (function(v248){
2281         ((v248)["fname"] = "CONCAT");
2282         return v248;
2283     })((function (values){
2284         var v247= l3.value;
2285         for (var i = arguments.length-1; i>=1; i--)
2286             v247 = {car: arguments[i], cdr:
2287         v247};
2288         return (function(){
2289             return l58.fvalue(values, (function(){
2290                 var symbol = l68;
2291                 var func = symbol.fvalue;
2292                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2293                 return func;
2294             })(), v247, "");
2295         })();
2296     }));
2297     return l124;
2298 })();
2299 var l125 = {name: "CONCATF"};
2300 l125;
2301 var l126 = {name: "JOIN"};
2302 (function(){
2303     (l126).fvalue = (function(v251){
2304         ((v251)["fname"] = "JOIN");
2305         return v251;
2306     })((function (values,v249,v250){
2307         checkArgsAtLeast(arguments, 2);
2308         checkArgsAtMost(arguments, 3);
2309         switch(arguments.length-1){
2310         case 1:
2311         v250="";
2312         default: break;
2313         }
2314         return (function(){
2315             return (l11.fvalue(pv, v249) !== l3.value ? "" : (l11.fvalue(pv, (function(){
2316                 var tmp = v249;
2317                 return tmp === l3.value? l3.value: tmp.cdr;
2318             })()) !== l3.value ? (function(){
2319                 var tmp = v249;
2320                 return tmp === l3.value? l3.value: tmp.car;
2321             })() : l124.fvalue(values, (function(){
2322                 var tmp = v249;
2323                 return tmp === l3.value? l3.value: tmp.car;
2324             })(), v250, l126.fvalue(pv, (function(){
2325                 var tmp = v249;
2326                 return tmp === l3.value? l3.value: tmp.cdr;
2327             })(), v250))));
2328         })();
2329     }));
2330     return l126;
2331 })();
2332 var l127 = {name: "JOIN-TRAILING"};
2333 (function(){
2334     (l127).fvalue = (function(v254){
2335         ((v254)["fname"] = "JOIN-TRAILING");
2336         return v254;
2337     })((function (values,v252,v253){
2338         checkArgsAtLeast(arguments, 2);
2339         checkArgsAtMost(arguments, 3);
2340         switch(arguments.length-1){
2341         case 1:
2342         v253="";
2343         default: break;
2344         }
2345         return (function(){
2346             return (l11.fvalue(pv, v252) !== l3.value ? "" : l124.fvalue(values, (function(){
2347                 var tmp = v252;
2348                 return tmp === l3.value? l3.value: tmp.car;
2349             })(), v253, l127.fvalue(pv, (function(){
2350                 var tmp = v252;
2351                 return tmp === l3.value? l3.value: tmp.cdr;
2352             })(), v253)));
2353         })();
2354     }));
2355     return l127;
2356 })();
2357 var l128 = {name: "MAPCONCAT"};
2358 (function(){
2359     (l128).fvalue = (function(v257){
2360         ((v257)["fname"] = "MAPCONCAT");
2361         return v257;
2362     })((function (values,v255,v256){
2363         checkArgs(arguments, 3);
2364         return (function(){
2365             return l126.fvalue(values, l69.fvalue(pv, v255, v256));
2366         })();
2367     }));
2368     return l128;
2369 })();
2370 var l129 = {name: "VECTOR-TO-LIST"};
2371 (function(){
2372     (l129).fvalue = (function(v263){
2373         ((v263)["fname"] = "VECTOR-TO-LIST");
2374         return v263;
2375     })((function (values,v258){
2376         checkArgs(arguments, 2);
2377         return (function(){
2378             return (function(v259,v260){
2379                 return (function(){
2380                     return (function(v261,v262){
2381                         (function(){
2382                             while((function(){
2383                                 var x1 = v261;
2384                                 if (typeof x1 !== 'number') throw 'Not a number!';
2385                                 var x2 = v262;
2386                                 if (typeof x2 !== 'number') throw 'Not a number!';
2387                                 return (x1<x2?l4.value: l3.value);
2388                             })() !== l3.value){
2389                                 (function(){
2390                                     (v259 = ({car: (function(){
2391                                         var x = (v258)[v261];
2392                                         if (x === undefined) throw 'Out of range';
2393                                         return x;
2394                                     })(), cdr: v259}));
2395                                     return l3.value;
2396                                 })();
2397                                 (v261 = (function(){
2398                                     var x1 = v261;
2399                                     if (typeof x1 !== 'number') throw 'Not a number!';
2400                                     var x2 = 1;
2401                                     if (typeof x2 !== 'number') throw 'Not a number!';
2402                                     return x1+x2;
2403                                 })());
2404                             }return l3.value;
2405                         })();
2406                         return l64.fvalue(values, v259);
2407                     })(0,v260);
2408                 })();
2409             })(l3.value,l67.fvalue(pv, v258));
2410         })();
2411     }));
2412     return l129;
2413 })();
2414 var l130 = {name: "LIST-TO-VECTOR"};
2415 (function(){
2416     (l130).fvalue = (function(v269){
2417         ((v269)["fname"] = "LIST-TO-VECTOR");
2418         return v269;
2419     })((function (values,v264){
2420         checkArgs(arguments, 2);
2421         return (function(){
2422             return (function(v265,v266){
2423                 return (function(){
2424                     return (function(v267,v268){
2425                         (function(){
2426                             while(v267 !== l3.value){
2427                                 (v268 = (function(){
2428                                     var tmp = v267;
2429                                     return tmp === l3.value? l3.value: tmp.car;
2430                                 })());
2431                                 (function(){
2432                                     (function(){
2433                                         var x = v265;
2434                                         var i = v266;
2435                                         if (i < 0 || i >= x.length) throw 'Out of range';
2436                                         return x[i] = v268;
2437                                     })();
2438                                     (v266 = (function(){
2439                                         var x1 = v266;
2440                                         if (typeof x1 !== 'number') throw 'Not a number!';
2441                                         var x2 = 1;
2442                                         if (typeof x2 !== 'number') throw 'Not a number!';
2443                                         return x1+x2;
2444                                     })());
2445                                     return l3.value;
2446                                 })();
2447                                 (v267 = (function(){
2448                                     var tmp = v267;
2449                                     return tmp === l3.value? l3.value: tmp.cdr;
2450                                 })());
2451                             }return l3.value;
2452                         })();
2453                         return v265;
2454                     })(v264,l3.value);
2455                 })();
2456             })((function(){
2457                 var r = [];
2458                 for (var i = 0; i < l67.fvalue(pv, v264); i++)
2459                     r.push(l3.value);
2460                 return r;
2461             })(),0);
2462         })();
2463     }));
2464     return l130;
2465 })();
2466 var l131 = {name: "VALUES-LIST"};
2467 (function(){
2468     (l131).fvalue = (function(v271){
2469         ((v271)["fname"] = "VALUES-LIST");
2470         return v271;
2471     })((function (values,v270){
2472         checkArgs(arguments, 2);
2473         return (function(){
2474             return values.apply(this, l130.fvalue(pv, v270));
2475         })();
2476     }));
2477     return l131;
2478 })();
2479 var l132 = {name: "VALUES"};
2480 (function(){
2481     (l132).fvalue = (function(v273){
2482         ((v273)["fname"] = "VALUES");
2483         return v273;
2484     })((function (values){
2485         var v272= l3.value;
2486         for (var i = arguments.length-1; i>=1; i--)
2487             v272 = {car: arguments[i], cdr:
2488         v272};
2489         return (function(){
2490             return l131.fvalue(values, v272);
2491         })();
2492     }));
2493     return l132;
2494 })();
2495 var l133 = {name: "MULTIPLE-VALUE-BIND"};
2496 l133;
2497 var l134 = {name: "MULTIPLE-VALUE-LIST"};
2498 l134;
2499 var l135 = {name: "INDENT"};
2500 (function(){
2501     (l135).fvalue = (function(v280){
2502         ((v280)["fname"] = "INDENT");
2503         return v280;
2504     })((function (values){
2505         var v274= l3.value;
2506         for (var i = arguments.length-1; i>=1; i--)
2507             v274 = {car: arguments[i], cdr:
2508         v274};
2509         return (function(){
2510             return (function(v275){
2511                 return (function(v276,v277,v278){
2512                     (l76.fvalue(pv, l67.fvalue(pv, v275)) !== l3.value ? (v276 = l124.fvalue(pv, v276, "    ")) : l3.value);
2513                     (function(){
2514                         return (function(){
2515                             while((function(){
2516                                 var x1 = v277;
2517                                 if (typeof x1 !== 'number') throw 'Not a number!';
2518                                 var x2 = v278;
2519                                 if (typeof x2 !== 'number') throw 'Not a number!';
2520                                 return (x1<x2?l4.value: l3.value);
2521                             })() !== l3.value){
2522                                 (function(v279){
2523                                     return (v276 = l124.fvalue(pv, v276, v279));
2524                                 })(((l74.fvalue(pv, (function(){
2525                                     var string = v275;
2526                                     var index = v277;
2527                                     if (typeof string != 'string')
2528                                         throw 'The value ' + string + ' is not a type string.';
2529                                     if (typeof index != 'number')
2530                                         throw 'The value ' + index + ' is not a type number.';
2531                                     return string.charCodeAt(index);
2532                                 })(), 10) !== l3.value ? ((function(){
2533                                     var x1 = v277;
2534                                     if (typeof x1 !== 'number') throw 'Not a number!';
2535                                     var x2 = l22.fvalue(pv, v278);
2536                                     if (typeof x2 !== 'number') throw 'Not a number!';
2537                                     return (x1<x2?l4.value: l3.value);
2538                                 })() !== l3.value ? l26.fvalue(pv, l74.fvalue(pv, (function(){
2539                                     var string = v275;
2540                                     var index = l21.fvalue(pv, v277);
2541                                     if (typeof string != 'string')
2542                                         throw 'The value ' + string + ' is not a type string.';
2543                                     if (typeof index != 'number')
2544                                         throw 'The value ' + index + ' is not a type number.';
2545                                     return string.charCodeAt(index);
2546                                 })(), 10)) : l3.value) : l3.value) !== l3.value ? l124.fvalue(pv, l92.fvalue(pv, 10), "    ") : l92.fvalue(pv, (function(){
2547                                     var string = v275;
2548                                     var index = v277;
2549                                     if (typeof string != 'string')
2550                                         throw 'The value ' + string + ' is not a type string.';
2551                                     if (typeof index != 'number')
2552                                         throw 'The value ' + index + ' is not a type number.';
2553                                     return string.charCodeAt(index);
2554                                 })())));
2555                                 (v277 = (function(){
2556                                     var x1 = v277;
2557                                     if (typeof x1 !== 'number') throw 'Not a number!';
2558                                     var x2 = 1;
2559                                     if (typeof x2 !== 'number') throw 'Not a number!';
2560                                     return x1+x2;
2561                                 })());
2562                             }return l3.value;
2563                         })();
2564                     })();
2565                     return v276;
2566                 })("",0,l67.fvalue(pv, v275));
2567             })(l126.fvalue(pv, v274));
2568         })();
2569     }));
2570     return l135;
2571 })();
2572 (function(){
2573     (l16).fvalue = (function(v284){
2574         ((v284)["fname"] = "INTEGER-TO-STRING");
2575         return v284;
2576     })((function (values,v281){
2577         checkArgs(arguments, 2);
2578         return (function(){
2579             return (l23.fvalue(pv, v281) !== l3.value ? "0" : (l77.fvalue(pv, v281) !== l3.value ? l124.fvalue(values, "-", l16.fvalue(pv, (function(){
2580                 var x1 = 0;
2581                 if (typeof x1 !== 'number') throw 'Not a number!';
2582                 var x2 = v281;
2583                 if (typeof x2 !== 'number') throw 'Not a number!';
2584                 return x1-x2;
2585             })())) : (function(v282){
2586                 (function(){
2587                     return (function(){
2588                         while(l26.fvalue(pv, l23.fvalue(pv, v281)) !== l3.value){
2589                             (v282 = ({car: (function(){
2590                                 var x = v281;
2591                                 var y = 10;
2592                                 if (typeof x != 'number')
2593                                     throw 'The value ' + x + ' is not a type number.';
2594                                 if (typeof y != 'number')
2595                                     throw 'The value ' + y + ' is not a type number.';
2596                                 return x%y;
2597                             })(), cdr: v282}));
2598                             (v281 = l24.fvalue(pv, v281, 10));
2599                         }return l3.value;
2600                     })();
2601                 })();
2602                 return l126.fvalue(values, l69.fvalue(pv, (function (values,v283){
2603                     checkArgs(arguments, 2);
2604                     return l92.fvalue(values, (function(){
2605                         var string = "0123456789";
2606                         var index = v283;
2607                         if (typeof string != 'string')
2608                             throw 'The value ' + string + ' is not a type string.';
2609                         if (typeof index != 'number')
2610                             throw 'The value ' + index + ' is not a type number.';
2611                         return string.charCodeAt(index);
2612                     })());
2613                 }), v282));
2614             })(l3.value)));
2615         })();
2616     }));
2617     return l16;
2618 })();
2619 var l136 = {name: "JS!BOOL"};
2620 var l137 = {name: "LS-COMPILE"};
2621 (function(){
2622     (l136).fvalue = (function(v286){
2623         ((v286)["fname"] = "JS!BOOL");
2624         return v286;
2625     })((function (values,v285){
2626         checkArgs(arguments, 2);
2627         return (function(){
2628             return l124.fvalue(values, "(", v285, "?", l137.fvalue(pv, l4.value), ": ", l137.fvalue(pv, l3.value), ")");
2629         })();
2630     }));
2631     return l136;
2632 })();
2633 var l138 = {name: "JS!SELFCALL"};
2634 l138;
2635 var l139 = {name: "PRIN1-TO-STRING"};
2636 var l140 = {name: "ESCAPE-STRING"};
2637 (function(){
2638     (l139).fvalue = (function(v292){
2639         ((v292)["fname"] = "PRIN1-TO-STRING");
2640         return v292;
2641     })((function (values,v287){
2642         checkArgs(arguments, 2);
2643         return (function(){
2644             return (((function(){
2645                 var tmp = v287;
2646                 return (typeof tmp == 'object' && 'name' in tmp);
2647             })()?l4.value: l3.value) !== l3.value ? ((function(){
2648                 var tmp = l118.fvalue(pv, (v287).name, (function(){
2649                     var symbol = l115;
2650                     var value = symbol.value;
2651                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2652                     return value;
2653                 })());
2654                 return tmp === l3.value? l3.value: tmp.cdr;
2655             })() !== l3.value ? (v287).name : (function(v288,v289){
2656                 return l124.fvalue(values, (l11.fvalue(pv, v288) !== l3.value ? "#" : (((v288 === l105.fvalue(pv, "KEYWORD"))?l4.value: l3.value) !== l3.value ? "" : l106.fvalue(pv, v288))), ":", v289);
2657             })(l114.fvalue(pv, v287),(v287).name)) : (l75.fvalue(pv, v287) !== l3.value ? l16.fvalue(values, v287) : (((typeof(v287) == "string")?l4.value: l3.value) !== l3.value ? l124.fvalue(values, "\"", l140.fvalue(pv, v287), "\"") : (((typeof v287 == 'function')?l4.value: l3.value) !== l3.value ? (function(v290){
2658                 return (v290 !== l3.value ? l124.fvalue(values, "#<FUNCTION ", v290, ">") : l124.fvalue(values, "#<FUNCTION>"));
2659             })((function(){
2660                 var tmp = (v287)["fname"];
2661                 return tmp == undefined? l3.value: tmp ;
2662             })()) : (l57.fvalue(pv, v287) !== l3.value ? l124.fvalue(values, "(", l127.fvalue(pv, l69.fvalue(pv, (function(){
2663                 var symbol = l139;
2664                 var func = symbol.fvalue;
2665                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2666                 return func;
2667             })(), l81.fvalue(pv, v287)), " "), (function(v291){
2668                 return (l11.fvalue(pv, (function(){
2669                     var tmp = v291;
2670                     return tmp === l3.value? l3.value: tmp.cdr;
2671                 })()) !== l3.value ? l139.fvalue(pv, (function(){
2672                     var tmp = v291;
2673                     return tmp === l3.value? l3.value: tmp.car;
2674                 })()) : l124.fvalue(pv, l139.fvalue(pv, (function(){
2675                     var tmp = v291;
2676                     return tmp === l3.value? l3.value: tmp.car;
2677                 })()), " . ", l139.fvalue(pv, (function(){
2678                     var tmp = v291;
2679                     return tmp === l3.value? l3.value: tmp.cdr;
2680                 })())));
2681             })(l80.fvalue(pv, v287)), ")") : (((function(){
2682                 var x = v287;
2683                 return typeof x === 'object' && 'length' in x;
2684             })()?l4.value: l3.value) !== l3.value ? l124.fvalue(values, "#", l139.fvalue(pv, l129.fvalue(pv, v287))) : (l104.fvalue(pv, v287) !== l3.value ? l124.fvalue(values, "#<PACKAGE ", l106.fvalue(pv, v287), ">") : l3.value)))))));
2685         })();
2686     }));
2687     return l139;
2688 })();
2689 (function(){
2690     (l96).fvalue = (function(v294){
2691         ((v294)["fname"] = "WRITE-LINE");
2692         return v294;
2693     })((function (values,v293){
2694         checkArgs(arguments, 2);
2695         return (function(){
2696             (function(){
2697                 var x = v293;
2698                 if (typeof x != 'string')
2699                     throw 'The value ' + x + ' is not a type string.';
2700                 return lisp.write(x);
2701             })();
2702             (function(){
2703                 var x = (function(){
2704                     var symbol = l123;
2705                     var value = symbol.value;
2706                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2707                     return value;
2708                 })();
2709                 if (typeof x != 'string')
2710                     throw 'The value ' + x + ' is not a type string.';
2711                 return lisp.write(x);
2712             })();
2713             return v293;
2714         })();
2715     }));
2716     return l96;
2717 })();
2718 var l141 = {name: "WARN"};
2719 (function(){
2720     (l141).fvalue = (function(v296){
2721         ((v296)["fname"] = "WARN");
2722         return v296;
2723     })((function (values,v295){
2724         checkArgs(arguments, 2);
2725         return (function(){
2726             (function(){
2727                 var x = "WARNING: ";
2728                 if (typeof x != 'string')
2729                     throw 'The value ' + x + ' is not a type string.';
2730                 return lisp.write(x);
2731             })();
2732             return l96.fvalue(values, v295);
2733         })();
2734     }));
2735     return l141;
2736 })();
2737 var l142 = {name: "PRINT"};
2738 (function(){
2739     (l142).fvalue = (function(v298){
2740         ((v298)["fname"] = "PRINT");
2741         return v298;
2742     })((function (values,v297){
2743         checkArgs(arguments, 2);
2744         return (function(){
2745             l96.fvalue(pv, l139.fvalue(pv, v297));
2746             return v297;
2747         })();
2748     }));
2749     return l142;
2750 })();
2751 var l143 = {name: "MAKE-STRING-STREAM"};
2752 (function(){
2753     (l143).fvalue = (function(v300){
2754         ((v300)["fname"] = "MAKE-STRING-STREAM");
2755         return v300;
2756     })((function (values,v299){
2757         checkArgs(arguments, 2);
2758         return (function(){
2759             return ({car: v299, cdr: 0});
2760         })();
2761     }));
2762     return l143;
2763 })();
2764 var l144 = {name: "%PEEK-CHAR"};
2765 (function(){
2766     (l144).fvalue = (function(v302){
2767         ((v302)["fname"] = "%PEEK-CHAR");
2768         return v302;
2769     })((function (values,v301){
2770         checkArgs(arguments, 2);
2771         return (function(){
2772             return ((function(){
2773                 var x1 = (function(){
2774                     var tmp = v301;
2775                     return tmp === l3.value? l3.value: tmp.cdr;
2776                 })();
2777                 if (typeof x1 !== 'number') throw 'Not a number!';
2778                 var x2 = l67.fvalue(pv, (function(){
2779                     var tmp = v301;
2780                     return tmp === l3.value? l3.value: tmp.car;
2781                 })());
2782                 if (typeof x2 !== 'number') throw 'Not a number!';
2783                 return (x1<x2?l4.value: l3.value);
2784             })() !== l3.value ? (function(){
2785                 var string = (function(){
2786                     var tmp = v301;
2787                     return tmp === l3.value? l3.value: tmp.car;
2788                 })();
2789                 var index = (function(){
2790                     var tmp = v301;
2791                     return tmp === l3.value? l3.value: tmp.cdr;
2792                 })();
2793                 if (typeof string != 'string')
2794                     throw 'The value ' + string + ' is not a type string.';
2795                 if (typeof index != 'number')
2796                     throw 'The value ' + index + ' is not a type number.';
2797                 return string.charCodeAt(index);
2798             })() : l3.value);
2799         })();
2800     }));
2801     return l144;
2802 })();
2803 var l145 = {name: "%READ-CHAR"};
2804 (function(){
2805     (l145).fvalue = (function(v305){
2806         ((v305)["fname"] = "%READ-CHAR");
2807         return v305;
2808     })((function (values,v303){
2809         checkArgs(arguments, 2);
2810         return (function(){
2811             return ((function(){
2812                 var x1 = (function(){
2813                     var tmp = v303;
2814                     return tmp === l3.value? l3.value: tmp.cdr;
2815                 })();
2816                 if (typeof x1 !== 'number') throw 'Not a number!';
2817                 var x2 = l67.fvalue(pv, (function(){
2818                     var tmp = v303;
2819                     return tmp === l3.value? l3.value: tmp.car;
2820                 })());
2821                 if (typeof x2 !== 'number') throw 'Not a number!';
2822                 return (x1<x2?l4.value: l3.value);
2823             })() !== l3.value ? (function(v304){
2824                 (function(){
2825                     var x = v303;
2826                     if (typeof x != 'object')
2827                         throw 'The value ' + x + ' is not a type object.';
2828                     return (x.cdr = l21.fvalue(pv, (function(){
2829                         var tmp = v303;
2830                         return tmp === l3.value? l3.value: tmp.cdr;
2831                     })()));
2832                 })();
2833                 return v304;
2834             })((function(){
2835                 var string = (function(){
2836                     var tmp = v303;
2837                     return tmp === l3.value? l3.value: tmp.car;
2838                 })();
2839                 var index = (function(){
2840                     var tmp = v303;
2841                     return tmp === l3.value? l3.value: tmp.cdr;
2842                 })();
2843                 if (typeof string != 'string')
2844                     throw 'The value ' + string + ' is not a type string.';
2845                 if (typeof index != 'number')
2846                     throw 'The value ' + index + ' is not a type number.';
2847                 return string.charCodeAt(index);
2848             })()) : l3.value);
2849         })();
2850     }));
2851     return l145;
2852 })();
2853 var l146 = {name: "WHITESPACEP"};
2854 (function(){
2855     (l146).fvalue = (function(v309){
2856         ((v309)["fname"] = "WHITESPACEP");
2857         return v309;
2858     })((function (values,v306){
2859         checkArgs(arguments, 2);
2860         return (function(){
2861             return (function(v307){
2862                 return (v307 !== l3.value ? v307 : (function(v308){
2863                     return (v308 !== l3.value ? v308 : l74.fvalue(values, v306, 9));
2864                 })(l74.fvalue(pv, v306, 10)));
2865             })(l74.fvalue(pv, v306, 32));
2866         })();
2867     }));
2868     return l146;
2869 })();
2870 var l147 = {name: "SKIP-WHITESPACES"};
2871 (function(){
2872     (l147).fvalue = (function(v312){
2873         ((v312)["fname"] = "SKIP-WHITESPACES");
2874         return v312;
2875     })((function (values,v310){
2876         checkArgs(arguments, 2);
2877         return (function(){
2878             return (function(v311){
2879                 (v311 = l144.fvalue(pv, v310));
2880                 return (function(){
2881                     return (function(){
2882                         while((v311 !== l3.value ? l146.fvalue(pv, v311) : l3.value) !== l3.value){
2883                             l145.fvalue(pv, v310);
2884                             (v311 = l144.fvalue(pv, v310));
2885                         }return l3.value;
2886                     })();
2887                 })();
2888             })(l3.value);
2889         })();
2890     }));
2891     return l147;
2892 })();
2893 var l148 = {name: "TERMINALP"};
2894 (function(){
2895     (l148).fvalue = (function(v317){
2896         ((v317)["fname"] = "TERMINALP");
2897         return v317;
2898     })((function (values,v313){
2899         checkArgs(arguments, 2);
2900         return (function(){
2901             return (function(v314){
2902                 return (v314 !== l3.value ? v314 : (function(v315){
2903                     return (v315 !== l3.value ? v315 : (function(v316){
2904                         return (v316 !== l3.value ? v316 : l74.fvalue(values, 40, v313));
2905                     })(l74.fvalue(pv, 41, v313)));
2906                 })(l146.fvalue(pv, v313)));
2907             })(l11.fvalue(pv, v313));
2908         })();
2909     }));
2910     return l148;
2911 })();
2912 var l149 = {name: "READ-UNTIL"};
2913 (function(){
2914     (l149).fvalue = (function(v322){
2915         ((v322)["fname"] = "READ-UNTIL");
2916         return v322;
2917     })((function (values,v318,v319){
2918         checkArgs(arguments, 3);
2919         return (function(){
2920             return (function(v320,v321){
2921                 (v321 = l144.fvalue(pv, v318));
2922                 (function(){
2923                     return (function(){
2924                         while((v321 !== l3.value ? l26.fvalue(pv, (v319)(pv, v321)) : l3.value) !== l3.value){
2925                             (v320 = l124.fvalue(pv, v320, l92.fvalue(pv, v321)));
2926                             l145.fvalue(pv, v318);
2927                             (v321 = l144.fvalue(pv, v318));
2928                         }return l3.value;
2929                     })();
2930                 })();
2931                 return v320;
2932             })("",l3.value);
2933         })();
2934     }));
2935     return l149;
2936 })();
2937 var l150 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
2938 (function(){
2939     (l150).fvalue = (function(v326){
2940         ((v326)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
2941         return v326;
2942     })((function (values,v323){
2943         checkArgs(arguments, 2);
2944         return (function(){
2945             return (function(v324){
2946                 l147.fvalue(pv, v323);
2947                 (v324 = l144.fvalue(pv, v323));
2948                 return (function(){
2949                     return (function(){
2950                         while((v324 !== l3.value ? l74.fvalue(pv, v324, 59) : l3.value) !== l3.value){
2951                             l149.fvalue(pv, v323, (function (values,v325){
2952                                 checkArgs(arguments, 2);
2953                                 return l74.fvalue(values, v325, 10);
2954                             }));
2955                             l147.fvalue(pv, v323);
2956                             (v324 = l144.fvalue(pv, v323));
2957                         }return l3.value;
2958                     })();
2959                 })();
2960             })(l3.value);
2961         })();
2962     }));
2963     return l150;
2964 })();
2965 var l151 = {name: "%READ-LIST"};
2966 var l152 = {name: "LS-READ"};
2967 (function(){
2968     (l151).fvalue = (function(v330){
2969         ((v330)["fname"] = "%READ-LIST");
2970         return v330;
2971     })((function (values,v327){
2972         checkArgs(arguments, 2);
2973         return (function(){
2974             l150.fvalue(pv, v327);
2975             return (function(v328){
2976                 return (l11.fvalue(pv, v328) !== l3.value ? (function(){
2977                     throw "Unspected EOF";
2978                 })() : (l74.fvalue(pv, v328, 41) !== l3.value ? (function(){
2979                     l145.fvalue(pv, v327);
2980                     return l3.value;
2981                 })() : (l74.fvalue(pv, v328, 46) !== l3.value ? (function(){
2982                     l145.fvalue(pv, v327);
2983                     return (function(v329){
2984                         l150.fvalue(pv, v327);
2985                         (l74.fvalue(pv, l145.fvalue(pv, v327), 41) !== l3.value ? l3.value : (function(){
2986                             throw "')' was expected.";
2987                         })());
2988                         return v329;
2989                     })(l152.fvalue(pv, v327));
2990                 })() : ({car: l152.fvalue(pv, v327), cdr: l151.fvalue(pv, v327)}))));
2991             })(l144.fvalue(pv, v327));
2992         })();
2993     }));
2994     return l151;
2995 })();
2996 var l153 = {name: "READ-STRING"};
2997 (function(){
2998     (l153).fvalue = (function(v334){
2999         ((v334)["fname"] = "READ-STRING");
3000         return v334;
3001     })((function (values,v331){
3002         checkArgs(arguments, 2);
3003         return (function(){
3004             return (function(v332,v333){
3005                 (v333 = l145.fvalue(pv, v331));
3006                 (function(){
3007                     return (function(){
3008                         while(l26.fvalue(pv, l25.fvalue(pv, v333, 34)) !== l3.value){
3009                             (l11.fvalue(pv, v333) !== l3.value ? (function(){
3010                                 throw "Unexpected EOF";
3011                             })() : l3.value);
3012                             (l25.fvalue(pv, v333, 92) !== l3.value ? (v333 = l145.fvalue(pv, v331)) : l3.value);
3013                             (v332 = l124.fvalue(pv, v332, l92.fvalue(pv, v333)));
3014                             (v333 = l145.fvalue(pv, v331));
3015                         }return l3.value;
3016                     })();
3017                 })();
3018                 return v332;
3019             })("",l3.value);
3020         })();
3021     }));
3022     return l153;
3023 })();
3024 var l154 = {name: "READ-SHARP"};
3025 (function(){
3026     (l154).fvalue = (function(v339){
3027         ((v339)["fname"] = "READ-SHARP");
3028         return v339;
3029     })((function (values,v335){
3030         checkArgs(arguments, 2);
3031         return (function(){
3032             l145.fvalue(pv, v335);
3033             return (function(v336){
3034                 return (l25.fvalue(pv, v336, 39) !== l3.value ? l42.fvalue(values, l98, l152.fvalue(pv, v335)) : (l25.fvalue(pv, v336, 40) !== l3.value ? l130.fvalue(values, l151.fvalue(pv, v335)) : (l25.fvalue(pv, v336, 58) !== l3.value ? (function(){
3035                     var name = (function(){
3036                         var x = l149.fvalue(pv, v335, (function(){
3037                             var symbol = l148;
3038                             var func = symbol.fvalue;
3039                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3040                             return func;
3041                         })());
3042                         if (typeof x != 'string')
3043                             throw 'The value ' + x + ' is not a type string.';
3044                         return x.toUpperCase();
3045                     })();
3046                     if (typeof name != 'string')
3047                         throw 'The value ' + name + ' is not a type string.';
3048                     return ({name: name});
3049                 })() : (l25.fvalue(pv, v336, 92) !== l3.value ? (function(v337){
3050                     return (l93.fvalue(pv, v337, "space") !== l3.value ? l73.fvalue(values, 32) : (l93.fvalue(pv, v337, "tab") !== l3.value ? l73.fvalue(values, 9) : (l93.fvalue(pv, v337, "newline") !== l3.value ? l73.fvalue(values, 10) : l73.fvalue(values, (function(){
3051                         var string = v337;
3052                         var index = 0;
3053                         if (typeof string != 'string')
3054                             throw 'The value ' + string + ' is not a type string.';
3055                         if (typeof index != 'number')
3056                             throw 'The value ' + index + ' is not a type number.';
3057                         return string.charCodeAt(index);
3058                     })()))));
3059                 })(l124.fvalue(pv, l92.fvalue(pv, l145.fvalue(pv, v335)), l149.fvalue(pv, v335, (function(){
3060                     var symbol = l148;
3061                     var func = symbol.fvalue;
3062                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3063                     return func;
3064                 })()))) : (l25.fvalue(pv, v336, 43) !== l3.value ? (function(v338){
3065                     return (l93.fvalue(pv, v338, "common-lisp") !== l3.value ? (function(){
3066                         l152.fvalue(pv, v335);
3067                         return l152.fvalue(values, v335);
3068                     })() : (l93.fvalue(pv, v338, "ecmalisp") !== l3.value ? l152.fvalue(values, v335) : (function(){
3069                         throw "Unknown reader form.";
3070                     })()));
3071                 })(l149.fvalue(pv, v335, (function(){
3072                     var symbol = l148;
3073                     var func = symbol.fvalue;
3074                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3075                     return func;
3076                 })())) : (function(){
3077                     throw "ECASE expression failed.";
3078                 })())))));
3079             })(l145.fvalue(pv, v335));
3080         })();
3081     }));
3082     return l154;
3083 })();
3084 var l155 = {name: "READ-SYMBOL"};
3085 (function(){
3086     (l155).fvalue = (function(v347){
3087         ((v347)["fname"] = "READ-SYMBOL");
3088         return v347;
3089     })((function (values,v340){
3090         checkArgs(arguments, 2);
3091         return (function(){
3092             return (function(v341,v342,v343,v344,v345){
3093                 (v345 = 0);
3094                 (function(){
3095                     return (function(){
3096                         while(((function(){
3097                             var x1 = v345;
3098                             if (typeof x1 !== 'number') throw 'Not a number!';
3099                             var x2 = v341;
3100                             if (typeof x2 !== 'number') throw 'Not a number!';
3101                             return (x1<x2?l4.value: l3.value);
3102                         })() !== l3.value ? l26.fvalue(pv, l74.fvalue(pv, (function(){
3103                             var string = v340;
3104                             var index = v345;
3105                             if (typeof string != 'string')
3106                                 throw 'The value ' + string + ' is not a type string.';
3107                             if (typeof index != 'number')
3108                                 throw 'The value ' + index + ' is not a type number.';
3109                             return string.charCodeAt(index);
3110                         })(), 58)) : l3.value) !== l3.value){
3111                             (v345 = (function(){
3112                                 var x1 = v345;
3113                                 if (typeof x1 !== 'number') throw 'Not a number!';
3114                                 var x2 = 1;
3115                                 if (typeof x2 !== 'number') throw 'Not a number!';
3116                                 return x1+x2;
3117                             })());
3118                         }return l3.value;
3119                     })();
3120                 })();
3121                 ((function(){
3122                     var x1 = v345;
3123                     if (typeof x1 !== 'number') throw 'Not a number!';
3124                     var x2 = v341;
3125                     if (typeof x2 !== 'number') throw 'Not a number!';
3126                     return (x1==x2?l4.value: l3.value);
3127                 })() !== l3.value ? (function(){
3128                     (v343 = v340);
3129                     (v342 = (function(){
3130                         var symbol = l115;
3131                         var value = symbol.value;
3132                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3133                         return value;
3134                     })());
3135                     return (v344 = l4.value);
3136                 })() : (function(){
3137                     (l23.fvalue(pv, v345) !== l3.value ? (v342 = "KEYWORD") : (v342 = (function(){
3138                         var x = l87.fvalue(pv, v340, 0, v345);
3139                         if (typeof x != 'string')
3140                             throw 'The value ' + x + ' is not a type string.';
3141                         return x.toUpperCase();
3142                     })()));
3143                     (v345 = (function(){
3144                         var x1 = v345;
3145                         if (typeof x1 !== 'number') throw 'Not a number!';
3146                         var x2 = 1;
3147                         if (typeof x2 !== 'number') throw 'Not a number!';
3148                         return x1+x2;
3149                     })());
3150                     (l74.fvalue(pv, (function(){
3151                         var string = v340;
3152                         var index = v345;
3153                         if (typeof string != 'string')
3154                             throw 'The value ' + string + ' is not a type string.';
3155                         if (typeof index != 'number')
3156                             throw 'The value ' + index + ' is not a type number.';
3157                         return string.charCodeAt(index);
3158                     })(), 58) !== l3.value ? (function(){
3159                         (v344 = l4.value);
3160                         return (v345 = (function(){
3161                             var x1 = v345;
3162                             if (typeof x1 !== 'number') throw 'Not a number!';
3163                             var x2 = 1;
3164                             if (typeof x2 !== 'number') throw 'Not a number!';
3165                             return x1+x2;
3166                         })());
3167                     })() : l3.value);
3168                     return (v343 = l87.fvalue(pv, v340, v345));
3169                 })());
3170                 (v343 = (function(){
3171                     var x = v343;
3172                     if (typeof x != 'string')
3173                         throw 'The value ' + x + ' is not a type string.';
3174                     return x.toUpperCase();
3175                 })());
3176                 (v342 = l105.fvalue(pv, v342));
3177                 return ((function(v346){
3178                     return (v346 !== l3.value ? v346 : ((v342 === l105.fvalue(pv, "KEYWORD"))?l4.value: l3.value));
3179                 })(v344) !== l3.value ? l120.fvalue(values, v343, v342) : l119.fvalue(values, v343, v342));
3180             })(l67.fvalue(pv, v340),l3.value,l3.value,l3.value,l3.value);
3181         })();
3182     }));
3183     return l155;
3184 })();
3185 var l156 = {name: "*EOF*"};
3186 (function(){
3187     (((l156.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l156).value = l15.fvalue(pv)));
3188     return l156;
3189 })();
3190 var l157 = {name: "QUOTE"};
3191 var l158 = {name: "BACKQUOTE"};
3192 var l159 = {name: "UNQUOTE-SPLICING"};
3193 var l160 = {name: "UNQUOTE"};
3194 (function(){
3195     (l152).fvalue = (function(v352){
3196         ((v352)["fname"] = "LS-READ");
3197         return v352;
3198     })((function (values,v348){
3199         checkArgs(arguments, 2);
3200         return (function(){
3201             l150.fvalue(pv, v348);
3202             return (function(v349){
3203                 return ((function(v350){
3204                     return (v350 !== l3.value ? v350 : l74.fvalue(pv, v349, 41));
3205                 })(l11.fvalue(pv, v349)) !== l3.value ? (function(){
3206                     var symbol = l156;
3207                     var value = symbol.value;
3208                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3209                     return value;
3210                 })() : (l74.fvalue(pv, v349, 40) !== l3.value ? (function(){
3211                     l145.fvalue(pv, v348);
3212                     return l151.fvalue(values, v348);
3213                 })() : (l74.fvalue(pv, v349, 39) !== l3.value ? (function(){
3214                     l145.fvalue(pv, v348);
3215                     return l42.fvalue(values, l157, l152.fvalue(pv, v348));
3216                 })() : (l74.fvalue(pv, v349, 96) !== l3.value ? (function(){
3217                     l145.fvalue(pv, v348);
3218                     return l42.fvalue(values, l158, l152.fvalue(pv, v348));
3219                 })() : (l74.fvalue(pv, v349, 34) !== l3.value ? (function(){
3220                     l145.fvalue(pv, v348);
3221                     return l153.fvalue(values, v348);
3222                 })() : (l74.fvalue(pv, v349, 44) !== l3.value ? (function(){
3223                     l145.fvalue(pv, v348);
3224                     return (l25.fvalue(pv, l144.fvalue(pv, v348), 64) !== l3.value ? (function(){
3225                         l145.fvalue(pv, v348);
3226                         return l42.fvalue(values, l159, l152.fvalue(pv, v348));
3227                     })() : l42.fvalue(values, l160, l152.fvalue(pv, v348)));
3228                 })() : (l74.fvalue(pv, v349, 35) !== l3.value ? l154.fvalue(values, v348) : (function(v351){
3229                     return (l90.fvalue(pv, (function(){
3230                         var symbol = l86;
3231                         var func = symbol.fvalue;
3232                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3233                         return func;
3234                     })(), v351) !== l3.value ? l88.fvalue(values, v351) : l155.fvalue(values, v351));
3235                 })(l149.fvalue(pv, v348, (function(){
3236                     var symbol = l148;
3237                     var func = symbol.fvalue;
3238                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3239                     return func;
3240                 })())))))))));
3241             })(l144.fvalue(pv, v348));
3242         })();
3243     }));
3244     return l152;
3245 })();
3246 var l161 = {name: "LS-READ-FROM-STRING"};
3247 (function(){
3248     (l161).fvalue = (function(v354){
3249         ((v354)["fname"] = "LS-READ-FROM-STRING");
3250         return v354;
3251     })((function (values,v353){
3252         checkArgs(arguments, 2);
3253         return (function(){
3254             return l152.fvalue(values, l143.fvalue(pv, v353));
3255         })();
3256     }));
3257     return l161;
3258 })();
3259 var l162 = {name: "*MULTIPLE-VALUE-P*"};
3260 (function(){
3261     (((l162.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l162).value = l3.value));
3262     return l162;
3263 })();
3264 var l163 = {name: "MAKE-BINDING"};
3265 (function(){
3266     (l163).fvalue = (function(v359){
3267         ((v359)["fname"] = "MAKE-BINDING");
3268         return v359;
3269     })((function (values,v355,v356,v357,v358){
3270         checkArgsAtLeast(arguments, 4);
3271         checkArgsAtMost(arguments, 5);
3272         switch(arguments.length-1){
3273         case 3:
3274         v358=l3.value;
3275         default: break;
3276         }
3277         return (function(){
3278             return l42.fvalue(values, v355, v356, v357, v358);
3279         })();
3280     }));
3281     return l163;
3282 })();
3283 var l164 = {name: "BINDING-NAME"};
3284 (function(){
3285     (l164).fvalue = (function(v361){
3286         ((v361)["fname"] = "BINDING-NAME");
3287         return v361;
3288     })((function (values,v360){
3289         checkArgs(arguments, 2);
3290         return (function(){
3291             return l38.fvalue(values, v360);
3292         })();
3293     }));
3294     return l164;
3295 })();
3296 var l165 = {name: "BINDING-TYPE"};
3297 (function(){
3298     (l165).fvalue = (function(v363){
3299         ((v363)["fname"] = "BINDING-TYPE");
3300         return v363;
3301     })((function (values,v362){
3302         checkArgs(arguments, 2);
3303         return (function(){
3304             return l39.fvalue(values, v362);
3305         })();
3306     }));
3307     return l165;
3308 })();
3309 var l166 = {name: "BINDING-VALUE"};
3310 (function(){
3311     (l166).fvalue = (function(v365){
3312         ((v365)["fname"] = "BINDING-VALUE");
3313         return v365;
3314     })((function (values,v364){
3315         checkArgs(arguments, 2);
3316         return (function(){
3317             return l40.fvalue(values, v364);
3318         })();
3319     }));
3320     return l166;
3321 })();
3322 var l167 = {name: "BINDING-DECLARATIONS"};
3323 (function(){
3324     (l167).fvalue = (function(v367){
3325         ((v367)["fname"] = "BINDING-DECLARATIONS");
3326         return v367;
3327     })((function (values,v366){
3328         checkArgs(arguments, 2);
3329         return (function(){
3330             return l41.fvalue(values, v366);
3331         })();
3332     }));
3333     return l167;
3334 })();
3335 var l168 = {name: "SET-BINDING-VALUE"};
3336 (function(){
3337     (l168).fvalue = (function(v370){
3338         ((v370)["fname"] = "SET-BINDING-VALUE");
3339         return v370;
3340     })((function (values,v368,v369){
3341         checkArgs(arguments, 3);
3342         return (function(){
3343             return (function(){
3344                 var x = l34.fvalue(pv, v368);
3345                 if (typeof x != 'object')
3346                     throw 'The value ' + x + ' is not a type object.';
3347                 return (x.car = v369);
3348             })();
3349         })();
3350     }));
3351     return l168;
3352 })();
3353 var l169 = {name: "SET-BINDING-DECLARATIONS"};
3354 (function(){
3355     (l169).fvalue = (function(v373){
3356         ((v373)["fname"] = "SET-BINDING-DECLARATIONS");
3357         return v373;
3358     })((function (values,v371,v372){
3359         checkArgs(arguments, 3);
3360         return (function(){
3361             return (function(){
3362                 var x = l36.fvalue(pv, v371);
3363                 if (typeof x != 'object')
3364                     throw 'The value ' + x + ' is not a type object.';
3365                 return (x.car = v372);
3366             })();
3367         })();
3368     }));
3369     return l169;
3370 })();
3371 var l170 = {name: "PUSH-BINDING-DECLARATION"};
3372 (function(){
3373     (l170).fvalue = (function(v376){
3374         ((v376)["fname"] = "PUSH-BINDING-DECLARATION");
3375         return v376;
3376     })((function (values,v374,v375){
3377         checkArgs(arguments, 3);
3378         return (function(){
3379             return l169.fvalue(values, v375, ({car: v374, cdr: l167.fvalue(pv, v375)}));
3380         })();
3381     }));
3382     return l170;
3383 })();
3384 var l171 = {name: "MAKE-LEXENV"};
3385 (function(){
3386     (l171).fvalue = (function(v377){
3387         ((v377)["fname"] = "MAKE-LEXENV");
3388         return v377;
3389     })((function (values){
3390         checkArgsAtMost(arguments, 1);
3391         return (function(){
3392             return l42.fvalue(values, l3.value, l3.value, l3.value, l3.value);
3393         })();
3394     }));
3395     return l171;
3396 })();
3397 var l172 = {name: "COPY-LEXENV"};
3398 (function(){
3399     (l172).fvalue = (function(v379){
3400         ((v379)["fname"] = "COPY-LEXENV");
3401         return v379;
3402     })((function (values,v378){
3403         checkArgs(arguments, 2);
3404         return (function(){
3405             return l71.fvalue(values, v378);
3406         })();
3407     }));
3408     return l172;
3409 })();
3410 var l173 = {name: "PUSH-TO-LEXENV"};
3411 var l174 = {name: "BLOCK"};
3412 var l175 = {name: "GOTAG"};
3413 (function(){
3414     (l173).fvalue = (function(v384){
3415         ((v384)["fname"] = "PUSH-TO-LEXENV");
3416         return v384;
3417     })((function (values,v380,v381,v382){
3418         checkArgs(arguments, 4);
3419         return (function(){
3420             return (function(v383){
3421                 return (l25.fvalue(pv, v383, l99) !== l3.value ? (function(){
3422                     var x = v381;
3423                     if (typeof x != 'object')
3424                         throw 'The value ' + x + ' is not a type object.';
3425                     return (x.car = ({car: v380, cdr: (function(){
3426                         var tmp = v381;
3427                         return tmp === l3.value? l3.value: tmp.car;
3428                     })()}));
3429                 })() : (l25.fvalue(pv, v383, l98) !== l3.value ? (function(){
3430                     var x = (function(){
3431                         var tmp = v381;
3432                         return tmp === l3.value? l3.value: tmp.cdr;
3433                     })();
3434                     if (typeof x != 'object')
3435                         throw 'The value ' + x + ' is not a type object.';
3436                     return (x.car = ({car: v380, cdr: l32.fvalue(pv, v381)}));
3437                 })() : (l25.fvalue(pv, v383, l174) !== l3.value ? (function(){
3438                     var x = l34.fvalue(pv, v381);
3439                     if (typeof x != 'object')
3440                         throw 'The value ' + x + ' is not a type object.';
3441                     return (x.car = ({car: v380, cdr: l35.fvalue(pv, v381)}));
3442                 })() : (l25.fvalue(pv, v383, l175) !== l3.value ? (function(){
3443                     var x = l36.fvalue(pv, v381);
3444                     if (typeof x != 'object')
3445                         throw 'The value ' + x + ' is not a type object.';
3446                     return (x.car = ({car: v380, cdr: l37.fvalue(pv, v381)}));
3447                 })() : (function(){
3448                     throw "ECASE expression failed.";
3449                 })()))));
3450             })(v382);
3451         })();
3452     }));
3453     return l173;
3454 })();
3455 var l176 = {name: "EXTEND-LEXENV"};
3456 (function(){
3457     (l176).fvalue = (function(v391){
3458         ((v391)["fname"] = "EXTEND-LEXENV");
3459         return v391;
3460     })((function (values,v385,v386,v387){
3461         checkArgs(arguments, 4);
3462         return (function(){
3463             return (function(v388){
3464                 return (function(){
3465                     return (function(v389,v390){
3466                         (function(){
3467                             while(v389 !== l3.value){
3468                                 (v390 = (function(){
3469                                     var tmp = v389;
3470                                     return tmp === l3.value? l3.value: tmp.car;
3471                                 })());
3472                                 (function(){
3473                                     l173.fvalue(pv, v390, v388, v387);
3474                                     return l3.value;
3475                                 })();
3476                                 (v389 = (function(){
3477                                     var tmp = v389;
3478                                     return tmp === l3.value? l3.value: tmp.cdr;
3479                                 })());
3480                             }return l3.value;
3481                         })();
3482                         return v388;
3483                     })(l64.fvalue(pv, v385),l3.value);
3484                 })();
3485             })(l172.fvalue(pv, v386));
3486         })();
3487     }));
3488     return l176;
3489 })();
3490 var l177 = {name: "LOOKUP-IN-LEXENV"};
3491 (function(){
3492     (l177).fvalue = (function(v396){
3493         ((v396)["fname"] = "LOOKUP-IN-LEXENV");
3494         return v396;
3495     })((function (values,v392,v393,v394){
3496         checkArgs(arguments, 4);
3497         return (function(){
3498             return l91.fvalue(values, v392, (function(v395){
3499                 return (l25.fvalue(pv, v395, l99) !== l3.value ? l38.fvalue(pv, v393) : (l25.fvalue(pv, v395, l98) !== l3.value ? l39.fvalue(pv, v393) : (l25.fvalue(pv, v395, l174) !== l3.value ? l40.fvalue(pv, v393) : (l25.fvalue(pv, v395, l175) !== l3.value ? l41.fvalue(pv, v393) : (function(){
3500                     throw "ECASE expression failed.";
3501                 })()))));
3502             })(v394));
3503         })();
3504     }));
3505     return l177;
3506 })();
3507 var l178 = {name: "*ENVIRONMENT*"};
3508 (function(){
3509     (((l178.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l178).value = l171.fvalue(pv)));
3510     return l178;
3511 })();
3512 var l179 = {name: "*VARIABLE-COUNTER*"};
3513 (function(){
3514     (((l179.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l179).value = 0));
3515     return l179;
3516 })();
3517 var l180 = {name: "GVARNAME"};
3518 (function(){
3519     (l180).fvalue = (function(v398){
3520         ((v398)["fname"] = "GVARNAME");
3521         return v398;
3522     })((function (values,v397){
3523         checkArgs(arguments, 2);
3524         return (function(){
3525             return l124.fvalue(values, "v", l16.fvalue(pv, ((l179).value = (function(){
3526                 var x1 = (function(){
3527                     var symbol = l179;
3528                     var value = symbol.value;
3529                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3530                     return value;
3531                 })();
3532                 if (typeof x1 !== 'number') throw 'Not a number!';
3533                 var x2 = 1;
3534                 if (typeof x2 !== 'number') throw 'Not a number!';
3535                 return x1+x2;
3536             })())));
3537         })();
3538     }));
3539     return l180;
3540 })();
3541 var l181 = {name: "TRANSLATE-VARIABLE"};
3542 (function(){
3543     (l181).fvalue = (function(v400){
3544         ((v400)["fname"] = "TRANSLATE-VARIABLE");
3545         return v400;
3546     })((function (values,v399){
3547         checkArgs(arguments, 2);
3548         return (function(){
3549             return l166.fvalue(values, l177.fvalue(pv, v399, (function(){
3550                 var symbol = l178;
3551                 var value = symbol.value;
3552                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3553                 return value;
3554             })(), l99));
3555         })();
3556     }));
3557     return l181;
3558 })();
3559 var l182 = {name: "EXTEND-LOCAL-ENV"};
3560 var l183 = {name: "LEXICAL-VARIABLE"};
3561 (function(){
3562     (l182).fvalue = (function(v406){
3563         ((v406)["fname"] = "EXTEND-LOCAL-ENV");
3564         return v406;
3565     })((function (values,v401){
3566         checkArgs(arguments, 2);
3567         return (function(){
3568             return (function(v402){
3569                 return (function(){
3570                     return (function(v403,v404){
3571                         (function(){
3572                             while(v403 !== l3.value){
3573                                 (v404 = (function(){
3574                                     var tmp = v403;
3575                                     return tmp === l3.value? l3.value: tmp.car;
3576                                 })());
3577                                 (function(){
3578                                     (function(v405){
3579                                         return l173.fvalue(pv, v405, v402, l99);
3580                                     })(l163.fvalue(pv, v404, l183, l180.fvalue(pv, v404)));
3581                                     return l3.value;
3582                                 })();
3583                                 (v403 = (function(){
3584                                     var tmp = v403;
3585                                     return tmp === l3.value? l3.value: tmp.cdr;
3586                                 })());
3587                             }return l3.value;
3588                         })();
3589                         return v402;
3590                     })(v401,l3.value);
3591                 })();
3592             })(l172.fvalue(pv, (function(){
3593                 var symbol = l178;
3594                 var value = symbol.value;
3595                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3596                 return value;
3597             })()));
3598         })();
3599     }));
3600     return l182;
3601 })();
3602 var l184 = {name: "*TOPLEVEL-COMPILATIONS*"};
3603 (function(){
3604     (((l184.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l184).value = l3.value));
3605     return l184;
3606 })();
3607 var l185 = {name: "TOPLEVEL-COMPILATION"};
3608 (function(){
3609     (l185).fvalue = (function(v408){
3610         ((v408)["fname"] = "TOPLEVEL-COMPILATION");
3611         return v408;
3612     })((function (values,v407){
3613         checkArgs(arguments, 2);
3614         return (function(){
3615             return ((l184).value = ({car: v407, cdr: (function(){
3616                 var symbol = l184;
3617                 var value = symbol.value;
3618                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3619                 return value;
3620             })()}));
3621         })();
3622     }));
3623     return l185;
3624 })();
3625 var l186 = {name: "NULL-OR-EMPTY-P"};
3626 (function(){
3627     (l186).fvalue = (function(v410){
3628         ((v410)["fname"] = "NULL-OR-EMPTY-P");
3629         return v410;
3630     })((function (values,v409){
3631         checkArgs(arguments, 2);
3632         return (function(){
3633             return l23.fvalue(values, l67.fvalue(pv, v409));
3634         })();
3635     }));
3636     return l186;
3637 })();
3638 var l187 = {name: "GET-TOPLEVEL-COMPILATIONS"};
3639 (function(){
3640     (l187).fvalue = (function(v411){
3641         ((v411)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
3642         return v411;
3643     })((function (values){
3644         checkArgsAtMost(arguments, 1);
3645         return (function(){
3646             return l64.fvalue(values, l84.fvalue(pv, (function(){
3647                 var symbol = l186;
3648                 var func = symbol.fvalue;
3649                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3650                 return func;
3651             })(), (function(){
3652                 var symbol = l184;
3653                 var value = symbol.value;
3654                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3655                 return value;
3656             })()));
3657         })();
3658     }));
3659     return l187;
3660 })();
3661 var l188 = {name: "%COMPILE-DEFMACRO"};
3662 var l189 = {name: "MACRO"};
3663 (function(){
3664     (l188).fvalue = (function(v414){
3665         ((v414)["fname"] = "%COMPILE-DEFMACRO");
3666         return v414;
3667     })((function (values,v412,v413){
3668         checkArgs(arguments, 3);
3669         return (function(){
3670             l185.fvalue(pv, l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, v412))));
3671             l173.fvalue(pv, l163.fvalue(pv, v412, l189, v413), (function(){
3672                 var symbol = l178;
3673                 var value = symbol.value;
3674                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3675                 return value;
3676             })(), l98);
3677             return v412;
3678         })();
3679     }));
3680     return l188;
3681 })();
3682 var l190 = {name: "GLOBAL-BINDING"};
3683 (function(){
3684     (l190).fvalue = (function(v420){
3685         ((v420)["fname"] = "GLOBAL-BINDING");
3686         return v420;
3687     })((function (values,v415,v416,v417){
3688         checkArgs(arguments, 4);
3689         return (function(){
3690             return (function(v418){
3691                 return (v418 !== l3.value ? v418 : (function(v419){
3692                     l173.fvalue(pv, v419, (function(){
3693                         var symbol = l178;
3694                         var value = symbol.value;
3695                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3696                         return value;
3697                     })(), v417);
3698                     return v419;
3699                 })(l163.fvalue(pv, v415, v416, l3.value)));
3700             })(l177.fvalue(pv, v415, (function(){
3701                 var symbol = l178;
3702                 var value = symbol.value;
3703                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3704                 return value;
3705             })(), v417));
3706         })();
3707     }));
3708     return l190;
3709 })();
3710 var l191 = {name: "CLAIMP"};
3711 (function(){
3712     (l191).fvalue = (function(v425){
3713         ((v425)["fname"] = "CLAIMP");
3714         return v425;
3715     })((function (values,v421,v422,v423){
3716         checkArgs(arguments, 4);
3717         return (function(){
3718             return (function(v424){
3719                 return (v424 !== l3.value ? l82.fvalue(values, v423, l167.fvalue(pv, v424)) : l3.value);
3720             })(l177.fvalue(pv, v421, (function(){
3721                 var symbol = l178;
3722                 var value = symbol.value;
3723                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3724                 return value;
3725             })(), v422));
3726         })();
3727     }));
3728     return l191;
3729 })();
3730 var l192 = {name: "!PROCLAIM"};
3731 var l193 = {name: "SPECIAL"};
3732 var l194 = {name: "NOTINLINE"};
3733 var l195 = {name: "CONSTANT"};
3734 (function(){
3735     (l192).fvalue = (function(v437){
3736         ((v437)["fname"] = "!PROCLAIM");
3737         return v437;
3738     })((function (values,v426){
3739         checkArgs(arguments, 2);
3740         return (function(){
3741             return (function(v427){
3742                 return (l25.fvalue(pv, v427, l193) !== l3.value ? (function(){
3743                     return (function(v428,v429){
3744                         (function(){
3745                             while(v428 !== l3.value){
3746                                 (v429 = (function(){
3747                                     var tmp = v428;
3748                                     return tmp === l3.value? l3.value: tmp.car;
3749                                 })());
3750                                 (function(){
3751                                     (function(v430){
3752                                         return l170.fvalue(pv, l193, v430);
3753                                     })(l190.fvalue(pv, v429, l99, l99));
3754                                     return l3.value;
3755                                 })();
3756                                 (v428 = (function(){
3757                                     var tmp = v428;
3758                                     return tmp === l3.value? l3.value: tmp.cdr;
3759                                 })());
3760                             }return l3.value;
3761                         })();
3762                         return l3.value;
3763                     })((function(){
3764                         var tmp = v426;
3765                         return tmp === l3.value? l3.value: tmp.cdr;
3766                     })(),l3.value);
3767                 })() : (l25.fvalue(pv, v427, l194) !== l3.value ? (function(){
3768                     return (function(v431,v432){
3769                         (function(){
3770                             while(v431 !== l3.value){
3771                                 (v432 = (function(){
3772                                     var tmp = v431;
3773                                     return tmp === l3.value? l3.value: tmp.car;
3774                                 })());
3775                                 (function(){
3776                                     (function(v433){
3777                                         return l170.fvalue(pv, l194, v433);
3778                                     })(l190.fvalue(pv, v432, l98, l98));
3779                                     return l3.value;
3780                                 })();
3781                                 (v431 = (function(){
3782                                     var tmp = v431;
3783                                     return tmp === l3.value? l3.value: tmp.cdr;
3784                                 })());
3785                             }return l3.value;
3786                         })();
3787                         return l3.value;
3788                     })((function(){
3789                         var tmp = v426;
3790                         return tmp === l3.value? l3.value: tmp.cdr;
3791                     })(),l3.value);
3792                 })() : (l25.fvalue(pv, v427, l195) !== l3.value ? (function(){
3793                     return (function(v434,v435){
3794                         (function(){
3795                             while(v434 !== l3.value){
3796                                 (v435 = (function(){
3797                                     var tmp = v434;
3798                                     return tmp === l3.value? l3.value: tmp.car;
3799                                 })());
3800                                 (function(){
3801                                     (function(v436){
3802                                         return l170.fvalue(pv, l195, v436);
3803                                     })(l190.fvalue(pv, v435, l99, l99));
3804                                     return l3.value;
3805                                 })();
3806                                 (v434 = (function(){
3807                                     var tmp = v434;
3808                                     return tmp === l3.value? l3.value: tmp.cdr;
3809                                 })());
3810                             }return l3.value;
3811                         })();
3812                         return l3.value;
3813                     })((function(){
3814                         var tmp = v426;
3815                         return tmp === l3.value? l3.value: tmp.cdr;
3816                     })(),l3.value);
3817                 })() : l3.value)));
3818             })((function(){
3819                 var tmp = v426;
3820                 return tmp === l3.value? l3.value: tmp.car;
3821             })());
3822         })();
3823     }));
3824     return l192;
3825 })();
3826 var l196 = {name: "PROCLAIM"};
3827 (l196).fvalue = (function(){
3828     var symbol = l192;
3829     var func = symbol.fvalue;
3830     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3831     return func;
3832 })();
3833 var l197 = {name: "*COMPILATIONS*"};
3834 (function(){
3835     (((l197.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l197).value = l3.value));
3836     return l197;
3837 })();
3838 var l198 = {name: "DEFINE-COMPILATION"};
3839 l198;
3840 var l199 = {name: "IF"};
3841 ((l197).value = ({car: l42.fvalue(pv, l199, (function (values,v438,v439,v440){
3842     checkArgs(arguments, 4);
3843     return (function(){
3844         return l124.fvalue(values, "(", l137.fvalue(pv, v438), " !== ", l137.fvalue(pv, l3.value), " ? ", l137.fvalue(pv, v439, (function(){
3845             var symbol = l162;
3846             var value = symbol.value;
3847             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3848             return value;
3849         })()), " : ", l137.fvalue(pv, v440, (function(){
3850             var symbol = l162;
3851             var value = symbol.value;
3852             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3853             return value;
3854         })()), ")");
3855     })();
3856 })), cdr: (function(){
3857     var symbol = l197;
3858     var value = symbol.value;
3859     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3860     return value;
3861 })()}));
3862 var l200 = {name: "*LAMBDA-LIST-KEYWORDS*"};
3863 var l201 = {name: "&OPTIONAL"};
3864 var l202 = {name: "&REST"};
3865 var l203 = QIList(l201,l202,l3);
3866 (function(){
3867     (((l200.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l200).value = l203));
3868     return l200;
3869 })();
3870 var l204 = {name: "LIST-UNTIL-KEYWORD"};
3871 (function(){
3872     (l204).fvalue = (function(v443){
3873         ((v443)["fname"] = "LIST-UNTIL-KEYWORD");
3874         return v443;
3875     })((function (values,v441){
3876         checkArgs(arguments, 2);
3877         return (function(){
3878             return ((function(v442){
3879                 return (v442 !== l3.value ? v442 : l82.fvalue(pv, (function(){
3880                     var tmp = v441;
3881                     return tmp === l3.value? l3.value: tmp.car;
3882                 })(), (function(){
3883                     var symbol = l200;
3884                     var value = symbol.value;
3885                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3886                     return value;
3887                 })()));
3888             })(l11.fvalue(pv, v441)) !== l3.value ? l3.value : ({car: (function(){
3889                 var tmp = v441;
3890                 return tmp === l3.value? l3.value: tmp.car;
3891             })(), cdr: l204.fvalue(pv, (function(){
3892                 var tmp = v441;
3893                 return tmp === l3.value? l3.value: tmp.cdr;
3894             })())}));
3895         })();
3896     }));
3897     return l204;
3898 })();
3899 var l205 = {name: "LAMBDA-LIST-REQUIRED-ARGUMENTS"};
3900 (function(){
3901     (l205).fvalue = (function(v445){
3902         ((v445)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
3903         return v445;
3904     })((function (values,v444){
3905         checkArgs(arguments, 2);
3906         return (function(){
3907             return l204.fvalue(values, v444);
3908         })();
3909     }));
3910     return l205;
3911 })();
3912 var l206 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"};
3913 (function(){
3914     (l206).fvalue = (function(v447){
3915         ((v447)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
3916         return v447;
3917     })((function (values,v446){
3918         checkArgs(arguments, 2);
3919         return (function(){
3920             return l69.fvalue(values, (function(){
3921                 var symbol = l56;
3922                 var func = symbol.fvalue;
3923                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3924                 return func;
3925             })(), l204.fvalue(pv, (function(){
3926                 var tmp = l82.fvalue(pv, l201, v446);
3927                 return tmp === l3.value? l3.value: tmp.cdr;
3928             })()));
3929         })();
3930     }));
3931     return l206;
3932 })();
3933 var l207 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS"};
3934 (function(){
3935     (l207).fvalue = (function(v449){
3936         ((v449)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
3937         return v449;
3938     })((function (values,v448){
3939         checkArgs(arguments, 2);
3940         return (function(){
3941             return l69.fvalue(values, (function(){
3942                 var symbol = l29;
3943                 var func = symbol.fvalue;
3944                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3945                 return func;
3946             })(), l206.fvalue(pv, v448));
3947         })();
3948     }));
3949     return l207;
3950 })();
3951 var l208 = {name: "LAMBDA-LIST-REST-ARGUMENT"};
3952 (function(){
3953     (l208).fvalue = (function(v452){
3954         ((v452)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
3955         return v452;
3956     })((function (values,v450){
3957         checkArgs(arguments, 2);
3958         return (function(){
3959             return (function(v451){
3960                 ((function(){
3961                     var tmp = v451;
3962                     return tmp === l3.value? l3.value: tmp.cdr;
3963                 })() !== l3.value ? (function(){
3964                     throw "Bad lambda-list";
3965                 })() : l3.value);
3966                 return (function(){
3967                     var tmp = v451;
3968                     return tmp === l3.value? l3.value: tmp.car;
3969                 })();
3970             })(l204.fvalue(pv, (function(){
3971                 var tmp = l82.fvalue(pv, l202, v450);
3972                 return tmp === l3.value? l3.value: tmp.cdr;
3973             })()));
3974         })();
3975     }));
3976     return l208;
3977 })();
3978 var l209 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
3979 (function(){
3980     (l209).fvalue = (function(v455){
3981         ((v455)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
3982         return v455;
3983     })((function (values,v454){
3984         checkArgsAtLeast(arguments, 2);
3985         var v453= l3.value;
3986         for (var i = arguments.length-1; i>=2; i--)
3987             v453 = {car: arguments[i], cdr:
3988         v453};
3989         return (function(){
3990             return (v454 !== l3.value ? l124.fvalue(values, "(function(){", (function(){
3991                 var symbol = l123;
3992                 var value = symbol.value;
3993                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3994                 return value;
3995             })(), l135.fvalue(pv, "var func = ", l126.fvalue(pv, v453), ";", (function(){
3996                 var symbol = l123;
3997                 var value = symbol.value;
3998                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3999                 return value;
4000             })(), "func.docstring = '", v454, "';", (function(){
4001                 var symbol = l123;
4002                 var value = symbol.value;
4003                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4004                 return value;
4005             })(), "return func;", (function(){
4006                 var symbol = l123;
4007                 var value = symbol.value;
4008                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4009                 return value;
4010             })()), "})()") : l126.fvalue(values, v453));
4011         })();
4012     }));
4013     return l209;
4014 })();
4015 var l210 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"};
4016 var l211 = {name: "N/A"};
4017 (function(){
4018     (l210).fvalue = (function(v461){
4019         ((v461)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT");
4020         return v461;
4021     })((function (values,v456,v457,v458){
4022         checkArgs(arguments, 4);
4023         return (function(){
4024             return (function(v459,v460){
4025                 return (function(){
4026                     try {
4027                         (((function(){
4028                             var x1 = 1;
4029                             if (typeof x1 !== 'number') throw 'Not a number!';
4030                             var x2 = v459;
4031                             if (typeof x2 !== 'number') throw 'Not a number!';
4032                             return (x1<x2?l4.value: l3.value);
4033                         })() !== l3.value ? l25.fvalue(pv, v459, v460) : l3.value) !== l3.value ? (function(){
4034                             var values = mv;
4035                             throw ({type: 'block', id: 177, values: l124.fvalue(values, "checkArgs(arguments, ", l16.fvalue(pv, v459), ");", (function(){
4036                                 var symbol = l123;
4037                                 var value = symbol.value;
4038                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4039                                 return value;
4040                             })()), message: 'Return from unknown block NIL.'})
4041                         })() : l3.value);
4042                         return l124.fvalue(values, ((function(){
4043                             var x1 = 1;
4044                             if (typeof x1 !== 'number') throw 'Not a number!';
4045                             var x2 = v459;
4046                             if (typeof x2 !== 'number') throw 'Not a number!';
4047                             return (x1<x2?l4.value: l3.value);
4048                         })() !== l3.value ? l124.fvalue(pv, "checkArgsAtLeast(arguments, ", l16.fvalue(pv, v459), ");", (function(){
4049                             var symbol = l123;
4050                             var value = symbol.value;
4051                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4052                             return value;
4053                         })()) : ""), (((typeof (v460) == "number")?l4.value: l3.value) !== l3.value ? l124.fvalue(pv, "checkArgsAtMost(arguments, ", l16.fvalue(pv, v460), ");", (function(){
4054                             var symbol = l123;
4055                             var value = symbol.value;
4056                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4057                             return value;
4058                         })()) : ""));
4059                     }
4060                     catch (cf){
4061                         if (cf.type == 'block' && cf.id == 177)
4062                             return values.apply(this, forcemv(cf.values));
4063                         else
4064                             throw cf;
4065                     }
4066                 })();
4067             })(l21.fvalue(pv, v456),(v458 !== l3.value ? l211 : (function(){
4068                 var x1 = 1;
4069                 if (typeof x1 !== 'number') throw 'Not a number!';
4070                 var x2 = v456;
4071                 if (typeof x2 !== 'number') throw 'Not a number!';
4072                 var x3 = v457;
4073                 if (typeof x3 !== 'number') throw 'Not a number!';
4074                 return x1+x2+x3;
4075             })()));
4076         })();
4077     }));
4078     return l210;
4079 })();
4080 var l212 = {name: "LAMBDA"};
4081 var l213 = {name: "LS-COMPILE-BLOCK"};
4082 ((l197).value = ({car: l42.fvalue(pv, l212, (function (values,v463){
4083     checkArgsAtLeast(arguments, 2);
4084     var v462= l3.value;
4085     for (var i = arguments.length-1; i>=2; i--)
4086         v462 = {car: arguments[i], cdr:
4087     v462};
4088     return (function(){
4089         return (function(v464,v465,v466,v467){
4090             ((((typeof((function(){
4091                 var tmp = v462;
4092                 return tmp === l3.value? l3.value: tmp.car;
4093             })()) == "string")?l4.value: l3.value) !== l3.value ? l26.fvalue(pv, l11.fvalue(pv, (function(){
4094                 var tmp = v462;
4095                 return tmp === l3.value? l3.value: tmp.cdr;
4096             })())) : l3.value) !== l3.value ? (function(){
4097                 (v467 = (function(){
4098                     var tmp = v462;
4099                     return tmp === l3.value? l3.value: tmp.car;
4100                 })());
4101                 return (v462 = (function(){
4102                     var tmp = v462;
4103                     return tmp === l3.value? l3.value: tmp.cdr;
4104                 })());
4105             })() : l3.value);
4106             return (function(v468,v469,v470){
4107                 try {
4108                     var tmp;
4109                     tmp = l178.value;
4110                     l178.value = v470;
4111                     v470 = tmp;
4112                     return l209.fvalue(values, v467, "(function (", l126.fvalue(pv, ({car: "values", cdr: l69.fvalue(pv, (function(){
4113                         var symbol = l181;
4114                         var func = symbol.fvalue;
4115                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4116                         return func;
4117                     })(), l62.fvalue(pv, v464, v465))}), ","), "){", (function(){
4118                         var symbol = l123;
4119                         var value = symbol.value;
4120                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4121                         return value;
4122                     })(), l135.fvalue(pv, l210.fvalue(pv, v468, v469, v466), (v465 !== l3.value ? l124.fvalue(pv, "switch(arguments.length-1){", (function(){
4123                         var symbol = l123;
4124                         var value = symbol.value;
4125                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4126                         return value;
4127                     })(), (function(v471,v472,v473){
4128                         return (function(){
4129                             (function(){
4130                                 return (function(){
4131                                     while((function(){
4132                                         var x1 = v473;
4133                                         if (typeof x1 !== 'number') throw 'Not a number!';
4134                                         var x2 = v469;
4135                                         if (typeof x2 !== 'number') throw 'Not a number!';
4136                                         return (x1<x2?l4.value: l3.value);
4137                                     })() !== l3.value){
4138                                         (function(v474){
4139                                             (v472 = ({car: l124.fvalue(pv, "case ", l16.fvalue(pv, (function(){
4140                                                 var x1 = v473;
4141                                                 if (typeof x1 !== 'number') throw 'Not a number!';
4142                                                 var x2 = v468;
4143                                                 if (typeof x2 !== 'number') throw 'Not a number!';
4144                                                 return x1+x2;
4145                                             })()), ":", (function(){
4146                                                 var symbol = l123;
4147                                                 var value = symbol.value;
4148                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4149                                                 return value;
4150                                             })(), l181.fvalue(pv, (function(){
4151                                                 var tmp = v474;
4152                                                 return tmp === l3.value? l3.value: tmp.car;
4153                                             })()), "=", l137.fvalue(pv, l32.fvalue(pv, v474)), ";", (function(){
4154                                                 var symbol = l123;
4155                                                 var value = symbol.value;
4156                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4157                                                 return value;
4158                                             })()), cdr: v472}));
4159                                             return (v473 = (function(){
4160                                                 var x1 = v473;
4161                                                 if (typeof x1 !== 'number') throw 'Not a number!';
4162                                                 var x2 = 1;
4163                                                 if (typeof x2 !== 'number') throw 'Not a number!';
4164                                                 return x1+x2;
4165                                             })());
4166                                         })(l79.fvalue(pv, v473, v471));
4167                                     }return l3.value;
4168                                 })();
4169                             })();
4170                             (v472 = ({car: l124.fvalue(pv, "default: break;", (function(){
4171                                 var symbol = l123;
4172                                 var value = symbol.value;
4173                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4174                                 return value;
4175                             })()), cdr: v472}));
4176                             return l126.fvalue(pv, l64.fvalue(pv, v472));
4177                         })();
4178                     })(l206.fvalue(pv, v463),l3.value,0), "}", (function(){
4179                         var symbol = l123;
4180                         var value = symbol.value;
4181                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4182                         return value;
4183                     })()) : ""), (v466 !== l3.value ? (function(v475){
4184                         return l124.fvalue(pv, "var ", v475, "= ", l137.fvalue(pv, l3.value), ";", (function(){
4185                             var symbol = l123;
4186                             var value = symbol.value;
4187                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4188                             return value;
4189                         })(), "for (var i = arguments.length-1; i>=", l16.fvalue(pv, (function(){
4190                             var x1 = 1;
4191                             if (typeof x1 !== 'number') throw 'Not a number!';
4192                             var x2 = v468;
4193                             if (typeof x2 !== 'number') throw 'Not a number!';
4194                             var x3 = v469;
4195                             if (typeof x3 !== 'number') throw 'Not a number!';
4196                             return x1+x2+x3;
4197                         })()), "; i--)", (function(){
4198                             var symbol = l123;
4199                             var value = symbol.value;
4200                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4201                             return value;
4202                         })(), l135.fvalue(pv, v475, " = ", "{car: arguments[i], cdr: "), v475, "};", (function(){
4203                             var symbol = l123;
4204                             var value = symbol.value;
4205                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4206                             return value;
4207                         })());
4208                     })(l181.fvalue(pv, v466)) : ""), (function(v476){
4209                         try {
4210                             var tmp;
4211                             tmp = l162.value;
4212                             l162.value = v476;
4213                             v476 = tmp;
4214                             return l213.fvalue(pv, v462, l4.value);
4215                         }
4216                         finally {
4217                             l162.value = v476;
4218                         }
4219                     })(l4.value)), "})");
4220                 }
4221                 finally {
4222                     l178.value = v470;
4223                 }
4224             })(l67.fvalue(pv, v464),l67.fvalue(pv, v465),l182.fvalue(pv, l62.fvalue(pv, l56.fvalue(pv, v466), v464, v465)));
4225         })(l205.fvalue(pv, v463),l207.fvalue(pv, v463),l208.fvalue(pv, v463),l3.value);
4226     })();
4227 })), cdr: (function(){
4228     var symbol = l197;
4229     var value = symbol.value;
4230     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4231     return value;
4232 })()}));
4233 var l214 = {name: "SETQ-PAIR"};
4234 var l215 = {name: "SET"};
4235 (function(){
4236     (l214).fvalue = (function(v480){
4237         ((v480)["fname"] = "SETQ-PAIR");
4238         return v480;
4239     })((function (values,v477,v478){
4240         checkArgs(arguments, 3);
4241         return (function(){
4242             return (function(v479){
4243                 return (((l165.fvalue(pv, v479) === l183)?l4.value: l3.value) !== l3.value ? l124.fvalue(values, l166.fvalue(pv, v479), " = ", l137.fvalue(pv, v478)) : l137.fvalue(values, l62.fvalue(pv, l42.fvalue(pv, l215), l42.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, v477))), l42.fvalue(pv, v478))));
4244             })(l177.fvalue(pv, v477, (function(){
4245                 var symbol = l178;
4246                 var value = symbol.value;
4247                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4248                 return value;
4249             })(), l99));
4250         })();
4251     }));
4252     return l214;
4253 })();
4254 var l216 = {name: "SETQ"};
4255 ((l197).value = ({car: l42.fvalue(pv, l216, (function (values){
4256     var v481= l3.value;
4257     for (var i = arguments.length-1; i>=1; i--)
4258         v481 = {car: arguments[i], cdr:
4259     v481};
4260     return (function(){
4261         return (function(v482){
4262             (function(){
4263                 try {
4264                     return (function(){
4265                         while(l4.value !== l3.value){
4266                             (l11.fvalue(pv, v481) !== l3.value ? (function(){
4267                                 throw ({type: 'block', id: 182, values: l3.value, message: 'Return from unknown block NIL.'})
4268                             })() : (l11.fvalue(pv, (function(){
4269                                 var tmp = v481;
4270                                 return tmp === l3.value? l3.value: tmp.cdr;
4271                             })()) !== l3.value ? (function(){
4272                                 throw "Odd paris in SETQ";
4273                             })() : (function(){
4274                                 (v482 = l124.fvalue(pv, v482, l124.fvalue(pv, l214.fvalue(pv, (function(){
4275                                     var tmp = v481;
4276                                     return tmp === l3.value? l3.value: tmp.car;
4277                                 })(), l32.fvalue(pv, v481)), (l11.fvalue(pv, l34.fvalue(pv, v481)) !== l3.value ? "" : ", "))));
4278                                 return (v481 = l34.fvalue(pv, v481));
4279                             })()));
4280                         }return l3.value;
4281                     })();
4282                 }
4283                 catch (cf){
4284                     if (cf.type == 'block' && cf.id == 182)
4285                         return cf.values;
4286                     else
4287                         throw cf;
4288                 }
4289             })();
4290             return l124.fvalue(values, "(", v482, ")");
4291         })("");
4292     })();
4293 })), cdr: (function(){
4294     var symbol = l197;
4295     var value = symbol.value;
4296     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4297     return value;
4298 })()}));
4299 var l217 = {name: "JS-VREF"};
4300 ((l197).value = ({car: l42.fvalue(pv, l217, (function (values,v483){
4301     checkArgs(arguments, 2);
4302     return (function(){
4303         return v483;
4304     })();
4305 })), cdr: (function(){
4306     var symbol = l197;
4307     var value = symbol.value;
4308     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4309     return value;
4310 })()}));
4311 var l218 = {name: "JS-VSET"};
4312 ((l197).value = ({car: l42.fvalue(pv, l218, (function (values,v484,v485){
4313     checkArgs(arguments, 3);
4314     return (function(){
4315         return l124.fvalue(values, "(", v484, " = ", l137.fvalue(pv, v485), ")");
4316     })();
4317 })), cdr: (function(){
4318     var symbol = l197;
4319     var value = symbol.value;
4320     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4321     return value;
4322 })()}));
4323 (function(){
4324     (l140).fvalue = (function(v492){
4325         ((v492)["fname"] = "ESCAPE-STRING");
4326         return v492;
4327     })((function (values,v486){
4328         checkArgs(arguments, 2);
4329         return (function(){
4330             return (function(v487,v488,v489){
4331                 (function(){
4332                     return (function(){
4333                         while((function(){
4334                             var x1 = v488;
4335                             if (typeof x1 !== 'number') throw 'Not a number!';
4336                             var x2 = v489;
4337                             if (typeof x2 !== 'number') throw 'Not a number!';
4338                             return (x1<x2?l4.value: l3.value);
4339                         })() !== l3.value){
4340                             (function(v490){
4341                                 ((function(v491){
4342                                     return (v491 !== l3.value ? v491 : l74.fvalue(pv, v490, 92));
4343                                 })(l74.fvalue(pv, v490, 34)) !== l3.value ? (v487 = l124.fvalue(pv, v487, "\\")) : l3.value);
4344                                 (l74.fvalue(pv, v490, 10) !== l3.value ? (function(){
4345                                     (v487 = l124.fvalue(pv, v487, "\\"));
4346                                     return (v490 = 110);
4347                                 })() : l3.value);
4348                                 return (v487 = l124.fvalue(pv, v487, l92.fvalue(pv, v490)));
4349                             })((function(){
4350                                 var string = v486;
4351                                 var index = v488;
4352                                 if (typeof string != 'string')
4353                                     throw 'The value ' + string + ' is not a type string.';
4354                                 if (typeof index != 'number')
4355                                     throw 'The value ' + index + ' is not a type number.';
4356                                 return string.charCodeAt(index);
4357                             })());
4358                             (v488 = (function(){
4359                                 var x1 = v488;
4360                                 if (typeof x1 !== 'number') throw 'Not a number!';
4361                                 var x2 = 1;
4362                                 if (typeof x2 !== 'number') throw 'Not a number!';
4363                                 return x1+x2;
4364                             })());
4365                         }return l3.value;
4366                     })();
4367                 })();
4368                 return v487;
4369             })("",0,l67.fvalue(pv, v486));
4370         })();
4371     }));
4372     return l140;
4373 })();
4374 var l219 = {name: "*LITERAL-SYMBOLS*"};
4375 (function(){
4376     (((l219.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l219).value = l3.value));
4377     return l219;
4378 })();
4379 var l220 = {name: "*LITERAL-COUNTER*"};
4380 (function(){
4381     (((l220.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l220).value = 0));
4382     return l220;
4383 })();
4384 var l221 = {name: "GENLIT"};
4385 (function(){
4386     (l221).fvalue = (function(v493){
4387         ((v493)["fname"] = "GENLIT");
4388         return v493;
4389     })((function (values){
4390         checkArgsAtMost(arguments, 1);
4391         return (function(){
4392             return l124.fvalue(values, "l", l16.fvalue(pv, ((l220).value = (function(){
4393                 var x1 = (function(){
4394                     var symbol = l220;
4395                     var value = symbol.value;
4396                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4397                     return value;
4398                 })();
4399                 if (typeof x1 !== 'number') throw 'Not a number!';
4400                 var x2 = 1;
4401                 if (typeof x2 !== 'number') throw 'Not a number!';
4402                 return x1+x2;
4403             })())));
4404         })();
4405     }));
4406     return l221;
4407 })();
4408 var l222 = {name: "LITERAL"};
4409 (function(){
4410     (l222).fvalue = (function(v508){
4411         ((v508)["fname"] = "LITERAL");
4412         return v508;
4413     })((function (values,v494,v495){
4414         checkArgsAtLeast(arguments, 2);
4415         checkArgsAtMost(arguments, 3);
4416         switch(arguments.length-1){
4417         case 1:
4418         v495=l3.value;
4419         default: break;
4420         }
4421         return (function(){
4422             return (l75.fvalue(pv, v494) !== l3.value ? l16.fvalue(values, v494) : (((typeof(v494) == "string")?l4.value: l3.value) !== l3.value ? l124.fvalue(values, "\"", l140.fvalue(pv, v494), "\"") : (((function(){
4423                 var tmp = v494;
4424                 return (typeof tmp == 'object' && 'name' in tmp);
4425             })()?l4.value: l3.value) !== l3.value ? (function(v496){
4426                 return (v496 !== l3.value ? v496 : (function(v498,v499){
4427                     ((l219).value = ({car: ({car: v494, cdr: v498}), cdr: (function(){
4428                         var symbol = l219;
4429                         var value = symbol.value;
4430                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4431                         return value;
4432                     })()}));
4433                     l185.fvalue(pv, l124.fvalue(pv, "var ", v498, " = ", v499));
4434                     return v498;
4435                 })(l221.fvalue(pv),(function(v497){
4436                     return (l11.fvalue(pv, v497) !== l3.value ? l124.fvalue(pv, "{name: \"", l140.fvalue(pv, (v494).name), "\"}") : l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l120), l42.fvalue(pv, (v494).name), l42.fvalue(pv, l106.fvalue(pv, v497)))));
4437                 })(l114.fvalue(pv, v494))));
4438             })((function(){
4439                 var tmp = l91.fvalue(pv, v494, (function(){
4440                     var symbol = l219;
4441                     var value = symbol.value;
4442                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4443                     return value;
4444                 })());
4445                 return tmp === l3.value? l3.value: tmp.cdr;
4446             })()) : (((function(){
4447                 var tmp = v494;
4448                 return (typeof tmp == 'object' && 'car' in tmp);
4449             })()?l4.value: l3.value) !== l3.value ? (function(){
4450                 var v500 = l81.fvalue(pv, v494);
4451                 var v501 = l80.fvalue(pv, v494);
4452                 var v502 = l124.fvalue(pv, "QIList(", l127.fvalue(pv, l69.fvalue(pv, (function (values,v503){
4453                     checkArgs(arguments, 2);
4454                     return l222.fvalue(values, v503, l4.value);
4455                 }), v500), ","), l222.fvalue(pv, (function(){
4456                     var tmp = v501;
4457                     return tmp === l3.value? l3.value: tmp.car;
4458                 })(), l4.value), ",", l222.fvalue(pv, (function(){
4459                     var tmp = v501;
4460                     return tmp === l3.value? l3.value: tmp.cdr;
4461                 })(), l4.value), ")");
4462                 return (v495 !== l3.value ? v502 : (function(v504){
4463                     l185.fvalue(pv, l124.fvalue(pv, "var ", v504, " = ", v502));
4464                     return v504;
4465                 })(l221.fvalue(pv)));
4466             })() : (((function(){
4467                 var x = v494;
4468                 return typeof x === 'object' && 'length' in x;
4469             })()?l4.value: l3.value) !== l3.value ? (function(v505){
4470                 return (function(v506){
4471                     return (v495 !== l3.value ? v506 : (function(v507){
4472                         l185.fvalue(pv, l124.fvalue(pv, "var ", v507, " = ", v506));
4473                         return v507;
4474                     })(l221.fvalue(pv)));
4475                 })(l124.fvalue(pv, "[", l126.fvalue(pv, l69.fvalue(pv, (function(){
4476                     var symbol = l222;
4477                     var func = symbol.fvalue;
4478                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4479                     return func;
4480                 })(), v505), ", "), "]"));
4481             })(l129.fvalue(pv, v494)) : l3.value)))));
4482         })();
4483     }));
4484     return l222;
4485 })();
4486 ((l197).value = ({car: l42.fvalue(pv, l157, (function (values,v509){
4487     checkArgs(arguments, 2);
4488     return (function(){
4489         return l222.fvalue(values, v509);
4490     })();
4491 })), cdr: (function(){
4492     var symbol = l197;
4493     var value = symbol.value;
4494     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4495     return value;
4496 })()}));
4497 var l223 = {name: "%WHILE"};
4498 ((l197).value = ({car: l42.fvalue(pv, l223, (function (values,v511){
4499     checkArgsAtLeast(arguments, 2);
4500     var v510= l3.value;
4501     for (var i = arguments.length-1; i>=2; i--)
4502         v510 = {car: arguments[i], cdr:
4503     v510};
4504     return (function(){
4505         return l124.fvalue(values, "(function(){", (function(){
4506             var symbol = l123;
4507             var value = symbol.value;
4508             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4509             return value;
4510         })(), l135.fvalue(pv, "while(", l137.fvalue(pv, v511), " !== ", l137.fvalue(pv, l3.value), "){", (function(){
4511             var symbol = l123;
4512             var value = symbol.value;
4513             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4514             return value;
4515         })(), l135.fvalue(pv, l213.fvalue(pv, v510)), "}", "return ", l137.fvalue(pv, l3.value), ";", (function(){
4516             var symbol = l123;
4517             var value = symbol.value;
4518             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4519             return value;
4520         })()), "})()");
4521     })();
4522 })), cdr: (function(){
4523     var symbol = l197;
4524     var value = symbol.value;
4525     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4526     return value;
4527 })()}));
4528 var l224 = {name: "SYMBOL-FUNCTION"};
4529 ((l197).value = ({car: l42.fvalue(pv, l98, (function (values,v512){
4530     checkArgs(arguments, 2);
4531     return (function(){
4532         return ((l57.fvalue(pv, v512) !== l3.value ? (((function(){
4533             var tmp = v512;
4534             return tmp === l3.value? l3.value: tmp.car;
4535         })() === l212)?l4.value: l3.value) : l3.value) !== l3.value ? l137.fvalue(values, v512) : (((function(){
4536             var tmp = v512;
4537             return (typeof tmp == 'object' && 'name' in tmp);
4538         })()?l4.value: l3.value) !== l3.value ? l137.fvalue(values, l62.fvalue(pv, l42.fvalue(pv, l224), l42.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, v512))))) : l3.value));
4539     })();
4540 })), cdr: (function(){
4541     var symbol = l197;
4542     var value = symbol.value;
4543     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4544     return value;
4545 })()}));
4546 var l225 = {name: "*COMPILING-FILE*"};
4547 (function(){
4548     (((l225.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l225).value = l3.value));
4549     return l225;
4550 })();
4551 var l226 = {name: "EVAL-WHEN-COMPILE"};
4552 var l227 = {name: "EVAL"};
4553 var l228 = {name: "PROGN"};
4554 ((l197).value = ({car: l42.fvalue(pv, l226, (function (values){
4555     var v513= l3.value;
4556     for (var i = arguments.length-1; i>=1; i--)
4557         v513 = {car: arguments[i], cdr:
4558     v513};
4559     return (function(){
4560         return ((function(){
4561             var symbol = l225;
4562             var value = symbol.value;
4563             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4564             return value;
4565         })() !== l3.value ? (function(){
4566             l227.fvalue(pv, ({car: l228, cdr: v513}));
4567             return l3.value;
4568         })() : l137.fvalue(values, l62.fvalue(pv, l42.fvalue(pv, l228), v513)));
4569     })();
4570 })), cdr: (function(){
4571     var symbol = l197;
4572     var value = symbol.value;
4573     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4574     return value;
4575 })()}));
4576 var l229 = {name: "DEFINE-TRANSFORMATION"};
4577 l229;
4578 ((l197).value = ({car: l42.fvalue(pv, l228, (function (values){
4579     var v514= l3.value;
4580     for (var i = arguments.length-1; i>=1; i--)
4581         v514 = {car: arguments[i], cdr:
4582     v514};
4583     return (function(){
4584         return (l11.fvalue(pv, (function(){
4585             var tmp = v514;
4586             return tmp === l3.value? l3.value: tmp.cdr;
4587         })()) !== l3.value ? l137.fvalue(values, (function(){
4588             var tmp = v514;
4589             return tmp === l3.value? l3.value: tmp.car;
4590         })(), (function(){
4591             var symbol = l162;
4592             var value = symbol.value;
4593             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4594             return value;
4595         })()) : l124.fvalue(values, "(function(){", (function(){
4596             var symbol = l123;
4597             var value = symbol.value;
4598             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4599             return value;
4600         })(), l135.fvalue(pv, l213.fvalue(pv, v514, l4.value)), "})()"));
4601     })();
4602 })), cdr: (function(){
4603     var symbol = l197;
4604     var value = symbol.value;
4605     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4606     return value;
4607 })()}));
4608 var l230 = {name: "SPECIAL-VARIABLE-P"};
4609 (function(){
4610     (l230).fvalue = (function(v516){
4611         ((v516)["fname"] = "SPECIAL-VARIABLE-P");
4612         return v516;
4613     })((function (values,v515){
4614         checkArgs(arguments, 2);
4615         return (function(){
4616             return (l191.fvalue(pv, v515, l99, l193) !== l3.value ? l4.value : l3.value);
4617         })();
4618     }));
4619     return l230;
4620 })();
4621 var l231 = {name: "LET-BINDING-WRAPPER"};
4622 (function(){
4623     (l231).fvalue = (function(v523){
4624         ((v523)["fname"] = "LET-BINDING-WRAPPER");
4625         return v523;
4626     })((function (values,v517,v518){
4627         checkArgs(arguments, 3);
4628         return (function(){
4629             try {
4630                 (l11.fvalue(pv, v517) !== l3.value ? (function(){
4631                     var values = mv;
4632                     throw ({type: 'block', id: 195, values: v518, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
4633                 })() : l3.value);
4634                 return l124.fvalue(values, "try {", (function(){
4635                     var symbol = l123;
4636                     var value = symbol.value;
4637                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4638                     return value;
4639                 })(), l135.fvalue(pv, "var tmp;", (function(){
4640                     var symbol = l123;
4641                     var value = symbol.value;
4642                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4643                     return value;
4644                 })(), l128.fvalue(pv, (function (values,v519){
4645                     checkArgs(arguments, 2);
4646                     return (function(v520){
4647                         return l124.fvalue(values, "tmp = ", v520, ".value;", (function(){
4648                             var symbol = l123;
4649                             var value = symbol.value;
4650                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4651                             return value;
4652                         })(), v520, ".value = ", (function(){
4653                             var tmp = v519;
4654                             return tmp === l3.value? l3.value: tmp.cdr;
4655                         })(), ";", (function(){
4656                             var symbol = l123;
4657                             var value = symbol.value;
4658                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4659                             return value;
4660                         })(), (function(){
4661                             var tmp = v519;
4662                             return tmp === l3.value? l3.value: tmp.cdr;
4663                         })(), " = tmp;", (function(){
4664                             var symbol = l123;
4665                             var value = symbol.value;
4666                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4667                             return value;
4668                         })());
4669                     })(l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, (function(){
4670                         var tmp = v519;
4671                         return tmp === l3.value? l3.value: tmp.car;
4672                     })()))));
4673                 }), v517), v518, (function(){
4674                     var symbol = l123;
4675                     var value = symbol.value;
4676                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4677                     return value;
4678                 })()), "}", (function(){
4679                     var symbol = l123;
4680                     var value = symbol.value;
4681                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4682                     return value;
4683                 })(), "finally {", (function(){
4684                     var symbol = l123;
4685                     var value = symbol.value;
4686                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4687                     return value;
4688                 })(), l135.fvalue(pv, l128.fvalue(pv, (function (values,v521){
4689                     checkArgs(arguments, 2);
4690                     return (function(v522){
4691                         return l124.fvalue(values, v522, ".value", " = ", (function(){
4692                             var tmp = v521;
4693                             return tmp === l3.value? l3.value: tmp.cdr;
4694                         })(), ";", (function(){
4695                             var symbol = l123;
4696                             var value = symbol.value;
4697                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4698                             return value;
4699                         })());
4700                     })(l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, (function(){
4701                         var tmp = v521;
4702                         return tmp === l3.value? l3.value: tmp.car;
4703                     })()))));
4704                 }), v517)), "}", (function(){
4705                     var symbol = l123;
4706                     var value = symbol.value;
4707                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4708                     return value;
4709                 })());
4710             }
4711             catch (cf){
4712                 if (cf.type == 'block' && cf.id == 195)
4713                     return values.apply(this, forcemv(cf.values));
4714                 else
4715                     throw cf;
4716             }
4717         })();
4718     }));
4719     return l231;
4720 })();
4721 var l232 = {name: "LET"};
4722 var l233 = {name: "DYNAMIC-BINDINGS"};
4723 ((l197).value = ({car: l42.fvalue(pv, l232, (function (values,v525){
4724     checkArgsAtLeast(arguments, 2);
4725     var v524= l3.value;
4726     for (var i = arguments.length-1; i>=2; i--)
4727         v524 = {car: arguments[i], cdr:
4728     v524};
4729     return (function(){
4730         return (function(){
4731             try {
4732                 var v533 = l178.value;
4733                 var v526 = l69.fvalue(pv, (function(){
4734                     var symbol = l56;
4735                     var func = symbol.fvalue;
4736                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4737                     return func;
4738                 })(), v525);
4739                 var v527 = l69.fvalue(pv, (function(){
4740                     var symbol = l38;
4741                     var func = symbol.fvalue;
4742                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4743                     return func;
4744                 })(), v526);
4745                 var v528 = l69.fvalue(pv, (function(){
4746                     var symbol = l137;
4747                     var func = symbol.fvalue;
4748                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4749                     return func;
4750                 })(), l69.fvalue(pv, (function(){
4751                     var symbol = l39;
4752                     var func = symbol.fvalue;
4753                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4754                     return func;
4755                 })(), v526));
4756                 ((l178).value = l182.fvalue(pv, l84.fvalue(pv, (function(){
4757                     var symbol = l230;
4758                     var func = symbol.fvalue;
4759                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4760                     return func;
4761                 })(), v527)));
4762                 var v529 = l3.value;
4763                 return l124.fvalue(values, "(function(", l126.fvalue(pv, l69.fvalue(pv, (function (values,v530){
4764                     checkArgs(arguments, 2);
4765                     return (l230.fvalue(pv, v530) !== l3.value ? (function(v531){
4766                         ((l233).value = ({car: ({car: v530, cdr: v531}), cdr: v529}));
4767                         return v531;
4768                     })(l180.fvalue(pv, v530)) : l181.fvalue(values, v530));
4769                 }), v527), ","), "){", (function(){
4770                     var symbol = l123;
4771                     var value = symbol.value;
4772                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4773                     return value;
4774                 })(), (function(v532){
4775                     return l135.fvalue(pv, l231.fvalue(pv, v529, v532));
4776                 })(l213.fvalue(pv, v524, l4.value)), "})(", l126.fvalue(pv, v528, ","), ")");
4777             }
4778             finally {
4779                 l178.value = v533;
4780             }
4781         })();
4782     })();
4783 })), cdr: (function(){
4784     var symbol = l197;
4785     var value = symbol.value;
4786     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4787     return value;
4788 })()}));
4789 var l234 = {name: "LET*-INITIALIZE-VALUE"};
4790 (function(){
4791     (l234).fvalue = (function(v540){
4792         ((v540)["fname"] = "LET*-INITIALIZE-VALUE");
4793         return v540;
4794     })((function (values,v534){
4795         checkArgs(arguments, 2);
4796         return (function(){
4797             return (function(v535,v536){
4798                 return (l230.fvalue(pv, v535) !== l3.value ? l124.fvalue(values, l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l216), l42.fvalue(pv, v535), l42.fvalue(pv, v536))), ";", (function(){
4799                     var symbol = l123;
4800                     var value = symbol.value;
4801                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4802                     return value;
4803                 })()) : (function(){
4804                     var v537 = l180.fvalue(pv, v535);
4805                     var v538 = l163.fvalue(pv, v535, l99, v537);
4806                     return (function(v539){
4807                         l173.fvalue(pv, v538, (function(){
4808                             var symbol = l178;
4809                             var value = symbol.value;
4810                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4811                             return value;
4812                         })(), l99);
4813                         return v539;
4814                     })(l124.fvalue(pv, "var ", v537, " = ", l137.fvalue(pv, v536), ";", (function(){
4815                         var symbol = l123;
4816                         var value = symbol.value;
4817                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4818                         return value;
4819                     })()));
4820                 })());
4821             })(l38.fvalue(pv, v534),l39.fvalue(pv, v534));
4822         })();
4823     }));
4824     return l234;
4825 })();
4826 var l235 = {name: "LET*-BINDING-WRAPPER"};
4827 (function(){
4828     (l235).fvalue = (function(v549){
4829         ((v549)["fname"] = "LET*-BINDING-WRAPPER");
4830         return v549;
4831     })((function (values,v541,v542){
4832         checkArgs(arguments, 3);
4833         return (function(){
4834             try {
4835                 (l11.fvalue(pv, v541) !== l3.value ? (function(){
4836                     var values = mv;
4837                     throw ({type: 'block', id: 198, values: v542, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
4838                 })() : l3.value);
4839                 return (function(v544){
4840                     return l124.fvalue(values, "try {", (function(){
4841                         var symbol = l123;
4842                         var value = symbol.value;
4843                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4844                         return value;
4845                     })(), l135.fvalue(pv, l128.fvalue(pv, (function (values,v545){
4846                         checkArgs(arguments, 2);
4847                         return (function(v546){
4848                             return l124.fvalue(values, "var ", (function(){
4849                                 var tmp = v545;
4850                                 return tmp === l3.value? l3.value: tmp.cdr;
4851                             })(), " = ", v546, ".value;", (function(){
4852                                 var symbol = l123;
4853                                 var value = symbol.value;
4854                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4855                                 return value;
4856                             })());
4857                         })(l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, (function(){
4858                             var tmp = v545;
4859                             return tmp === l3.value? l3.value: tmp.car;
4860                         })()))));
4861                     }), v544), v542), "}", (function(){
4862                         var symbol = l123;
4863                         var value = symbol.value;
4864                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4865                         return value;
4866                     })(), "finally {", (function(){
4867                         var symbol = l123;
4868                         var value = symbol.value;
4869                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4870                         return value;
4871                     })(), l135.fvalue(pv, l128.fvalue(pv, (function (values,v547){
4872                         checkArgs(arguments, 2);
4873                         return (function(v548){
4874                             return l124.fvalue(values, v548, ".value", " = ", (function(){
4875                                 var tmp = v547;
4876                                 return tmp === l3.value? l3.value: tmp.cdr;
4877                             })(), ";", (function(){
4878                                 var symbol = l123;
4879                                 var value = symbol.value;
4880                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4881                                 return value;
4882                             })());
4883                         })(l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, (function(){
4884                             var tmp = v547;
4885                             return tmp === l3.value? l3.value: tmp.car;
4886                         })()))));
4887                     }), v544)), "}", (function(){
4888                         var symbol = l123;
4889                         var value = symbol.value;
4890                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4891                         return value;
4892                     })());
4893                 })(l69.fvalue(pv, (function (values,v543){
4894                     checkArgs(arguments, 2);
4895                     return ({car: v543, cdr: l180.fvalue(pv, v543)});
4896                 }), l85.fvalue(pv, (function(){
4897                     var symbol = l230;
4898                     var func = symbol.fvalue;
4899                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4900                     return func;
4901                 })(), v541)));
4902             }
4903             catch (cf){
4904                 if (cf.type == 'block' && cf.id == 198)
4905                     return values.apply(this, forcemv(cf.values));
4906                 else
4907                     throw cf;
4908             }
4909         })();
4910     }));
4911     return l235;
4912 })();
4913 var l236 = {name: "LET*"};
4914 ((l197).value = ({car: l42.fvalue(pv, l236, (function (values,v551){
4915     checkArgsAtLeast(arguments, 2);
4916     var v550= l3.value;
4917     for (var i = arguments.length-1; i>=2; i--)
4918         v550 = {car: arguments[i], cdr:
4919     v550};
4920     return (function(){
4921         return (function(v552,v553){
4922             try {
4923                 var tmp;
4924                 tmp = l178.value;
4925                 l178.value = v553;
4926                 v553 = tmp;
4927                 return l124.fvalue(values, "(function(){", (function(){
4928                     var symbol = l123;
4929                     var value = symbol.value;
4930                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4931                     return value;
4932                 })(), l135.fvalue(pv, (function(v554,v555){
4933                     return l235.fvalue(pv, v554, v555);
4934                 })(l85.fvalue(pv, (function(){
4935                     var symbol = l230;
4936                     var func = symbol.fvalue;
4937                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4938                     return func;
4939                 })(), l69.fvalue(pv, (function(){
4940                     var symbol = l38;
4941                     var func = symbol.fvalue;
4942                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4943                     return func;
4944                 })(), v552)),l124.fvalue(pv, l128.fvalue(pv, (function(){
4945                     var symbol = l234;
4946                     var func = symbol.fvalue;
4947                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4948                     return func;
4949                 })(), v552), l213.fvalue(pv, v550, l4.value)))), "})()");
4950             }
4951             finally {
4952                 l178.value = v553;
4953             }
4954         })(l69.fvalue(pv, (function(){
4955             var symbol = l56;
4956             var func = symbol.fvalue;
4957             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4958             return func;
4959         })(), v551),l172.fvalue(pv, (function(){
4960             var symbol = l178;
4961             var value = symbol.value;
4962             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4963             return value;
4964         })()));
4965     })();
4966 })), cdr: (function(){
4967     var symbol = l197;
4968     var value = symbol.value;
4969     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4970     return value;
4971 })()}));
4972 var l237 = {name: "*BLOCK-COUNTER*"};
4973 (function(){
4974     (((l237.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l237).value = 0));
4975     return l237;
4976 })();
4977 var l238 = {name: "MULTIPLE-VALUE"};
4978 var l239 = {name: "USED"};
4979 ((l197).value = ({car: l42.fvalue(pv, l174, (function (values,v557){
4980     checkArgsAtLeast(arguments, 2);
4981     var v556= l3.value;
4982     for (var i = arguments.length-1; i>=2; i--)
4983         v556 = {car: arguments[i], cdr:
4984     v556};
4985     return (function(){
4986         return (function(){
4987             var v558 = l16.fvalue(pv, ((l237).value = (function(){
4988                 var x1 = (function(){
4989                     var symbol = l237;
4990                     var value = symbol.value;
4991                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4992                     return value;
4993                 })();
4994                 if (typeof x1 !== 'number') throw 'Not a number!';
4995                 var x2 = 1;
4996                 if (typeof x2 !== 'number') throw 'Not a number!';
4997                 return x1+x2;
4998             })()));
4999             var v559 = l163.fvalue(pv, v557, l174, v558);
5000             ((function(){
5001                 var symbol = l162;
5002                 var value = symbol.value;
5003                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5004                 return value;
5005             })() !== l3.value ? l170.fvalue(pv, l238, v559) : l3.value);
5006             return (function(){
5007                 try {
5008                     var v561 = l178.value;
5009                     ((l178).value = l176.fvalue(pv, l42.fvalue(pv, v559), (function(){
5010                         var symbol = l178;
5011                         var value = symbol.value;
5012                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5013                         return value;
5014                     })(), l174));
5015                     var v560 = l213.fvalue(pv, v556, l4.value);
5016                     return (l82.fvalue(pv, l239, l167.fvalue(pv, v559)) !== l3.value ? l124.fvalue(values, "(function(){", (function(){
5017                         var symbol = l123;
5018                         var value = symbol.value;
5019                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5020                         return value;
5021                     })(), l135.fvalue(pv, "try {", (function(){
5022                         var symbol = l123;
5023                         var value = symbol.value;
5024                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5025                         return value;
5026                     })(), l135.fvalue(pv, v560), "}", (function(){
5027                         var symbol = l123;
5028                         var value = symbol.value;
5029                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5030                         return value;
5031                     })(), "catch (cf){", (function(){
5032                         var symbol = l123;
5033                         var value = symbol.value;
5034                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5035                         return value;
5036                     })(), "    if (cf.type == 'block' && cf.id == ", v558, ")", (function(){
5037                         var symbol = l123;
5038                         var value = symbol.value;
5039                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5040                         return value;
5041                     })(), ((function(){
5042                         var symbol = l162;
5043                         var value = symbol.value;
5044                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5045                         return value;
5046                     })() !== l3.value ? "        return values.apply(this, forcemv(cf.values));" : "        return cf.values;"), (function(){
5047                         var symbol = l123;
5048                         var value = symbol.value;
5049                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5050                         return value;
5051                     })(), "    else", (function(){
5052                         var symbol = l123;
5053                         var value = symbol.value;
5054                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5055                         return value;
5056                     })(), "        throw cf;", (function(){
5057                         var symbol = l123;
5058                         var value = symbol.value;
5059                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5060                         return value;
5061                     })(), "}", (function(){
5062                         var symbol = l123;
5063                         var value = symbol.value;
5064                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5065                         return value;
5066                     })()), "})()") : l124.fvalue(values, "(function(){", (function(){
5067                         var symbol = l123;
5068                         var value = symbol.value;
5069                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5070                         return value;
5071                     })(), l135.fvalue(pv, v560), "})()"));
5072                 }
5073                 finally {
5074                     l178.value = v561;
5075                 }
5076             })();
5077         })();
5078     })();
5079 })), cdr: (function(){
5080     var symbol = l197;
5081     var value = symbol.value;
5082     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5083     return value;
5084 })()}));
5085 var l240 = {name: "RETURN-FROM"};
5086 ((l197).value = ({car: l42.fvalue(pv, l240, (function (values,v562,v563){
5087     checkArgsAtLeast(arguments, 2);
5088     checkArgsAtMost(arguments, 3);
5089     switch(arguments.length-1){
5090     case 1:
5091     v563=l3.value;
5092     default: break;
5093     }
5094     return (function(){
5095         return (function(){
5096             var v564 = l177.fvalue(pv, v562, (function(){
5097                 var symbol = l178;
5098                 var value = symbol.value;
5099                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5100                 return value;
5101             })(), l174);
5102             var v565 = l82.fvalue(pv, l238, l167.fvalue(pv, v564));
5103             (l11.fvalue(pv, v564) !== l3.value ? (function(){
5104                 throw l124.fvalue(pv, "Unknown block `", (v562).name, "'.");
5105             })() : l3.value);
5106             l170.fvalue(pv, l239, v564);
5107             return l124.fvalue(values, "(function(){", (function(){
5108                 var symbol = l123;
5109                 var value = symbol.value;
5110                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5111                 return value;
5112             })(), l135.fvalue(pv, (v565 !== l3.value ? l124.fvalue(pv, "var values = mv;", (function(){
5113                 var symbol = l123;
5114                 var value = symbol.value;
5115                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5116                 return value;
5117             })()) : ""), "throw ({", "type: 'block', ", "id: ", l166.fvalue(pv, v564), ", ", "values: ", l137.fvalue(pv, v563, v565), ", ", "message: 'Return from unknown block ", (v562).name, ".'", "})"), "})()");
5118         })();
5119     })();
5120 })), cdr: (function(){
5121     var symbol = l197;
5122     var value = symbol.value;
5123     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5124     return value;
5125 })()}));
5126 var l241 = {name: "CATCH"};
5127 ((l197).value = ({car: l42.fvalue(pv, l241, (function (values,v567){
5128     checkArgsAtLeast(arguments, 2);
5129     var v566= l3.value;
5130     for (var i = arguments.length-1; i>=2; i--)
5131         v566 = {car: arguments[i], cdr:
5132     v566};
5133     return (function(){
5134         return l124.fvalue(values, "(function(){", (function(){
5135             var symbol = l123;
5136             var value = symbol.value;
5137             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5138             return value;
5139         })(), l135.fvalue(pv, "var id = ", l137.fvalue(pv, v567), ";", (function(){
5140             var symbol = l123;
5141             var value = symbol.value;
5142             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5143             return value;
5144         })(), "try {", (function(){
5145             var symbol = l123;
5146             var value = symbol.value;
5147             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5148             return value;
5149         })(), l135.fvalue(pv, l213.fvalue(pv, v566, l4.value)), (function(){
5150             var symbol = l123;
5151             var value = symbol.value;
5152             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5153             return value;
5154         })(), "}", (function(){
5155             var symbol = l123;
5156             var value = symbol.value;
5157             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5158             return value;
5159         })(), "catch (cf){", (function(){
5160             var symbol = l123;
5161             var value = symbol.value;
5162             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5163             return value;
5164         })(), "    if (cf.type == 'catch' && cf.id == id)", (function(){
5165             var symbol = l123;
5166             var value = symbol.value;
5167             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5168             return value;
5169         })(), ((function(){
5170             var symbol = l162;
5171             var value = symbol.value;
5172             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5173             return value;
5174         })() !== l3.value ? "        return values.apply(this, forcemv(cf.values));" : "        return pv.apply(this, forcemv(cf.values));"), (function(){
5175             var symbol = l123;
5176             var value = symbol.value;
5177             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5178             return value;
5179         })(), "    else", (function(){
5180             var symbol = l123;
5181             var value = symbol.value;
5182             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5183             return value;
5184         })(), "        throw cf;", (function(){
5185             var symbol = l123;
5186             var value = symbol.value;
5187             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5188             return value;
5189         })(), "}", (function(){
5190             var symbol = l123;
5191             var value = symbol.value;
5192             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5193             return value;
5194         })()), "})()");
5195     })();
5196 })), cdr: (function(){
5197     var symbol = l197;
5198     var value = symbol.value;
5199     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5200     return value;
5201 })()}));
5202 var l242 = {name: "THROW"};
5203 ((l197).value = ({car: l42.fvalue(pv, l242, (function (values,v568,v569){
5204     checkArgs(arguments, 3);
5205     return (function(){
5206         return l124.fvalue(values, "(function(){", (function(){
5207             var symbol = l123;
5208             var value = symbol.value;
5209             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5210             return value;
5211         })(), l135.fvalue(pv, "var values = mv;", (function(){
5212             var symbol = l123;
5213             var value = symbol.value;
5214             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5215             return value;
5216         })(), "throw ({", "type: 'catch', ", "id: ", l137.fvalue(pv, v568), ", ", "values: ", l137.fvalue(pv, v569, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
5217     })();
5218 })), cdr: (function(){
5219     var symbol = l197;
5220     var value = symbol.value;
5221     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5222     return value;
5223 })()}));
5224 var l243 = {name: "*TAGBODY-COUNTER*"};
5225 (function(){
5226     (((l243.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l243).value = 0));
5227     return l243;
5228 })();
5229 var l244 = {name: "*GO-TAG-COUNTER*"};
5230 (function(){
5231     (((l244.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l244).value = 0));
5232     return l244;
5233 })();
5234 var l245 = {name: "GO-TAG-P"};
5235 (function(){
5236     (l245).fvalue = (function(v572){
5237         ((v572)["fname"] = "GO-TAG-P");
5238         return v572;
5239     })((function (values,v570){
5240         checkArgs(arguments, 2);
5241         return (function(){
5242             return (function(v571){
5243                 return (v571 !== l3.value ? v571 : ((function(){
5244                     var tmp = v570;
5245                     return (typeof tmp == 'object' && 'name' in tmp);
5246                 })()?l4.value: l3.value));
5247             })(l75.fvalue(pv, v570));
5248         })();
5249     }));
5250     return l245;
5251 })();
5252 var l246 = {name: "DECLARE-TAGBODY-TAGS"};
5253 (function(){
5254     (l246).fvalue = (function(v578){
5255         ((v578)["fname"] = "DECLARE-TAGBODY-TAGS");
5256         return v578;
5257     })((function (values,v573,v574){
5258         checkArgs(arguments, 3);
5259         return (function(){
5260             return (function(v577){
5261                 return l176.fvalue(values, v577, (function(){
5262                     var symbol = l178;
5263                     var value = symbol.value;
5264                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5265                     return value;
5266                 })(), l175);
5267             })(l69.fvalue(pv, (function (values,v575){
5268                 checkArgs(arguments, 2);
5269                 return (function(v576){
5270                     return l163.fvalue(values, v575, l175, l42.fvalue(pv, v573, v576));
5271                 })(l16.fvalue(pv, ((l244).value = (function(){
5272                     var x1 = (function(){
5273                         var symbol = l244;
5274                         var value = symbol.value;
5275                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5276                         return value;
5277                     })();
5278                     if (typeof x1 !== 'number') throw 'Not a number!';
5279                     var x2 = 1;
5280                     if (typeof x2 !== 'number') throw 'Not a number!';
5281                     return x1+x2;
5282                 })())));
5283             }), l85.fvalue(pv, (function(){
5284                 var symbol = l245;
5285                 var func = symbol.fvalue;
5286                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5287                 return func;
5288             })(), v574)));
5289         })();
5290     }));
5291     return l246;
5292 })();
5293 var l247 = {name: "TAGBODY"};
5294 ((l197).value = ({car: l42.fvalue(pv, l247, (function (values){
5295     var v579= l3.value;
5296     for (var i = arguments.length-1; i>=1; i--)
5297         v579 = {car: arguments[i], cdr:
5298     v579};
5299     return (function(){
5300         try {
5301             (l89.fvalue(pv, (function(){
5302                 var symbol = l245;
5303                 var func = symbol.fvalue;
5304                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5305                 return func;
5306             })(), v579) !== l3.value ? l3.value : (function(){
5307                 var values = mv;
5308                 throw ({type: 'block', id: 206, values: l137.fvalue(values, l62.fvalue(pv, l42.fvalue(pv, l228), v579, l42.fvalue(pv, l3))), message: 'Return from unknown block TAGBODY.'})
5309             })());
5310             (l245.fvalue(pv, (function(){
5311                 var tmp = v579;
5312                 return tmp === l3.value? l3.value: tmp.car;
5313             })()) !== l3.value ? l3.value : (v579 = ({car: l15.fvalue(pv, "START"), cdr: v579})));
5314             return (function(v580){
5315                 return (function(v582,v581){
5316                     try {
5317                         var tmp;
5318                         tmp = l178.value;
5319                         l178.value = v582;
5320                         v582 = tmp;
5321                         (function(v583){
5322                             return (v581 = l39.fvalue(pv, l166.fvalue(pv, v583)));
5323                         })(l177.fvalue(pv, l38.fvalue(pv, v579), (function(){
5324                             var symbol = l178;
5325                             var value = symbol.value;
5326                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5327                             return value;
5328                         })(), l175));
5329                         return l124.fvalue(values, "(function(){", (function(){
5330                             var symbol = l123;
5331                             var value = symbol.value;
5332                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5333                             return value;
5334                         })(), l135.fvalue(pv, "var tagbody_", v580, " = ", v581, ";", (function(){
5335                             var symbol = l123;
5336                             var value = symbol.value;
5337                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5338                             return value;
5339                         })(), "tbloop:", (function(){
5340                             var symbol = l123;
5341                             var value = symbol.value;
5342                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5343                             return value;
5344                         })(), "while (true) {", (function(){
5345                             var symbol = l123;
5346                             var value = symbol.value;
5347                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5348                             return value;
5349                         })(), l135.fvalue(pv, "try {", (function(){
5350                             var symbol = l123;
5351                             var value = symbol.value;
5352                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5353                             return value;
5354                         })(), l135.fvalue(pv, (function(v584){
5355                             return l124.fvalue(pv, "switch(tagbody_", v580, "){", (function(){
5356                                 var symbol = l123;
5357                                 var value = symbol.value;
5358                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5359                                 return value;
5360                             })(), "case ", v581, ":", (function(){
5361                                 var symbol = l123;
5362                                 var value = symbol.value;
5363                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5364                                 return value;
5365                             })(), (function(){
5366                                 return (function(v585,v586){
5367                                     (function(){
5368                                         while(v585 !== l3.value){
5369                                             (v586 = (function(){
5370                                                 var tmp = v585;
5371                                                 return tmp === l3.value? l3.value: tmp.car;
5372                                             })());
5373                                             (function(){
5374                                                 (v584 = l124.fvalue(pv, v584, (l26.fvalue(pv, l245.fvalue(pv, v586)) !== l3.value ? l135.fvalue(pv, l137.fvalue(pv, v586), ";", (function(){
5375                                                     var symbol = l123;
5376                                                     var value = symbol.value;
5377                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5378                                                     return value;
5379                                                 })()) : (function(v587){
5380                                                     return l124.fvalue(pv, "case ", l39.fvalue(pv, l166.fvalue(pv, v587)), ":", (function(){
5381                                                         var symbol = l123;
5382                                                         var value = symbol.value;
5383                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5384                                                         return value;
5385                                                     })());
5386                                                 })(l177.fvalue(pv, v586, (function(){
5387                                                     var symbol = l178;
5388                                                     var value = symbol.value;
5389                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5390                                                     return value;
5391                                                 })(), l175)))));
5392                                                 return l3.value;
5393                                             })();
5394                                             (v585 = (function(){
5395                                                 var tmp = v585;
5396                                                 return tmp === l3.value? l3.value: tmp.cdr;
5397                                             })());
5398                                         }return l3.value;
5399                                     })();
5400                                     return v584;
5401                                 })((function(){
5402                                     var tmp = v579;
5403                                     return tmp === l3.value? l3.value: tmp.cdr;
5404                                 })(),l3.value);
5405                             })(), "default:", (function(){
5406                                 var symbol = l123;
5407                                 var value = symbol.value;
5408                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5409                                 return value;
5410                             })(), "    break tbloop;", (function(){
5411                                 var symbol = l123;
5412                                 var value = symbol.value;
5413                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5414                                 return value;
5415                             })(), "}", (function(){
5416                                 var symbol = l123;
5417                                 var value = symbol.value;
5418                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5419                                 return value;
5420                             })());
5421                         })("")), "}", (function(){
5422                             var symbol = l123;
5423                             var value = symbol.value;
5424                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5425                             return value;
5426                         })(), "catch (jump) {", (function(){
5427                             var symbol = l123;
5428                             var value = symbol.value;
5429                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5430                             return value;
5431                         })(), "    if (jump.type == 'tagbody' && jump.id == ", v580, ")", (function(){
5432                             var symbol = l123;
5433                             var value = symbol.value;
5434                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5435                             return value;
5436                         })(), "        tagbody_", v580, " = jump.label;", (function(){
5437                             var symbol = l123;
5438                             var value = symbol.value;
5439                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5440                             return value;
5441                         })(), "    else", (function(){
5442                             var symbol = l123;
5443                             var value = symbol.value;
5444                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5445                             return value;
5446                         })(), "        throw(jump);", (function(){
5447                             var symbol = l123;
5448                             var value = symbol.value;
5449                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5450                             return value;
5451                         })(), "}", (function(){
5452                             var symbol = l123;
5453                             var value = symbol.value;
5454                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5455                             return value;
5456                         })()), "}", (function(){
5457                             var symbol = l123;
5458                             var value = symbol.value;
5459                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5460                             return value;
5461                         })(), "return ", l137.fvalue(pv, l3.value), ";", (function(){
5462                             var symbol = l123;
5463                             var value = symbol.value;
5464                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5465                             return value;
5466                         })()), "})()");
5467                     }
5468                     finally {
5469                         l178.value = v582;
5470                     }
5471                 })(l246.fvalue(pv, v580, v579),l3.value);
5472             })(l16.fvalue(pv, (function(){
5473                 var symbol = l243;
5474                 var value = symbol.value;
5475                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5476                 return value;
5477             })()));
5478         }
5479         catch (cf){
5480             if (cf.type == 'block' && cf.id == 206)
5481                 return values.apply(this, forcemv(cf.values));
5482             else
5483                 throw cf;
5484         }
5485     })();
5486 })), cdr: (function(){
5487     var symbol = l197;
5488     var value = symbol.value;
5489     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5490     return value;
5491 })()}));
5492 var l248 = {name: "GO"};
5493 ((l197).value = ({car: l42.fvalue(pv, l248, (function (values,v588){
5494     checkArgs(arguments, 2);
5495     return (function(){
5496         return (function(v589,v590){
5497             return (v589 !== l3.value ? l124.fvalue(values, "(function(){", (function(){
5498                 var symbol = l123;
5499                 var value = symbol.value;
5500                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5501                 return value;
5502             })(), l135.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l38.fvalue(pv, l166.fvalue(pv, v589)), ", ", "label: ", l39.fvalue(pv, l166.fvalue(pv, v589)), ", ", "message: 'Attempt to GO to non-existing tag ", v590, "'", "})", (function(){
5503                 var symbol = l123;
5504                 var value = symbol.value;
5505                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5506                 return value;
5507             })()), "})()") : (function(){
5508                 throw l124.fvalue(pv, "Unknown tag `", v590, "'.");
5509             })());
5510         })(l177.fvalue(pv, v588, (function(){
5511             var symbol = l178;
5512             var value = symbol.value;
5513             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5514             return value;
5515         })(), l175),(((function(){
5516             var tmp = v588;
5517             return (typeof tmp == 'object' && 'name' in tmp);
5518         })()?l4.value: l3.value) !== l3.value ? (v588).name : (l75.fvalue(pv, v588) !== l3.value ? l16.fvalue(pv, v588) : l3.value)));
5519     })();
5520 })), cdr: (function(){
5521     var symbol = l197;
5522     var value = symbol.value;
5523     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5524     return value;
5525 })()}));
5526 var l249 = {name: "UNWIND-PROTECT"};
5527 ((l197).value = ({car: l42.fvalue(pv, l249, (function (values,v592){
5528     checkArgsAtLeast(arguments, 2);
5529     var v591= l3.value;
5530     for (var i = arguments.length-1; i>=2; i--)
5531         v591 = {car: arguments[i], cdr:
5532     v591};
5533     return (function(){
5534         return l124.fvalue(values, "(function(){", (function(){
5535             var symbol = l123;
5536             var value = symbol.value;
5537             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5538             return value;
5539         })(), l135.fvalue(pv, "var ret = ", l137.fvalue(pv, l3.value), ";", (function(){
5540             var symbol = l123;
5541             var value = symbol.value;
5542             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5543             return value;
5544         })(), "try {", (function(){
5545             var symbol = l123;
5546             var value = symbol.value;
5547             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5548             return value;
5549         })(), l135.fvalue(pv, "ret = ", l137.fvalue(pv, v592), ";", (function(){
5550             var symbol = l123;
5551             var value = symbol.value;
5552             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5553             return value;
5554         })()), "} finally {", (function(){
5555             var symbol = l123;
5556             var value = symbol.value;
5557             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5558             return value;
5559         })(), l135.fvalue(pv, l213.fvalue(pv, v591)), "}", (function(){
5560             var symbol = l123;
5561             var value = symbol.value;
5562             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5563             return value;
5564         })(), "return ret;", (function(){
5565             var symbol = l123;
5566             var value = symbol.value;
5567             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5568             return value;
5569         })()), "})()");
5570     })();
5571 })), cdr: (function(){
5572     var symbol = l197;
5573     var value = symbol.value;
5574     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5575     return value;
5576 })()}));
5577 var l250 = {name: "MULTIPLE-VALUE-CALL"};
5578 ((l197).value = ({car: l42.fvalue(pv, l250, (function (values,v594){
5579     checkArgsAtLeast(arguments, 2);
5580     var v593= l3.value;
5581     for (var i = arguments.length-1; i>=2; i--)
5582         v593 = {car: arguments[i], cdr:
5583     v593};
5584     return (function(){
5585         return l124.fvalue(values, "(function(){", (function(){
5586             var symbol = l123;
5587             var value = symbol.value;
5588             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5589             return value;
5590         })(), l135.fvalue(pv, "var func = ", l137.fvalue(pv, v594), ";", (function(){
5591             var symbol = l123;
5592             var value = symbol.value;
5593             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5594             return value;
5595         })(), "var args = [", ((function(){
5596             var symbol = l162;
5597             var value = symbol.value;
5598             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5599             return value;
5600         })() !== l3.value ? "values" : "pv"), "];", (function(){
5601             var symbol = l123;
5602             var value = symbol.value;
5603             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5604             return value;
5605         })(), "return ", l124.fvalue(pv, "(function(){", (function(){
5606             var symbol = l123;
5607             var value = symbol.value;
5608             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5609             return value;
5610         })(), l135.fvalue(pv, "var values = mv;", (function(){
5611             var symbol = l123;
5612             var value = symbol.value;
5613             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5614             return value;
5615         })(), "var vs;", (function(){
5616             var symbol = l123;
5617             var value = symbol.value;
5618             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5619             return value;
5620         })(), l128.fvalue(pv, (function (values,v595){
5621             checkArgs(arguments, 2);
5622             return l124.fvalue(values, "vs = ", l137.fvalue(pv, v595, l4.value), ";", (function(){
5623                 var symbol = l123;
5624                 var value = symbol.value;
5625                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5626                 return value;
5627             })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){
5628                 var symbol = l123;
5629                 var value = symbol.value;
5630                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5631                 return value;
5632             })(), l135.fvalue(pv, "args = args.concat(vs);", (function(){
5633                 var symbol = l123;
5634                 var value = symbol.value;
5635                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5636                 return value;
5637             })()), "else", (function(){
5638                 var symbol = l123;
5639                 var value = symbol.value;
5640                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5641                 return value;
5642             })(), l135.fvalue(pv, "args.push(vs);", (function(){
5643                 var symbol = l123;
5644                 var value = symbol.value;
5645                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5646                 return value;
5647             })()));
5648         }), v593), "return func.apply(window, args);", (function(){
5649             var symbol = l123;
5650             var value = symbol.value;
5651             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5652             return value;
5653         })()), "})()"), ";", (function(){
5654             var symbol = l123;
5655             var value = symbol.value;
5656             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5657             return value;
5658         })()), "})()");
5659     })();
5660 })), cdr: (function(){
5661     var symbol = l197;
5662     var value = symbol.value;
5663     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5664     return value;
5665 })()}));
5666 var l251 = {name: "MULTIPLE-VALUE-PROG1"};
5667 ((l197).value = ({car: l42.fvalue(pv, l251, (function (values,v597){
5668     checkArgsAtLeast(arguments, 2);
5669     var v596= l3.value;
5670     for (var i = arguments.length-1; i>=2; i--)
5671         v596 = {car: arguments[i], cdr:
5672     v596};
5673     return (function(){
5674         return l124.fvalue(values, "(function(){", (function(){
5675             var symbol = l123;
5676             var value = symbol.value;
5677             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5678             return value;
5679         })(), l135.fvalue(pv, "var args = ", l137.fvalue(pv, v597, (function(){
5680             var symbol = l162;
5681             var value = symbol.value;
5682             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5683             return value;
5684         })()), ";", (function(){
5685             var symbol = l123;
5686             var value = symbol.value;
5687             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5688             return value;
5689         })(), l213.fvalue(pv, v596), "return args;", (function(){
5690             var symbol = l123;
5691             var value = symbol.value;
5692             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5693             return value;
5694         })()), "})()");
5695     })();
5696 })), cdr: (function(){
5697     var symbol = l197;
5698     var value = symbol.value;
5699     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5700     return value;
5701 })()}));
5702 var l252 = {name: "BACKQUOTE-EXPAND-1"};
5703 (function(){
5704     (l252).fvalue = (function(v600){
5705         ((v600)["fname"] = "BACKQUOTE-EXPAND-1");
5706         return v600;
5707     })((function (values,v598){
5708         checkArgs(arguments, 2);
5709         return (function(){
5710             return (((function(){
5711                 var tmp = v598;
5712                 return (typeof tmp == 'object' && 'name' in tmp);
5713             })()?l4.value: l3.value) !== l3.value ? l42.fvalue(values, l157, v598) : (l43.fvalue(pv, v598) !== l3.value ? v598 : ((((function(){
5714                 var tmp = v598;
5715                 return tmp === l3.value? l3.value: tmp.car;
5716             })() === l160)?l4.value: l3.value) !== l3.value ? (function(){
5717                 var tmp = v598;
5718                 return tmp === l3.value? l3.value: tmp.car;
5719             })() : ((((function(){
5720                 var tmp = v598;
5721                 return tmp === l3.value? l3.value: tmp.car;
5722             })() === l158)?l4.value: l3.value) !== l3.value ? l252.fvalue(values, l252.fvalue(pv, l32.fvalue(pv, v598))) : ({car: l62, cdr: l69.fvalue(pv, (function (values,v599){
5723                 checkArgs(arguments, 2);
5724                 return ((l57.fvalue(pv, v599) !== l3.value ? (((function(){
5725                     var tmp = v599;
5726                     return tmp === l3.value? l3.value: tmp.car;
5727                 })() === l160)?l4.value: l3.value) : l3.value) !== l3.value ? l42.fvalue(values, l42, l32.fvalue(pv, v599)) : ((l57.fvalue(pv, v599) !== l3.value ? (((function(){
5728                     var tmp = v599;
5729                     return tmp === l3.value? l3.value: tmp.car;
5730                 })() === l159)?l4.value: l3.value) : l3.value) !== l3.value ? l32.fvalue(values, v599) : l42.fvalue(values, l42, l252.fvalue(pv, v599))));
5731             }), v598)})))));
5732         })();
5733     }));
5734     return l252;
5735 })();
5736 var l253 = {name: "BACKQUOTE-EXPAND"};
5737 (function(){
5738     (l253).fvalue = (function(v602){
5739         ((v602)["fname"] = "BACKQUOTE-EXPAND");
5740         return v602;
5741     })((function (values,v601){
5742         checkArgs(arguments, 2);
5743         return (function(){
5744             return ((l57.fvalue(pv, v601) !== l3.value ? (((function(){
5745                 var tmp = v601;
5746                 return tmp === l3.value? l3.value: tmp.car;
5747             })() === l158)?l4.value: l3.value) : l3.value) !== l3.value ? l252.fvalue(values, l32.fvalue(pv, v601)) : v601);
5748         })();
5749     }));
5750     return l253;
5751 })();
5752 l158;
5753 ((l197).value = ({car: l42.fvalue(pv, l158, (function (values,v603){
5754     checkArgs(arguments, 2);
5755     return (function(){
5756         return l137.fvalue(values, l252.fvalue(pv, v603));
5757     })();
5758 })), cdr: (function(){
5759     var symbol = l197;
5760     var value = symbol.value;
5761     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5762     return value;
5763 })()}));
5764 var l254 = {name: "*BUILTINS*"};
5765 (function(){
5766     (((l254.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l254).value = l3.value));
5767     return l254;
5768 })();
5769 var l255 = {name: "DEFINE-RAW-BUILTIN"};
5770 l255;
5771 var l256 = {name: "DEFINE-BUILTIN"};
5772 l256;
5773 var l257 = {name: "TYPE-CHECK"};
5774 l257;
5775 var l258 = {name: "VARIABLE-ARITY-CALL"};
5776 (function(){
5777     (l258).fvalue = (function(v612){
5778         ((v612)["fname"] = "VARIABLE-ARITY-CALL");
5779         return v612;
5780     })((function (values,v604,v605){
5781         checkArgs(arguments, 3);
5782         return (function(){
5783             (((function(){
5784                 var tmp = v604;
5785                 return (typeof tmp == 'object' && 'car' in tmp);
5786             })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
5787                 throw "ARGS must be a non-empty list";
5788             })());
5789             return (function(v606,v607,v608){
5790                 (function(){
5791                     return (function(v609,v610){
5792                         (function(){
5793                             while(v609 !== l3.value){
5794                                 (v610 = (function(){
5795                                     var tmp = v609;
5796                                     return tmp === l3.value? l3.value: tmp.car;
5797                                 })());
5798                                 (function(){
5799                                     (function(v611){
5800                                         (v607 = ({car: v611, cdr: v607}));
5801                                         return (v608 = l124.fvalue(pv, v608, l124.fvalue(pv, "var ", v611, " = ", l137.fvalue(pv, v610), ";", (function(){
5802                                             var symbol = l123;
5803                                             var value = symbol.value;
5804                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5805                                             return value;
5806                                         })(), "if (typeof ", v611, " !== 'number') throw 'Not a number!';", (function(){
5807                                             var symbol = l123;
5808                                             var value = symbol.value;
5809                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5810                                             return value;
5811                                         })())));
5812                                     })(l124.fvalue(pv, "x", l16.fvalue(pv, (v606 = (function(){
5813                                         var x1 = v606;
5814                                         if (typeof x1 !== 'number') throw 'Not a number!';
5815                                         var x2 = 1;
5816                                         if (typeof x2 !== 'number') throw 'Not a number!';
5817                                         return x1+x2;
5818                                     })()))));
5819                                     return l3.value;
5820                                 })();
5821                                 (v609 = (function(){
5822                                     var tmp = v609;
5823                                     return tmp === l3.value? l3.value: tmp.cdr;
5824                                 })());
5825                             }return l3.value;
5826                         })();
5827                         return l3.value;
5828                     })(v604,l3.value);
5829                 })();
5830                 return l124.fvalue(values, "(function(){", (function(){
5831                     var symbol = l123;
5832                     var value = symbol.value;
5833                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5834                     return value;
5835                 })(), l135.fvalue(pv, v608, (v605)(pv, l64.fvalue(pv, v607))), "})()");
5836             })(0,l3,"");
5837         })();
5838     }));
5839     return l258;
5840 })();
5841 var l259 = {name: "VARIABLE-ARITY"};
5842 l259;
5843 var l260 = {name: "NUM-OP-NUM"};
5844 (function(){
5845     (l260).fvalue = (function(v616){
5846         ((v616)["fname"] = "NUM-OP-NUM");
5847         return v616;
5848     })((function (values,v613,v614,v615){
5849         checkArgs(arguments, 4);
5850         return (function(){
5851             return l124.fvalue(values, "(function(){", (function(){
5852                 var symbol = l123;
5853                 var value = symbol.value;
5854                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5855                 return value;
5856             })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "x", " = ", v613, ";", (function(){
5857                 var symbol = l123;
5858                 var value = symbol.value;
5859                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5860                 return value;
5861             })()), l124.fvalue(pv, "var ", "y", " = ", v615, ";", (function(){
5862                 var symbol = l123;
5863                 var value = symbol.value;
5864                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5865                 return value;
5866             })()), l124.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
5867                 var symbol = l123;
5868                 var value = symbol.value;
5869                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5870                 return value;
5871             })(), l135.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
5872                 var symbol = l123;
5873                 var value = symbol.value;
5874                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5875                 return value;
5876             })())), l124.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
5877                 var symbol = l123;
5878                 var value = symbol.value;
5879                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5880                 return value;
5881             })(), l135.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
5882                 var symbol = l123;
5883                 var value = symbol.value;
5884                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5885                 return value;
5886             })())), l124.fvalue(pv, "return ", l124.fvalue(pv, "x", v614, "y"), ";", (function(){
5887                 var symbol = l123;
5888                 var value = symbol.value;
5889                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5890                 return value;
5891             })())), "})()");
5892         })();
5893     }));
5894     return l260;
5895 })();
5896 ((l254).value = ({car: l42.fvalue(pv, l59, (function (values){
5897     var v617= l3.value;
5898     for (var i = arguments.length-1; i>=1; i--)
5899         v617 = {car: arguments[i], cdr:
5900     v617};
5901     return (function(){
5902         return (l11.fvalue(pv, v617) !== l3.value ? "0" : l258.fvalue(values, v617, (function (values,v618){
5903             checkArgs(arguments, 2);
5904             return l124.fvalue(values, "return ", l126.fvalue(pv, v618, "+"), ";", (function(){
5905                 var symbol = l123;
5906                 var value = symbol.value;
5907                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5908                 return value;
5909             })());
5910         })));
5911     })();
5912 })), cdr: (function(){
5913     var symbol = l254;
5914     var value = symbol.value;
5915     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5916     return value;
5917 })()}));
5918 ((l254).value = ({car: l42.fvalue(pv, l60, (function (values,v620){
5919     checkArgsAtLeast(arguments, 2);
5920     var v619= l3.value;
5921     for (var i = arguments.length-1; i>=2; i--)
5922         v619 = {car: arguments[i], cdr:
5923     v619};
5924     return (function(){
5925         return (function(v621){
5926             return l258.fvalue(values, v621, (function (values,v622){
5927                 checkArgs(arguments, 2);
5928                 return l124.fvalue(values, "return ", (l11.fvalue(pv, v619) !== l3.value ? l124.fvalue(pv, "-", (function(){
5929                     var tmp = v622;
5930                     return tmp === l3.value? l3.value: tmp.car;
5931                 })()) : l126.fvalue(pv, v622, "-")), ";", (function(){
5932                     var symbol = l123;
5933                     var value = symbol.value;
5934                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5935                     return value;
5936                 })());
5937             }));
5938         })(({car: v620, cdr: v619}));
5939     })();
5940 })), cdr: (function(){
5941     var symbol = l254;
5942     var value = symbol.value;
5943     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5944     return value;
5945 })()}));
5946 ((l254).value = ({car: l42.fvalue(pv, l19, (function (values){
5947     var v623= l3.value;
5948     for (var i = arguments.length-1; i>=1; i--)
5949         v623 = {car: arguments[i], cdr:
5950     v623};
5951     return (function(){
5952         return (l11.fvalue(pv, v623) !== l3.value ? "1" : l258.fvalue(values, v623, (function (values,v624){
5953             checkArgs(arguments, 2);
5954             return l124.fvalue(values, "return ", l126.fvalue(pv, v624, "*"), ";", (function(){
5955                 var symbol = l123;
5956                 var value = symbol.value;
5957                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5958                 return value;
5959             })());
5960         })));
5961     })();
5962 })), cdr: (function(){
5963     var symbol = l254;
5964     var value = symbol.value;
5965     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5966     return value;
5967 })()}));
5968 ((l254).value = ({car: l42.fvalue(pv, l20, (function (values,v626){
5969     checkArgsAtLeast(arguments, 2);
5970     var v625= l3.value;
5971     for (var i = arguments.length-1; i>=2; i--)
5972         v625 = {car: arguments[i], cdr:
5973     v625};
5974     return (function(){
5975         return (function(v627){
5976             return l258.fvalue(values, v627, (function (values,v628){
5977                 checkArgs(arguments, 2);
5978                 return l124.fvalue(values, "return ", (l11.fvalue(pv, v625) !== l3.value ? l124.fvalue(pv, "1 /", (function(){
5979                     var tmp = v628;
5980                     return tmp === l3.value? l3.value: tmp.car;
5981                 })()) : l126.fvalue(pv, v628, "/")), ";", (function(){
5982                     var symbol = l123;
5983                     var value = symbol.value;
5984                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5985                     return value;
5986                 })());
5987             }));
5988         })(({car: v626, cdr: v625}));
5989     })();
5990 })), cdr: (function(){
5991     var symbol = l254;
5992     var value = symbol.value;
5993     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5994     return value;
5995 })()}));
5996 var l261 = {name: "MOD"};
5997 ((l254).value = ({car: l42.fvalue(pv, l261, (function (values,v629,v630){
5998     checkArgs(arguments, 3);
5999     return (function(){
6000         return (function(v631,v632){
6001             return l260.fvalue(values, v631, "%", v632);
6002         })(l137.fvalue(pv, v629),l137.fvalue(pv, v630));
6003     })();
6004 })), cdr: (function(){
6005     var symbol = l254;
6006     var value = symbol.value;
6007     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6008     return value;
6009 })()}));
6010 var l262 = {name: "COMPARISON-CONJUNTION"};
6011 (function(){
6012     (l262).fvalue = (function(v635){
6013         ((v635)["fname"] = "COMPARISON-CONJUNTION");
6014         return v635;
6015     })((function (values,v633,v634){
6016         checkArgs(arguments, 3);
6017         return (function(){
6018             return (l11.fvalue(pv, (function(){
6019                 var tmp = v633;
6020                 return tmp === l3.value? l3.value: tmp.cdr;
6021             })()) !== l3.value ? "true" : (l11.fvalue(pv, l34.fvalue(pv, v633)) !== l3.value ? l124.fvalue(values, (function(){
6022                 var tmp = v633;
6023                 return tmp === l3.value? l3.value: tmp.car;
6024             })(), v634, l32.fvalue(pv, v633)) : l124.fvalue(values, (function(){
6025                 var tmp = v633;
6026                 return tmp === l3.value? l3.value: tmp.car;
6027             })(), v634, l32.fvalue(pv, v633), " && ", l262.fvalue(pv, (function(){
6028                 var tmp = v633;
6029                 return tmp === l3.value? l3.value: tmp.cdr;
6030             })(), v634))));
6031         })();
6032     }));
6033     return l262;
6034 })();
6035 var l263 = {name: "DEFINE-BUILTIN-COMPARISON"};
6036 l263;
6037 var l264 = {name: ">"};
6038 ((l254).value = ({car: l42.fvalue(pv, l264, (function (values,v637){
6039     checkArgsAtLeast(arguments, 2);
6040     var v636= l3.value;
6041     for (var i = arguments.length-1; i>=2; i--)
6042         v636 = {car: arguments[i], cdr:
6043     v636};
6044     return (function(){
6045         return (function(v638){
6046             return l258.fvalue(values, v638, (function (values,v639){
6047                 checkArgs(arguments, 2);
6048                 return l124.fvalue(values, "return ", l136.fvalue(pv, l262.fvalue(pv, v639, ">")), ";", (function(){
6049                     var symbol = l123;
6050                     var value = symbol.value;
6051                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6052                     return value;
6053                 })());
6054             }));
6055         })(({car: v637, cdr: v636}));
6056     })();
6057 })), cdr: (function(){
6058     var symbol = l254;
6059     var value = symbol.value;
6060     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6061     return value;
6062 })()}));
6063 var l265 = {name: "<"};
6064 ((l254).value = ({car: l42.fvalue(pv, l265, (function (values,v641){
6065     checkArgsAtLeast(arguments, 2);
6066     var v640= l3.value;
6067     for (var i = arguments.length-1; i>=2; i--)
6068         v640 = {car: arguments[i], cdr:
6069     v640};
6070     return (function(){
6071         return (function(v642){
6072             return l258.fvalue(values, v642, (function (values,v643){
6073                 checkArgs(arguments, 2);
6074                 return l124.fvalue(values, "return ", l136.fvalue(pv, l262.fvalue(pv, v643, "<")), ";", (function(){
6075                     var symbol = l123;
6076                     var value = symbol.value;
6077                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6078                     return value;
6079                 })());
6080             }));
6081         })(({car: v641, cdr: v640}));
6082     })();
6083 })), cdr: (function(){
6084     var symbol = l254;
6085     var value = symbol.value;
6086     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6087     return value;
6088 })()}));
6089 var l266 = {name: ">="};
6090 ((l254).value = ({car: l42.fvalue(pv, l266, (function (values,v645){
6091     checkArgsAtLeast(arguments, 2);
6092     var v644= l3.value;
6093     for (var i = arguments.length-1; i>=2; i--)
6094         v644 = {car: arguments[i], cdr:
6095     v644};
6096     return (function(){
6097         return (function(v646){
6098             return l258.fvalue(values, v646, (function (values,v647){
6099                 checkArgs(arguments, 2);
6100                 return l124.fvalue(values, "return ", l136.fvalue(pv, l262.fvalue(pv, v647, ">=")), ";", (function(){
6101                     var symbol = l123;
6102                     var value = symbol.value;
6103                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6104                     return value;
6105                 })());
6106             }));
6107         })(({car: v645, cdr: v644}));
6108     })();
6109 })), cdr: (function(){
6110     var symbol = l254;
6111     var value = symbol.value;
6112     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6113     return value;
6114 })()}));
6115 var l267 = {name: "<="};
6116 ((l254).value = ({car: l42.fvalue(pv, l267, (function (values,v649){
6117     checkArgsAtLeast(arguments, 2);
6118     var v648= l3.value;
6119     for (var i = arguments.length-1; i>=2; i--)
6120         v648 = {car: arguments[i], cdr:
6121     v648};
6122     return (function(){
6123         return (function(v650){
6124             return l258.fvalue(values, v650, (function (values,v651){
6125                 checkArgs(arguments, 2);
6126                 return l124.fvalue(values, "return ", l136.fvalue(pv, l262.fvalue(pv, v651, "<=")), ";", (function(){
6127                     var symbol = l123;
6128                     var value = symbol.value;
6129                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6130                     return value;
6131                 })());
6132             }));
6133         })(({car: v649, cdr: v648}));
6134     })();
6135 })), cdr: (function(){
6136     var symbol = l254;
6137     var value = symbol.value;
6138     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6139     return value;
6140 })()}));
6141 ((l254).value = ({car: l42.fvalue(pv, l18, (function (values,v653){
6142     checkArgsAtLeast(arguments, 2);
6143     var v652= l3.value;
6144     for (var i = arguments.length-1; i>=2; i--)
6145         v652 = {car: arguments[i], cdr:
6146     v652};
6147     return (function(){
6148         return (function(v654){
6149             return l258.fvalue(values, v654, (function (values,v655){
6150                 checkArgs(arguments, 2);
6151                 return l124.fvalue(values, "return ", l136.fvalue(pv, l262.fvalue(pv, v655, "==")), ";", (function(){
6152                     var symbol = l123;
6153                     var value = symbol.value;
6154                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6155                     return value;
6156                 })());
6157             }));
6158         })(({car: v653, cdr: v652}));
6159     })();
6160 })), cdr: (function(){
6161     var symbol = l254;
6162     var value = symbol.value;
6163     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6164     return value;
6165 })()}));
6166 var l268 = {name: "NUMBERP"};
6167 ((l254).value = ({car: l42.fvalue(pv, l268, (function (values,v656){
6168     checkArgs(arguments, 2);
6169     return (function(){
6170         return (function(v657){
6171             return l136.fvalue(values, l124.fvalue(pv, "(typeof (", v657, ") == \"number\")"));
6172         })(l137.fvalue(pv, v656));
6173     })();
6174 })), cdr: (function(){
6175     var symbol = l254;
6176     var value = symbol.value;
6177     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6178     return value;
6179 })()}));
6180 var l269 = {name: "FLOOR"};
6181 ((l254).value = ({car: l42.fvalue(pv, l269, (function (values,v658){
6182     checkArgs(arguments, 2);
6183     return (function(){
6184         return (function(v659){
6185             return l124.fvalue(values, "(function(){", (function(){
6186                 var symbol = l123;
6187                 var value = symbol.value;
6188                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6189                 return value;
6190             })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "x", " = ", v659, ";", (function(){
6191                 var symbol = l123;
6192                 var value = symbol.value;
6193                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6194                 return value;
6195             })()), l124.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6196                 var symbol = l123;
6197                 var value = symbol.value;
6198                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6199                 return value;
6200             })(), l135.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6201                 var symbol = l123;
6202                 var value = symbol.value;
6203                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6204                 return value;
6205             })())), l124.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){
6206                 var symbol = l123;
6207                 var value = symbol.value;
6208                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6209                 return value;
6210             })())), "})()");
6211         })(l137.fvalue(pv, v658));
6212     })();
6213 })), cdr: (function(){
6214     var symbol = l254;
6215     var value = symbol.value;
6216     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6217     return value;
6218 })()}));
6219 ((l254).value = ({car: l42.fvalue(pv, l27, (function (values,v660,v661){
6220     checkArgs(arguments, 3);
6221     return (function(){
6222         return (function(v662,v663){
6223             return l124.fvalue(values, "({car: ", v662, ", cdr: ", v663, "})");
6224         })(l137.fvalue(pv, v660),l137.fvalue(pv, v661));
6225     })();
6226 })), cdr: (function(){
6227     var symbol = l254;
6228     var value = symbol.value;
6229     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6230     return value;
6231 })()}));
6232 ((l254).value = ({car: l42.fvalue(pv, l28, (function (values,v664){
6233     checkArgs(arguments, 2);
6234     return (function(){
6235         return (function(v665){
6236             return l136.fvalue(values, l124.fvalue(pv, "(function(){", (function(){
6237                 var symbol = l123;
6238                 var value = symbol.value;
6239                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6240                 return value;
6241             })(), l135.fvalue(pv, "var tmp = ", v665, ";", (function(){
6242                 var symbol = l123;
6243                 var value = symbol.value;
6244                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6245                 return value;
6246             })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
6247                 var symbol = l123;
6248                 var value = symbol.value;
6249                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6250                 return value;
6251             })()), "})()"));
6252         })(l137.fvalue(pv, v664));
6253     })();
6254 })), cdr: (function(){
6255     var symbol = l254;
6256     var value = symbol.value;
6257     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6258     return value;
6259 })()}));
6260 ((l254).value = ({car: l42.fvalue(pv, l29, (function (values,v666){
6261     checkArgs(arguments, 2);
6262     return (function(){
6263         return (function(v667){
6264             return l124.fvalue(values, "(function(){", (function(){
6265                 var symbol = l123;
6266                 var value = symbol.value;
6267                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6268                 return value;
6269             })(), l135.fvalue(pv, "var tmp = ", v667, ";", (function(){
6270                 var symbol = l123;
6271                 var value = symbol.value;
6272                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6273                 return value;
6274             })(), "return tmp === ", l137.fvalue(pv, l3.value), "? ", l137.fvalue(pv, l3.value), ": tmp.car;", (function(){
6275                 var symbol = l123;
6276                 var value = symbol.value;
6277                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6278                 return value;
6279             })()), "})()");
6280         })(l137.fvalue(pv, v666));
6281     })();
6282 })), cdr: (function(){
6283     var symbol = l254;
6284     var value = symbol.value;
6285     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6286     return value;
6287 })()}));
6288 ((l254).value = ({car: l42.fvalue(pv, l30, (function (values,v668){
6289     checkArgs(arguments, 2);
6290     return (function(){
6291         return (function(v669){
6292             return l124.fvalue(values, "(function(){", (function(){
6293                 var symbol = l123;
6294                 var value = symbol.value;
6295                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6296                 return value;
6297             })(), l135.fvalue(pv, "var tmp = ", v669, ";", (function(){
6298                 var symbol = l123;
6299                 var value = symbol.value;
6300                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6301                 return value;
6302             })(), "return tmp === ", l137.fvalue(pv, l3.value), "? ", l137.fvalue(pv, l3.value), ": tmp.cdr;", (function(){
6303                 var symbol = l123;
6304                 var value = symbol.value;
6305                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6306                 return value;
6307             })()), "})()");
6308         })(l137.fvalue(pv, v668));
6309     })();
6310 })), cdr: (function(){
6311     var symbol = l254;
6312     var value = symbol.value;
6313     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6314     return value;
6315 })()}));
6316 var l270 = {name: "SETCAR"};
6317 ((l254).value = ({car: l42.fvalue(pv, l270, (function (values,v670,v671){
6318     checkArgs(arguments, 3);
6319     return (function(){
6320         return (function(v672,v673){
6321             return l124.fvalue(values, "(function(){", (function(){
6322                 var symbol = l123;
6323                 var value = symbol.value;
6324                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6325                 return value;
6326             })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "x", " = ", v672, ";", (function(){
6327                 var symbol = l123;
6328                 var value = symbol.value;
6329                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6330                 return value;
6331             })()), l124.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
6332                 var symbol = l123;
6333                 var value = symbol.value;
6334                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6335                 return value;
6336             })(), l135.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
6337                 var symbol = l123;
6338                 var value = symbol.value;
6339                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6340                 return value;
6341             })())), l124.fvalue(pv, "return ", l124.fvalue(pv, "(x.car = ", v673, ")"), ";", (function(){
6342                 var symbol = l123;
6343                 var value = symbol.value;
6344                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6345                 return value;
6346             })())), "})()");
6347         })(l137.fvalue(pv, v670),l137.fvalue(pv, v671));
6348     })();
6349 })), cdr: (function(){
6350     var symbol = l254;
6351     var value = symbol.value;
6352     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6353     return value;
6354 })()}));
6355 var l271 = {name: "SETCDR"};
6356 ((l254).value = ({car: l42.fvalue(pv, l271, (function (values,v674,v675){
6357     checkArgs(arguments, 3);
6358     return (function(){
6359         return (function(v676,v677){
6360             return l124.fvalue(values, "(function(){", (function(){
6361                 var symbol = l123;
6362                 var value = symbol.value;
6363                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6364                 return value;
6365             })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "x", " = ", v676, ";", (function(){
6366                 var symbol = l123;
6367                 var value = symbol.value;
6368                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6369                 return value;
6370             })()), l124.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
6371                 var symbol = l123;
6372                 var value = symbol.value;
6373                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6374                 return value;
6375             })(), l135.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
6376                 var symbol = l123;
6377                 var value = symbol.value;
6378                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6379                 return value;
6380             })())), l124.fvalue(pv, "return ", l124.fvalue(pv, "(x.cdr = ", v677, ")"), ";", (function(){
6381                 var symbol = l123;
6382                 var value = symbol.value;
6383                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6384                 return value;
6385             })())), "})()");
6386         })(l137.fvalue(pv, v674),l137.fvalue(pv, v675));
6387     })();
6388 })), cdr: (function(){
6389     var symbol = l254;
6390     var value = symbol.value;
6391     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6392     return value;
6393 })()}));
6394 var l272 = {name: "SYMBOLP"};
6395 ((l254).value = ({car: l42.fvalue(pv, l272, (function (values,v678){
6396     checkArgs(arguments, 2);
6397     return (function(){
6398         return (function(v679){
6399             return l136.fvalue(values, l124.fvalue(pv, "(function(){", (function(){
6400                 var symbol = l123;
6401                 var value = symbol.value;
6402                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6403                 return value;
6404             })(), l135.fvalue(pv, "var tmp = ", v679, ";", (function(){
6405                 var symbol = l123;
6406                 var value = symbol.value;
6407                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6408                 return value;
6409             })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
6410                 var symbol = l123;
6411                 var value = symbol.value;
6412                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6413                 return value;
6414             })()), "})()"));
6415         })(l137.fvalue(pv, v678));
6416     })();
6417 })), cdr: (function(){
6418     var symbol = l254;
6419     var value = symbol.value;
6420     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6421     return value;
6422 })()}));
6423 var l273 = {name: "MAKE-SYMBOL"};
6424 ((l254).value = ({car: l42.fvalue(pv, l273, (function (values,v680){
6425     checkArgs(arguments, 2);
6426     return (function(){
6427         return (function(v681){
6428             return l124.fvalue(values, "(function(){", (function(){
6429                 var symbol = l123;
6430                 var value = symbol.value;
6431                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6432                 return value;
6433             })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "name", " = ", v681, ";", (function(){
6434                 var symbol = l123;
6435                 var value = symbol.value;
6436                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6437                 return value;
6438             })()), l124.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){
6439                 var symbol = l123;
6440                 var value = symbol.value;
6441                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6442                 return value;
6443             })(), l135.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
6444                 var symbol = l123;
6445                 var value = symbol.value;
6446                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6447                 return value;
6448             })())), l124.fvalue(pv, "return ", "({name: name})", ";", (function(){
6449                 var symbol = l123;
6450                 var value = symbol.value;
6451                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6452                 return value;
6453             })())), "})()");
6454         })(l137.fvalue(pv, v680));
6455     })();
6456 })), cdr: (function(){
6457     var symbol = l254;
6458     var value = symbol.value;
6459     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6460     return value;
6461 })()}));
6462 var l274 = {name: "SYMBOL-NAME"};
6463 ((l254).value = ({car: l42.fvalue(pv, l274, (function (values,v682){
6464     checkArgs(arguments, 2);
6465     return (function(){
6466         return (function(v683){
6467             return l124.fvalue(values, "(", v683, ").name");
6468         })(l137.fvalue(pv, v682));
6469     })();
6470 })), cdr: (function(){
6471     var symbol = l254;
6472     var value = symbol.value;
6473     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6474     return value;
6475 })()}));
6476 ((l254).value = ({car: l42.fvalue(pv, l215, (function (values,v684,v685){
6477     checkArgs(arguments, 3);
6478     return (function(){
6479         return (function(v686,v687){
6480             return l124.fvalue(values, "(", v686, ").value = ", v687);
6481         })(l137.fvalue(pv, v684),l137.fvalue(pv, v685));
6482     })();
6483 })), cdr: (function(){
6484     var symbol = l254;
6485     var value = symbol.value;
6486     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6487     return value;
6488 })()}));
6489 var l275 = {name: "FSET"};
6490 ((l254).value = ({car: l42.fvalue(pv, l275, (function (values,v688,v689){
6491     checkArgs(arguments, 3);
6492     return (function(){
6493         return (function(v690,v691){
6494             return l124.fvalue(values, "(", v690, ").fvalue = ", v691);
6495         })(l137.fvalue(pv, v688),l137.fvalue(pv, v689));
6496     })();
6497 })), cdr: (function(){
6498     var symbol = l254;
6499     var value = symbol.value;
6500     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6501     return value;
6502 })()}));
6503 ((l254).value = ({car: l42.fvalue(pv, l17, (function (values,v692){
6504     checkArgs(arguments, 2);
6505     return (function(){
6506         return (function(v693){
6507             return l136.fvalue(values, l124.fvalue(pv, "(", v693, ".value !== undefined)"));
6508         })(l137.fvalue(pv, v692));
6509     })();
6510 })), cdr: (function(){
6511     var symbol = l254;
6512     var value = symbol.value;
6513     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6514     return value;
6515 })()}));
6516 var l276 = {name: "SYMBOL-VALUE"};
6517 ((l254).value = ({car: l42.fvalue(pv, l276, (function (values,v694){
6518     checkArgs(arguments, 2);
6519     return (function(){
6520         return (function(v695){
6521             return l124.fvalue(values, "(function(){", (function(){
6522                 var symbol = l123;
6523                 var value = symbol.value;
6524                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6525                 return value;
6526             })(), l135.fvalue(pv, "var symbol = ", v695, ";", (function(){
6527                 var symbol = l123;
6528                 var value = symbol.value;
6529                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6530                 return value;
6531             })(), "var value = symbol.value;", (function(){
6532                 var symbol = l123;
6533                 var value = symbol.value;
6534                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6535                 return value;
6536             })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
6537                 var symbol = l123;
6538                 var value = symbol.value;
6539                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6540                 return value;
6541             })(), "return value;", (function(){
6542                 var symbol = l123;
6543                 var value = symbol.value;
6544                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6545                 return value;
6546             })()), "})()");
6547         })(l137.fvalue(pv, v694));
6548     })();
6549 })), cdr: (function(){
6550     var symbol = l254;
6551     var value = symbol.value;
6552     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6553     return value;
6554 })()}));
6555 ((l254).value = ({car: l42.fvalue(pv, l224, (function (values,v696){
6556     checkArgs(arguments, 2);
6557     return (function(){
6558         return (function(v697){
6559             return l124.fvalue(values, "(function(){", (function(){
6560                 var symbol = l123;
6561                 var value = symbol.value;
6562                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6563                 return value;
6564             })(), l135.fvalue(pv, "var symbol = ", v697, ";", (function(){
6565                 var symbol = l123;
6566                 var value = symbol.value;
6567                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6568                 return value;
6569             })(), "var func = symbol.fvalue;", (function(){
6570                 var symbol = l123;
6571                 var value = symbol.value;
6572                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6573                 return value;
6574             })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
6575                 var symbol = l123;
6576                 var value = symbol.value;
6577                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6578                 return value;
6579             })(), "return func;", (function(){
6580                 var symbol = l123;
6581                 var value = symbol.value;
6582                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6583                 return value;
6584             })()), "})()");
6585         })(l137.fvalue(pv, v696));
6586     })();
6587 })), cdr: (function(){
6588     var symbol = l254;
6589     var value = symbol.value;
6590     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6591     return value;
6592 })()}));
6593 var l277 = {name: "SYMBOL-PLIST"};
6594 ((l254).value = ({car: l42.fvalue(pv, l277, (function (values,v698){
6595     checkArgs(arguments, 2);
6596     return (function(){
6597         return (function(v699){
6598             return l124.fvalue(values, "((", v699, ").plist || ", l137.fvalue(pv, l3.value), ")");
6599         })(l137.fvalue(pv, v698));
6600     })();
6601 })), cdr: (function(){
6602     var symbol = l254;
6603     var value = symbol.value;
6604     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6605     return value;
6606 })()}));
6607 var l278 = {name: "LAMBDA-CODE"};
6608 ((l254).value = ({car: l42.fvalue(pv, l278, (function (values,v700){
6609     checkArgs(arguments, 2);
6610     return (function(){
6611         return (function(v701){
6612             return l124.fvalue(values, "(", v701, ").toString()");
6613         })(l137.fvalue(pv, v700));
6614     })();
6615 })), cdr: (function(){
6616     var symbol = l254;
6617     var value = symbol.value;
6618     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6619     return value;
6620 })()}));
6621 var l279 = {name: "EQ"};
6622 ((l254).value = ({car: l42.fvalue(pv, l279, (function (values,v702,v703){
6623     checkArgs(arguments, 3);
6624     return (function(){
6625         return (function(v704,v705){
6626             return l136.fvalue(values, l124.fvalue(pv, "(", v704, " === ", v705, ")"));
6627         })(l137.fvalue(pv, v702),l137.fvalue(pv, v703));
6628     })();
6629 })), cdr: (function(){
6630     var symbol = l254;
6631     var value = symbol.value;
6632     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6633     return value;
6634 })()}));
6635 var l280 = {name: "EQUAL"};
6636 ((l254).value = ({car: l42.fvalue(pv, l280, (function (values,v706,v707){
6637     checkArgs(arguments, 3);
6638     return (function(){
6639         return (function(v708,v709){
6640             return l136.fvalue(values, l124.fvalue(pv, "(", v708, " == ", v709, ")"));
6641         })(l137.fvalue(pv, v706),l137.fvalue(pv, v707));
6642     })();
6643 })), cdr: (function(){
6644     var symbol = l254;
6645     var value = symbol.value;
6646     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6647     return value;
6648 })()}));
6649 var l281 = {name: "CHAR-TO-STRING"};
6650 ((l254).value = ({car: l42.fvalue(pv, l281, (function (values,v710){
6651     checkArgs(arguments, 2);
6652     return (function(){
6653         return (function(v711){
6654             return l124.fvalue(values, "(function(){", (function(){
6655                 var symbol = l123;
6656                 var value = symbol.value;
6657                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6658                 return value;
6659             })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "x", " = ", v711, ";", (function(){
6660                 var symbol = l123;
6661                 var value = symbol.value;
6662                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6663                 return value;
6664             })()), l124.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6665                 var symbol = l123;
6666                 var value = symbol.value;
6667                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6668                 return value;
6669             })(), l135.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6670                 var symbol = l123;
6671                 var value = symbol.value;
6672                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6673                 return value;
6674             })())), l124.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){
6675                 var symbol = l123;
6676                 var value = symbol.value;
6677                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6678                 return value;
6679             })())), "})()");
6680         })(l137.fvalue(pv, v710));
6681     })();
6682 })), cdr: (function(){
6683     var symbol = l254;
6684     var value = symbol.value;
6685     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6686     return value;
6687 })()}));
6688 var l282 = {name: "STRINGP"};
6689 ((l254).value = ({car: l42.fvalue(pv, l282, (function (values,v712){
6690     checkArgs(arguments, 2);
6691     return (function(){
6692         return (function(v713){
6693             return l136.fvalue(values, l124.fvalue(pv, "(typeof(", v713, ") == \"string\")"));
6694         })(l137.fvalue(pv, v712));
6695     })();
6696 })), cdr: (function(){
6697     var symbol = l254;
6698     var value = symbol.value;
6699     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6700     return value;
6701 })()}));
6702 var l283 = {name: "STRING-UPCASE"};
6703 ((l254).value = ({car: l42.fvalue(pv, l283, (function (values,v714){
6704     checkArgs(arguments, 2);
6705     return (function(){
6706         return (function(v715){
6707             return l124.fvalue(values, "(function(){", (function(){
6708                 var symbol = l123;
6709                 var value = symbol.value;
6710                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6711                 return value;
6712             })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "x", " = ", v715, ";", (function(){
6713                 var symbol = l123;
6714                 var value = symbol.value;
6715                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6716                 return value;
6717             })()), l124.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
6718                 var symbol = l123;
6719                 var value = symbol.value;
6720                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6721                 return value;
6722             })(), l135.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
6723                 var symbol = l123;
6724                 var value = symbol.value;
6725                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6726                 return value;
6727             })())), l124.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){
6728                 var symbol = l123;
6729                 var value = symbol.value;
6730                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6731                 return value;
6732             })())), "})()");
6733         })(l137.fvalue(pv, v714));
6734     })();
6735 })), cdr: (function(){
6736     var symbol = l254;
6737     var value = symbol.value;
6738     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6739     return value;
6740 })()}));
6741 var l284 = {name: "STRING-LENGTH"};
6742 ((l254).value = ({car: l42.fvalue(pv, l284, (function (values,v716){
6743     checkArgs(arguments, 2);
6744     return (function(){
6745         return (function(v717){
6746             return l124.fvalue(values, "(function(){", (function(){
6747                 var symbol = l123;
6748                 var value = symbol.value;
6749                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6750                 return value;
6751             })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "x", " = ", v717, ";", (function(){
6752                 var symbol = l123;
6753                 var value = symbol.value;
6754                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6755                 return value;
6756             })()), l124.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
6757                 var symbol = l123;
6758                 var value = symbol.value;
6759                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6760                 return value;
6761             })(), l135.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
6762                 var symbol = l123;
6763                 var value = symbol.value;
6764                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6765                 return value;
6766             })())), l124.fvalue(pv, "return ", "x.length", ";", (function(){
6767                 var symbol = l123;
6768                 var value = symbol.value;
6769                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6770                 return value;
6771             })())), "})()");
6772         })(l137.fvalue(pv, v716));
6773     })();
6774 })), cdr: (function(){
6775     var symbol = l254;
6776     var value = symbol.value;
6777     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6778     return value;
6779 })()}));
6780 var l285 = {name: "SLICE"};
6781 ((l254).value = ({car: l42.fvalue(pv, l285, (function (values,v718,v719,v720){
6782     checkArgsAtLeast(arguments, 3);
6783     checkArgsAtMost(arguments, 4);
6784     switch(arguments.length-1){
6785     case 2:
6786     v720=l3.value;
6787     default: break;
6788     }
6789     return (function(){
6790         return l124.fvalue(values, "(function(){", (function(){
6791             var symbol = l123;
6792             var value = symbol.value;
6793             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6794             return value;
6795         })(), l135.fvalue(pv, "var str = ", l137.fvalue(pv, v718), ";", (function(){
6796             var symbol = l123;
6797             var value = symbol.value;
6798             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6799             return value;
6800         })(), "var a = ", l137.fvalue(pv, v719), ";", (function(){
6801             var symbol = l123;
6802             var value = symbol.value;
6803             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6804             return value;
6805         })(), "var b;", (function(){
6806             var symbol = l123;
6807             var value = symbol.value;
6808             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6809             return value;
6810         })(), (v720 !== l3.value ? l124.fvalue(pv, "b = ", l137.fvalue(pv, v720), ";", (function(){
6811             var symbol = l123;
6812             var value = symbol.value;
6813             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6814             return value;
6815         })()) : ""), "return str.slice(a,b);", (function(){
6816             var symbol = l123;
6817             var value = symbol.value;
6818             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6819             return value;
6820         })()), "})()");
6821     })();
6822 })), cdr: (function(){
6823     var symbol = l254;
6824     var value = symbol.value;
6825     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6826     return value;
6827 })()}));
6828 var l286 = {name: "CHAR"};
6829 ((l254).value = ({car: l42.fvalue(pv, l286, (function (values,v721,v722){
6830     checkArgs(arguments, 3);
6831     return (function(){
6832         return (function(v723,v724){
6833             return l124.fvalue(values, "(function(){", (function(){
6834                 var symbol = l123;
6835                 var value = symbol.value;
6836                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6837                 return value;
6838             })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "string", " = ", v723, ";", (function(){
6839                 var symbol = l123;
6840                 var value = symbol.value;
6841                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6842                 return value;
6843             })()), l124.fvalue(pv, "var ", "index", " = ", v724, ";", (function(){
6844                 var symbol = l123;
6845                 var value = symbol.value;
6846                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6847                 return value;
6848             })()), l124.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
6849                 var symbol = l123;
6850                 var value = symbol.value;
6851                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6852                 return value;
6853             })(), l135.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
6854                 var symbol = l123;
6855                 var value = symbol.value;
6856                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6857                 return value;
6858             })())), l124.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){
6859                 var symbol = l123;
6860                 var value = symbol.value;
6861                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6862                 return value;
6863             })(), l135.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
6864                 var symbol = l123;
6865                 var value = symbol.value;
6866                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6867                 return value;
6868             })())), l124.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){
6869                 var symbol = l123;
6870                 var value = symbol.value;
6871                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6872                 return value;
6873             })())), "})()");
6874         })(l137.fvalue(pv, v721),l137.fvalue(pv, v722));
6875     })();
6876 })), cdr: (function(){
6877     var symbol = l254;
6878     var value = symbol.value;
6879     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6880     return value;
6881 })()}));
6882 ((l254).value = ({car: l42.fvalue(pv, l68, (function (values,v725,v726){
6883     checkArgs(arguments, 3);
6884     return (function(){
6885         return (function(v727,v728){
6886             return l124.fvalue(values, "(function(){", (function(){
6887                 var symbol = l123;
6888                 var value = symbol.value;
6889                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6890                 return value;
6891             })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "string1", " = ", v727, ";", (function(){
6892                 var symbol = l123;
6893                 var value = symbol.value;
6894                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6895                 return value;
6896             })()), l124.fvalue(pv, "var ", "string2", " = ", v728, ";", (function(){
6897                 var symbol = l123;
6898                 var value = symbol.value;
6899                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6900                 return value;
6901             })()), l124.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){
6902                 var symbol = l123;
6903                 var value = symbol.value;
6904                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6905                 return value;
6906             })(), l135.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
6907                 var symbol = l123;
6908                 var value = symbol.value;
6909                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6910                 return value;
6911             })())), l124.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){
6912                 var symbol = l123;
6913                 var value = symbol.value;
6914                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6915                 return value;
6916             })(), l135.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
6917                 var symbol = l123;
6918                 var value = symbol.value;
6919                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6920                 return value;
6921             })())), l124.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){
6922                 var symbol = l123;
6923                 var value = symbol.value;
6924                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6925                 return value;
6926             })())), "})()");
6927         })(l137.fvalue(pv, v725),l137.fvalue(pv, v726));
6928     })();
6929 })), cdr: (function(){
6930     var symbol = l254;
6931     var value = symbol.value;
6932     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6933     return value;
6934 })()}));
6935 var l287 = {name: "FUNCALL"};
6936 ((l254).value = ({car: l42.fvalue(pv, l287, (function (values,v730){
6937     checkArgsAtLeast(arguments, 2);
6938     var v729= l3.value;
6939     for (var i = arguments.length-1; i>=2; i--)
6940         v729 = {car: arguments[i], cdr:
6941     v729};
6942     return (function(){
6943         return l124.fvalue(values, "(", l137.fvalue(pv, v730), ")(", l126.fvalue(pv, ({car: ((function(){
6944             var symbol = l162;
6945             var value = symbol.value;
6946             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6947             return value;
6948         })() !== l3.value ? "values" : "pv"), cdr: l69.fvalue(pv, (function(){
6949             var symbol = l137;
6950             var func = symbol.fvalue;
6951             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6952             return func;
6953         })(), v729)}), ", "), ")");
6954     })();
6955 })), cdr: (function(){
6956     var symbol = l254;
6957     var value = symbol.value;
6958     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6959     return value;
6960 })()}));
6961 var l288 = {name: "APPLY"};
6962 ((l254).value = ({car: l42.fvalue(pv, l288, (function (values,v732){
6963     checkArgsAtLeast(arguments, 2);
6964     var v731= l3.value;
6965     for (var i = arguments.length-1; i>=2; i--)
6966         v731 = {car: arguments[i], cdr:
6967     v731};
6968     return (function(){
6969         return (l11.fvalue(pv, v731) !== l3.value ? l124.fvalue(values, "(", l137.fvalue(pv, v732), ")()") : (function(v733,v734){
6970             return l124.fvalue(values, "(function(){", (function(){
6971                 var symbol = l123;
6972                 var value = symbol.value;
6973                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6974                 return value;
6975             })(), l135.fvalue(pv, "var f = ", l137.fvalue(pv, v732), ";", (function(){
6976                 var symbol = l123;
6977                 var value = symbol.value;
6978                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6979                 return value;
6980             })(), "var args = [", l126.fvalue(pv, ({car: ((function(){
6981                 var symbol = l162;
6982                 var value = symbol.value;
6983                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6984                 return value;
6985             })() !== l3.value ? "values" : "pv"), cdr: l69.fvalue(pv, (function(){
6986                 var symbol = l137;
6987                 var func = symbol.fvalue;
6988                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6989                 return func;
6990             })(), v733)}), ", "), "];", (function(){
6991                 var symbol = l123;
6992                 var value = symbol.value;
6993                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6994                 return value;
6995             })(), "var tail = (", l137.fvalue(pv, v734), ");", (function(){
6996                 var symbol = l123;
6997                 var value = symbol.value;
6998                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6999                 return value;
7000             })(), "while (tail != ", l137.fvalue(pv, l3.value), "){", (function(){
7001                 var symbol = l123;
7002                 var value = symbol.value;
7003                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7004                 return value;
7005             })(), "    args.push(tail.car);", (function(){
7006                 var symbol = l123;
7007                 var value = symbol.value;
7008                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7009                 return value;
7010             })(), "    tail = tail.cdr;", (function(){
7011                 var symbol = l123;
7012                 var value = symbol.value;
7013                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7014                 return value;
7015             })(), "}", (function(){
7016                 var symbol = l123;
7017                 var value = symbol.value;
7018                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7019                 return value;
7020             })(), "return f.apply(this, args);", (function(){
7021                 var symbol = l123;
7022                 var value = symbol.value;
7023                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7024                 return value;
7025             })()), "})()");
7026         })(l81.fvalue(pv, v731),(function(){
7027             var tmp = l80.fvalue(pv, v731);
7028             return tmp === l3.value? l3.value: tmp.car;
7029         })()));
7030     })();
7031 })), cdr: (function(){
7032     var symbol = l254;
7033     var value = symbol.value;
7034     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7035     return value;
7036 })()}));
7037 var l289 = {name: "JS-EVAL"};
7038 ((l254).value = ({car: l42.fvalue(pv, l289, (function (values,v735){
7039     checkArgs(arguments, 2);
7040     return (function(){
7041         return (function(v736){
7042             return l124.fvalue(values, "(function(){", (function(){
7043                 var symbol = l123;
7044                 var value = symbol.value;
7045                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7046                 return value;
7047             })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "string", " = ", v736, ";", (function(){
7048                 var symbol = l123;
7049                 var value = symbol.value;
7050                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7051                 return value;
7052             })()), l124.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7053                 var symbol = l123;
7054                 var value = symbol.value;
7055                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7056                 return value;
7057             })(), l135.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7058                 var symbol = l123;
7059                 var value = symbol.value;
7060                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7061                 return value;
7062             })())), l124.fvalue(pv, "return ", ((function(){
7063                 var symbol = l162;
7064                 var value = symbol.value;
7065                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7066                 return value;
7067             })() !== l3.value ? l124.fvalue(pv, "(function(){", (function(){
7068                 var symbol = l123;
7069                 var value = symbol.value;
7070                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7071                 return value;
7072             })(), l135.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){
7073                 var symbol = l123;
7074                 var value = symbol.value;
7075                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7076                 return value;
7077             })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){
7078                 var symbol = l123;
7079                 var value = symbol.value;
7080                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7081                 return value;
7082             })(), l135.fvalue(pv, "v = [v];", (function(){
7083                 var symbol = l123;
7084                 var value = symbol.value;
7085                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7086                 return value;
7087             })(), "v['multiple-value'] = true;", (function(){
7088                 var symbol = l123;
7089                 var value = symbol.value;
7090                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7091                 return value;
7092             })()), "}", (function(){
7093                 var symbol = l123;
7094                 var value = symbol.value;
7095                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7096                 return value;
7097             })(), "return values.apply(this, v);", (function(){
7098                 var symbol = l123;
7099                 var value = symbol.value;
7100                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7101                 return value;
7102             })()), "})()") : "eval.apply(window, [string])"), ";", (function(){
7103                 var symbol = l123;
7104                 var value = symbol.value;
7105                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7106                 return value;
7107             })())), "})()");
7108         })(l137.fvalue(pv, v735));
7109     })();
7110 })), cdr: (function(){
7111     var symbol = l254;
7112     var value = symbol.value;
7113     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7114     return value;
7115 })()}));
7116 var l290 = {name: "ERROR"};
7117 ((l254).value = ({car: l42.fvalue(pv, l290, (function (values,v737){
7118     checkArgs(arguments, 2);
7119     return (function(){
7120         return (function(v738){
7121             return l124.fvalue(values, "(function(){", (function(){
7122                 var symbol = l123;
7123                 var value = symbol.value;
7124                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7125                 return value;
7126             })(), l135.fvalue(pv, "throw ", v738, ";", (function(){
7127                 var symbol = l123;
7128                 var value = symbol.value;
7129                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7130                 return value;
7131             })()), "})()");
7132         })(l137.fvalue(pv, v737));
7133     })();
7134 })), cdr: (function(){
7135     var symbol = l254;
7136     var value = symbol.value;
7137     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7138     return value;
7139 })()}));
7140 var l291 = {name: "NEW"};
7141 ((l254).value = ({car: l42.fvalue(pv, l291, (function (values){
7142     checkArgsAtMost(arguments, 1);
7143     return (function(){
7144         return (function(){
7145             return "{}";
7146         })();
7147     })();
7148 })), cdr: (function(){
7149     var symbol = l254;
7150     var value = symbol.value;
7151     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7152     return value;
7153 })()}));
7154 var l292 = {name: "OBJECTP"};
7155 ((l254).value = ({car: l42.fvalue(pv, l292, (function (values,v739){
7156     checkArgs(arguments, 2);
7157     return (function(){
7158         return (function(v740){
7159             return l136.fvalue(values, l124.fvalue(pv, "(typeof (", v740, ") === 'object')"));
7160         })(l137.fvalue(pv, v739));
7161     })();
7162 })), cdr: (function(){
7163     var symbol = l254;
7164     var value = symbol.value;
7165     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7166     return value;
7167 })()}));
7168 var l293 = {name: "OGET"};
7169 ((l254).value = ({car: l42.fvalue(pv, l293, (function (values,v741,v742){
7170     checkArgs(arguments, 3);
7171     return (function(){
7172         return (function(v743,v744){
7173             return l124.fvalue(values, "(function(){", (function(){
7174                 var symbol = l123;
7175                 var value = symbol.value;
7176                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7177                 return value;
7178             })(), l135.fvalue(pv, "var tmp = ", "(", v743, ")[", v744, "];", (function(){
7179                 var symbol = l123;
7180                 var value = symbol.value;
7181                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7182                 return value;
7183             })(), "return tmp == undefined? ", l137.fvalue(pv, l3.value), ": tmp ;", (function(){
7184                 var symbol = l123;
7185                 var value = symbol.value;
7186                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7187                 return value;
7188             })()), "})()");
7189         })(l137.fvalue(pv, v741),l137.fvalue(pv, v742));
7190     })();
7191 })), cdr: (function(){
7192     var symbol = l254;
7193     var value = symbol.value;
7194     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7195     return value;
7196 })()}));
7197 var l294 = {name: "OSET"};
7198 ((l254).value = ({car: l42.fvalue(pv, l294, (function (values,v745,v746,v747){
7199     checkArgs(arguments, 4);
7200     return (function(){
7201         return (function(v748,v749,v750){
7202             return l124.fvalue(values, "((", v748, ")[", v749, "] = ", v750, ")");
7203         })(l137.fvalue(pv, v745),l137.fvalue(pv, v746),l137.fvalue(pv, v747));
7204     })();
7205 })), cdr: (function(){
7206     var symbol = l254;
7207     var value = symbol.value;
7208     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7209     return value;
7210 })()}));
7211 var l295 = {name: "IN"};
7212 ((l254).value = ({car: l42.fvalue(pv, l295, (function (values,v751,v752){
7213     checkArgs(arguments, 3);
7214     return (function(){
7215         return (function(v753,v754){
7216             return l136.fvalue(values, l124.fvalue(pv, "((", v753, ") in (", v754, "))"));
7217         })(l137.fvalue(pv, v751),l137.fvalue(pv, v752));
7218     })();
7219 })), cdr: (function(){
7220     var symbol = l254;
7221     var value = symbol.value;
7222     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7223     return value;
7224 })()}));
7225 var l296 = {name: "FUNCTIONP"};
7226 ((l254).value = ({car: l42.fvalue(pv, l296, (function (values,v755){
7227     checkArgs(arguments, 2);
7228     return (function(){
7229         return (function(v756){
7230             return l136.fvalue(values, l124.fvalue(pv, "(typeof ", v756, " == 'function')"));
7231         })(l137.fvalue(pv, v755));
7232     })();
7233 })), cdr: (function(){
7234     var symbol = l254;
7235     var value = symbol.value;
7236     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7237     return value;
7238 })()}));
7239 var l297 = {name: "WRITE-STRING"};
7240 ((l254).value = ({car: l42.fvalue(pv, l297, (function (values,v757){
7241     checkArgs(arguments, 2);
7242     return (function(){
7243         return (function(v758){
7244             return l124.fvalue(values, "(function(){", (function(){
7245                 var symbol = l123;
7246                 var value = symbol.value;
7247                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7248                 return value;
7249             })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "x", " = ", v758, ";", (function(){
7250                 var symbol = l123;
7251                 var value = symbol.value;
7252                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7253                 return value;
7254             })()), l124.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7255                 var symbol = l123;
7256                 var value = symbol.value;
7257                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7258                 return value;
7259             })(), l135.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7260                 var symbol = l123;
7261                 var value = symbol.value;
7262                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7263                 return value;
7264             })())), l124.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){
7265                 var symbol = l123;
7266                 var value = symbol.value;
7267                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7268                 return value;
7269             })())), "})()");
7270         })(l137.fvalue(pv, v757));
7271     })();
7272 })), cdr: (function(){
7273     var symbol = l254;
7274     var value = symbol.value;
7275     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7276     return value;
7277 })()}));
7278 var l298 = {name: "MAKE-ARRAY"};
7279 ((l254).value = ({car: l42.fvalue(pv, l298, (function (values,v759){
7280     checkArgs(arguments, 2);
7281     return (function(){
7282         return (function(v760){
7283             return l124.fvalue(values, "(function(){", (function(){
7284                 var symbol = l123;
7285                 var value = symbol.value;
7286                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7287                 return value;
7288             })(), l135.fvalue(pv, "var r = [];", (function(){
7289                 var symbol = l123;
7290                 var value = symbol.value;
7291                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7292                 return value;
7293             })(), "for (var i = 0; i < ", v760, "; i++)", (function(){
7294                 var symbol = l123;
7295                 var value = symbol.value;
7296                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7297                 return value;
7298             })(), l135.fvalue(pv, "r.push(", l137.fvalue(pv, l3.value), ");", (function(){
7299                 var symbol = l123;
7300                 var value = symbol.value;
7301                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7302                 return value;
7303             })()), "return r;", (function(){
7304                 var symbol = l123;
7305                 var value = symbol.value;
7306                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7307                 return value;
7308             })()), "})()");
7309         })(l137.fvalue(pv, v759));
7310     })();
7311 })), cdr: (function(){
7312     var symbol = l254;
7313     var value = symbol.value;
7314     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7315     return value;
7316 })()}));
7317 var l299 = {name: "ARRAYP"};
7318 ((l254).value = ({car: l42.fvalue(pv, l299, (function (values,v761){
7319     checkArgs(arguments, 2);
7320     return (function(){
7321         return (function(v762){
7322             return l136.fvalue(values, l124.fvalue(pv, "(function(){", (function(){
7323                 var symbol = l123;
7324                 var value = symbol.value;
7325                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7326                 return value;
7327             })(), l135.fvalue(pv, "var x = ", v762, ";", (function(){
7328                 var symbol = l123;
7329                 var value = symbol.value;
7330                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7331                 return value;
7332             })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
7333         })(l137.fvalue(pv, v761));
7334     })();
7335 })), cdr: (function(){
7336     var symbol = l254;
7337     var value = symbol.value;
7338     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7339     return value;
7340 })()}));
7341 var l300 = {name: "AREF"};
7342 ((l254).value = ({car: l42.fvalue(pv, l300, (function (values,v763,v764){
7343     checkArgs(arguments, 3);
7344     return (function(){
7345         return (function(v765,v766){
7346             return l124.fvalue(values, "(function(){", (function(){
7347                 var symbol = l123;
7348                 var value = symbol.value;
7349                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7350                 return value;
7351             })(), l135.fvalue(pv, "var x = ", "(", v765, ")[", v766, "];", (function(){
7352                 var symbol = l123;
7353                 var value = symbol.value;
7354                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7355                 return value;
7356             })(), "if (x === undefined) throw 'Out of range';", (function(){
7357                 var symbol = l123;
7358                 var value = symbol.value;
7359                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7360                 return value;
7361             })(), "return x;", (function(){
7362                 var symbol = l123;
7363                 var value = symbol.value;
7364                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7365                 return value;
7366             })()), "})()");
7367         })(l137.fvalue(pv, v763),l137.fvalue(pv, v764));
7368     })();
7369 })), cdr: (function(){
7370     var symbol = l254;
7371     var value = symbol.value;
7372     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7373     return value;
7374 })()}));
7375 var l301 = {name: "ASET"};
7376 ((l254).value = ({car: l42.fvalue(pv, l301, (function (values,v767,v768,v769){
7377     checkArgs(arguments, 4);
7378     return (function(){
7379         return (function(v770,v771,v772){
7380             return l124.fvalue(values, "(function(){", (function(){
7381                 var symbol = l123;
7382                 var value = symbol.value;
7383                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7384                 return value;
7385             })(), l135.fvalue(pv, "var x = ", v770, ";", (function(){
7386                 var symbol = l123;
7387                 var value = symbol.value;
7388                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7389                 return value;
7390             })(), "var i = ", v771, ";", (function(){
7391                 var symbol = l123;
7392                 var value = symbol.value;
7393                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7394                 return value;
7395             })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
7396                 var symbol = l123;
7397                 var value = symbol.value;
7398                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7399                 return value;
7400             })(), "return x[i] = ", v772, ";", (function(){
7401                 var symbol = l123;
7402                 var value = symbol.value;
7403                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7404                 return value;
7405             })()), "})()");
7406         })(l137.fvalue(pv, v767),l137.fvalue(pv, v768),l137.fvalue(pv, v769));
7407     })();
7408 })), cdr: (function(){
7409     var symbol = l254;
7410     var value = symbol.value;
7411     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7412     return value;
7413 })()}));
7414 var l302 = {name: "GET-UNIX-TIME"};
7415 ((l254).value = ({car: l42.fvalue(pv, l302, (function (values){
7416     checkArgsAtMost(arguments, 1);
7417     return (function(){
7418         return (function(){
7419             return l124.fvalue(values, "(Math.round(new Date() / 1000))");
7420         })();
7421     })();
7422 })), cdr: (function(){
7423     var symbol = l254;
7424     var value = symbol.value;
7425     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7426     return value;
7427 })()}));
7428 var l303 = {name: "VALUES-ARRAY"};
7429 ((l254).value = ({car: l42.fvalue(pv, l303, (function (values,v773){
7430     checkArgs(arguments, 2);
7431     return (function(){
7432         return (function(v774){
7433             return ((function(){
7434                 var symbol = l162;
7435                 var value = symbol.value;
7436                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7437                 return value;
7438             })() !== l3.value ? l124.fvalue(values, "values.apply(this, ", v774, ")") : l124.fvalue(values, "pv.apply(this, ", v774, ")"));
7439         })(l137.fvalue(pv, v773));
7440     })();
7441 })), cdr: (function(){
7442     var symbol = l254;
7443     var value = symbol.value;
7444     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7445     return value;
7446 })()}));
7447 ((l254).value = ({car: l42.fvalue(pv, l132, (function (values){
7448     var v775= l3.value;
7449     for (var i = arguments.length-1; i>=1; i--)
7450         v775 = {car: arguments[i], cdr:
7451     v775};
7452     return (function(){
7453         return ((function(){
7454             var symbol = l162;
7455             var value = symbol.value;
7456             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7457             return value;
7458         })() !== l3.value ? l124.fvalue(values, "values(", l126.fvalue(pv, l69.fvalue(pv, (function(){
7459             var symbol = l137;
7460             var func = symbol.fvalue;
7461             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7462             return func;
7463         })(), v775), ", "), ")") : l124.fvalue(values, "pv(", l126.fvalue(pv, l69.fvalue(pv, (function(){
7464             var symbol = l137;
7465             var func = symbol.fvalue;
7466             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7467             return func;
7468         })(), v775), ", "), ")"));
7469     })();
7470 })), cdr: (function(){
7471     var symbol = l254;
7472     var value = symbol.value;
7473     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7474     return value;
7475 })()}));
7476 (function(){
7477     (l189).fvalue = (function(v778){
7478         ((v778)["fname"] = "MACRO");
7479         return v778;
7480     })((function (values,v776){
7481         checkArgs(arguments, 2);
7482         return (function(){
7483             return (((function(){
7484                 var tmp = v776;
7485                 return (typeof tmp == 'object' && 'name' in tmp);
7486             })()?l4.value: l3.value) !== l3.value ? (function(v777){
7487                 return (((l165.fvalue(pv, v777) === l189)?l4.value: l3.value) !== l3.value ? v777 : l3.value);
7488             })(l177.fvalue(pv, v776, (function(){
7489                 var symbol = l178;
7490                 var value = symbol.value;
7491                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7492                 return value;
7493             })(), l98)) : l3.value);
7494         })();
7495     }));
7496     return l189;
7497 })();
7498 var l304 = {name: "LS-MACROEXPAND-1"};
7499 (function(){
7500     (l304).fvalue = (function(v783){
7501         ((v783)["fname"] = "LS-MACROEXPAND-1");
7502         return v783;
7503     })((function (values,v779){
7504         checkArgs(arguments, 2);
7505         return (function(){
7506             return (function(v780){
7507                 return (v780 !== l3.value ? (function(v781){
7508                     (l57.fvalue(pv, v781) !== l3.value ? (function(v782){
7509                         l168.fvalue(pv, v780, v782);
7510                         return (v781 = v782);
7511                     })(l227.fvalue(pv, v781)) : l3.value);
7512                     return (function(){
7513                         var f = v781;
7514                         var args = [values];
7515                         var tail = ((function(){
7516                             var tmp = v779;
7517                             return tmp === l3.value? l3.value: tmp.cdr;
7518                         })());
7519                         while (tail != l3.value){
7520                             args.push(tail.car);
7521                             tail = tail.cdr;
7522                         }
7523                         return f.apply(this, args);
7524                     })();
7525                 })(l166.fvalue(pv, v780)) : v779);
7526             })(l189.fvalue(pv, (function(){
7527                 var tmp = v779;
7528                 return tmp === l3.value? l3.value: tmp.car;
7529             })()));
7530         })();
7531     }));
7532     return l304;
7533 })();
7534 var l305 = {name: "COMPILE-FUNCALL"};
7535 var l306 = {name: "G870"};
7536 (function(){
7537     (l305).fvalue = (function(v787){
7538         ((v787)["fname"] = "COMPILE-FUNCALL");
7539         return v787;
7540     })((function (values,v784,v785){
7541         checkArgs(arguments, 3);
7542         return (function(){
7543             return (function(v786){
7544                 return ((((function(){
7545                     var tmp = v784;
7546                     return (typeof tmp == 'object' && 'name' in tmp);
7547                 })()?l4.value: l3.value) !== l3.value ? (((l114.fvalue(pv, v784) === l105.fvalue(pv, "COMMON-LISP"))?l4.value: l3.value) !== l3.value ? (function(){
7548                     var symbol = l306;
7549                     var value = symbol.value;
7550                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7551                     return value;
7552                 })() : l3.value) : l3.value) !== l3.value ? l124.fvalue(values, l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, v784))), ".fvalue(", l126.fvalue(pv, ({car: v786, cdr: l69.fvalue(pv, (function(){
7553                     var symbol = l137;
7554                     var func = symbol.fvalue;
7555                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7556                     return func;
7557                 })(), v785)}), ", "), ")") : l124.fvalue(values, l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l98), l42.fvalue(pv, v784))), "(", l126.fvalue(pv, ({car: v786, cdr: l69.fvalue(pv, (function(){
7558                     var symbol = l137;
7559                     var func = symbol.fvalue;
7560                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7561                     return func;
7562                 })(), v785)}), ", "), ")"));
7563             })(((function(){
7564                 var symbol = l162;
7565                 var value = symbol.value;
7566                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7567                 return value;
7568             })() !== l3.value ? "values" : "pv"));
7569         })();
7570     }));
7571     return l305;
7572 })();
7573 (function(){
7574     (l213).fvalue = (function(v790){
7575         ((v790)["fname"] = "LS-COMPILE-BLOCK");
7576         return v790;
7577     })((function (values,v788,v789){
7578         checkArgsAtLeast(arguments, 2);
7579         checkArgsAtMost(arguments, 3);
7580         switch(arguments.length-1){
7581         case 1:
7582         v789=l3.value;
7583         default: break;
7584         }
7585         return (function(){
7586             return (v789 !== l3.value ? l124.fvalue(values, l213.fvalue(pv, l81.fvalue(pv, v788)), "return ", l137.fvalue(pv, (function(){
7587                 var tmp = l80.fvalue(pv, v788);
7588                 return tmp === l3.value? l3.value: tmp.car;
7589             })(), (function(){
7590                 var symbol = l162;
7591                 var value = symbol.value;
7592                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7593                 return value;
7594             })()), ";") : l127.fvalue(values, l84.fvalue(pv, (function(){
7595                 var symbol = l186;
7596                 var func = symbol.fvalue;
7597                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7598                 return func;
7599             })(), l69.fvalue(pv, (function(){
7600                 var symbol = l137;
7601                 var func = symbol.fvalue;
7602                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7603                 return func;
7604             })(), v788)), l124.fvalue(pv, ";", (function(){
7605                 var symbol = l123;
7606                 var value = symbol.value;
7607                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7608                 return value;
7609             })())));
7610         })();
7611     }));
7612     return l213;
7613 })();
7614 (function(){
7615     (l137).fvalue = (function(v800){
7616         ((v800)["fname"] = "LS-COMPILE");
7617         return v800;
7618     })((function (values,v791,v792){
7619         checkArgsAtLeast(arguments, 2);
7620         checkArgsAtMost(arguments, 3);
7621         switch(arguments.length-1){
7622         case 1:
7623         v792=l3.value;
7624         default: break;
7625         }
7626         return (function(){
7627             return (function(v793){
7628                 try {
7629                     var tmp;
7630                     tmp = l162.value;
7631                     l162.value = v793;
7632                     v793 = tmp;
7633                     return (((function(){
7634                         var tmp = v791;
7635                         return (typeof tmp == 'object' && 'name' in tmp);
7636                     })()?l4.value: l3.value) !== l3.value ? (function(v794){
7637                         return ((v794 !== l3.value ? l26.fvalue(pv, l82.fvalue(pv, l193, l167.fvalue(pv, v794))) : l3.value) !== l3.value ? l166.fvalue(values, v794) : ((function(v795){
7638                             return (v795 !== l3.value ? v795 : l82.fvalue(pv, l195, l167.fvalue(pv, v794)));
7639                         })(l113.fvalue(pv, v791)) !== l3.value ? l124.fvalue(values, l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, v791))), ".value") : l137.fvalue(values, l62.fvalue(pv, l42.fvalue(pv, l276), l42.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, v791)))))));
7640                     })(l177.fvalue(pv, v791, (function(){
7641                         var symbol = l178;
7642                         var value = symbol.value;
7643                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7644                         return value;
7645                     })(), l99)) : (l75.fvalue(pv, v791) !== l3.value ? l16.fvalue(values, v791) : (((typeof(v791) == "string")?l4.value: l3.value) !== l3.value ? l124.fvalue(values, "\"", l140.fvalue(pv, v791), "\"") : (((function(){
7646                         var x = v791;
7647                         return typeof x === 'object' && 'length' in x;
7648                     })()?l4.value: l3.value) !== l3.value ? l222.fvalue(values, v791) : (l57.fvalue(pv, v791) !== l3.value ? (function(v796,v797){
7649                         return (l91.fvalue(pv, v796, (function(){
7650                             var symbol = l197;
7651                             var value = symbol.value;
7652                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7653                             return value;
7654                         })()) !== l3.value ? (function(v798){
7655                             return (function(){
7656                                 var f = v798;
7657                                 var args = [values];
7658                                 var tail = (v797);
7659                                 while (tail != l3.value){
7660                                     args.push(tail.car);
7661                                     tail = tail.cdr;
7662                                 }
7663                                 return f.apply(this, args);
7664                             })();
7665                         })(l39.fvalue(pv, l91.fvalue(pv, v796, (function(){
7666                             var symbol = l197;
7667                             var value = symbol.value;
7668                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7669                             return value;
7670                         })()))) : ((l91.fvalue(pv, v796, (function(){
7671                             var symbol = l254;
7672                             var value = symbol.value;
7673                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7674                             return value;
7675                         })()) !== l3.value ? l26.fvalue(pv, l191.fvalue(pv, v796, l98, l194)) : l3.value) !== l3.value ? (function(v799){
7676                             return (function(){
7677                                 var f = v799;
7678                                 var args = [values];
7679                                 var tail = (v797);
7680                                 while (tail != l3.value){
7681                                     args.push(tail.car);
7682                                     tail = tail.cdr;
7683                                 }
7684                                 return f.apply(this, args);
7685                             })();
7686                         })(l39.fvalue(pv, l91.fvalue(pv, v796, (function(){
7687                             var symbol = l254;
7688                             var value = symbol.value;
7689                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7690                             return value;
7691                         })()))) : (l189.fvalue(pv, v796) !== l3.value ? l137.fvalue(values, l304.fvalue(pv, v791), v792) : l305.fvalue(values, v796, v797))));
7692                     })((function(){
7693                         var tmp = v791;
7694                         return tmp === l3.value? l3.value: tmp.car;
7695                     })(),(function(){
7696                         var tmp = v791;
7697                         return tmp === l3.value? l3.value: tmp.cdr;
7698                     })()) : (function(){
7699                         throw "How should I compile this?";
7700                     })())))));
7701                 }
7702                 finally {
7703                     l162.value = v793;
7704                 }
7705             })(v792);
7706         })();
7707     }));
7708     return l137;
7709 })();
7710 var l307 = {name: "LS-COMPILE-TOPLEVEL"};
7711 (function(){
7712     (l307).fvalue = (function(v807){
7713         ((v807)["fname"] = "LS-COMPILE-TOPLEVEL");
7714         return v807;
7715     })((function (values,v801,v802){
7716         checkArgsAtLeast(arguments, 2);
7717         checkArgsAtMost(arguments, 3);
7718         switch(arguments.length-1){
7719         case 1:
7720         v802=l3.value;
7721         default: break;
7722         }
7723         return (function(){
7724             return (function(v803){
7725                 try {
7726                     var tmp;
7727                     tmp = l184.value;
7728                     l184.value = v803;
7729                     v803 = tmp;
7730                     return ((((function(){
7731                         var tmp = v801;
7732                         return (typeof tmp == 'object' && 'car' in tmp);
7733                     })()?l4.value: l3.value) !== l3.value ? (((function(){
7734                         var tmp = v801;
7735                         return tmp === l3.value? l3.value: tmp.car;
7736                     })() === l228)?l4.value: l3.value) : l3.value) !== l3.value ? (function(v805){
7737                         return l126.fvalue(values, l84.fvalue(pv, (function(){
7738                             var symbol = l186;
7739                             var func = symbol.fvalue;
7740                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7741                             return func;
7742                         })(), v805));
7743                     })(l69.fvalue(pv, (function (values,v804){
7744                         checkArgs(arguments, 2);
7745                         return l307.fvalue(values, v804, l4.value);
7746                     }), (function(){
7747                         var tmp = v801;
7748                         return tmp === l3.value? l3.value: tmp.cdr;
7749                     })())) : (function(v806){
7750                         return l124.fvalue(values, l127.fvalue(pv, l187.fvalue(pv), l124.fvalue(pv, ";", (function(){
7751                             var symbol = l123;
7752                             var value = symbol.value;
7753                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7754                             return value;
7755                         })())), (v806 !== l3.value ? l124.fvalue(pv, v806, ";", (function(){
7756                             var symbol = l123;
7757                             var value = symbol.value;
7758                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7759                             return value;
7760                         })()) : ""));
7761                     })(l137.fvalue(pv, v801, v802)));
7762                 }
7763                 finally {
7764                     l184.value = v803;
7765                 }
7766             })(l3.value);
7767         })();
7768     }));
7769     return l307;
7770 })();
7771 (function(){
7772     (l227).fvalue = (function(v809){
7773         ((v809)["fname"] = "EVAL");
7774         return v809;
7775     })((function (values,v808){
7776         checkArgs(arguments, 2);
7777         return (function(){
7778             return (function(){
7779                 var string = l307.fvalue(pv, v808, l4.value);
7780                 if (typeof string != 'string')
7781                     throw 'The value ' + string + ' is not a type string.';
7782                 return (function(){
7783                     var v = eval.apply(window, [string]);
7784                     if (typeof v !== 'object' || !('multiple-value' in v)){
7785                         v = [v];
7786                         v['multiple-value'] = true;
7787                     }
7788                     return values.apply(this, v);
7789                 })();
7790             })();
7791         })();
7792     }));
7793     return l227;
7794 })();
7795 var l308 = {name: "&BODY"};
7796 var l309 = QIList(l202,l201,l308,l19,l14,l115,l59,l60,l20,l21,l22,l265,l267,l18,l18,l264,l266,l52,l62,l288,l300,l299,l301,l91,l43,l174,l17,l17,l81,l31,l37,l35,l32,l29,l29,l50,l241,l33,l36,l34,l30,l30,l286,l73,l74,l72,l49,l27,l28,l71,l45,l2,l8,l10,l1,l7,l86,l95,l97,l47,l48,l51,l279,l25,l280,l290,l227,l90,l121,l94,l105,l119,l38,l41,l275,l287,l98,l296,l15,l122,l248,l70,l199,l116,l44,l75,l75,l120,l113,l212,l80,l67,l232,l236,l101,l42,l57,l298,l102,l273,l69,l82,l77,l261,l133,l250,l134,l251,l3,l26,l79,l78,l11,l268,l53,l106,l108,l104,l76,l139,l142,l196,l54,l55,l228,l65,l46,l157,l83,l84,l85,l12,l240,l63,l64,l39,l215,l216,l89,l283,l92,l93,l282,l87,l224,l274,l114,l277,l276,l272,l4,l247,l40,l242,l24,l6,l249,l132,l131,l99,l141,l5,l96,l297,l23,l3);
7797 l121.fvalue(values, l309);
7798 ((l115).value = (function(){
7799     var symbol = l111;
7800     var value = symbol.value;
7801     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7802     return value;
7803 })());
7804 (function(){
7805     var string = "var lisp";
7806     if (typeof string != 'string')
7807         throw 'The value ' + string + ' is not a type string.';
7808     return (function(){
7809         var v = eval.apply(window, [string]);
7810         if (typeof v !== 'object' || !('multiple-value' in v)){
7811             v = [v];
7812             v['multiple-value'] = true;
7813         }
7814         return values.apply(this, v);
7815     })();
7816 })();
7817 (lisp = {});
7818 (lisp.read = (function(){
7819     var symbol = l161;
7820     var func = symbol.fvalue;
7821     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7822     return func;
7823 })());
7824 (lisp.print = (function(){
7825     var symbol = l139;
7826     var func = symbol.fvalue;
7827     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7828     return func;
7829 })());
7830 (lisp.eval = (function(){
7831     var symbol = l227;
7832     var func = symbol.fvalue;
7833     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7834     return func;
7835 })());
7836 (lisp.compile = (function (values,v810){
7837     checkArgs(arguments, 2);
7838     return l307.fvalue(values, v810, l4.value);
7839 }));
7840 (lisp.evalString = (function (values,v811){
7841     checkArgs(arguments, 2);
7842     return l227.fvalue(values, l161.fvalue(pv, v811));
7843 }));
7844 (lisp.compileString = (function (values,v812){
7845     checkArgs(arguments, 2);
7846     return l307.fvalue(values, l161.fvalue(pv, v812), l4.value);
7847 }));
7848 var l310 = QIList(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(l209,"l209"),QIList(l208,"l208"),QIList(l207,"l207"),QIList(l206,"l206"),QIList(l205,"l205"),QIList(l204,"l204"),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);
7849 var l311 = {name: "OP"};
7850 var l312 = {name: "SYM"};
7851 var l313 = {name: "X"};
7852 var l314 = {name: "ARGS"};
7853 var l315 = {name: "BODY"};
7854 var l316 = {name: "DECLS"};
7855 var l317 = {name: "DECL"};
7856 var l318 = {name: "NAME"};
7857 var l319 = {name: "ARG"};
7858 var l320 = {name: "FORM"};
7859 var l321 = {name: "VALUE-FROM"};
7860 var l322 = {name: "VARIABLES"};
7861 var l323 = {name: "PACKAGE-DESIGNATOR"};
7862 var l324 = {name: "PAIRS"};
7863 var l325 = {name: "ASSIGNMENTS"};
7864 var l326 = {name: "VALUE"};
7865 var l327 = {name: "FORM1"};
7866 var l328 = {name: "RESULT"};
7867 var l329 = {name: "FORMS"};
7868 var l330 = {name: "G"};
7869 var l331 = {name: "CLAUSULES"};
7870 var l332 = {name: "!FORM"};
7871 var l333 = {name: "CLAUSULE"};
7872 var l334 = {name: "ITER"};
7873 var l335 = {name: "G!TO"};
7874 var l336 = {name: "VAR"};
7875 var l337 = {name: "TO"};
7876 var l338 = {name: "G!LIST"};
7877 var l339 = {name: "PLACE"};
7878 var l340 = {name: "DELTA"};
7879 var l341 = {name: "CONDITION"};
7880 var l342 = {name: "DOCSTRING"};
7881 var l343 = QIList(QIList(QIList(l254,l99,l3,QIList(l193,l3),l3),QIList(l244,l99,l3,QIList(l193,l3),l3),QIList(l243,l99,l3,QIList(l193,l3),l3),QIList(l237,l99,l3,QIList(l193,l3),l3),QIList(l225,l99,l3,QIList(l193,l3),l3),QIList(l220,l99,l3,QIList(l193,l3),l3),QIList(l219,l99,l3,QIList(l193,l3),l3),QIList(l200,l99,l3,QIList(l193,l3),l3),QIList(l197,l99,l3,QIList(l193,l3),l3),QIList(l184,l99,l3,QIList(l193,l3),l3),QIList(l179,l99,l3,QIList(l193,l3),l3),QIList(l178,l99,l3,QIList(l193,l3),l3),QIList(l162,l99,l3,QIList(l193,l3),l3),QIList(l156,l99,l3,QIList(l193,l3),l3),QIList(l123,l99,l3,QIList(l193,l3),l3),QIList(l115,l99,l3,QIList(l193,l3),l3),QIList(l112,l99,l3,QIList(l193,l3),l3),QIList(l111,l99,l3,QIList(l193,l3),l3),QIList(l110,l99,l3,QIList(l193,l3),l3),QIList(l100,l99,l3,QIList(l193,l3),l3),QIList(l14,l99,l3,QIList(l193,l3),l3),QIList(l4,l99,l3,QIList(l193,l195,l3),l3),QIList(l3,l99,l3,QIList(l193,l195,l3),l3),l3),QIList(QIList(l263,l189,QIList(l212,QIList(l311,l312,l3),QIList(l158,QIList(l255,QIList(l160,l311,l3),QIList(l313,l202,l314,l3),QIList(l232,QIList(QIList(l314,QIList(l27,l313,l314,l3),l3),l3),QIList(l259,l314,QIList(l136,QIList(l262,l314,QIList(l160,l312,l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l259,l189,QIList(l212,QIList(l314,l202,l315,l3),QIList(l6,QIList(l272,l314,l3),QIList(l290,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l3),l3),QIList(l158,QIList(l258,QIList(l160,l314,l3),QIList(l212,QIList(QIList(l160,l314,l3),l3),QIList(l124,"return ",QIList(l159,l315,l3),";",l123,l3),l3),l3),l3),l3),l3,l3),QIList(l257,l189,QIList(l212,QIList(l316,l202,l315,l3),QIList(l158,QIList(l138,QIList(l159,QIList(l69,QIList(l212,QIList(l317,l3),QIList(l158,QIList(l124,"var ",QIList(l160,QIList(l38,l317,l3),l3)," = ",QIList(l160,QIList(l40,l317,l3),l3),";",l123,l3),l3),l3),l316,l3),l3),QIList(l159,QIList(l69,QIList(l212,QIList(l317,l3),QIList(l158,QIList(l124,"if (typeof ",QIList(l160,QIList(l38,l317,l3),l3)," != '",QIList(l160,QIList(l39,l317,l3),l3),"')",l123,QIList(l135,"throw 'The value ' + ",QIList(l160,QIList(l38,l317,l3),l3)," + ' is not a type ",QIList(l160,QIList(l39,l317,l3),l3),".';",l123,l3),l3),l3),l3),l316,l3),l3),QIList(l124,"return ",QIList(l228,QIList(l159,l315,l3),l3),";",l123,l3),l3),l3),l3),l3,l3),QIList(l256,l189,QIList(l212,QIList(l318,l314,l202,l315,l3),QIList(l158,QIList(l228,QIList(l255,QIList(l160,l318,l3),QIList(l160,l314,l3),QIList(l232,QIList(l160,QIList(l69,QIList(l212,QIList(l319,l3),QIList(l158,QIList(QIList(l160,l319,l3),QIList(l137,QIList(l160,l319,l3),l3),l3),l3),l3),l314,l3),l3),QIList(l159,l315,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l255,l189,QIList(l212,QIList(l318,l314,l202,l315,l3),QIList(l158,QIList(l46,QIList(l42,QIList(l157,QIList(l160,l318,l3),l3),QIList(l212,QIList(l160,l314,l3),QIList(l174,QIList(l160,l318,l3),QIList(l159,l315,l3),l3),l3),l3),l254,l3),l3),l3),l3,l3),QIList(l158,l189,QIList(l212,QIList(l320,l3),QIList(l252,l320,l3),l3),l3,l3),QIList(l229,l189,QIList(l212,QIList(l318,l314,l320,l3),QIList(l158,QIList(l198,QIList(l160,l318,l3),QIList(l160,l314,l3),QIList(l137,QIList(l160,l320,l3),l3),l3),l3),l3),l3,l3),QIList(l198,l189,QIList(l212,QIList(l318,l314,l202,l315,l3),QIList(l158,QIList(l46,QIList(l42,QIList(l157,QIList(l160,l318,l3),l3),QIList(l212,QIList(l160,l314,l3),QIList(l174,QIList(l160,l318,l3),QIList(l159,l315,l3),l3),l3),l3),l197,l3),l3),l3),l3,l3),QIList(l138,l189,QIList(l212,QIList(l202,l315,l3),QIList(l158,QIList(l124,"(function(){",l123,QIList(l135,QIList(l159,l315,l3),l3),"})()",l3),l3),l3),l3,l3),QIList(l134,l189,QIList(l212,QIList(l321,l3),QIList(l158,QIList(l250,QIList(l98,l42,l3),QIList(l160,l321,l3),l3),l3),l3),l3,l3),QIList(l133,l189,QIList(l212,QIList(l322,l321,l202,l315,l3),QIList(l158,QIList(l250,QIList(l212,QIList(l201,QIList(l159,l322,l3),l202,QIList(l160,QIList(l15,l3),l3),l3),QIList(l159,l315,l3),l3),QIList(l160,l321,l3),l3),l3),l3),l3,l3),QIList(l125,l189,QIList(l212,QIList(l99,l202,l320,l3),QIList(l158,QIList(l216,QIList(l160,l99,l3),QIList(l124,QIList(l160,l99,l3),QIList(l228,QIList(l159,l320,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l116,l189,QIList(l212,QIList(l323,l3),QIList(l158,QIList(l226,QIList(l216,l115,QIList(l103,QIList(l160,l323,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l65,l189,QIList(l212,QIList(l202,l324,l3),QIList(l232,QIList(QIList(l325,QIList(l157,l3,l3),l3),l3),QIList(l13,l4,QIList(l49,QIList(QIList(l11,l324,l3),QIList(l12,l3),l3),QIList(QIList(l11,QIList(l30,l324,l3),l3),QIList(l290,"Odd paris in PSETQ",l3),l3),QIList(l4,QIList(l232,QIList(QIList(l99,QIList(l29,l324,l3),l3),QIList(l326,QIList(l32,l324,l3),l3),l3),QIList(l46,QIList(l158,QIList(QIList(l160,l99,l3),QIList(l160,QIList(l15,l3),l3),QIList(l160,l326,l3),l3),l3),l325,l3),QIList(l216,l324,QIList(l34,l324,l3),l3),l3),l3),l3),l3),QIList(l216,l325,QIList(l64,l325,l3),l3),QIList(l158,QIList(l232,QIList(l160,QIList(l69,QIList(l98,l30,l3),l325,l3),l3),QIList(l216,QIList(l159,QIList(l58,QIList(l98,l62,l3),QIList(l69,QIList(l98,l81,l3),l325,l3),QIList(l157,l3,l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l55,l189,QIList(l212,QIList(l327,l328,l202,l315,l3),QIList(l158,QIList(l54,QIList(l228,QIList(l160,l327,l3),QIList(l160,l328,l3),l3),QIList(l159,l315,l3),l3),l3),l3),l3,l3),QIList(l54,l189,QIList(l212,QIList(l320,l202,l315,l3),QIList(l232,QIList(QIList(l326,QIList(l15,l3),l3),l3),QIList(l158,QIList(l232,QIList(QIList(QIList(l160,l326,l3),QIList(l160,l320,l3),l3),l3),QIList(l159,l315,l3),QIList(l160,l326,l3),l3),l3),l3),l3),l3,l3),QIList(l53,l189,QIList(l212,QIList(l202,l329,l3),QIList(l49,QIList(QIList(l11,l329,l3),l3,l3),QIList(QIList(l11,QIList(l30,l329,l3),l3),QIList(l29,l329,l3),l3),QIList(l4,QIList(l232,QIList(QIList(l330,QIList(l15,l3),l3),l3),QIList(l158,QIList(l232,QIList(QIList(QIList(l160,l330,l3),QIList(l160,QIList(l29,l329,l3),l3),l3),l3),QIList(l199,QIList(l160,l330,l3),QIList(l160,l330,l3),QIList(l53,QIList(l159,QIList(l30,l329,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l52,l189,QIList(l212,QIList(l202,l329,l3),QIList(l49,QIList(QIList(l11,l329,l3),l4,l3),QIList(QIList(l11,QIList(l30,l329,l3),l3),QIList(l29,l329,l3),l3),QIList(l4,QIList(l158,QIList(l199,QIList(l160,QIList(l29,l329,l3),l3),QIList(l52,QIList(l159,QIList(l30,l329,l3),l3),l3),l3,l3),l3),l3),l3),l3),l3,l3),QIList(l51,l189,QIList(l212,QIList(l320,l202,l331,l3),QIList(l158,QIList(l50,QIList(l160,l320,l3),QIList(l159,QIList(l62,l331,QIList(l158,QIList(QIList(l4,QIList(l290,"ECASE expression failed.",l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l50,l189,QIList(l212,QIList(l320,l202,l331,l3),QIList(l232,QIList(QIList(l332,QIList(l15,l3),l3),l3),QIList(l158,QIList(l232,QIList(QIList(QIList(l160,l332,l3),QIList(l160,l320,l3),l3),l3),QIList(l49,QIList(l159,QIList(l69,QIList(l212,QIList(l333,l3),QIList(l199,QIList(l279,QIList(l29,l333,l3),l4,l3),l333,QIList(l158,QIList(QIList(l25,QIList(l160,l332,l3),QIList(l157,QIList(l160,QIList(l29,l333,l3),l3),l3),l3),QIList(l159,QIList(l30,l333,l3),l3),l3),l3),l3),l3),l331,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l49,l189,QIList(l212,QIList(l202,l331,l3),QIList(l199,QIList(l11,l331,l3),l3,QIList(l199,QIList(l279,QIList(l31,l331,l3),l4,l3),QIList(l158,QIList(l228,QIList(l159,QIList(l33,l331,l3),l3),l3),l3),QIList(l158,QIList(l199,QIList(l160,QIList(l31,l331,l3),l3),QIList(l228,QIList(l159,QIList(l33,l331,l3),l3),l3),QIList(l49,QIList(l159,QIList(l30,l331,l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l48,l189,QIList(l212,QIList(l334,l202,l315,l3),QIList(l232,QIList(QIList(l335,QIList(l15,l3),l3),QIList(l336,QIList(l38,l334,l3),l3),QIList(l337,QIList(l39,l334,l3),l3),QIList(l328,QIList(l40,l334,l3),l3),l3),QIList(l158,QIList(l174,l3,QIList(l232,QIList(QIList(QIList(l160,l336,l3),0,l3),QIList(QIList(l160,l335,l3),QIList(l160,l337,l3),l3),l3),QIList(l223,QIList(l265,QIList(l160,l336,l3),QIList(l160,l335,l3),l3),QIList(l247,QIList(l159,l315,l3),l3),QIList(l44,QIList(l160,l336,l3),l3),l3),QIList(l160,l328,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l47,l189,QIList(l212,QIList(l334,l202,l315,l3),QIList(l232,QIList(QIList(l336,QIList(l38,l334,l3),l3),QIList(l338,QIList(l15,l3),l3),l3),QIList(l158,QIList(l174,l3,QIList(l232,QIList(QIList(QIList(l160,l338,l3),QIList(l160,QIList(l39,l334,l3),l3),l3),QIList(QIList(l160,l336,l3),l3,l3),l3),QIList(l223,QIList(l160,l338,l3),QIList(l216,QIList(l160,l336,l3),QIList(l29,QIList(l160,l338,l3),l3),l3),QIList(l247,QIList(l159,l315,l3),l3),QIList(l216,QIList(l160,l338,l3),QIList(l30,QIList(l160,l338,l3),l3),l3),l3),QIList(l160,QIList(l40,l334,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l46,l189,QIList(l212,QIList(l313,l339,l3),QIList(l158,QIList(l216,QIList(l160,l339,l3),QIList(l27,QIList(l160,l313,l3),QIList(l160,l339,l3),l3),l3),l3),l3),l3,l3),QIList(l45,l189,QIList(l212,QIList(l313,l201,QIList(l340,1,l3),l3),QIList(l158,QIList(l216,QIList(l160,l313,l3),QIList(l60,QIList(l160,l313,l3),QIList(l160,l340,l3),l3),l3),l3),l3),l3,l3),QIList(l44,l189,QIList(l212,QIList(l313,l201,QIList(l340,1,l3),l3),QIList(l158,QIList(l216,QIList(l160,l313,l3),QIList(l59,QIList(l160,l313,l3),QIList(l160,l340,l3),l3),l3),l3),l3),l3,l3),QIList(l13,l189,QIList(l212,QIList(l341,l202,l315,l3),QIList(l158,QIList(l174,l3,QIList(l223,QIList(l160,l341,l3),QIList(l159,l315,l3),l3),l3),l3),l3),l3,l3),QIList(l12,l189,QIList(l212,QIList(l201,l326,l3),QIList(l158,QIList(l240,l3,QIList(l160,l326,l3),l3),l3),l3),l3,l3),QIList(l10,l189,QIList(l212,QIList(l318,l314,l202,l315,l3),QIList(l158,QIList(l228,QIList(l275,QIList(l157,QIList(l160,l318,l3),l3),QIList(l9,QIList(l160,QIList(l274,l318,l3),l3),QIList(l160,l314,l3),QIList(l159,QIList(l199,QIList(l52,QIList(l282,QIList(l29,l315,l3),l3),QIList(l26,QIList(l11,QIList(l30,l315,l3),l3),l3),l3),QIList(l158,QIList(QIList(l160,QIList(l29,l315,l3),l3),QIList(l174,QIList(l160,l318,l3),QIList(l159,QIList(l30,l315,l3),l3),l3),l3),l3),QIList(l158,QIList(QIList(l174,QIList(l160,l318,l3),QIList(l159,l315,l3),l3),l3),l3),l3),l3),l3),l3),QIList(l157,QIList(l160,l318,l3),l3),l3),l3),l3),l3,l3),QIList(l9,l189,QIList(l212,QIList(l318,l314,l202,l315,l3),QIList(l232,QIList(QIList(l313,QIList(l15,"FN",l3),l3),l3),QIList(l158,QIList(l232,QIList(QIList(QIList(l160,l313,l3),QIList(l212,QIList(l160,l314,l3),QIList(l159,l315,l3),l3),l3),l3),QIList(l294,QIList(l160,l313,l3),"fname",QIList(l160,l318,l3),l3),QIList(l160,l313,l3),l3),l3),l3),l3),l3,l3),QIList(l8,l189,QIList(l212,QIList(l318,l326,l201,l342,l3),QIList(l158,QIList(l228,QIList(l216,QIList(l160,l318,l3),QIList(l160,l326,l3),l3),QIList(l159,QIList(l5,QIList(l282,l342,l3),QIList(l158,QIList(QIList(l294,QIList(l157,QIList(l160,l318,l3),l3),"vardoc",QIList(l160,l342,l3),l3),l3),l3),l3),l3),QIList(l157,QIList(l160,l318,l3),l3),l3),l3),l3),l3,l3),QIList(l7,l189,QIList(l212,QIList(l318,l326,l201,l342,l3),QIList(l158,QIList(l228,QIList(l2,QIList(l193,QIList(l160,l318,l3),l3),l3),QIList(l6,QIList(l17,QIList(l157,QIList(l160,l318,l3),l3),l3),QIList(l216,QIList(l160,l318,l3),QIList(l160,l326,l3),l3),l3),QIList(l159,QIList(l5,QIList(l282,l342,l3),QIList(l158,QIList(QIList(l294,QIList(l157,QIList(l160,l318,l3),l3),"vardoc",QIList(l160,l342,l3),l3),l3),l3),l3),l3),QIList(l157,QIList(l160,l318,l3),l3),l3),l3),l3),l3,l3),QIList(l6,l189,QIList(l212,QIList(l341,l202,l315,l3),QIList(l158,QIList(l199,QIList(l160,l341,l3),l3,QIList(l228,QIList(l159,l315,l3),l3),l3),l3),l3),l3,l3),QIList(l5,l189,QIList(l212,QIList(l341,l202,l315,l3),QIList(l158,QIList(l199,QIList(l160,l341,l3),QIList(l228,QIList(l159,l315,l3),l3),l3,l3),l3),l3),l3,l3),QIList(l2,l189,QIList(l212,QIList(l202,l316,l3),QIList(l158,QIList(l226,QIList(l159,QIList(l69,QIList(l212,QIList(l317,l3),QIList(l158,QIList(l192,QIList(l157,QIList(l160,l317,l3),l3),l3),l3),l3),l316,l3),l3),l3),l3),l3),l3,l3),QIList(l1,l189,QIList(l212,QIList(l318,l314,l202,l315,l3),QIList(l158,QIList(l226,QIList(l188,QIList(l157,QIList(l160,l318,l3),l3),QIList(l157,QIList(l212,QIList(l160,QIList(l69,QIList(l212,QIList(l313,l3),QIList(l199,QIList(l279,l313,QIList(l157,l308,l3),l3),QIList(l157,l202,l3),l313,l3),l3),l314,l3),l3),QIList(l159,l315,l3),l3),l3),l3),l3),l3),l3),l3,l3),l3),l3,l3,l3);
7882 (function(){
7883     l117.fvalue(pv, l308);
7884     l117.fvalue(pv, l307);
7885     l117.fvalue(pv, l306);
7886     l117.fvalue(pv, l305);
7887     l117.fvalue(pv, l304);
7888     l117.fvalue(pv, l303);
7889     l117.fvalue(pv, l302);
7890     l117.fvalue(pv, l301);
7891     l117.fvalue(pv, l300);
7892     l117.fvalue(pv, l299);
7893     l117.fvalue(pv, l298);
7894     l117.fvalue(pv, l297);
7895     l117.fvalue(pv, l296);
7896     l117.fvalue(pv, l295);
7897     l117.fvalue(pv, l294);
7898     l117.fvalue(pv, l293);
7899     l117.fvalue(pv, l292);
7900     l117.fvalue(pv, l291);
7901     l117.fvalue(pv, l290);
7902     l117.fvalue(pv, l289);
7903     l117.fvalue(pv, l288);
7904     l117.fvalue(pv, l287);
7905     l117.fvalue(pv, l286);
7906     l117.fvalue(pv, l285);
7907     l117.fvalue(pv, l284);
7908     l117.fvalue(pv, l283);
7909     l117.fvalue(pv, l282);
7910     l117.fvalue(pv, l281);
7911     l117.fvalue(pv, l280);
7912     l117.fvalue(pv, l279);
7913     l117.fvalue(pv, l278);
7914     l117.fvalue(pv, l277);
7915     l117.fvalue(pv, l276);
7916     l117.fvalue(pv, l275);
7917     l117.fvalue(pv, l274);
7918     l117.fvalue(pv, l273);
7919     l117.fvalue(pv, l272);
7920     l117.fvalue(pv, l271);
7921     l117.fvalue(pv, l270);
7922     l117.fvalue(pv, l269);
7923     l117.fvalue(pv, l268);
7924     l117.fvalue(pv, l267);
7925     l117.fvalue(pv, l266);
7926     l117.fvalue(pv, l265);
7927     l117.fvalue(pv, l264);
7928     l117.fvalue(pv, l263);
7929     l117.fvalue(pv, l262);
7930     l117.fvalue(pv, l261);
7931     l117.fvalue(pv, l260);
7932     l117.fvalue(pv, l259);
7933     l117.fvalue(pv, l258);
7934     l117.fvalue(pv, l257);
7935     l117.fvalue(pv, l256);
7936     l117.fvalue(pv, l255);
7937     l117.fvalue(pv, l254);
7938     l117.fvalue(pv, l253);
7939     l117.fvalue(pv, l252);
7940     l117.fvalue(pv, l251);
7941     l117.fvalue(pv, l250);
7942     l117.fvalue(pv, l249);
7943     l117.fvalue(pv, l248);
7944     l117.fvalue(pv, l247);
7945     l117.fvalue(pv, l246);
7946     l117.fvalue(pv, l245);
7947     l117.fvalue(pv, l244);
7948     l117.fvalue(pv, l243);
7949     l117.fvalue(pv, l242);
7950     l117.fvalue(pv, l241);
7951     l117.fvalue(pv, l240);
7952     l117.fvalue(pv, l239);
7953     l117.fvalue(pv, l238);
7954     l117.fvalue(pv, l237);
7955     l117.fvalue(pv, l236);
7956     l117.fvalue(pv, l235);
7957     l117.fvalue(pv, l234);
7958     l117.fvalue(pv, l233);
7959     l117.fvalue(pv, l232);
7960     l117.fvalue(pv, l231);
7961     l117.fvalue(pv, l230);
7962     l117.fvalue(pv, l229);
7963     l117.fvalue(pv, l228);
7964     l117.fvalue(pv, l227);
7965     l117.fvalue(pv, l226);
7966     l117.fvalue(pv, l225);
7967     l117.fvalue(pv, l224);
7968     l117.fvalue(pv, l223);
7969     l117.fvalue(pv, l222);
7970     l117.fvalue(pv, l221);
7971     l117.fvalue(pv, l220);
7972     l117.fvalue(pv, l219);
7973     l117.fvalue(pv, l218);
7974     l117.fvalue(pv, l217);
7975     l117.fvalue(pv, l216);
7976     l117.fvalue(pv, l215);
7977     l117.fvalue(pv, l214);
7978     l117.fvalue(pv, l213);
7979     l117.fvalue(pv, l212);
7980     l117.fvalue(pv, l211);
7981     l117.fvalue(pv, l210);
7982     l117.fvalue(pv, l209);
7983     l117.fvalue(pv, l208);
7984     l117.fvalue(pv, l207);
7985     l117.fvalue(pv, l206);
7986     l117.fvalue(pv, l205);
7987     l117.fvalue(pv, l204);
7988     l117.fvalue(pv, l202);
7989     l117.fvalue(pv, l201);
7990     l117.fvalue(pv, l200);
7991     l117.fvalue(pv, l199);
7992     l117.fvalue(pv, l198);
7993     l117.fvalue(pv, l197);
7994     l117.fvalue(pv, l196);
7995     l117.fvalue(pv, l195);
7996     l117.fvalue(pv, l194);
7997     l117.fvalue(pv, l193);
7998     l117.fvalue(pv, l192);
7999     l117.fvalue(pv, l191);
8000     l117.fvalue(pv, l190);
8001     l117.fvalue(pv, l189);
8002     l117.fvalue(pv, l188);
8003     l117.fvalue(pv, l187);
8004     l117.fvalue(pv, l186);
8005     l117.fvalue(pv, l185);
8006     l117.fvalue(pv, l184);
8007     l117.fvalue(pv, l183);
8008     l117.fvalue(pv, l182);
8009     l117.fvalue(pv, l181);
8010     l117.fvalue(pv, l180);
8011     l117.fvalue(pv, l179);
8012     l117.fvalue(pv, l178);
8013     l117.fvalue(pv, l177);
8014     l117.fvalue(pv, l176);
8015     l117.fvalue(pv, l175);
8016     l117.fvalue(pv, l174);
8017     l117.fvalue(pv, l173);
8018     l117.fvalue(pv, l172);
8019     l117.fvalue(pv, l171);
8020     l117.fvalue(pv, l170);
8021     l117.fvalue(pv, l169);
8022     l117.fvalue(pv, l168);
8023     l117.fvalue(pv, l167);
8024     l117.fvalue(pv, l166);
8025     l117.fvalue(pv, l165);
8026     l117.fvalue(pv, l164);
8027     l117.fvalue(pv, l163);
8028     l117.fvalue(pv, l162);
8029     l117.fvalue(pv, l161);
8030     l117.fvalue(pv, l160);
8031     l117.fvalue(pv, l159);
8032     l117.fvalue(pv, l158);
8033     l117.fvalue(pv, l157);
8034     l117.fvalue(pv, l156);
8035     l117.fvalue(pv, l155);
8036     l117.fvalue(pv, l154);
8037     l117.fvalue(pv, l153);
8038     l117.fvalue(pv, l152);
8039     l117.fvalue(pv, l151);
8040     l117.fvalue(pv, l150);
8041     l117.fvalue(pv, l149);
8042     l117.fvalue(pv, l148);
8043     l117.fvalue(pv, l147);
8044     l117.fvalue(pv, l146);
8045     l117.fvalue(pv, l145);
8046     l117.fvalue(pv, l144);
8047     l117.fvalue(pv, l143);
8048     l117.fvalue(pv, l142);
8049     l117.fvalue(pv, l141);
8050     l117.fvalue(pv, l140);
8051     l117.fvalue(pv, l139);
8052     l117.fvalue(pv, l138);
8053     l117.fvalue(pv, l137);
8054     l117.fvalue(pv, l136);
8055     l117.fvalue(pv, l135);
8056     l117.fvalue(pv, l134);
8057     l117.fvalue(pv, l133);
8058     l117.fvalue(pv, l132);
8059     l117.fvalue(pv, l131);
8060     l117.fvalue(pv, l130);
8061     l117.fvalue(pv, l129);
8062     l117.fvalue(pv, l128);
8063     l117.fvalue(pv, l127);
8064     l117.fvalue(pv, l126);
8065     l117.fvalue(pv, l125);
8066     l117.fvalue(pv, l124);
8067     l117.fvalue(pv, l123);
8068     l117.fvalue(pv, l122);
8069     l117.fvalue(pv, l121);
8070     l117.fvalue(pv, l120);
8071     l117.fvalue(pv, l119);
8072     l117.fvalue(pv, l118);
8073     l117.fvalue(pv, l117);
8074     l117.fvalue(pv, l116);
8075     l117.fvalue(pv, l115);
8076     l117.fvalue(pv, l114);
8077     l117.fvalue(pv, l113);
8078     l117.fvalue(pv, l112);
8079     l117.fvalue(pv, l111);
8080     l117.fvalue(pv, l110);
8081     l117.fvalue(pv, l109);
8082     l117.fvalue(pv, l108);
8083     l117.fvalue(pv, l107);
8084     l117.fvalue(pv, l106);
8085     l117.fvalue(pv, l105);
8086     l117.fvalue(pv, l104);
8087     l117.fvalue(pv, l103);
8088     l117.fvalue(pv, l102);
8089     l117.fvalue(pv, l101);
8090     l117.fvalue(pv, l100);
8091     l117.fvalue(pv, l99);
8092     l117.fvalue(pv, l98);
8093     l117.fvalue(pv, l97);
8094     l117.fvalue(pv, l96);
8095     l117.fvalue(pv, l95);
8096     l117.fvalue(pv, l94);
8097     l117.fvalue(pv, l93);
8098     l117.fvalue(pv, l92);
8099     l117.fvalue(pv, l91);
8100     l117.fvalue(pv, l90);
8101     l117.fvalue(pv, l89);
8102     l117.fvalue(pv, l88);
8103     l117.fvalue(pv, l87);
8104     l117.fvalue(pv, l86);
8105     l117.fvalue(pv, l85);
8106     l117.fvalue(pv, l84);
8107     l117.fvalue(pv, l83);
8108     l117.fvalue(pv, l82);
8109     l117.fvalue(pv, l81);
8110     l117.fvalue(pv, l80);
8111     l117.fvalue(pv, l79);
8112     l117.fvalue(pv, l78);
8113     l117.fvalue(pv, l77);
8114     l117.fvalue(pv, l76);
8115     l117.fvalue(pv, l75);
8116     l117.fvalue(pv, l74);
8117     l117.fvalue(pv, l73);
8118     l117.fvalue(pv, l72);
8119     l117.fvalue(pv, l71);
8120     l117.fvalue(pv, l70);
8121     l117.fvalue(pv, l69);
8122     l117.fvalue(pv, l68);
8123     l117.fvalue(pv, l67);
8124     l117.fvalue(pv, l66);
8125     l117.fvalue(pv, l65);
8126     l117.fvalue(pv, l64);
8127     l117.fvalue(pv, l63);
8128     l117.fvalue(pv, l62);
8129     l117.fvalue(pv, l61);
8130     l117.fvalue(pv, l60);
8131     l117.fvalue(pv, l59);
8132     l117.fvalue(pv, l58);
8133     l117.fvalue(pv, l57);
8134     l117.fvalue(pv, l56);
8135     l117.fvalue(pv, l55);
8136     l117.fvalue(pv, l54);
8137     l117.fvalue(pv, l53);
8138     l117.fvalue(pv, l52);
8139     l117.fvalue(pv, l51);
8140     l117.fvalue(pv, l50);
8141     l117.fvalue(pv, l49);
8142     l117.fvalue(pv, l48);
8143     l117.fvalue(pv, l47);
8144     l117.fvalue(pv, l46);
8145     l117.fvalue(pv, l45);
8146     l117.fvalue(pv, l44);
8147     l117.fvalue(pv, l43);
8148     l117.fvalue(pv, l42);
8149     l117.fvalue(pv, l41);
8150     l117.fvalue(pv, l40);
8151     l117.fvalue(pv, l39);
8152     l117.fvalue(pv, l38);
8153     l117.fvalue(pv, l37);
8154     l117.fvalue(pv, l36);
8155     l117.fvalue(pv, l35);
8156     l117.fvalue(pv, l34);
8157     l117.fvalue(pv, l33);
8158     l117.fvalue(pv, l32);
8159     l117.fvalue(pv, l31);
8160     l117.fvalue(pv, l30);
8161     l117.fvalue(pv, l29);
8162     l117.fvalue(pv, l28);
8163     l117.fvalue(pv, l27);
8164     l117.fvalue(pv, l26);
8165     l117.fvalue(pv, l25);
8166     l117.fvalue(pv, l24);
8167     l117.fvalue(pv, l23);
8168     l117.fvalue(pv, l22);
8169     l117.fvalue(pv, l21);
8170     l117.fvalue(pv, l20);
8171     l117.fvalue(pv, l19);
8172     l117.fvalue(pv, l18);
8173     l117.fvalue(pv, l17);
8174     l117.fvalue(pv, l16);
8175     l117.fvalue(pv, l15);
8176     l117.fvalue(pv, l14);
8177     l117.fvalue(pv, l13);
8178     l117.fvalue(pv, l12);
8179     l117.fvalue(pv, l11);
8180     l117.fvalue(pv, l10);
8181     l117.fvalue(pv, l9);
8182     l117.fvalue(pv, l8);
8183     l117.fvalue(pv, l7);
8184     l117.fvalue(pv, l6);
8185     l117.fvalue(pv, l5);
8186     l117.fvalue(pv, l4);
8187     l117.fvalue(pv, l3);
8188     l117.fvalue(pv, l2);
8189     l117.fvalue(pv, l1);
8190     ((l219).value = l310);
8191     ((l178).value = l343);
8192     ((l179).value = 812);
8193     ((l14).value = 206);
8194     return ((l237).value = 280);
8195 })();
8196 ((l220).value = 343);