ecmalisp.js

   1 (function(){
   2     var string = "function id (x) { return typeof x === 'object' && 'car' in x ? x.car : x; }";
   3     if (typeof string != 'string')
   4         throw 'The value ' + string + ' is not a type string.';
   5     return eval.apply(window, [string]);
   6 })();
   7 var l1 = {name: "DEFMACRO"};
   8 l1;
   9 var l2 = {name: "DECLAIM"};
  10 l2;
  11 var l3 = {name: "NIL"};
  12 ((l3).value = l3);
  13 var l4 = {name: "T"};
  14 ((l4).value = l4);
  15 var l5 = {name: "WHEN"};
  16 l5;
  17 var l6 = {name: "UNLESS"};
  18 l6;
  19 var l7 = {name: "DEFVAR"};
  20 l7;
  21 var l8 = {name: "DEFPARAMETER"};
  22 l8;
  23 var l9 = {name: "NAMED-LAMBDA"};
  24 l9;
  25 var l10 = {name: "DEFUN"};
  26 l10;
  27 var l11 = {name: "NULL"};
  28 (function(){
  29     (l11).fvalue = (function(v2){
  30         ((v2)["fname"] = "NULL");
  31         return v2;
  32     })((function (values,v1){
  33         if (arguments.length < 2) throw 'too few arguments';
  34         if (arguments.length > 2) throw 'too many arguments';
  35         return (function(){
  36             try {
  37                 return (function(){
  38                     return ((v1 === l3.value)?l4.value: l3.value);
  39                 })();
  40             }
  41             catch (cf){
  42                 if (cf.type == 'block' && cf.id == 1)
  43                     return cf.value;
  44                 else
  45                     throw cf;
  46             }
  47         })();
  48
  49     }));
  50     return l11;
  51 })();
  52 var l12 = {name: "RETURN"};
  53 l12;
  54 var l13 = {name: "WHILE"};
  55 l13;
  56 var l14 = {name: "*GENSYM-COUNTER*"};
  57 (function(){
  58     (((l14.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
  59         return ((l14).value = 0);
  60     })());
  61     return l14;
  62 })();
  63 var l15 = {name: "GENSYM"};
  64 var l16 = {name: "INTEGER-TO-STRING"};
  65 (function(){
  66     (l15).fvalue = (function(v4){
  67         ((v4)["fname"] = "GENSYM");
  68         return v4;
  69     })((function (values,v3){
  70         if (arguments.length > 2) throw 'too many arguments';
  71         switch(arguments.length-1){
  72         case 0:
  73         v3="G";
  74         default: break;
  75         }
  76         return (function(){
  77             try {
  78                 return (function(){
  79                     ((l14).value = (function(){
  80                         var x1 = (function(){
  81                             var symbol = l14;
  82                             var value = symbol.value;
  83                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
  84                             return value;
  85                         })();
  86                         if (typeof x1 !== 'number') throw 'Not a number!';
  87                         var x2 = 1;
  88                         if (typeof x2 !== 'number') throw 'Not a number!';
  89                         return x1+x2;
  90                     })());
  91                     return (function(){
  92                         var name = (function(){
  93                             var string1 = v3;
  94                             var string2 = (function(){
  95                                 var symbol = l16;
  96                                 var func = symbol.fvalue;
  97                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
  98                                 return func;
  99                             })()(id, (function(){
 100                                 var symbol = l14;
 101                                 var value = symbol.value;
 102                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 103                                 return value;
 104                             })());
 105                             if (typeof string1 != 'string')
 106                                 throw 'The value ' + string1 + ' is not a type string.';
 107                             if (typeof string2 != 'string')
 108                                 throw 'The value ' + string2 + ' is not a type string.';
 109                             return string1.concat(string2);
 110                         })();
 111                         if (typeof name != 'string')
 112                             throw 'The value ' + name + ' is not a type string.';
 113                         return ({name: name});
 114                     })();
 115                 })();
 116             }
 117             catch (cf){
 118                 if (cf.type == 'block' && cf.id == 2)
 119                     return cf.value;
 120                 else
 121                     throw cf;
 122             }
 123         })();
 124
 125     }));
 126     return l15;
 127 })();
 128 var l17 = {name: "BOUNDP"};
 129 (function(){
 130     (l17).fvalue = (function(v6){
 131         ((v6)["fname"] = "BOUNDP");
 132         return v6;
 133     })((function (values,v5){
 134         if (arguments.length < 2) throw 'too few arguments';
 135         if (arguments.length > 2) throw 'too many arguments';
 136         return (function(){
 137             try {
 138                 return (function(){
 139                     return ((v5.value !== undefined)?l4.value: l3.value);
 140                 })();
 141             }
 142             catch (cf){
 143                 if (cf.type == 'block' && cf.id == 3)
 144                     return cf.value;
 145                 else
 146                     throw cf;
 147             }
 148         })();
 149
 150     }));
 151     return l17;
 152 })();
 153 var l18 = {name: "="};
 154 (function(){
 155     (l18).fvalue = (function(v9){
 156         ((v9)["fname"] = "=");
 157         return v9;
 158     })((function (values,v7,v8){
 159         if (arguments.length < 3) throw 'too few arguments';
 160         if (arguments.length > 3) throw 'too many arguments';
 161         return (function(){
 162             try {
 163                 return (function(){
 164                     return (function(){
 165                         var x1 = v7;
 166                         if (typeof x1 !== 'number') throw 'Not a number!';
 167                         var x2 = v8;
 168                         if (typeof x2 !== 'number') throw 'Not a number!';
 169                         return (x1==x2?l4.value: l3.value);
 170                     })();
 171                 })();
 172             }
 173             catch (cf){
 174                 if (cf.type == 'block' && cf.id == 4)
 175                     return cf.value;
 176                 else
 177                     throw cf;
 178             }
 179         })();
 180
 181     }));
 182     return l18;
 183 })();
 184 var l19 = {name: "*"};
 185 (function(){
 186     (l19).fvalue = (function(v12){
 187         ((v12)["fname"] = "*");
 188         return v12;
 189     })((function (values,v10,v11){
 190         if (arguments.length < 3) throw 'too few arguments';
 191         if (arguments.length > 3) throw 'too many arguments';
 192         return (function(){
 193             try {
 194                 return (function(){
 195                     return (function(){
 196                         var x1 = v10;
 197                         if (typeof x1 !== 'number') throw 'Not a number!';
 198                         var x2 = v11;
 199                         if (typeof x2 !== 'number') throw 'Not a number!';
 200                         return x1*x2;
 201                     })();
 202                 })();
 203             }
 204             catch (cf){
 205                 if (cf.type == 'block' && cf.id == 5)
 206                     return cf.value;
 207                 else
 208                     throw cf;
 209             }
 210         })();
 211
 212     }));
 213     return l19;
 214 })();
 215 var l20 = {name: "/"};
 216 (function(){
 217     (l20).fvalue = (function(v15){
 218         ((v15)["fname"] = "/");
 219         return v15;
 220     })((function (values,v13,v14){
 221         if (arguments.length < 3) throw 'too few arguments';
 222         if (arguments.length > 3) throw 'too many arguments';
 223         return (function(){
 224             try {
 225                 return (function(){
 226                     return (function(){
 227                         var x1 = v13;
 228                         if (typeof x1 !== 'number') throw 'Not a number!';
 229                         var x2 = v14;
 230                         if (typeof x2 !== 'number') throw 'Not a number!';
 231                         return x1/x2;
 232                     })();
 233                 })();
 234             }
 235             catch (cf){
 236                 if (cf.type == 'block' && cf.id == 6)
 237                     return cf.value;
 238                 else
 239                     throw cf;
 240             }
 241         })();
 242
 243     }));
 244     return l20;
 245 })();
 246 var l21 = {name: "1+"};
 247 (function(){
 248     (l21).fvalue = (function(v17){
 249         ((v17)["fname"] = "1+");
 250         return v17;
 251     })((function (values,v16){
 252         if (arguments.length < 2) throw 'too few arguments';
 253         if (arguments.length > 2) throw 'too many arguments';
 254         return (function(){
 255             try {
 256                 return (function(){
 257                     return (function(){
 258                         var x1 = v16;
 259                         if (typeof x1 !== 'number') throw 'Not a number!';
 260                         var x2 = 1;
 261                         if (typeof x2 !== 'number') throw 'Not a number!';
 262                         return x1+x2;
 263                     })();
 264                 })();
 265             }
 266             catch (cf){
 267                 if (cf.type == 'block' && cf.id == 7)
 268                     return cf.value;
 269                 else
 270                     throw cf;
 271             }
 272         })();
 273
 274     }));
 275     return l21;
 276 })();
 277 var l22 = {name: "1-"};
 278 (function(){
 279     (l22).fvalue = (function(v19){
 280         ((v19)["fname"] = "1-");
 281         return v19;
 282     })((function (values,v18){
 283         if (arguments.length < 2) throw 'too few arguments';
 284         if (arguments.length > 2) throw 'too many arguments';
 285         return (function(){
 286             try {
 287                 return (function(){
 288                     return (function(){
 289                         var x1 = v18;
 290                         if (typeof x1 !== 'number') throw 'Not a number!';
 291                         var x2 = 1;
 292                         if (typeof x2 !== 'number') throw 'Not a number!';
 293                         return x1-x2;
 294                     })();
 295                 })();
 296             }
 297             catch (cf){
 298                 if (cf.type == 'block' && cf.id == 8)
 299                     return cf.value;
 300                 else
 301                     throw cf;
 302             }
 303         })();
 304
 305     }));
 306     return l22;
 307 })();
 308 var l23 = {name: "ZEROP"};
 309 (function(){
 310     (l23).fvalue = (function(v21){
 311         ((v21)["fname"] = "ZEROP");
 312         return v21;
 313     })((function (values,v20){
 314         if (arguments.length < 2) throw 'too few arguments';
 315         if (arguments.length > 2) throw 'too many arguments';
 316         return (function(){
 317             try {
 318                 return (function(){
 319                     return (function(){
 320                         var x1 = v20;
 321                         if (typeof x1 !== 'number') throw 'Not a number!';
 322                         var x2 = 0;
 323                         if (typeof x2 !== 'number') throw 'Not a number!';
 324                         return (x1==x2?l4.value: l3.value);
 325                     })();
 326                 })();
 327             }
 328             catch (cf){
 329                 if (cf.type == 'block' && cf.id == 9)
 330                     return cf.value;
 331                 else
 332                     throw cf;
 333             }
 334         })();
 335
 336     }));
 337     return l23;
 338 })();
 339 var l24 = {name: "TRUNCATE"};
 340 (function(){
 341     (l24).fvalue = (function(v24){
 342         ((v24)["fname"] = "TRUNCATE");
 343         return v24;
 344     })((function (values,v22,v23){
 345         if (arguments.length < 3) throw 'too few arguments';
 346         if (arguments.length > 3) throw 'too many arguments';
 347         return (function(){
 348             try {
 349                 return (function(){
 350                     return (function(){
 351                         var x = (function(){
 352                             var x1 = v22;
 353                             if (typeof x1 !== 'number') throw 'Not a number!';
 354                             var x2 = v23;
 355                             if (typeof x2 !== 'number') throw 'Not a number!';
 356                             return x1/x2;
 357                         })();
 358                         if (typeof x != 'number')
 359                             throw 'The value ' + x + ' is not a type number.';
 360                         return Math.floor(x);
 361                     })();
 362                 })();
 363             }
 364             catch (cf){
 365                 if (cf.type == 'block' && cf.id == 10)
 366                     return cf.value;
 367                 else
 368                     throw cf;
 369             }
 370         })();
 371
 372     }));
 373     return l24;
 374 })();
 375 var l25 = {name: "EQL"};
 376 (function(){
 377     (l25).fvalue = (function(v27){
 378         ((v27)["fname"] = "EQL");
 379         return v27;
 380     })((function (values,v25,v26){
 381         if (arguments.length < 3) throw 'too few arguments';
 382         if (arguments.length > 3) throw 'too many arguments';
 383         return (function(){
 384             try {
 385                 return (function(){
 386                     return ((v25 === v26)?l4.value: l3.value);
 387                 })();
 388             }
 389             catch (cf){
 390                 if (cf.type == 'block' && cf.id == 11)
 391                     return cf.value;
 392                 else
 393                     throw cf;
 394             }
 395         })();
 396
 397     }));
 398     return l25;
 399 })();
 400 var l26 = {name: "NOT"};
 401 (function(){
 402     (l26).fvalue = (function(v29){
 403         ((v29)["fname"] = "NOT");
 404         return v29;
 405     })((function (values,v28){
 406         if (arguments.length < 2) throw 'too few arguments';
 407         if (arguments.length > 2) throw 'too many arguments';
 408         return (function(){
 409             try {
 410                 return (function(){
 411                     return (v28 !== l3.value ? l3.value : l4.value);
 412                 })();
 413             }
 414             catch (cf){
 415                 if (cf.type == 'block' && cf.id == 12)
 416                     return cf.value;
 417                 else
 418                     throw cf;
 419             }
 420         })();
 421
 422     }));
 423     return l26;
 424 })();
 425 var l27 = {name: "CONS"};
 426 (function(){
 427     (l27).fvalue = (function(v32){
 428         ((v32)["fname"] = "CONS");
 429         return v32;
 430     })((function (values,v30,v31){
 431         if (arguments.length < 3) throw 'too few arguments';
 432         if (arguments.length > 3) throw 'too many arguments';
 433         return (function(){
 434             try {
 435                 return (function(){
 436                     return ({car: v30, cdr: v31});
 437                 })();
 438             }
 439             catch (cf){
 440                 if (cf.type == 'block' && cf.id == 13)
 441                     return cf.value;
 442                 else
 443                     throw cf;
 444             }
 445         })();
 446
 447     }));
 448     return l27;
 449 })();
 450 var l28 = {name: "CONSP"};
 451 (function(){
 452     (l28).fvalue = (function(v34){
 453         ((v34)["fname"] = "CONSP");
 454         return v34;
 455     })((function (values,v33){
 456         if (arguments.length < 2) throw 'too few arguments';
 457         if (arguments.length > 2) throw 'too many arguments';
 458         return (function(){
 459             try {
 460                 return (function(){
 461                     return ((function(){
 462                         var tmp = v33;
 463                         return (typeof tmp == 'object' && 'car' in tmp);
 464                     })()?l4.value: l3.value);
 465                 })();
 466             }
 467             catch (cf){
 468                 if (cf.type == 'block' && cf.id == 14)
 469                     return cf.value;
 470                 else
 471                     throw cf;
 472             }
 473         })();
 474
 475     }));
 476     return l28;
 477 })();
 478 var l29 = {name: "CAR"};
 479 (function(){
 480     (l29).fvalue = (function(v36){
 481         ((v36)["fname"] = "CAR");
 482         return v36;
 483     })((function(){
 484         var func = (function (values,v35){
 485             if (arguments.length < 2) throw 'too few arguments';
 486             if (arguments.length > 2) throw 'too many arguments';
 487             return (function(){
 488                 try {
 489                     return (function(){
 490                         return (function(){
 491                             var tmp = v35;
 492                             return tmp === l3.value? l3.value: tmp.car;
 493                         })();
 494                     })();
 495                 }
 496                 catch (cf){
 497                     if (cf.type == 'block' && cf.id == 15)
 498                         return cf.value;
 499                     else
 500                         throw cf;
 501                 }
 502             })();
 503
 504         });
 505         func.docstring = 'Return the CAR part of a cons, or NIL if X is null.';
 506         return func;
 507     })());
 508     return l29;
 509 })();
 510 var l30 = {name: "CDR"};
 511 (function(){
 512     (l30).fvalue = (function(v38){
 513         ((v38)["fname"] = "CDR");
 514         return v38;
 515     })((function (values,v37){
 516         if (arguments.length < 2) throw 'too few arguments';
 517         if (arguments.length > 2) throw 'too many arguments';
 518         return (function(){
 519             try {
 520                 return (function(){
 521                     return (function(){
 522                         var tmp = v37;
 523                         return tmp === l3.value? l3.value: tmp.cdr;
 524                     })();
 525                 })();
 526             }
 527             catch (cf){
 528                 if (cf.type == 'block' && cf.id == 16)
 529                     return cf.value;
 530                 else
 531                     throw cf;
 532             }
 533         })();
 534
 535     }));
 536     return l30;
 537 })();
 538 var l31 = {name: "CAAR"};
 539 (function(){
 540     (l31).fvalue = (function(v40){
 541         ((v40)["fname"] = "CAAR");
 542         return v40;
 543     })((function (values,v39){
 544         if (arguments.length < 2) throw 'too few arguments';
 545         if (arguments.length > 2) throw 'too many arguments';
 546         return (function(){
 547             try {
 548                 return (function(){
 549                     return (function(){
 550                         var tmp = (function(){
 551                             var tmp = v39;
 552                             return tmp === l3.value? l3.value: tmp.car;
 553                         })();
 554                         return tmp === l3.value? l3.value: tmp.car;
 555                     })();
 556                 })();
 557             }
 558             catch (cf){
 559                 if (cf.type == 'block' && cf.id == 17)
 560                     return cf.value;
 561                 else
 562                     throw cf;
 563             }
 564         })();
 565
 566     }));
 567     return l31;
 568 })();
 569 var l32 = {name: "CADR"};
 570 (function(){
 571     (l32).fvalue = (function(v42){
 572         ((v42)["fname"] = "CADR");
 573         return v42;
 574     })((function (values,v41){
 575         if (arguments.length < 2) throw 'too few arguments';
 576         if (arguments.length > 2) throw 'too many arguments';
 577         return (function(){
 578             try {
 579                 return (function(){
 580                     return (function(){
 581                         var tmp = (function(){
 582                             var tmp = v41;
 583                             return tmp === l3.value? l3.value: tmp.cdr;
 584                         })();
 585                         return tmp === l3.value? l3.value: tmp.car;
 586                     })();
 587                 })();
 588             }
 589             catch (cf){
 590                 if (cf.type == 'block' && cf.id == 18)
 591                     return cf.value;
 592                 else
 593                     throw cf;
 594             }
 595         })();
 596
 597     }));
 598     return l32;
 599 })();
 600 var l33 = {name: "CDAR"};
 601 (function(){
 602     (l33).fvalue = (function(v44){
 603         ((v44)["fname"] = "CDAR");
 604         return v44;
 605     })((function (values,v43){
 606         if (arguments.length < 2) throw 'too few arguments';
 607         if (arguments.length > 2) throw 'too many arguments';
 608         return (function(){
 609             try {
 610                 return (function(){
 611                     return (function(){
 612                         var tmp = (function(){
 613                             var tmp = v43;
 614                             return tmp === l3.value? l3.value: tmp.car;
 615                         })();
 616                         return tmp === l3.value? l3.value: tmp.cdr;
 617                     })();
 618                 })();
 619             }
 620             catch (cf){
 621                 if (cf.type == 'block' && cf.id == 19)
 622                     return cf.value;
 623                 else
 624                     throw cf;
 625             }
 626         })();
 627
 628     }));
 629     return l33;
 630 })();
 631 var l34 = {name: "CDDR"};
 632 (function(){
 633     (l34).fvalue = (function(v46){
 634         ((v46)["fname"] = "CDDR");
 635         return v46;
 636     })((function (values,v45){
 637         if (arguments.length < 2) throw 'too few arguments';
 638         if (arguments.length > 2) throw 'too many arguments';
 639         return (function(){
 640             try {
 641                 return (function(){
 642                     return (function(){
 643                         var tmp = (function(){
 644                             var tmp = v45;
 645                             return tmp === l3.value? l3.value: tmp.cdr;
 646                         })();
 647                         return tmp === l3.value? l3.value: tmp.cdr;
 648                     })();
 649                 })();
 650             }
 651             catch (cf){
 652                 if (cf.type == 'block' && cf.id == 20)
 653                     return cf.value;
 654                 else
 655                     throw cf;
 656             }
 657         })();
 658
 659     }));
 660     return l34;
 661 })();
 662 var l35 = {name: "CADDR"};
 663 (function(){
 664     (l35).fvalue = (function(v48){
 665         ((v48)["fname"] = "CADDR");
 666         return v48;
 667     })((function (values,v47){
 668         if (arguments.length < 2) throw 'too few arguments';
 669         if (arguments.length > 2) throw 'too many arguments';
 670         return (function(){
 671             try {
 672                 return (function(){
 673                     return (function(){
 674                         var tmp = (function(){
 675                             var tmp = (function(){
 676                                 var tmp = v47;
 677                                 return tmp === l3.value? l3.value: tmp.cdr;
 678                             })();
 679                             return tmp === l3.value? l3.value: tmp.cdr;
 680                         })();
 681                         return tmp === l3.value? l3.value: tmp.car;
 682                     })();
 683                 })();
 684             }
 685             catch (cf){
 686                 if (cf.type == 'block' && cf.id == 21)
 687                     return cf.value;
 688                 else
 689                     throw cf;
 690             }
 691         })();
 692
 693     }));
 694     return l35;
 695 })();
 696 var l36 = {name: "CDDDR"};
 697 (function(){
 698     (l36).fvalue = (function(v50){
 699         ((v50)["fname"] = "CDDDR");
 700         return v50;
 701     })((function (values,v49){
 702         if (arguments.length < 2) throw 'too few arguments';
 703         if (arguments.length > 2) throw 'too many arguments';
 704         return (function(){
 705             try {
 706                 return (function(){
 707                     return (function(){
 708                         var tmp = (function(){
 709                             var tmp = (function(){
 710                                 var tmp = v49;
 711                                 return tmp === l3.value? l3.value: tmp.cdr;
 712                             })();
 713                             return tmp === l3.value? l3.value: tmp.cdr;
 714                         })();
 715                         return tmp === l3.value? l3.value: tmp.cdr;
 716                     })();
 717                 })();
 718             }
 719             catch (cf){
 720                 if (cf.type == 'block' && cf.id == 22)
 721                     return cf.value;
 722                 else
 723                     throw cf;
 724             }
 725         })();
 726
 727     }));
 728     return l36;
 729 })();
 730 var l37 = {name: "CADDDR"};
 731 (function(){
 732     (l37).fvalue = (function(v52){
 733         ((v52)["fname"] = "CADDDR");
 734         return v52;
 735     })((function (values,v51){
 736         if (arguments.length < 2) throw 'too few arguments';
 737         if (arguments.length > 2) throw 'too many arguments';
 738         return (function(){
 739             try {
 740                 return (function(){
 741                     return (function(){
 742                         var tmp = (function(){
 743                             var tmp = (function(){
 744                                 var tmp = (function(){
 745                                     var tmp = v51;
 746                                     return tmp === l3.value? l3.value: tmp.cdr;
 747                                 })();
 748                                 return tmp === l3.value? l3.value: tmp.cdr;
 749                             })();
 750                             return tmp === l3.value? l3.value: tmp.cdr;
 751                         })();
 752                         return tmp === l3.value? l3.value: tmp.car;
 753                     })();
 754                 })();
 755             }
 756             catch (cf){
 757                 if (cf.type == 'block' && cf.id == 23)
 758                     return cf.value;
 759                 else
 760                     throw cf;
 761             }
 762         })();
 763
 764     }));
 765     return l37;
 766 })();
 767 var l38 = {name: "FIRST"};
 768 (function(){
 769     (l38).fvalue = (function(v54){
 770         ((v54)["fname"] = "FIRST");
 771         return v54;
 772     })((function (values,v53){
 773         if (arguments.length < 2) throw 'too few arguments';
 774         if (arguments.length > 2) throw 'too many arguments';
 775         return (function(){
 776             try {
 777                 return (function(){
 778                     return (function(){
 779                         var tmp = v53;
 780                         return tmp === l3.value? l3.value: tmp.car;
 781                     })();
 782                 })();
 783             }
 784             catch (cf){
 785                 if (cf.type == 'block' && cf.id == 24)
 786                     return cf.value;
 787                 else
 788                     throw cf;
 789             }
 790         })();
 791
 792     }));
 793     return l38;
 794 })();
 795 var l39 = {name: "SECOND"};
 796 (function(){
 797     (l39).fvalue = (function(v56){
 798         ((v56)["fname"] = "SECOND");
 799         return v56;
 800     })((function (values,v55){
 801         if (arguments.length < 2) throw 'too few arguments';
 802         if (arguments.length > 2) throw 'too many arguments';
 803         return (function(){
 804             try {
 805                 return (function(){
 806                     return l32.fvalue(id, v55);
 807                 })();
 808             }
 809             catch (cf){
 810                 if (cf.type == 'block' && cf.id == 25)
 811                     return cf.value;
 812                 else
 813                     throw cf;
 814             }
 815         })();
 816
 817     }));
 818     return l39;
 819 })();
 820 var l40 = {name: "THIRD"};
 821 (function(){
 822     (l40).fvalue = (function(v58){
 823         ((v58)["fname"] = "THIRD");
 824         return v58;
 825     })((function (values,v57){
 826         if (arguments.length < 2) throw 'too few arguments';
 827         if (arguments.length > 2) throw 'too many arguments';
 828         return (function(){
 829             try {
 830                 return (function(){
 831                     return l35.fvalue(id, v57);
 832                 })();
 833             }
 834             catch (cf){
 835                 if (cf.type == 'block' && cf.id == 26)
 836                     return cf.value;
 837                 else
 838                     throw cf;
 839             }
 840         })();
 841
 842     }));
 843     return l40;
 844 })();
 845 var l41 = {name: "FOURTH"};
 846 (function(){
 847     (l41).fvalue = (function(v60){
 848         ((v60)["fname"] = "FOURTH");
 849         return v60;
 850     })((function (values,v59){
 851         if (arguments.length < 2) throw 'too few arguments';
 852         if (arguments.length > 2) throw 'too many arguments';
 853         return (function(){
 854             try {
 855                 return (function(){
 856                     return l37.fvalue(id, v59);
 857                 })();
 858             }
 859             catch (cf){
 860                 if (cf.type == 'block' && cf.id == 27)
 861                     return cf.value;
 862                 else
 863                     throw cf;
 864             }
 865         })();
 866
 867     }));
 868     return l41;
 869 })();
 870 var l42 = {name: "LIST"};
 871 (function(){
 872     (l42).fvalue = (function(v62){
 873         ((v62)["fname"] = "LIST");
 874         return v62;
 875     })((function (values){
 876         var v61= l3.value;
 877         for (var i = arguments.length-1; i>=1; i--)
 878             v61 = {car: arguments[i], cdr:
 879         v61};
 880         return (function(){
 881             try {
 882                 return (function(){
 883                     return v61;
 884                 })();
 885             }
 886             catch (cf){
 887                 if (cf.type == 'block' && cf.id == 28)
 888                     return cf.value;
 889                 else
 890                     throw cf;
 891             }
 892         })();
 893
 894     }));
 895     return l42;
 896 })();
 897 var l43 = {name: "ATOM"};
 898 (function(){
 899     (l43).fvalue = (function(v64){
 900         ((v64)["fname"] = "ATOM");
 901         return v64;
 902     })((function (values,v63){
 903         if (arguments.length < 2) throw 'too few arguments';
 904         if (arguments.length > 2) throw 'too many arguments';
 905         return (function(){
 906             try {
 907                 return (function(){
 908                     return l26.fvalue(id, ((function(){
 909                         var tmp = v63;
 910                         return (typeof tmp == 'object' && 'car' in tmp);
 911                     })()?l4.value: l3.value));
 912                 })();
 913             }
 914             catch (cf){
 915                 if (cf.type == 'block' && cf.id == 29)
 916                     return cf.value;
 917                 else
 918                     throw cf;
 919             }
 920         })();
 921
 922     }));
 923     return l43;
 924 })();
 925 var l44 = {name: "INCF"};
 926 l44;
 927 var l45 = {name: "DECF"};
 928 l45;
 929 var l46 = {name: "PUSH"};
 930 l46;
 931 var l47 = {name: "DOLIST"};
 932 l47;
 933 var l48 = {name: "DOTIMES"};
 934 l48;
 935 var l49 = {name: "COND"};
 936 l49;
 937 var l50 = {name: "CASE"};
 938 l50;
 939 var l51 = {name: "ECASE"};
 940 l51;
 941 var l52 = {name: "AND"};
 942 l52;
 943 var l53 = {name: "OR"};
 944 l53;
 945 var l54 = {name: "PROG1"};
 946 l54;
 947 var l55 = {name: "PROG2"};
 948 l55;
 949 var l56 = {name: "ENSURE-LIST"};
 950 var l57 = {name: "LISTP"};
 951 (function(){
 952     (l56).fvalue = (function(v66){
 953         ((v66)["fname"] = "ENSURE-LIST");
 954         return v66;
 955     })((function (values,v65){
 956         if (arguments.length < 2) throw 'too few arguments';
 957         if (arguments.length > 2) throw 'too many arguments';
 958         return (function(){
 959             try {
 960                 return (function(){
 961                     return ((function(){
 962                         var symbol = l57;
 963                         var func = symbol.fvalue;
 964                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
 965                         return func;
 966                     })()(id, v65) !== l3.value ? v65 : l42.fvalue(id, v65));
 967                 })();
 968             }
 969             catch (cf){
 970                 if (cf.type == 'block' && cf.id == 30)
 971                     return cf.value;
 972                 else
 973                     throw cf;
 974             }
 975         })();
 976
 977     }));
 978     return l56;
 979 })();
 980 var l58 = {name: "!REDUCE"};
 981 (function(){
 982     (l58).fvalue = (function(v70){
 983         ((v70)["fname"] = "!REDUCE");
 984         return v70;
 985     })((function (values,v67,v68,v69){
 986         if (arguments.length < 4) throw 'too few arguments';
 987         if (arguments.length > 4) throw 'too many arguments';
 988         return (function(){
 989             try {
 990                 return (function(){
 991                     return (l11.fvalue(id, v68) !== l3.value ? v69 : l58.fvalue(id, v67, (function(){
 992                         var tmp = v68;
 993                         return tmp === l3.value? l3.value: tmp.cdr;
 994                     })(), (v67)(id, v69, (function(){
 995                         var tmp = v68;
 996                         return tmp === l3.value? l3.value: tmp.car;
 997                     })())));
 998                 })();
 999             }
1000             catch (cf){
1001                 if (cf.type == 'block' && cf.id == 31)
1002                     return cf.value;
1003                 else
1004                     throw cf;
1005             }
1006         })();
1007
1008     }));
1009     return l58;
1010 })();
1011 var l59 = {name: "+"};
1012 (function(){
1013     (l59).fvalue = (function(v75){
1014         ((v75)["fname"] = "+");
1015         return v75;
1016     })((function (values){
1017         var v71= l3.value;
1018         for (var i = arguments.length-1; i>=1; i--)
1019             v71 = {car: arguments[i], cdr:
1020         v71};
1021         return (function(){
1022             try {
1023                 return (function(){
1024                     return (function(v72){
1025                         return (function(){
1026                             try {
1027                                 return (function(){
1028                                     return (function(v73,v74){
1029                                         (function(){
1030                                             while(v73 !== l3.value){
1031                                                 (v74 = (function(){
1032                                                     var tmp = v73;
1033                                                     return tmp === l3.value? l3.value: tmp.car;
1034                                                 })());
1035                                                 (function(){
1036                                                     (v72 = (function(){
1037                                                         var x1 = v72;
1038                                                         if (typeof x1 !== 'number') throw 'Not a number!';
1039                                                         var x2 = v74;
1040                                                         if (typeof x2 !== 'number') throw 'Not a number!';
1041                                                         return x1+x2;
1042                                                     })());
1043                                                     return l3.value;
1044                                                 })();
1045                                                 (v73 = (function(){
1046                                                     var tmp = v73;
1047                                                     return tmp === l3.value? l3.value: tmp.cdr;
1048                                                 })());
1049                                             }return l3.value;
1050                                         })();
1051                                         return v72;
1052                                     })(v71,l3.value);
1053                                 })();
1054                             }
1055                             catch (cf){
1056                                 if (cf.type == 'block' && cf.id == 33)
1057                                     return cf.value;
1058                                 else
1059                                     throw cf;
1060                             }
1061                         })();
1062                     })(0);
1063                 })();
1064             }
1065             catch (cf){
1066                 if (cf.type == 'block' && cf.id == 32)
1067                     return cf.value;
1068                 else
1069                     throw cf;
1070             }
1071         })();
1072
1073     }));
1074     return l59;
1075 })();
1076 var l60 = {name: "-"};
1077 (function(){
1078     (l60).fvalue = (function(v81){
1079         ((v81)["fname"] = "-");
1080         return v81;
1081     })((function (values,v77){
1082         if (arguments.length < 2) throw 'too few arguments';
1083         var v76= l3.value;
1084         for (var i = arguments.length-1; i>=2; i--)
1085             v76 = {car: arguments[i], cdr:
1086         v76};
1087         return (function(){
1088             try {
1089                 return (function(){
1090                     return (l11.fvalue(id, v76) !== l3.value ? (function(){
1091                         var x1 = v77;
1092                         if (typeof x1 !== 'number') throw 'Not a number!';
1093                         return -x1;
1094                     })() : (function(v78){
1095                         return (function(){
1096                             try {
1097                                 return (function(){
1098                                     return (function(v79,v80){
1099                                         (function(){
1100                                             while(v79 !== l3.value){
1101                                                 (v80 = (function(){
1102                                                     var tmp = v79;
1103                                                     return tmp === l3.value? l3.value: tmp.car;
1104                                                 })());
1105                                                 (function(){
1106                                                     (v78 = (function(){
1107                                                         var x1 = v78;
1108                                                         if (typeof x1 !== 'number') throw 'Not a number!';
1109                                                         var x2 = v80;
1110                                                         if (typeof x2 !== 'number') throw 'Not a number!';
1111                                                         return x1-x2;
1112                                                     })());
1113                                                     return l3.value;
1114                                                 })();
1115                                                 (v79 = (function(){
1116                                                     var tmp = v79;
1117                                                     return tmp === l3.value? l3.value: tmp.cdr;
1118                                                 })());
1119                                             }return l3.value;
1120                                         })();
1121                                         return v78;
1122                                     })(v76,l3.value);
1123                                 })();
1124                             }
1125                             catch (cf){
1126                                 if (cf.type == 'block' && cf.id == 35)
1127                                     return cf.value;
1128                                 else
1129                                     throw cf;
1130                             }
1131                         })();
1132                     })(v77));
1133                 })();
1134             }
1135             catch (cf){
1136                 if (cf.type == 'block' && cf.id == 34)
1137                     return cf.value;
1138                 else
1139                     throw cf;
1140             }
1141         })();
1142
1143     }));
1144     return l60;
1145 })();
1146 var l61 = {name: "APPEND-TWO"};
1147 var l62 = {name: "APPEND"};
1148 (function(){
1149     (l61).fvalue = (function(v84){
1150         ((v84)["fname"] = "APPEND-TWO");
1151         return v84;
1152     })((function (values,v82,v83){
1153         if (arguments.length < 3) throw 'too few arguments';
1154         if (arguments.length > 3) throw 'too many arguments';
1155         return (function(){
1156             try {
1157                 return (function(){
1158                     return (l11.fvalue(id, v82) !== l3.value ? v83 : ({car: (function(){
1159                         var tmp = v82;
1160                         return tmp === l3.value? l3.value: tmp.car;
1161                     })(), cdr: (function(){
1162                         var symbol = l62;
1163                         var func = symbol.fvalue;
1164                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1165                         return func;
1166                     })()(id, (function(){
1167                         var tmp = v82;
1168                         return tmp === l3.value? l3.value: tmp.cdr;
1169                     })(), v83)}));
1170                 })();
1171             }
1172             catch (cf){
1173                 if (cf.type == 'block' && cf.id == 36)
1174                     return cf.value;
1175                 else
1176                     throw cf;
1177             }
1178         })();
1179
1180     }));
1181     return l61;
1182 })();
1183 (function(){
1184     (l62).fvalue = (function(v86){
1185         ((v86)["fname"] = "APPEND");
1186         return v86;
1187     })((function (values){
1188         var v85= l3.value;
1189         for (var i = arguments.length-1; i>=1; i--)
1190             v85 = {car: arguments[i], cdr:
1191         v85};
1192         return (function(){
1193             try {
1194                 return (function(){
1195                     return l58.fvalue(id, (function(){
1196                         var symbol = l61;
1197                         var func = symbol.fvalue;
1198                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1199                         return func;
1200                     })(), v85, l3);
1201                 })();
1202             }
1203             catch (cf){
1204                 if (cf.type == 'block' && cf.id == 37)
1205                     return cf.value;
1206                 else
1207                     throw cf;
1208             }
1209         })();
1210
1211     }));
1212     return l62;
1213 })();
1214 var l63 = {name: "REVAPPEND"};
1215 (function(){
1216     (l63).fvalue = (function(v89){
1217         ((v89)["fname"] = "REVAPPEND");
1218         return v89;
1219     })((function (values,v87,v88){
1220         if (arguments.length < 3) throw 'too few arguments';
1221         if (arguments.length > 3) throw 'too many arguments';
1222         return (function(){
1223             try {
1224                 return (function(){
1225                     (function(){
1226                         try {
1227                             return (function(){
1228                                 return (function(){
1229                                     while(v87 !== l3.value){
1230                                         (v88 = ({car: (function(){
1231                                             var tmp = v87;
1232                                             return tmp === l3.value? l3.value: tmp.car;
1233                                         })(), cdr: v88}));
1234                                         (v87 = (function(){
1235                                             var tmp = v87;
1236                                             return tmp === l3.value? l3.value: tmp.cdr;
1237                                         })());
1238                                     }return l3.value;
1239                                 })();
1240                             })();
1241                         }
1242                         catch (cf){
1243                             if (cf.type == 'block' && cf.id == 39)
1244                                 return cf.value;
1245                             else
1246                                 throw cf;
1247                         }
1248                     })();
1249                     return v88;
1250                 })();
1251             }
1252             catch (cf){
1253                 if (cf.type == 'block' && cf.id == 38)
1254                     return cf.value;
1255                 else
1256                     throw cf;
1257             }
1258         })();
1259
1260     }));
1261     return l63;
1262 })();
1263 var l64 = {name: "REVERSE"};
1264 (function(){
1265     (l64).fvalue = (function(v91){
1266         ((v91)["fname"] = "REVERSE");
1267         return v91;
1268     })((function (values,v90){
1269         if (arguments.length < 2) throw 'too few arguments';
1270         if (arguments.length > 2) throw 'too many arguments';
1271         return (function(){
1272             try {
1273                 return (function(){
1274                     return l63.fvalue(id, v90, l3);
1275                 })();
1276             }
1277             catch (cf){
1278                 if (cf.type == 'block' && cf.id == 40)
1279                     return cf.value;
1280                 else
1281                     throw cf;
1282             }
1283         })();
1284
1285     }));
1286     return l64;
1287 })();
1288 var l65 = {name: "PSETQ"};
1289 l65;
1290 var l66 = {name: "LIST-LENGTH"};
1291 (function(){
1292     (l66).fvalue = (function(v94){
1293         ((v94)["fname"] = "LIST-LENGTH");
1294         return v94;
1295     })((function (values,v92){
1296         if (arguments.length < 2) throw 'too few arguments';
1297         if (arguments.length > 2) throw 'too many arguments';
1298         return (function(){
1299             try {
1300                 return (function(){
1301                     return (function(v93){
1302                         (function(){
1303                             try {
1304                                 return (function(){
1305                                     return (function(){
1306                                         while(l26.fvalue(id, l11.fvalue(id, v92)) !== l3.value){
1307                                             (v93 = (function(){
1308                                                 var x1 = v93;
1309                                                 if (typeof x1 !== 'number') throw 'Not a number!';
1310                                                 var x2 = 1;
1311                                                 if (typeof x2 !== 'number') throw 'Not a number!';
1312                                                 return x1+x2;
1313                                             })());
1314                                             (v92 = (function(){
1315                                                 var tmp = v92;
1316                                                 return tmp === l3.value? l3.value: tmp.cdr;
1317                                             })());
1318                                         }return l3.value;
1319                                     })();
1320                                 })();
1321                             }
1322                             catch (cf){
1323                                 if (cf.type == 'block' && cf.id == 42)
1324                                     return cf.value;
1325                                 else
1326                                     throw cf;
1327                             }
1328                         })();
1329                         return v93;
1330                     })(0);
1331                 })();
1332             }
1333             catch (cf){
1334                 if (cf.type == 'block' && cf.id == 41)
1335                     return cf.value;
1336                 else
1337                     throw cf;
1338             }
1339         })();
1340
1341     }));
1342     return l66;
1343 })();
1344 var l67 = {name: "LENGTH"};
1345 (function(){
1346     (l67).fvalue = (function(v96){
1347         ((v96)["fname"] = "LENGTH");
1348         return v96;
1349     })((function (values,v95){
1350         if (arguments.length < 2) throw 'too few arguments';
1351         if (arguments.length > 2) throw 'too many arguments';
1352         return (function(){
1353             try {
1354                 return (function(){
1355                     return (((typeof(v95) == "string")?l4.value: l3.value) !== l3.value ? (function(){
1356                         return (function(){
1357                             var x = v95;
1358                             if (typeof x != 'string')
1359                                 throw 'The value ' + x + ' is not a type string.';
1360                             return x.length;
1361                         })();
1362                     })() : (((function(){
1363                         var x = v95;
1364                         return typeof x === 'object' && 'length' in x;
1365                     })()?l4.value: l3.value) !== l3.value ? (function(){
1366                         return (function(){
1367                             var tmp = (v95)["length"];
1368                             return tmp == undefined? l3.value: tmp ;
1369                         })();
1370                     })() : ((function(){
1371                         var symbol = l57;
1372                         var func = symbol.fvalue;
1373                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1374                         return func;
1375                     })()(id, v95) !== l3.value ? (function(){
1376                         return l66.fvalue(id, v95);
1377                     })() : l3.value)));
1378                 })();
1379             }
1380             catch (cf){
1381                 if (cf.type == 'block' && cf.id == 43)
1382                     return cf.value;
1383                 else
1384                     throw cf;
1385             }
1386         })();
1387
1388     }));
1389     return l67;
1390 })();
1391 var l68 = {name: "CONCAT-TWO"};
1392 (function(){
1393     (l68).fvalue = (function(v99){
1394         ((v99)["fname"] = "CONCAT-TWO");
1395         return v99;
1396     })((function (values,v97,v98){
1397         if (arguments.length < 3) throw 'too few arguments';
1398         if (arguments.length > 3) throw 'too many arguments';
1399         return (function(){
1400             try {
1401                 return (function(){
1402                     return (function(){
1403                         var string1 = v97;
1404                         var string2 = v98;
1405                         if (typeof string1 != 'string')
1406                             throw 'The value ' + string1 + ' is not a type string.';
1407                         if (typeof string2 != 'string')
1408                             throw 'The value ' + string2 + ' is not a type string.';
1409                         return string1.concat(string2);
1410                     })();
1411                 })();
1412             }
1413             catch (cf){
1414                 if (cf.type == 'block' && cf.id == 44)
1415                     return cf.value;
1416                 else
1417                     throw cf;
1418             }
1419         })();
1420
1421     }));
1422     return l68;
1423 })();
1424 var l69 = {name: "MAPCAR"};
1425 (function(){
1426     (l69).fvalue = (function(v102){
1427         ((v102)["fname"] = "MAPCAR");
1428         return v102;
1429     })((function (values,v100,v101){
1430         if (arguments.length < 3) throw 'too few arguments';
1431         if (arguments.length > 3) throw 'too many arguments';
1432         return (function(){
1433             try {
1434                 return (function(){
1435                     return (l11.fvalue(id, v101) !== l3.value ? l3 : ({car: (v100)(id, (function(){
1436                         var tmp = v101;
1437                         return tmp === l3.value? l3.value: tmp.car;
1438                     })()), cdr: l69.fvalue(id, v100, (function(){
1439                         var tmp = v101;
1440                         return tmp === l3.value? l3.value: tmp.cdr;
1441                     })())}));
1442                 })();
1443             }
1444             catch (cf){
1445                 if (cf.type == 'block' && cf.id == 45)
1446                     return cf.value;
1447                 else
1448                     throw cf;
1449             }
1450         })();
1451
1452     }));
1453     return l69;
1454 })();
1455 var l70 = {name: "IDENTITY"};
1456 (function(){
1457     (l70).fvalue = (function(v104){
1458         ((v104)["fname"] = "IDENTITY");
1459         return v104;
1460     })((function (values,v103){
1461         if (arguments.length < 2) throw 'too few arguments';
1462         if (arguments.length > 2) throw 'too many arguments';
1463         return (function(){
1464             try {
1465                 return (function(){
1466                     return v103;
1467                 })();
1468             }
1469             catch (cf){
1470                 if (cf.type == 'block' && cf.id == 46)
1471                     return cf.value;
1472                 else
1473                     throw cf;
1474             }
1475         })();
1476
1477     }));
1478     return l70;
1479 })();
1480 var l71 = {name: "COPY-LIST"};
1481 (function(){
1482     (l71).fvalue = (function(v106){
1483         ((v106)["fname"] = "COPY-LIST");
1484         return v106;
1485     })((function (values,v105){
1486         if (arguments.length < 2) throw 'too few arguments';
1487         if (arguments.length > 2) throw 'too many arguments';
1488         return (function(){
1489             try {
1490                 return (function(){
1491                     return l69.fvalue(id, (function(){
1492                         var symbol = l70;
1493                         var func = symbol.fvalue;
1494                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1495                         return func;
1496                     })(), v105);
1497                 })();
1498             }
1499             catch (cf){
1500                 if (cf.type == 'block' && cf.id == 47)
1501                     return cf.value;
1502                 else
1503                     throw cf;
1504             }
1505         })();
1506
1507     }));
1508     return l71;
1509 })();
1510 var l72 = {name: "CODE-CHAR"};
1511 (function(){
1512     (l72).fvalue = (function(v108){
1513         ((v108)["fname"] = "CODE-CHAR");
1514         return v108;
1515     })((function (values,v107){
1516         if (arguments.length < 2) throw 'too few arguments';
1517         if (arguments.length > 2) throw 'too many arguments';
1518         return (function(){
1519             try {
1520                 return (function(){
1521                     return v107;
1522                 })();
1523             }
1524             catch (cf){
1525                 if (cf.type == 'block' && cf.id == 48)
1526                     return cf.value;
1527                 else
1528                     throw cf;
1529             }
1530         })();
1531
1532     }));
1533     return l72;
1534 })();
1535 var l73 = {name: "CHAR-CODE"};
1536 (function(){
1537     (l73).fvalue = (function(v110){
1538         ((v110)["fname"] = "CHAR-CODE");
1539         return v110;
1540     })((function (values,v109){
1541         if (arguments.length < 2) throw 'too few arguments';
1542         if (arguments.length > 2) throw 'too many arguments';
1543         return (function(){
1544             try {
1545                 return (function(){
1546                     return v109;
1547                 })();
1548             }
1549             catch (cf){
1550                 if (cf.type == 'block' && cf.id == 49)
1551                     return cf.value;
1552                 else
1553                     throw cf;
1554             }
1555         })();
1556
1557     }));
1558     return l73;
1559 })();
1560 var l74 = {name: "CHAR="};
1561 (function(){
1562     (l74).fvalue = (function(v113){
1563         ((v113)["fname"] = "CHAR=");
1564         return v113;
1565     })((function (values,v111,v112){
1566         if (arguments.length < 3) throw 'too few arguments';
1567         if (arguments.length > 3) throw 'too many arguments';
1568         return (function(){
1569             try {
1570                 return (function(){
1571                     return (function(){
1572                         var x1 = v111;
1573                         if (typeof x1 !== 'number') throw 'Not a number!';
1574                         var x2 = v112;
1575                         if (typeof x2 !== 'number') throw 'Not a number!';
1576                         return (x1==x2?l4.value: l3.value);
1577                     })();
1578                 })();
1579             }
1580             catch (cf){
1581                 if (cf.type == 'block' && cf.id == 50)
1582                     return cf.value;
1583                 else
1584                     throw cf;
1585             }
1586         })();
1587
1588     }));
1589     return l74;
1590 })();
1591 var l75 = {name: "INTEGERP"};
1592 (function(){
1593     (l75).fvalue = (function(v115){
1594         ((v115)["fname"] = "INTEGERP");
1595         return v115;
1596     })((function (values,v114){
1597         if (arguments.length < 2) throw 'too few arguments';
1598         if (arguments.length > 2) throw 'too many arguments';
1599         return (function(){
1600             try {
1601                 return (function(){
1602                     return (((typeof (v114) == "number")?l4.value: l3.value) !== l3.value ? (function(){
1603                         var x1 = (function(){
1604                             var x = v114;
1605                             if (typeof x != 'number')
1606                                 throw 'The value ' + x + ' is not a type number.';
1607                             return Math.floor(x);
1608                         })();
1609                         if (typeof x1 !== 'number') throw 'Not a number!';
1610                         var x2 = v114;
1611                         if (typeof x2 !== 'number') throw 'Not a number!';
1612                         return (x1==x2?l4.value: l3.value);
1613                     })() : l3.value);
1614                 })();
1615             }
1616             catch (cf){
1617                 if (cf.type == 'block' && cf.id == 51)
1618                     return cf.value;
1619                 else
1620                     throw cf;
1621             }
1622         })();
1623
1624     }));
1625     return l75;
1626 })();
1627 var l76 = {name: "PLUSP"};
1628 (function(){
1629     (l76).fvalue = (function(v117){
1630         ((v117)["fname"] = "PLUSP");
1631         return v117;
1632     })((function (values,v116){
1633         if (arguments.length < 2) throw 'too few arguments';
1634         if (arguments.length > 2) throw 'too many arguments';
1635         return (function(){
1636             try {
1637                 return (function(){
1638                     return (function(){
1639                         var x1 = 0;
1640                         if (typeof x1 !== 'number') throw 'Not a number!';
1641                         var x2 = v116;
1642                         if (typeof x2 !== 'number') throw 'Not a number!';
1643                         return (x1<x2?l4.value: l3.value);
1644                     })();
1645                 })();
1646             }
1647             catch (cf){
1648                 if (cf.type == 'block' && cf.id == 52)
1649                     return cf.value;
1650                 else
1651                     throw cf;
1652             }
1653         })();
1654
1655     }));
1656     return l76;
1657 })();
1658 var l77 = {name: "MINUSP"};
1659 (function(){
1660     (l77).fvalue = (function(v119){
1661         ((v119)["fname"] = "MINUSP");
1662         return v119;
1663     })((function (values,v118){
1664         if (arguments.length < 2) throw 'too few arguments';
1665         if (arguments.length > 2) throw 'too many arguments';
1666         return (function(){
1667             try {
1668                 return (function(){
1669                     return (function(){
1670                         var x1 = v118;
1671                         if (typeof x1 !== 'number') throw 'Not a number!';
1672                         var x2 = 0;
1673                         if (typeof x2 !== 'number') throw 'Not a number!';
1674                         return (x1<x2?l4.value: l3.value);
1675                     })();
1676                 })();
1677             }
1678             catch (cf){
1679                 if (cf.type == 'block' && cf.id == 53)
1680                     return cf.value;
1681                 else
1682                     throw cf;
1683             }
1684         })();
1685
1686     }));
1687     return l77;
1688 })();
1689 (function(){
1690     (l57).fvalue = (function(v122){
1691         ((v122)["fname"] = "LISTP");
1692         return v122;
1693     })((function (values,v120){
1694         if (arguments.length < 2) throw 'too few arguments';
1695         if (arguments.length > 2) throw 'too many arguments';
1696         return (function(){
1697             try {
1698                 return (function(){
1699                     return (function(v121){
1700                         return (v121 !== l3.value ? v121 : l11.fvalue(id, v120));
1701                     })(((function(){
1702                         var tmp = v120;
1703                         return (typeof tmp == 'object' && 'car' in tmp);
1704                     })()?l4.value: l3.value));
1705                 })();
1706             }
1707             catch (cf){
1708                 if (cf.type == 'block' && cf.id == 54)
1709                     return cf.value;
1710                 else
1711                     throw cf;
1712             }
1713         })();
1714
1715     }));
1716     return l57;
1717 })();
1718 var l78 = {name: "NTHCDR"};
1719 (function(){
1720     (l78).fvalue = (function(v125){
1721         ((v125)["fname"] = "NTHCDR");
1722         return v125;
1723     })((function (values,v123,v124){
1724         if (arguments.length < 3) throw 'too few arguments';
1725         if (arguments.length > 3) throw 'too many arguments';
1726         return (function(){
1727             try {
1728                 return (function(){
1729                     (function(){
1730                         try {
1731                             return (function(){
1732                                 return (function(){
1733                                     while((l76.fvalue(id, v123) !== l3.value ? v124 : l3.value) !== l3.value){
1734                                         (v123 = l22.fvalue(id, v123));
1735                                         (v124 = (function(){
1736                                             var tmp = v124;
1737                                             return tmp === l3.value? l3.value: tmp.cdr;
1738                                         })());
1739                                     }return l3.value;
1740                                 })();
1741                             })();
1742                         }
1743                         catch (cf){
1744                             if (cf.type == 'block' && cf.id == 56)
1745                                 return cf.value;
1746                             else
1747                                 throw cf;
1748                         }
1749                     })();
1750                     return v124;
1751                 })();
1752             }
1753             catch (cf){
1754                 if (cf.type == 'block' && cf.id == 55)
1755                     return cf.value;
1756                 else
1757                     throw cf;
1758             }
1759         })();
1760
1761     }));
1762     return l78;
1763 })();
1764 var l79 = {name: "NTH"};
1765 (function(){
1766     (l79).fvalue = (function(v128){
1767         ((v128)["fname"] = "NTH");
1768         return v128;
1769     })((function (values,v126,v127){
1770         if (arguments.length < 3) throw 'too few arguments';
1771         if (arguments.length > 3) throw 'too many arguments';
1772         return (function(){
1773             try {
1774                 return (function(){
1775                     return (function(){
1776                         var tmp = l78.fvalue(id, v126, v127);
1777                         return tmp === l3.value? l3.value: tmp.car;
1778                     })();
1779                 })();
1780             }
1781             catch (cf){
1782                 if (cf.type == 'block' && cf.id == 57)
1783                     return cf.value;
1784                 else
1785                     throw cf;
1786             }
1787         })();
1788
1789     }));
1790     return l79;
1791 })();
1792 var l80 = {name: "LAST"};
1793 (function(){
1794     (l80).fvalue = (function(v130){
1795         ((v130)["fname"] = "LAST");
1796         return v130;
1797     })((function (values,v129){
1798         if (arguments.length < 2) throw 'too few arguments';
1799         if (arguments.length > 2) throw 'too many arguments';
1800         return (function(){
1801             try {
1802                 return (function(){
1803                     (function(){
1804                         try {
1805                             return (function(){
1806                                 return (function(){
1807                                     while(((function(){
1808                                         var tmp = (function(){
1809                                             var tmp = v129;
1810                                             return tmp === l3.value? l3.value: tmp.cdr;
1811                                         })();
1812                                         return (typeof tmp == 'object' && 'car' in tmp);
1813                                     })()?l4.value: l3.value) !== l3.value){
1814                                         (v129 = (function(){
1815                                             var tmp = v129;
1816                                             return tmp === l3.value? l3.value: tmp.cdr;
1817                                         })());
1818                                     }return l3.value;
1819                                 })();
1820                             })();
1821                         }
1822                         catch (cf){
1823                             if (cf.type == 'block' && cf.id == 59)
1824                                 return cf.value;
1825                             else
1826                                 throw cf;
1827                         }
1828                     })();
1829                     return v129;
1830                 })();
1831             }
1832             catch (cf){
1833                 if (cf.type == 'block' && cf.id == 58)
1834                     return cf.value;
1835                 else
1836                     throw cf;
1837             }
1838         })();
1839
1840     }));
1841     return l80;
1842 })();
1843 var l81 = {name: "BUTLAST"};
1844 (function(){
1845     (l81).fvalue = (function(v132){
1846         ((v132)["fname"] = "BUTLAST");
1847         return v132;
1848     })((function (values,v131){
1849         if (arguments.length < 2) throw 'too few arguments';
1850         if (arguments.length > 2) throw 'too many arguments';
1851         return (function(){
1852             try {
1853                 return (function(){
1854                     return (((function(){
1855                         var tmp = (function(){
1856                             var tmp = v131;
1857                             return tmp === l3.value? l3.value: tmp.cdr;
1858                         })();
1859                         return (typeof tmp == 'object' && 'car' in tmp);
1860                     })()?l4.value: l3.value) !== l3.value ? ({car: (function(){
1861                         var tmp = v131;
1862                         return tmp === l3.value? l3.value: tmp.car;
1863                     })(), cdr: l81.fvalue(id, (function(){
1864                         var tmp = v131;
1865                         return tmp === l3.value? l3.value: tmp.cdr;
1866                     })())}) : l3.value);
1867                 })();
1868             }
1869             catch (cf){
1870                 if (cf.type == 'block' && cf.id == 60)
1871                     return cf.value;
1872                 else
1873                     throw cf;
1874             }
1875         })();
1876
1877     }));
1878     return l81;
1879 })();
1880 var l82 = {name: "MEMBER"};
1881 (function(){
1882     (l82).fvalue = (function(v135){
1883         ((v135)["fname"] = "MEMBER");
1884         return v135;
1885     })((function (values,v133,v134){
1886         if (arguments.length < 3) throw 'too few arguments';
1887         if (arguments.length > 3) throw 'too many arguments';
1888         return (function(){
1889             try {
1890                 return (function(){
1891                     return (function(){
1892                         try {
1893                             return (function(){
1894                                 return (function(){
1895                                     while(v134 !== l3.value){
1896                                         (l25.fvalue(id, v133, (function(){
1897                                             var tmp = v134;
1898                                             return tmp === l3.value? l3.value: tmp.car;
1899                                         })()) !== l3.value ? (function(){
1900                                             return (function(){
1901                                                 throw ({type: 'block', id: 62, value: v134, message: 'Return from unknown block NIL.'})
1902                                             })();
1903                                         })() : l3.value);
1904                                         (v134 = (function(){
1905                                             var tmp = v134;
1906                                             return tmp === l3.value? l3.value: tmp.cdr;
1907                                         })());
1908                                     }return l3.value;
1909                                 })();
1910                             })();
1911                         }
1912                         catch (cf){
1913                             if (cf.type == 'block' && cf.id == 62)
1914                                 return cf.value;
1915                             else
1916                                 throw cf;
1917                         }
1918                     })();
1919                 })();
1920             }
1921             catch (cf){
1922                 if (cf.type == 'block' && cf.id == 61)
1923                     return cf.value;
1924                 else
1925                     throw cf;
1926             }
1927         })();
1928
1929     }));
1930     return l82;
1931 })();
1932 var l83 = {name: "REMOVE"};
1933 (function(){
1934     (l83).fvalue = (function(v138){
1935         ((v138)["fname"] = "REMOVE");
1936         return v138;
1937     })((function (values,v136,v137){
1938         if (arguments.length < 3) throw 'too few arguments';
1939         if (arguments.length > 3) throw 'too many arguments';
1940         return (function(){
1941             try {
1942                 return (function(){
1943                     return (l11.fvalue(id, v137) !== l3.value ? (function(){
1944                         return l3.value;
1945                     })() : (l25.fvalue(id, v136, (function(){
1946                         var tmp = v137;
1947                         return tmp === l3.value? l3.value: tmp.car;
1948                     })()) !== l3.value ? (function(){
1949                         return l83.fvalue(id, v136, (function(){
1950                             var tmp = v137;
1951                             return tmp === l3.value? l3.value: tmp.cdr;
1952                         })());
1953                     })() : (function(){
1954                         return ({car: (function(){
1955                             var tmp = v137;
1956                             return tmp === l3.value? l3.value: tmp.car;
1957                         })(), cdr: l83.fvalue(id, v136, (function(){
1958                             var tmp = v137;
1959                             return tmp === l3.value? l3.value: tmp.cdr;
1960                         })())});
1961                     })()));
1962                 })();
1963             }
1964             catch (cf){
1965                 if (cf.type == 'block' && cf.id == 63)
1966                     return cf.value;
1967                 else
1968                     throw cf;
1969             }
1970         })();
1971
1972     }));
1973     return l83;
1974 })();
1975 var l84 = {name: "REMOVE-IF"};
1976 (function(){
1977     (l84).fvalue = (function(v141){
1978         ((v141)["fname"] = "REMOVE-IF");
1979         return v141;
1980     })((function (values,v139,v140){
1981         if (arguments.length < 3) throw 'too few arguments';
1982         if (arguments.length > 3) throw 'too many arguments';
1983         return (function(){
1984             try {
1985                 return (function(){
1986                     return (l11.fvalue(id, v140) !== l3.value ? (function(){
1987                         return l3.value;
1988                     })() : ((v139)(id, (function(){
1989                         var tmp = v140;
1990                         return tmp === l3.value? l3.value: tmp.car;
1991                     })()) !== l3.value ? (function(){
1992                         return l84.fvalue(id, v139, (function(){
1993                             var tmp = v140;
1994                             return tmp === l3.value? l3.value: tmp.cdr;
1995                         })());
1996                     })() : (function(){
1997                         return ({car: (function(){
1998                             var tmp = v140;
1999                             return tmp === l3.value? l3.value: tmp.car;
2000                         })(), cdr: l84.fvalue(id, v139, (function(){
2001                             var tmp = v140;
2002                             return tmp === l3.value? l3.value: tmp.cdr;
2003                         })())});
2004                     })()));
2005                 })();
2006             }
2007             catch (cf){
2008                 if (cf.type == 'block' && cf.id == 64)
2009                     return cf.value;
2010                 else
2011                     throw cf;
2012             }
2013         })();
2014
2015     }));
2016     return l84;
2017 })();
2018 var l85 = {name: "REMOVE-IF-NOT"};
2019 (function(){
2020     (l85).fvalue = (function(v144){
2021         ((v144)["fname"] = "REMOVE-IF-NOT");
2022         return v144;
2023     })((function (values,v142,v143){
2024         if (arguments.length < 3) throw 'too few arguments';
2025         if (arguments.length > 3) throw 'too many arguments';
2026         return (function(){
2027             try {
2028                 return (function(){
2029                     return (l11.fvalue(id, v143) !== l3.value ? (function(){
2030                         return l3.value;
2031                     })() : ((v142)(id, (function(){
2032                         var tmp = v143;
2033                         return tmp === l3.value? l3.value: tmp.car;
2034                     })()) !== l3.value ? (function(){
2035                         return ({car: (function(){
2036                             var tmp = v143;
2037                             return tmp === l3.value? l3.value: tmp.car;
2038                         })(), cdr: l85.fvalue(id, v142, (function(){
2039                             var tmp = v143;
2040                             return tmp === l3.value? l3.value: tmp.cdr;
2041                         })())});
2042                     })() : (function(){
2043                         return l85.fvalue(id, v142, (function(){
2044                             var tmp = v143;
2045                             return tmp === l3.value? l3.value: tmp.cdr;
2046                         })());
2047                     })()));
2048                 })();
2049             }
2050             catch (cf){
2051                 if (cf.type == 'block' && cf.id == 65)
2052                     return cf.value;
2053                 else
2054                     throw cf;
2055             }
2056         })();
2057
2058     }));
2059     return l85;
2060 })();
2061 var l86 = {name: "DIGIT-CHAR-P"};
2062 (function(){
2063     (l86).fvalue = (function(v146){
2064         ((v146)["fname"] = "DIGIT-CHAR-P");
2065         return v146;
2066     })((function (values,v145){
2067         if (arguments.length < 2) throw 'too few arguments';
2068         if (arguments.length > 2) throw 'too many arguments';
2069         return (function(){
2070             try {
2071                 return (function(){
2072                     return (((function(){
2073                         var x1 = 48;
2074                         if (typeof x1 !== 'number') throw 'Not a number!';
2075                         var x2 = v145;
2076                         if (typeof x2 !== 'number') throw 'Not a number!';
2077                         return (x1<=x2?l4.value: l3.value);
2078                     })() !== l3.value ? (function(){
2079                         var x1 = v145;
2080                         if (typeof x1 !== 'number') throw 'Not a number!';
2081                         var x2 = 57;
2082                         if (typeof x2 !== 'number') throw 'Not a number!';
2083                         return (x1<=x2?l4.value: l3.value);
2084                     })() : l3.value) !== l3.value ? (function(){
2085                         var x1 = v145;
2086                         if (typeof x1 !== 'number') throw 'Not a number!';
2087                         var x2 = 48;
2088                         if (typeof x2 !== 'number') throw 'Not a number!';
2089                         return x1-x2;
2090                     })() : l3.value);
2091                 })();
2092             }
2093             catch (cf){
2094                 if (cf.type == 'block' && cf.id == 66)
2095                     return cf.value;
2096                 else
2097                     throw cf;
2098             }
2099         })();
2100
2101     }));
2102     return l86;
2103 })();
2104 var l87 = {name: "SUBSEQ"};
2105 (function(){
2106     (l87).fvalue = (function(v150){
2107         ((v150)["fname"] = "SUBSEQ");
2108         return v150;
2109     })((function (values,v147,v148,v149){
2110         if (arguments.length < 3) throw 'too few arguments';
2111         if (arguments.length > 4) throw 'too many arguments';
2112         switch(arguments.length-1){
2113         case 2:
2114         v149=l3.value;
2115         default: break;
2116         }
2117         return (function(){
2118             try {
2119                 return (function(){
2120                     return (((typeof(v147) == "string")?l4.value: l3.value) !== l3.value ? (function(){
2121                         return (v149 !== l3.value ? (function(){
2122                             var str = v147;
2123                             var a = v148;
2124                             var b;
2125                             b = v149;
2126                             return str.slice(a,b);
2127                         })() : (function(){
2128                             var str = v147;
2129                             var a = v148;
2130                             var b;
2131                             return str.slice(a,b);
2132                         })());
2133                     })() : (function(){
2134                         return (function(){
2135                             throw "Unsupported argument.";
2136                         })();
2137                     })());
2138                 })();
2139             }
2140             catch (cf){
2141                 if (cf.type == 'block' && cf.id == 67)
2142                     return cf.value;
2143                 else
2144                     throw cf;
2145             }
2146         })();
2147
2148     }));
2149     return l87;
2150 })();
2151 var l88 = {name: "PARSE-INTEGER"};
2152 (function(){
2153     (l88).fvalue = (function(v155){
2154         ((v155)["fname"] = "PARSE-INTEGER");
2155         return v155;
2156     })((function (values,v151){
2157         if (arguments.length < 2) throw 'too few arguments';
2158         if (arguments.length > 2) throw 'too many arguments';
2159         return (function(){
2160             try {
2161                 return (function(){
2162                     return (function(v152,v153,v154){
2163                         (function(){
2164                             try {
2165                                 return (function(){
2166                                     return (function(){
2167                                         while((function(){
2168                                             var x1 = v153;
2169                                             if (typeof x1 !== 'number') throw 'Not a number!';
2170                                             var x2 = v154;
2171                                             if (typeof x2 !== 'number') throw 'Not a number!';
2172                                             return (x1<x2?l4.value: l3.value);
2173                                         })() !== l3.value){
2174                                             (v152 = (function(){
2175                                                 var x1 = (function(){
2176                                                     var x1 = v152;
2177                                                     if (typeof x1 !== 'number') throw 'Not a number!';
2178                                                     var x2 = 10;
2179                                                     if (typeof x2 !== 'number') throw 'Not a number!';
2180                                                     return x1*x2;
2181                                                 })();
2182                                                 if (typeof x1 !== 'number') throw 'Not a number!';
2183                                                 var x2 = l86.fvalue(id, (function(){
2184                                                     var string = v151;
2185                                                     var index = v153;
2186                                                     if (typeof string != 'string')
2187                                                         throw 'The value ' + string + ' is not a type string.';
2188                                                     if (typeof index != 'number')
2189                                                         throw 'The value ' + index + ' is not a type number.';
2190                                                     return string.charCodeAt(index);
2191                                                 })());
2192                                                 if (typeof x2 !== 'number') throw 'Not a number!';
2193                                                 return x1+x2;
2194                                             })());
2195                                             (v153 = (function(){
2196                                                 var x1 = v153;
2197                                                 if (typeof x1 !== 'number') throw 'Not a number!';
2198                                                 var x2 = 1;
2199                                                 if (typeof x2 !== 'number') throw 'Not a number!';
2200                                                 return x1+x2;
2201                                             })());
2202                                         }return l3.value;
2203                                     })();
2204                                 })();
2205                             }
2206                             catch (cf){
2207                                 if (cf.type == 'block' && cf.id == 69)
2208                                     return cf.value;
2209                                 else
2210                                     throw cf;
2211                             }
2212                         })();
2213                         return v152;
2214                     })(0,0,l67.fvalue(id, v151));
2215                 })();
2216             }
2217             catch (cf){
2218                 if (cf.type == 'block' && cf.id == 68)
2219                     return cf.value;
2220                 else
2221                     throw cf;
2222             }
2223         })();
2224
2225     }));
2226     return l88;
2227 })();
2228 var l89 = {name: "SOME"};
2229 (function(){
2230     (l89).fvalue = (function(v162){
2231         ((v162)["fname"] = "SOME");
2232         return v162;
2233     })((function (values,v156,v157){
2234         if (arguments.length < 3) throw 'too few arguments';
2235         if (arguments.length > 3) throw 'too many arguments';
2236         return (function(){
2237             try {
2238                 return (function(){
2239                     return (((typeof(v157) == "string")?l4.value: l3.value) !== l3.value ? (function(){
2240                         return (function(v158,v159){
2241                             (function(){
2242                                 try {
2243                                     return (function(){
2244                                         return (function(){
2245                                             while((function(){
2246                                                 var x1 = v158;
2247                                                 if (typeof x1 !== 'number') throw 'Not a number!';
2248                                                 var x2 = v159;
2249                                                 if (typeof x2 !== 'number') throw 'Not a number!';
2250                                                 return (x1<x2?l4.value: l3.value);
2251                                             })() !== l3.value){
2252                                                 ((v156)(id, (function(){
2253                                                     var string = v157;
2254                                                     var index = v158;
2255                                                     if (typeof string != 'string')
2256                                                         throw 'The value ' + string + ' is not a type string.';
2257                                                     if (typeof index != 'number')
2258                                                         throw 'The value ' + index + ' is not a type number.';
2259                                                     return string.charCodeAt(index);
2260                                                 })()) !== l3.value ? (function(){
2261                                                     return (function(){
2262                                                         throw ({type: 'block', id: 70, value: l4.value, message: 'Return from unknown block SOME.'})
2263                                                     })();
2264                                                 })() : l3.value);
2265                                                 (v158 = (function(){
2266                                                     var x1 = v158;
2267                                                     if (typeof x1 !== 'number') throw 'Not a number!';
2268                                                     var x2 = 1;
2269                                                     if (typeof x2 !== 'number') throw 'Not a number!';
2270                                                     return x1+x2;
2271                                                 })());
2272                                             }return l3.value;
2273                                         })();
2274                                     })();
2275                                 }
2276                                 catch (cf){
2277                                     if (cf.type == 'block' && cf.id == 71)
2278                                         return cf.value;
2279                                     else
2280                                         throw cf;
2281                                 }
2282                             })();
2283                             return l3.value;
2284                         })(0,l67.fvalue(id, v157));
2285                     })() : (l57.fvalue(id, v157) !== l3.value ? (function(){
2286                         return (function(){
2287                             try {
2288                                 return (function(){
2289                                     return (function(v160,v161){
2290                                         (function(){
2291                                             while(v160 !== l3.value){
2292                                                 (v161 = (function(){
2293                                                     var tmp = v160;
2294                                                     return tmp === l3.value? l3.value: tmp.car;
2295                                                 })());
2296                                                 (function(){
2297                                                     ((v156)(id, v161) !== l3.value ? (function(){
2298                                                         return (function(){
2299                                                             throw ({type: 'block', id: 72, value: l4.value, message: 'Return from unknown block NIL.'})
2300                                                         })();
2301                                                     })() : l3.value);
2302                                                     return l3.value;
2303                                                 })();
2304                                                 (v160 = (function(){
2305                                                     var tmp = v160;
2306                                                     return tmp === l3.value? l3.value: tmp.cdr;
2307                                                 })());
2308                                             }return l3.value;
2309                                         })();
2310                                         return l3.value;
2311                                     })(v157,l3.value);
2312                                 })();
2313                             }
2314                             catch (cf){
2315                                 if (cf.type == 'block' && cf.id == 72)
2316                                     return cf.value;
2317                                 else
2318                                     throw cf;
2319                             }
2320                         })();
2321                     })() : (function(){
2322                         return (function(){
2323                             throw "Unknown sequence.";
2324                         })();
2325                     })()));
2326                 })();
2327             }
2328             catch (cf){
2329                 if (cf.type == 'block' && cf.id == 70)
2330                     return cf.value;
2331                 else
2332                     throw cf;
2333             }
2334         })();
2335
2336     }));
2337     return l89;
2338 })();
2339 var l90 = {name: "EVERY"};
2340 (function(){
2341     (l90).fvalue = (function(v169){
2342         ((v169)["fname"] = "EVERY");
2343         return v169;
2344     })((function (values,v163,v164){
2345         if (arguments.length < 3) throw 'too few arguments';
2346         if (arguments.length > 3) throw 'too many arguments';
2347         return (function(){
2348             try {
2349                 return (function(){
2350                     return (((typeof(v164) == "string")?l4.value: l3.value) !== l3.value ? (function(){
2351                         return (function(v165,v166){
2352                             (function(){
2353                                 try {
2354                                     return (function(){
2355                                         return (function(){
2356                                             while((function(){
2357                                                 var x1 = v165;
2358                                                 if (typeof x1 !== 'number') throw 'Not a number!';
2359                                                 var x2 = v166;
2360                                                 if (typeof x2 !== 'number') throw 'Not a number!';
2361                                                 return (x1<x2?l4.value: l3.value);
2362                                             })() !== l3.value){
2363                                                 ((v163)(id, (function(){
2364                                                     var string = v164;
2365                                                     var index = v165;
2366                                                     if (typeof string != 'string')
2367                                                         throw 'The value ' + string + ' is not a type string.';
2368                                                     if (typeof index != 'number')
2369                                                         throw 'The value ' + index + ' is not a type number.';
2370                                                     return string.charCodeAt(index);
2371                                                 })()) !== l3.value ? l3.value : (function(){
2372                                                     return (function(){
2373                                                         throw ({type: 'block', id: 73, value: l3.value, message: 'Return from unknown block EVERY.'})
2374                                                     })();
2375                                                 })());
2376                                                 (v165 = (function(){
2377                                                     var x1 = v165;
2378                                                     if (typeof x1 !== 'number') throw 'Not a number!';
2379                                                     var x2 = 1;
2380                                                     if (typeof x2 !== 'number') throw 'Not a number!';
2381                                                     return x1+x2;
2382                                                 })());
2383                                             }return l3.value;
2384                                         })();
2385                                     })();
2386                                 }
2387                                 catch (cf){
2388                                     if (cf.type == 'block' && cf.id == 74)
2389                                         return cf.value;
2390                                     else
2391                                         throw cf;
2392                                 }
2393                             })();
2394                             return l4.value;
2395                         })(0,l67.fvalue(id, v164));
2396                     })() : (l57.fvalue(id, v164) !== l3.value ? (function(){
2397                         return (function(){
2398                             try {
2399                                 return (function(){
2400                                     return (function(v167,v168){
2401                                         (function(){
2402                                             while(v167 !== l3.value){
2403                                                 (v168 = (function(){
2404                                                     var tmp = v167;
2405                                                     return tmp === l3.value? l3.value: tmp.car;
2406                                                 })());
2407                                                 (function(){
2408                                                     ((v163)(id, v168) !== l3.value ? l3.value : (function(){
2409                                                         return (function(){
2410                                                             throw ({type: 'block', id: 75, value: l3.value, message: 'Return from unknown block NIL.'})
2411                                                         })();
2412                                                     })());
2413                                                     return l3.value;
2414                                                 })();
2415                                                 (v167 = (function(){
2416                                                     var tmp = v167;
2417                                                     return tmp === l3.value? l3.value: tmp.cdr;
2418                                                 })());
2419                                             }return l3.value;
2420                                         })();
2421                                         return l4.value;
2422                                     })(v164,l3.value);
2423                                 })();
2424                             }
2425                             catch (cf){
2426                                 if (cf.type == 'block' && cf.id == 75)
2427                                     return cf.value;
2428                                 else
2429                                     throw cf;
2430                             }
2431                         })();
2432                     })() : (function(){
2433                         return (function(){
2434                             throw "Unknown sequence.";
2435                         })();
2436                     })()));
2437                 })();
2438             }
2439             catch (cf){
2440                 if (cf.type == 'block' && cf.id == 73)
2441                     return cf.value;
2442                 else
2443                     throw cf;
2444             }
2445         })();
2446
2447     }));
2448     return l90;
2449 })();
2450 var l91 = {name: "ASSOC"};
2451 (function(){
2452     (l91).fvalue = (function(v172){
2453         ((v172)["fname"] = "ASSOC");
2454         return v172;
2455     })((function (values,v170,v171){
2456         if (arguments.length < 3) throw 'too few arguments';
2457         if (arguments.length > 3) throw 'too many arguments';
2458         return (function(){
2459             try {
2460                 return (function(){
2461                     (function(){
2462                         try {
2463                             return (function(){
2464                                 return (function(){
2465                                     while(v171 !== l3.value){
2466                                         (l25.fvalue(id, v170, l31.fvalue(id, v171)) !== l3.value ? (function(){
2467                                             throw ({type: 'block', id: 77, value: l3.value, message: 'Return from unknown block NIL.'})
2468                                         })() : (v171 = (function(){
2469                                             var tmp = v171;
2470                                             return tmp === l3.value? l3.value: tmp.cdr;
2471                                         })()));
2472                                     }return l3.value;
2473                                 })();
2474                             })();
2475                         }
2476                         catch (cf){
2477                             if (cf.type == 'block' && cf.id == 77)
2478                                 return cf.value;
2479                             else
2480                                 throw cf;
2481                         }
2482                     })();
2483                     return (function(){
2484                         var tmp = v171;
2485                         return tmp === l3.value? l3.value: tmp.car;
2486                     })();
2487                 })();
2488             }
2489             catch (cf){
2490                 if (cf.type == 'block' && cf.id == 76)
2491                     return cf.value;
2492                 else
2493                     throw cf;
2494             }
2495         })();
2496
2497     }));
2498     return l91;
2499 })();
2500 var l92 = {name: "STRING"};
2501 (function(){
2502     (l92).fvalue = (function(v174){
2503         ((v174)["fname"] = "STRING");
2504         return v174;
2505     })((function (values,v173){
2506         if (arguments.length < 2) throw 'too few arguments';
2507         if (arguments.length > 2) throw 'too many arguments';
2508         return (function(){
2509             try {
2510                 return (function(){
2511                     return (((typeof(v173) == "string")?l4.value: l3.value) !== l3.value ? (function(){
2512                         return v173;
2513                     })() : (((function(){
2514                         var tmp = v173;
2515                         return (typeof tmp == 'object' && 'name' in tmp);
2516                     })()?l4.value: l3.value) !== l3.value ? (function(){
2517                         return (v173).name;
2518                     })() : (function(){
2519                         return (function(){
2520                             var x = v173;
2521                             if (typeof x != 'number')
2522                                 throw 'The value ' + x + ' is not a type number.';
2523                             return String.fromCharCode(x);
2524                         })();
2525                     })()));
2526                 })();
2527             }
2528             catch (cf){
2529                 if (cf.type == 'block' && cf.id == 78)
2530                     return cf.value;
2531                 else
2532                     throw cf;
2533             }
2534         })();
2535
2536     }));
2537     return l92;
2538 })();
2539 var l93 = {name: "STRING="};
2540 (function(){
2541     (l93).fvalue = (function(v177){
2542         ((v177)["fname"] = "STRING=");
2543         return v177;
2544     })((function (values,v175,v176){
2545         if (arguments.length < 3) throw 'too few arguments';
2546         if (arguments.length > 3) throw 'too many arguments';
2547         return (function(){
2548             try {
2549                 return (function(){
2550                     return ((v175 == v176)?l4.value: l3.value);
2551                 })();
2552             }
2553             catch (cf){
2554                 if (cf.type == 'block' && cf.id == 79)
2555                     return cf.value;
2556                 else
2557                     throw cf;
2558             }
2559         })();
2560
2561     }));
2562     return l93;
2563 })();
2564 var l94 = {name: "FDEFINITION"};
2565 (function(){
2566     (l94).fvalue = (function(v179){
2567         ((v179)["fname"] = "FDEFINITION");
2568         return v179;
2569     })((function (values,v178){
2570         if (arguments.length < 2) throw 'too few arguments';
2571         if (arguments.length > 2) throw 'too many arguments';
2572         return (function(){
2573             try {
2574                 return (function(){
2575                     return (((typeof v178 == 'function')?l4.value: l3.value) !== l3.value ? (function(){
2576                         return v178;
2577                     })() : (((function(){
2578                         var tmp = v178;
2579                         return (typeof tmp == 'object' && 'name' in tmp);
2580                     })()?l4.value: l3.value) !== l3.value ? (function(){
2581                         return (function(){
2582                             var symbol = v178;
2583                             var func = symbol.fvalue;
2584                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2585                             return func;
2586                         })();
2587                     })() : (function(){
2588                         return (function(){
2589                             throw "Invalid function";
2590                         })();
2591                     })()));
2592                 })();
2593             }
2594             catch (cf){
2595                 if (cf.type == 'block' && cf.id == 80)
2596                     return cf.value;
2597                 else
2598                     throw cf;
2599             }
2600         })();
2601
2602     }));
2603     return l94;
2604 })();
2605 var l95 = {name: "DISASSEMBLE"};
2606 var l96 = {name: "WRITE-LINE"};
2607 (function(){
2608     (l95).fvalue = (function(v181){
2609         ((v181)["fname"] = "DISASSEMBLE");
2610         return v181;
2611     })((function (values,v180){
2612         if (arguments.length < 2) throw 'too few arguments';
2613         if (arguments.length > 2) throw 'too many arguments';
2614         return (function(){
2615             try {
2616                 return (function(){
2617                     (function(){
2618                         var symbol = l96;
2619                         var func = symbol.fvalue;
2620                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2621                         return func;
2622                     })()(id, (l94.fvalue(id, v180)).toString());
2623                     return l3.value;
2624                 })();
2625             }
2626             catch (cf){
2627                 if (cf.type == 'block' && cf.id == 81)
2628                     return cf.value;
2629                 else
2630                     throw cf;
2631             }
2632         })();
2633
2634     }));
2635     return l95;
2636 })();
2637 var l97 = {name: "DOCUMENTATION"};
2638 var l98 = {name: "FUNCTION"};
2639 var l99 = {name: "VARIABLE"};
2640 (function(){
2641     (l97).fvalue = (function(v186){
2642         ((v186)["fname"] = "DOCUMENTATION");
2643         return v186;
2644     })((function(){
2645         var func = (function (values,v182,v183){
2646             if (arguments.length < 3) throw 'too few arguments';
2647             if (arguments.length > 3) throw 'too many arguments';
2648             return (function(){
2649                 try {
2650                     return (function(){
2651                         return (function(v184){
2652                             return (l25.fvalue(id, v184, l98) !== l3.value ? (function(){
2653                                 return (function(v185){
2654                                     return (function(){
2655                                         var tmp = (v185)["docstring"];
2656                                         return tmp == undefined? l3.value: tmp ;
2657                                     })();
2658                                 })(l94.fvalue(id, v182));
2659                             })() : (l25.fvalue(id, v184, l99) !== l3.value ? (function(){
2660                                 (((function(){
2661                                     var tmp = v182;
2662                                     return (typeof tmp == 'object' && 'name' in tmp);
2663                                 })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
2664                                     return (function(){
2665                                         throw "Wrong argument type! it should be a symbol";
2666                                     })();
2667                                 })());
2668                                 return (function(){
2669                                     var tmp = (v182)["vardoc"];
2670                                     return tmp == undefined? l3.value: tmp ;
2671                                 })();
2672                             })() : (function(){
2673                                 return (function(){
2674                                     throw "ECASE expression failed.";
2675                                 })();
2676                             })()));
2677                         })(v183);
2678                     })();
2679                 }
2680                 catch (cf){
2681                     if (cf.type == 'block' && cf.id == 82)
2682                         return cf.value;
2683                     else
2684                         throw cf;
2685                 }
2686             })();
2687
2688         });
2689         func.docstring = 'Return the documentation of X. TYPE must be the symbol VARIABLE or FUNCTION.';
2690         return func;
2691     })());
2692     return l97;
2693 })();
2694 var l100 = {name: "*PACKAGE-LIST*"};
2695 (function(){
2696     (((l100.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
2697         return ((l100).value = l3.value);
2698     })());
2699     return l100;
2700 })();
2701 var l101 = {name: "LIST-ALL-PACKAGES"};
2702 (function(){
2703     (l101).fvalue = (function(v187){
2704         ((v187)["fname"] = "LIST-ALL-PACKAGES");
2705         return v187;
2706     })((function (values){
2707         if (arguments.length > 1) throw 'too many arguments';
2708         return (function(){
2709             try {
2710                 return (function(){
2711                     return (function(){
2712                         var symbol = l100;
2713                         var value = symbol.value;
2714                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2715                         return value;
2716                     })();
2717                 })();
2718             }
2719             catch (cf){
2720                 if (cf.type == 'block' && cf.id == 83)
2721                     return cf.value;
2722                 else
2723                     throw cf;
2724             }
2725         })();
2726
2727     }));
2728     return l101;
2729 })();
2730 var l102 = {name: "MAKE-PACKAGE"};
2731 var l103 = {name: "FIND-PACKAGE-OR-FAIL"};
2732 (function(){
2733     (l102).fvalue = (function(v192){
2734         ((v192)["fname"] = "MAKE-PACKAGE");
2735         return v192;
2736     })((function (values,v188,v189){
2737         if (arguments.length < 2) throw 'too few arguments';
2738         if (arguments.length > 3) throw 'too many arguments';
2739         switch(arguments.length-1){
2740         case 1:
2741         v189=l3.value;
2742         default: break;
2743         }
2744         return (function(){
2745             try {
2746                 return (function(){
2747                     return (function(v190,v191){
2748                         ((v190)["packageName"] = v188);
2749                         ((v190)["symbols"] = {});
2750                         ((v190)["exports"] = {});
2751                         ((v190)["use"] = v191);
2752                         ((l100).value = ({car: v190, cdr: (function(){
2753                             var symbol = l100;
2754                             var value = symbol.value;
2755                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2756                             return value;
2757                         })()}));
2758                         return v190;
2759                     })({},l69.fvalue(id, (function(){
2760                         var symbol = l103;
2761                         var func = symbol.fvalue;
2762                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2763                         return func;
2764                     })(), v189));
2765                 })();
2766             }
2767             catch (cf){
2768                 if (cf.type == 'block' && cf.id == 84)
2769                     return cf.value;
2770                 else
2771                     throw cf;
2772             }
2773         })();
2774
2775     }));
2776     return l102;
2777 })();
2778 var l104 = {name: "PACKAGEP"};
2779 (function(){
2780     (l104).fvalue = (function(v194){
2781         ((v194)["fname"] = "PACKAGEP");
2782         return v194;
2783     })((function (values,v193){
2784         if (arguments.length < 2) throw 'too few arguments';
2785         if (arguments.length > 2) throw 'too many arguments';
2786         return (function(){
2787             try {
2788                 return (function(){
2789                     return (((typeof (v193) === 'object')?l4.value: l3.value) !== l3.value ? ((("symbols") in (v193))?l4.value: l3.value) : l3.value);
2790                 })();
2791             }
2792             catch (cf){
2793                 if (cf.type == 'block' && cf.id == 85)
2794                     return cf.value;
2795                 else
2796                     throw cf;
2797             }
2798         })();
2799
2800     }));
2801     return l104;
2802 })();
2803 var l105 = {name: "FIND-PACKAGE"};
2804 var l106 = {name: "PACKAGE-NAME"};
2805 (function(){
2806     (l105).fvalue = (function(v199){
2807         ((v199)["fname"] = "FIND-PACKAGE");
2808         return v199;
2809     })((function (values,v195){
2810         if (arguments.length < 2) throw 'too few arguments';
2811         if (arguments.length > 2) throw 'too many arguments';
2812         return (function(){
2813             try {
2814                 return (function(){
2815                     (l104.fvalue(id, v195) !== l3.value ? (function(){
2816                         return (function(){
2817                             throw ({type: 'block', id: 86, value: v195, message: 'Return from unknown block FIND-PACKAGE.'})
2818                         })();
2819                     })() : l3.value);
2820                     return (function(v196){
2821                         return (function(){
2822                             try {
2823                                 return (function(){
2824                                     return (function(v197,v198){
2825                                         (function(){
2826                                             while(v197 !== l3.value){
2827                                                 (v198 = (function(){
2828                                                     var tmp = v197;
2829                                                     return tmp === l3.value? l3.value: tmp.car;
2830                                                 })());
2831                                                 (function(){
2832                                                     (l93.fvalue(id, (function(){
2833                                                         var symbol = l106;
2834                                                         var func = symbol.fvalue;
2835                                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2836                                                         return func;
2837                                                     })()(id, v198), v196) !== l3.value ? (function(){
2838                                                         return (function(){
2839                                                             throw ({type: 'block', id: 87, value: v198, message: 'Return from unknown block NIL.'})
2840                                                         })();
2841                                                     })() : l3.value);
2842                                                     return l3.value;
2843                                                 })();
2844                                                 (v197 = (function(){
2845                                                     var tmp = v197;
2846                                                     return tmp === l3.value? l3.value: tmp.cdr;
2847                                                 })());
2848                                             }return l3.value;
2849                                         })();
2850                                         return l3.value;
2851                                     })((function(){
2852                                         var symbol = l100;
2853                                         var value = symbol.value;
2854                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2855                                         return value;
2856                                     })(),l3.value);
2857                                 })();
2858                             }
2859                             catch (cf){
2860                                 if (cf.type == 'block' && cf.id == 87)
2861                                     return cf.value;
2862                                 else
2863                                     throw cf;
2864                             }
2865                         })();
2866                     })(l92.fvalue(id, v195));
2867                 })();
2868             }
2869             catch (cf){
2870                 if (cf.type == 'block' && cf.id == 86)
2871                     return cf.value;
2872                 else
2873                     throw cf;
2874             }
2875         })();
2876
2877     }));
2878     return l105;
2879 })();
2880 (function(){
2881     (l103).fvalue = (function(v202){
2882         ((v202)["fname"] = "FIND-PACKAGE-OR-FAIL");
2883         return v202;
2884     })((function (values,v200){
2885         if (arguments.length < 2) throw 'too few arguments';
2886         if (arguments.length > 2) throw 'too many arguments';
2887         return (function(){
2888             try {
2889                 return (function(){
2890                     return (function(v201){
2891                         return (v201 !== l3.value ? v201 : (function(){
2892                             throw "Package unknown.";
2893                         })());
2894                     })(l105.fvalue(id, v200));
2895                 })();
2896             }
2897             catch (cf){
2898                 if (cf.type == 'block' && cf.id == 88)
2899                     return cf.value;
2900                 else
2901                     throw cf;
2902             }
2903         })();
2904
2905     }));
2906     return l103;
2907 })();
2908 (function(){
2909     (l106).fvalue = (function(v205){
2910         ((v205)["fname"] = "PACKAGE-NAME");
2911         return v205;
2912     })((function (values,v203){
2913         if (arguments.length < 2) throw 'too few arguments';
2914         if (arguments.length > 2) throw 'too many arguments';
2915         return (function(){
2916             try {
2917                 return (function(){
2918                     return (function(v204){
2919                         return (function(){
2920                             var tmp = (v204)["packageName"];
2921                             return tmp == undefined? l3.value: tmp ;
2922                         })();
2923                     })(l103.fvalue(id, v203));
2924                 })();
2925             }
2926             catch (cf){
2927                 if (cf.type == 'block' && cf.id == 89)
2928                     return cf.value;
2929                 else
2930                     throw cf;
2931             }
2932         })();
2933
2934     }));
2935     return l106;
2936 })();
2937 var l107 = {name: "%PACKAGE-SYMBOLS"};
2938 (function(){
2939     (l107).fvalue = (function(v208){
2940         ((v208)["fname"] = "%PACKAGE-SYMBOLS");
2941         return v208;
2942     })((function (values,v206){
2943         if (arguments.length < 2) throw 'too few arguments';
2944         if (arguments.length > 2) throw 'too many arguments';
2945         return (function(){
2946             try {
2947                 return (function(){
2948                     return (function(v207){
2949                         return (function(){
2950                             var tmp = (v207)["symbols"];
2951                             return tmp == undefined? l3.value: tmp ;
2952                         })();
2953                     })(l103.fvalue(id, v206));
2954                 })();
2955             }
2956             catch (cf){
2957                 if (cf.type == 'block' && cf.id == 90)
2958                     return cf.value;
2959                 else
2960                     throw cf;
2961             }
2962         })();
2963
2964     }));
2965     return l107;
2966 })();
2967 var l108 = {name: "PACKAGE-USE-LIST"};
2968 (function(){
2969     (l108).fvalue = (function(v211){
2970         ((v211)["fname"] = "PACKAGE-USE-LIST");
2971         return v211;
2972     })((function (values,v209){
2973         if (arguments.length < 2) throw 'too few arguments';
2974         if (arguments.length > 2) throw 'too many arguments';
2975         return (function(){
2976             try {
2977                 return (function(){
2978                     return (function(v210){
2979                         return (function(){
2980                             var tmp = (v210)["use"];
2981                             return tmp == undefined? l3.value: tmp ;
2982                         })();
2983                     })(l103.fvalue(id, v209));
2984                 })();
2985             }
2986             catch (cf){
2987                 if (cf.type == 'block' && cf.id == 91)
2988                     return cf.value;
2989                 else
2990                     throw cf;
2991             }
2992         })();
2993
2994     }));
2995     return l108;
2996 })();
2997 var l109 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
2998 (function(){
2999     (l109).fvalue = (function(v214){
3000         ((v214)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
3001         return v214;
3002     })((function (values,v212){
3003         if (arguments.length < 2) throw 'too few arguments';
3004         if (arguments.length > 2) throw 'too many arguments';
3005         return (function(){
3006             try {
3007                 return (function(){
3008                     return (function(v213){
3009                         return (function(){
3010                             var tmp = (v213)["exports"];
3011                             return tmp == undefined? l3.value: tmp ;
3012                         })();
3013                     })(l103.fvalue(id, v212));
3014                 })();
3015             }
3016             catch (cf){
3017                 if (cf.type == 'block' && cf.id == 92)
3018                     return cf.value;
3019                 else
3020                     throw cf;
3021             }
3022         })();
3023
3024     }));
3025     return l109;
3026 })();
3027 var l110 = {name: "*COMMON-LISP-PACKAGE*"};
3028 (function(){
3029     (((l110.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
3030         return ((l110).value = l102.fvalue(id, "CL"));
3031     })());
3032     return l110;
3033 })();
3034 var l111 = {name: "*USER-PACKAGE*"};
3035 (function(){
3036     (((l111.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
3037         return ((l111).value = l102.fvalue(id, "CL-USER", l42.fvalue(id, (function(){
3038             var symbol = l110;
3039             var value = symbol.value;
3040             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3041             return value;
3042         })())));
3043     })());
3044     return l111;
3045 })();
3046 var l112 = {name: "*KEYWORD-PACKAGE*"};
3047 (function(){
3048     (((l112.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
3049         return ((l112).value = l102.fvalue(id, "KEYWORD"));
3050     })());
3051     return l112;
3052 })();
3053 var l113 = {name: "KEYWORDP"};
3054 var l114 = {name: "SYMBOL-PACKAGE"};
3055 (function(){
3056     (l113).fvalue = (function(v216){
3057         ((v216)["fname"] = "KEYWORDP");
3058         return v216;
3059     })((function (values,v215){
3060         if (arguments.length < 2) throw 'too few arguments';
3061         if (arguments.length > 2) throw 'too many arguments';
3062         return (function(){
3063             try {
3064                 return (function(){
3065                     return (((function(){
3066                         var tmp = v215;
3067                         return (typeof tmp == 'object' && 'name' in tmp);
3068                     })()?l4.value: l3.value) !== l3.value ? (((function(){
3069                         var symbol = l114;
3070                         var func = symbol.fvalue;
3071                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3072                         return func;
3073                     })()(id, v215) === (function(){
3074                         var symbol = l112;
3075                         var value = symbol.value;
3076                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3077                         return value;
3078                     })())?l4.value: l3.value) : l3.value);
3079                 })();
3080             }
3081             catch (cf){
3082                 if (cf.type == 'block' && cf.id == 93)
3083                     return cf.value;
3084                 else
3085                     throw cf;
3086             }
3087         })();
3088
3089     }));
3090     return l113;
3091 })();
3092 var l115 = {name: "*PACKAGE*"};
3093 (function(){
3094     (((l115.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
3095         return ((l115).value = (function(){
3096             var symbol = l110;
3097             var value = symbol.value;
3098             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3099             return value;
3100         })());
3101     })());
3102     return l115;
3103 })();
3104 var l116 = {name: "IN-PACKAGE"};
3105 l116;
3106 var l117 = {name: "%INTERN-SYMBOL"};
3107 (function(){
3108     (l117).fvalue = (function(v219){
3109         ((v219)["fname"] = "%INTERN-SYMBOL");
3110         return v219;
3111     })((function (values,v217){
3112         if (arguments.length < 2) throw 'too few arguments';
3113         if (arguments.length > 2) throw 'too many arguments';
3114         return (function(){
3115             try {
3116                 return (function(){
3117                     return (function(v218){
3118                         ((v217)["package"] = (function(){
3119                             var symbol = l110;
3120                             var value = symbol.value;
3121                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3122                             return value;
3123                         })());
3124                         return ((v218)[(v217).name] = v217);
3125                     })(l107.fvalue(id, (function(){
3126                         var symbol = l110;
3127                         var value = symbol.value;
3128                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3129                         return value;
3130                     })()));
3131                 })();
3132             }
3133             catch (cf){
3134                 if (cf.type == 'block' && cf.id == 94)
3135                     return cf.value;
3136                 else
3137                     throw cf;
3138             }
3139         })();
3140
3141     }));
3142     return l117;
3143 })();
3144 var l118 = {name: "%FIND-SYMBOL"};
3145 (function(){
3146     (l118).fvalue = (function(v227){
3147         ((v227)["fname"] = "%FIND-SYMBOL");
3148         return v227;
3149     })((function (values,v220,v221){
3150         if (arguments.length < 3) throw 'too few arguments';
3151         if (arguments.length > 3) throw 'too many arguments';
3152         return (function(){
3153             try {
3154                 return (function(){
3155                     return (function(v222){
3156                         return (function(v223){
3157                             return ((((v220) in (v223))?l4.value: l3.value) !== l3.value ? ({car: (function(){
3158                                 var tmp = (v223)[v220];
3159                                 return tmp == undefined? l3.value: tmp ;
3160                             })(), cdr: l4.value}) : (function(){
3161                                 try {
3162                                     return (function(){
3163                                         return (function(v224,v225){
3164                                             (function(){
3165                                                 while(v224 !== l3.value){
3166                                                     (v225 = (function(){
3167                                                         var tmp = v224;
3168                                                         return tmp === l3.value? l3.value: tmp.car;
3169                                                     })());
3170                                                     (function(){
3171                                                         (function(v226){
3172                                                             return ((((v220) in (v226))?l4.value: l3.value) !== l3.value ? (function(){
3173                                                                 return (function(){
3174                                                                     throw ({type: 'block', id: 95, value: ({car: (function(){
3175                                                                         var tmp = (v226)[v220];
3176                                                                         return tmp == undefined? l3.value: tmp ;
3177                                                                     })(), cdr: l4.value}), message: 'Return from unknown block %FIND-SYMBOL.'})
3178                                                                 })();
3179                                                             })() : l3.value);
3180                                                         })(l109.fvalue(id, v225));
3181                                                         return l3.value;
3182                                                     })();
3183                                                     (v224 = (function(){
3184                                                         var tmp = v224;
3185                                                         return tmp === l3.value? l3.value: tmp.cdr;
3186                                                     })());
3187                                                 }return l3.value;
3188                                             })();
3189                                             return ({car: l3.value, cdr: l3.value});
3190                                         })(l108.fvalue(id, v222),l3.value);
3191                                     })();
3192                                 }
3193                                 catch (cf){
3194                                     if (cf.type == 'block' && cf.id == 96)
3195                                         return cf.value;
3196                                     else
3197                                         throw cf;
3198                                 }
3199                             })());
3200                         })(l107.fvalue(id, v222));
3201                     })(l103.fvalue(id, v221));
3202                 })();
3203             }
3204             catch (cf){
3205                 if (cf.type == 'block' && cf.id == 95)
3206                     return cf.value;
3207                 else
3208                     throw cf;
3209             }
3210         })();
3211
3212     }));
3213     return l118;
3214 })();
3215 var l119 = {name: "FIND-SYMBOL"};
3216 (function(){
3217     (l119).fvalue = (function(v230){
3218         ((v230)["fname"] = "FIND-SYMBOL");
3219         return v230;
3220     })((function (values,v228,v229){
3221         if (arguments.length < 2) throw 'too few arguments';
3222         if (arguments.length > 3) throw 'too many arguments';
3223         switch(arguments.length-1){
3224         case 1:
3225         v229=(function(){
3226             var symbol = l115;
3227             var value = symbol.value;
3228             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3229             return value;
3230         })();
3231         default: break;
3232         }
3233         return (function(){
3234             try {
3235                 return (function(){
3236                     return (function(){
3237                         var tmp = l118.fvalue(id, v228, v229);
3238                         return tmp === l3.value? l3.value: tmp.car;
3239                     })();
3240                 })();
3241             }
3242             catch (cf){
3243                 if (cf.type == 'block' && cf.id == 97)
3244                     return cf.value;
3245                 else
3246                     throw cf;
3247             }
3248         })();
3249
3250     }));
3251     return l119;
3252 })();
3253 var l120 = {name: "INTERN"};
3254 var l121 = {name: "EXPORT"};
3255 (function(){
3256     (l120).fvalue = (function(v237){
3257         ((v237)["fname"] = "INTERN");
3258         return v237;
3259     })((function (values,v231,v232){
3260         if (arguments.length < 2) throw 'too few arguments';
3261         if (arguments.length > 3) throw 'too many arguments';
3262         switch(arguments.length-1){
3263         case 1:
3264         v232=(function(){
3265             var symbol = l115;
3266             var value = symbol.value;
3267             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3268             return value;
3269         })();
3270         default: break;
3271         }
3272         return (function(){
3273             try {
3274                 return (function(){
3275                     return (function(v233){
3276                         return (function(v234){
3277                             return ((function(){
3278                                 var tmp = v234;
3279                                 return tmp === l3.value? l3.value: tmp.cdr;
3280                             })() !== l3.value ? (function(){
3281                                 var tmp = v234;
3282                                 return tmp === l3.value? l3.value: tmp.car;
3283                             })() : (function(v235){
3284                                 (function(){
3285                                     var tmp = (v235)[v231];
3286                                     return tmp == undefined? l3.value: tmp ;
3287                                 })();
3288                                 return (function(v236){
3289                                     ((v236)["package"] = v233);
3290                                     (((v233 === (function(){
3291                                         var symbol = l112;
3292                                         var value = symbol.value;
3293                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3294                                         return value;
3295                                     })())?l4.value: l3.value) !== l3.value ? (function(){
3296                                         ((v236)["value"] = v236);
3297                                         return (function(){
3298                                             var symbol = l121;
3299                                             var func = symbol.fvalue;
3300                                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3301                                             return func;
3302                                         })()(id, l42.fvalue(id, v236), v233);
3303                                     })() : l3.value);
3304                                     return ((v235)[v231] = v236);
3305                                 })((function(){
3306                                     var name = v231;
3307                                     if (typeof name != 'string')
3308                                         throw 'The value ' + name + ' is not a type string.';
3309                                     return ({name: name});
3310                                 })());
3311                             })(l107.fvalue(id, v233)));
3312                         })(l118.fvalue(id, v231, v233));
3313                     })(l103.fvalue(id, v232));
3314                 })();
3315             }
3316             catch (cf){
3317                 if (cf.type == 'block' && cf.id == 98)
3318                     return cf.value;
3319                 else
3320                     throw cf;
3321             }
3322         })();
3323
3324     }));
3325     return l120;
3326 })();
3327 (function(){
3328     (l114).fvalue = (function(v239){
3329         ((v239)["fname"] = "SYMBOL-PACKAGE");
3330         return v239;
3331     })((function (values,v238){
3332         if (arguments.length < 2) throw 'too few arguments';
3333         if (arguments.length > 2) throw 'too many arguments';
3334         return (function(){
3335             try {
3336                 return (function(){
3337                     (((function(){
3338                         var tmp = v238;
3339                         return (typeof tmp == 'object' && 'name' in tmp);
3340                     })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
3341                         return (function(){
3342                             throw "it is not a symbol";
3343                         })();
3344                     })());
3345                     return (function(){
3346                         var tmp = (v238)["package"];
3347                         return tmp == undefined? l3.value: tmp ;
3348                     })();
3349                 })();
3350             }
3351             catch (cf){
3352                 if (cf.type == 'block' && cf.id == 99)
3353                     return cf.value;
3354                 else
3355                     throw cf;
3356             }
3357         })();
3358
3359     }));
3360     return l114;
3361 })();
3362 (function(){
3363     (l121).fvalue = (function(v245){
3364         ((v245)["fname"] = "EXPORT");
3365         return v245;
3366     })((function (values,v240,v241){
3367         if (arguments.length < 2) throw 'too few arguments';
3368         if (arguments.length > 3) throw 'too many arguments';
3369         switch(arguments.length-1){
3370         case 1:
3371         v241=(function(){
3372             var symbol = l115;
3373             var value = symbol.value;
3374             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3375             return value;
3376         })();
3377         default: break;
3378         }
3379         return (function(){
3380             try {
3381                 return (function(){
3382                     return (function(v242){
3383                         return (function(){
3384                             try {
3385                                 return (function(){
3386                                     return (function(v243,v244){
3387                                         (function(){
3388                                             while(v243 !== l3.value){
3389                                                 (v244 = (function(){
3390                                                     var tmp = v243;
3391                                                     return tmp === l3.value? l3.value: tmp.car;
3392                                                 })());
3393                                                 (function(){
3394                                                     ((v242)[(v244).name] = v244);
3395                                                     return l3.value;
3396                                                 })();
3397                                                 (v243 = (function(){
3398                                                     var tmp = v243;
3399                                                     return tmp === l3.value? l3.value: tmp.cdr;
3400                                                 })());
3401                                             }return l3.value;
3402                                         })();
3403                                         return l4.value;
3404                                     })(v240,l3.value);
3405                                 })();
3406                             }
3407                             catch (cf){
3408                                 if (cf.type == 'block' && cf.id == 101)
3409                                     return cf.value;
3410                                 else
3411                                     throw cf;
3412                             }
3413                         })();
3414                     })(l109.fvalue(id, v241));
3415                 })();
3416             }
3417             catch (cf){
3418                 if (cf.type == 'block' && cf.id == 100)
3419                     return cf.value;
3420                 else
3421                     throw cf;
3422             }
3423         })();
3424
3425     }));
3426     return l121;
3427 })();
3428 var l122 = {name: "GET-UNIVERSAL-TIME"};
3429 (function(){
3430     (l122).fvalue = (function(v246){
3431         ((v246)["fname"] = "GET-UNIVERSAL-TIME");
3432         return v246;
3433     })((function (values){
3434         if (arguments.length > 1) throw 'too many arguments';
3435         return (function(){
3436             try {
3437                 return (function(){
3438                     return (function(){
3439                         var x1 = (Math.round(new Date() / 1000));
3440                         if (typeof x1 !== 'number') throw 'Not a number!';
3441                         var x2 = 2208988800;
3442                         if (typeof x2 !== 'number') throw 'Not a number!';
3443                         return x1+x2;
3444                     })();
3445                 })();
3446             }
3447             catch (cf){
3448                 if (cf.type == 'block' && cf.id == 102)
3449                     return cf.value;
3450                 else
3451                     throw cf;
3452             }
3453         })();
3454
3455     }));
3456     return l122;
3457 })();
3458 var l123 = {name: "VALUES-LIST"};
3459 (function(){
3460     (l123).fvalue = (function(v248){
3461         ((v248)["fname"] = "VALUES-LIST");
3462         return v248;
3463     })((function (values,v247){
3464         if (arguments.length < 2) throw 'too few arguments';
3465         if (arguments.length > 2) throw 'too many arguments';
3466         return (function(){
3467             try {
3468                 return (function(){
3469                     return values(v247);
3470                 })();
3471             }
3472             catch (cf){
3473                 if (cf.type == 'block' && cf.id == 103)
3474                     return cf.value;
3475                 else
3476                     throw cf;
3477             }
3478         })();
3479
3480     }));
3481     return l123;
3482 })();
3483 var l124 = {name: "VALUES"};
3484 (function(){
3485     (l124).fvalue = (function(v250){
3486         ((v250)["fname"] = "VALUES");
3487         return v250;
3488     })((function (values){
3489         var v249= l3.value;
3490         for (var i = arguments.length-1; i>=1; i--)
3491             v249 = {car: arguments[i], cdr:
3492         v249};
3493         return (function(){
3494             try {
3495                 return (function(){
3496                     return l123.fvalue(id, v249);
3497                 })();
3498             }
3499             catch (cf){
3500                 if (cf.type == 'block' && cf.id == 104)
3501                     return cf.value;
3502                 else
3503                     throw cf;
3504             }
3505         })();
3506
3507     }));
3508     return l124;
3509 })();
3510 var l125 = {name: "*NEWLINE*"};
3511 (function(){
3512     (((l125.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
3513         return ((l125).value = l92.fvalue(id, l72.fvalue(id, 10)));
3514     })());
3515     return l125;
3516 })();
3517 var l126 = {name: "CONCAT"};
3518 (function(){
3519     (l126).fvalue = (function(v252){
3520         ((v252)["fname"] = "CONCAT");
3521         return v252;
3522     })((function (values){
3523         var v251= l3.value;
3524         for (var i = arguments.length-1; i>=1; i--)
3525             v251 = {car: arguments[i], cdr:
3526         v251};
3527         return (function(){
3528             try {
3529                 return (function(){
3530                     return l58.fvalue(id, (function(){
3531                         var symbol = l68;
3532                         var func = symbol.fvalue;
3533                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3534                         return func;
3535                     })(), v251, "");
3536                 })();
3537             }
3538             catch (cf){
3539                 if (cf.type == 'block' && cf.id == 105)
3540                     return cf.value;
3541                 else
3542                     throw cf;
3543             }
3544         })();
3545
3546     }));
3547     return l126;
3548 })();
3549 var l127 = {name: "CONCATF"};
3550 l127;
3551 var l128 = {name: "JOIN"};
3552 (function(){
3553     (l128).fvalue = (function(v255){
3554         ((v255)["fname"] = "JOIN");
3555         return v255;
3556     })((function (values,v253,v254){
3557         if (arguments.length < 2) throw 'too few arguments';
3558         if (arguments.length > 3) throw 'too many arguments';
3559         switch(arguments.length-1){
3560         case 1:
3561         v254="";
3562         default: break;
3563         }
3564         return (function(){
3565             try {
3566                 return (function(){
3567                     return (l11.fvalue(id, v253) !== l3.value ? (function(){
3568                         return "";
3569                     })() : (l11.fvalue(id, (function(){
3570                         var tmp = v253;
3571                         return tmp === l3.value? l3.value: tmp.cdr;
3572                     })()) !== l3.value ? (function(){
3573                         return (function(){
3574                             var tmp = v253;
3575                             return tmp === l3.value? l3.value: tmp.car;
3576                         })();
3577                     })() : (function(){
3578                         return l126.fvalue(id, (function(){
3579                             var tmp = v253;
3580                             return tmp === l3.value? l3.value: tmp.car;
3581                         })(), v254, l128.fvalue(id, (function(){
3582                             var tmp = v253;
3583                             return tmp === l3.value? l3.value: tmp.cdr;
3584                         })(), v254));
3585                     })()));
3586                 })();
3587             }
3588             catch (cf){
3589                 if (cf.type == 'block' && cf.id == 106)
3590                     return cf.value;
3591                 else
3592                     throw cf;
3593             }
3594         })();
3595
3596     }));
3597     return l128;
3598 })();
3599 var l129 = {name: "JOIN-TRAILING"};
3600 (function(){
3601     (l129).fvalue = (function(v258){
3602         ((v258)["fname"] = "JOIN-TRAILING");
3603         return v258;
3604     })((function (values,v256,v257){
3605         if (arguments.length < 2) throw 'too few arguments';
3606         if (arguments.length > 3) throw 'too many arguments';
3607         switch(arguments.length-1){
3608         case 1:
3609         v257="";
3610         default: break;
3611         }
3612         return (function(){
3613             try {
3614                 return (function(){
3615                     return (l11.fvalue(id, v256) !== l3.value ? "" : l126.fvalue(id, (function(){
3616                         var tmp = v256;
3617                         return tmp === l3.value? l3.value: tmp.car;
3618                     })(), v257, l129.fvalue(id, (function(){
3619                         var tmp = v256;
3620                         return tmp === l3.value? l3.value: tmp.cdr;
3621                     })(), v257)));
3622                 })();
3623             }
3624             catch (cf){
3625                 if (cf.type == 'block' && cf.id == 107)
3626                     return cf.value;
3627                 else
3628                     throw cf;
3629             }
3630         })();
3631
3632     }));
3633     return l129;
3634 })();
3635 var l130 = {name: "MAPCONCAT"};
3636 (function(){
3637     (l130).fvalue = (function(v261){
3638         ((v261)["fname"] = "MAPCONCAT");
3639         return v261;
3640     })((function (values,v259,v260){
3641         if (arguments.length < 3) throw 'too few arguments';
3642         if (arguments.length > 3) throw 'too many arguments';
3643         return (function(){
3644             try {
3645                 return (function(){
3646                     return l128.fvalue(id, l69.fvalue(id, v259, v260));
3647                 })();
3648             }
3649             catch (cf){
3650                 if (cf.type == 'block' && cf.id == 108)
3651                     return cf.value;
3652                 else
3653                     throw cf;
3654             }
3655         })();
3656
3657     }));
3658     return l130;
3659 })();
3660 var l131 = {name: "VECTOR-TO-LIST"};
3661 (function(){
3662     (l131).fvalue = (function(v267){
3663         ((v267)["fname"] = "VECTOR-TO-LIST");
3664         return v267;
3665     })((function (values,v262){
3666         if (arguments.length < 2) throw 'too few arguments';
3667         if (arguments.length > 2) throw 'too many arguments';
3668         return (function(){
3669             try {
3670                 return (function(){
3671                     return (function(v263,v264){
3672                         return (function(){
3673                             try {
3674                                 return (function(){
3675                                     return (function(v265,v266){
3676                                         (function(){
3677                                             while((function(){
3678                                                 var x1 = v265;
3679                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3680                                                 var x2 = v266;
3681                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3682                                                 return (x1<x2?l4.value: l3.value);
3683                                             })() !== l3.value){
3684                                                 (function(){
3685                                                     (v263 = ({car: (function(){
3686                                                         var x = (v262)[v265];
3687                                                         if (x === undefined) throw 'Out of range';
3688                                                         return x;
3689                                                     })(), cdr: v263}));
3690                                                     return l3.value;
3691                                                 })();
3692                                                 (v265 = (function(){
3693                                                     var x1 = v265;
3694                                                     if (typeof x1 !== 'number') throw 'Not a number!';
3695                                                     var x2 = 1;
3696                                                     if (typeof x2 !== 'number') throw 'Not a number!';
3697                                                     return x1+x2;
3698                                                 })());
3699                                             }return l3.value;
3700                                         })();
3701                                         return l64.fvalue(id, v263);
3702                                     })(0,v264);
3703                                 })();
3704                             }
3705                             catch (cf){
3706                                 if (cf.type == 'block' && cf.id == 110)
3707                                     return cf.value;
3708                                 else
3709                                     throw cf;
3710                             }
3711                         })();
3712                     })(l3.value,l67.fvalue(id, v262));
3713                 })();
3714             }
3715             catch (cf){
3716                 if (cf.type == 'block' && cf.id == 109)
3717                     return cf.value;
3718                 else
3719                     throw cf;
3720             }
3721         })();
3722
3723     }));
3724     return l131;
3725 })();
3726 var l132 = {name: "LIST-TO-VECTOR"};
3727 (function(){
3728     (l132).fvalue = (function(v273){
3729         ((v273)["fname"] = "LIST-TO-VECTOR");
3730         return v273;
3731     })((function (values,v268){
3732         if (arguments.length < 2) throw 'too few arguments';
3733         if (arguments.length > 2) throw 'too many arguments';
3734         return (function(){
3735             try {
3736                 return (function(){
3737                     return (function(v269,v270){
3738                         return (function(){
3739                             try {
3740                                 return (function(){
3741                                     return (function(v271,v272){
3742                                         (function(){
3743                                             while(v271 !== l3.value){
3744                                                 (v272 = (function(){
3745                                                     var tmp = v271;
3746                                                     return tmp === l3.value? l3.value: tmp.car;
3747                                                 })());
3748                                                 (function(){
3749                                                     (function(){
3750                                                         var x = v269;
3751                                                         var i = v270;
3752                                                         if (i < 0 || i >= x.length) throw 'Out of range';
3753                                                         return x[i] = v272;
3754                                                     })();
3755                                                     (v270 = (function(){
3756                                                         var x1 = v270;
3757                                                         if (typeof x1 !== 'number') throw 'Not a number!';
3758                                                         var x2 = 1;
3759                                                         if (typeof x2 !== 'number') throw 'Not a number!';
3760                                                         return x1+x2;
3761                                                     })());
3762                                                     return l3.value;
3763                                                 })();
3764                                                 (v271 = (function(){
3765                                                     var tmp = v271;
3766                                                     return tmp === l3.value? l3.value: tmp.cdr;
3767                                                 })());
3768                                             }return l3.value;
3769                                         })();
3770                                         return v269;
3771                                     })(v268,l3.value);
3772                                 })();
3773                             }
3774                             catch (cf){
3775                                 if (cf.type == 'block' && cf.id == 112)
3776                                     return cf.value;
3777                                 else
3778                                     throw cf;
3779                             }
3780                         })();
3781                     })((function(){
3782                         var r = [];
3783                         for (var i = 0; i < l67.fvalue(id, v268); i++)
3784                             r.push(l3.value);
3785                         return r;
3786                     })(),0);
3787                 })();
3788             }
3789             catch (cf){
3790                 if (cf.type == 'block' && cf.id == 111)
3791                     return cf.value;
3792                 else
3793                     throw cf;
3794             }
3795         })();
3796
3797     }));
3798     return l132;
3799 })();
3800 var l133 = {name: "INDENT"};
3801 (function(){
3802     (l133).fvalue = (function(v280){
3803         ((v280)["fname"] = "INDENT");
3804         return v280;
3805     })((function (values){
3806         var v274= l3.value;
3807         for (var i = arguments.length-1; i>=1; i--)
3808             v274 = {car: arguments[i], cdr:
3809         v274};
3810         return (function(){
3811             try {
3812                 return (function(){
3813                     return (function(v275){
3814                         return (function(v276,v277,v278){
3815                             (l76.fvalue(id, l67.fvalue(id, v275)) !== l3.value ? (function(){
3816                                 return (v276 = l126.fvalue(id, v276, (function(){
3817                                     return "    ";
3818                                 })()));
3819                             })() : l3.value);
3820                             (function(){
3821                                 try {
3822                                     return (function(){
3823                                         return (function(){
3824                                             while((function(){
3825                                                 var x1 = v277;
3826                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3827                                                 var x2 = v278;
3828                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3829                                                 return (x1<x2?l4.value: l3.value);
3830                                             })() !== l3.value){
3831                                                 (function(v279){
3832                                                     return (v276 = l126.fvalue(id, v276, (function(){
3833                                                         return v279;
3834                                                     })()));
3835                                                 })(((l74.fvalue(id, (function(){
3836                                                     var string = v275;
3837                                                     var index = v277;
3838                                                     if (typeof string != 'string')
3839                                                         throw 'The value ' + string + ' is not a type string.';
3840                                                     if (typeof index != 'number')
3841                                                         throw 'The value ' + index + ' is not a type number.';
3842                                                     return string.charCodeAt(index);
3843                                                 })(), 10) !== l3.value ? ((function(){
3844                                                     var x1 = v277;
3845                                                     if (typeof x1 !== 'number') throw 'Not a number!';
3846                                                     var x2 = l22.fvalue(id, v278);
3847                                                     if (typeof x2 !== 'number') throw 'Not a number!';
3848                                                     return (x1<x2?l4.value: l3.value);
3849                                                 })() !== l3.value ? l26.fvalue(id, l74.fvalue(id, (function(){
3850                                                     var string = v275;
3851                                                     var index = l21.fvalue(id, v277);
3852                                                     if (typeof string != 'string')
3853                                                         throw 'The value ' + string + ' is not a type string.';
3854                                                     if (typeof index != 'number')
3855                                                         throw 'The value ' + index + ' is not a type number.';
3856                                                     return string.charCodeAt(index);
3857                                                 })(), 10)) : l3.value) : l3.value) !== l3.value ? l126.fvalue(id, l92.fvalue(id, 10), "    ") : l92.fvalue(id, (function(){
3858                                                     var string = v275;
3859                                                     var index = v277;
3860                                                     if (typeof string != 'string')
3861                                                         throw 'The value ' + string + ' is not a type string.';
3862                                                     if (typeof index != 'number')
3863                                                         throw 'The value ' + index + ' is not a type number.';
3864                                                     return string.charCodeAt(index);
3865                                                 })())));
3866                                                 (v277 = (function(){
3867                                                     var x1 = v277;
3868                                                     if (typeof x1 !== 'number') throw 'Not a number!';
3869                                                     var x2 = 1;
3870                                                     if (typeof x2 !== 'number') throw 'Not a number!';
3871                                                     return x1+x2;
3872                                                 })());
3873                                             }return l3.value;
3874                                         })();
3875                                     })();
3876                                 }
3877                                 catch (cf){
3878                                     if (cf.type == 'block' && cf.id == 114)
3879                                         return cf.value;
3880                                     else
3881                                         throw cf;
3882                                 }
3883                             })();
3884                             return v276;
3885                         })("",0,l67.fvalue(id, v275));
3886                     })(l128.fvalue(id, v274));
3887                 })();
3888             }
3889             catch (cf){
3890                 if (cf.type == 'block' && cf.id == 113)
3891                     return cf.value;
3892                 else
3893                     throw cf;
3894             }
3895         })();
3896
3897     }));
3898     return l133;
3899 })();
3900 (function(){
3901     (l16).fvalue = (function(v284){
3902         ((v284)["fname"] = "INTEGER-TO-STRING");
3903         return v284;
3904     })((function (values,v281){
3905         if (arguments.length < 2) throw 'too few arguments';
3906         if (arguments.length > 2) throw 'too many arguments';
3907         return (function(){
3908             try {
3909                 return (function(){
3910                     return (l23.fvalue(id, v281) !== l3.value ? (function(){
3911                         return "0";
3912                     })() : (l77.fvalue(id, v281) !== l3.value ? (function(){
3913                         return l126.fvalue(id, "-", l16.fvalue(id, (function(){
3914                             var x1 = 0;
3915                             if (typeof x1 !== 'number') throw 'Not a number!';
3916                             var x2 = v281;
3917                             if (typeof x2 !== 'number') throw 'Not a number!';
3918                             return x1-x2;
3919                         })()));
3920                     })() : (function(){
3921                         return (function(v282){
3922                             (function(){
3923                                 try {
3924                                     return (function(){
3925                                         return (function(){
3926                                             while(l26.fvalue(id, l23.fvalue(id, v281)) !== l3.value){
3927                                                 (v282 = ({car: (function(){
3928                                                     var x = v281;
3929                                                     var y = 10;
3930                                                     if (typeof x != 'number')
3931                                                         throw 'The value ' + x + ' is not a type number.';
3932                                                     if (typeof y != 'number')
3933                                                         throw 'The value ' + y + ' is not a type number.';
3934                                                     return x%y;
3935                                                 })(), cdr: v282}));
3936                                                 (v281 = l24.fvalue(id, v281, 10));
3937                                             }return l3.value;
3938                                         })();
3939                                     })();
3940                                 }
3941                                 catch (cf){
3942                                     if (cf.type == 'block' && cf.id == 116)
3943                                         return cf.value;
3944                                     else
3945                                         throw cf;
3946                                 }
3947                             })();
3948                             return l128.fvalue(id, l69.fvalue(id, (function (values,v283){
3949                                 if (arguments.length < 2) throw 'too few arguments';
3950                                 if (arguments.length > 2) throw 'too many arguments';
3951                                 return l92.fvalue(id, (function(){
3952                                     var string = "0123456789";
3953                                     var index = v283;
3954                                     if (typeof string != 'string')
3955                                         throw 'The value ' + string + ' is not a type string.';
3956                                     if (typeof index != 'number')
3957                                         throw 'The value ' + index + ' is not a type number.';
3958                                     return string.charCodeAt(index);
3959                                 })());
3960
3961                             }), v282));
3962                         })(l3.value);
3963                     })()));
3964                 })();
3965             }
3966             catch (cf){
3967                 if (cf.type == 'block' && cf.id == 115)
3968                     return cf.value;
3969                 else
3970                     throw cf;
3971             }
3972         })();
3973
3974     }));
3975     return l16;
3976 })();
3977 var l134 = {name: "JS!BOOL"};
3978 var l135 = {name: "LS-COMPILE"};
3979 (function(){
3980     (l134).fvalue = (function(v286){
3981         ((v286)["fname"] = "JS!BOOL");
3982         return v286;
3983     })((function (values,v285){
3984         if (arguments.length < 2) throw 'too few arguments';
3985         if (arguments.length > 2) throw 'too many arguments';
3986         return (function(){
3987             try {
3988                 return (function(){
3989                     return l126.fvalue(id, "(", v285, "?", (function(){
3990                         var symbol = l135;
3991                         var func = symbol.fvalue;
3992                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3993                         return func;
3994                     })()(id, l4.value), ": ", (function(){
3995                         var symbol = l135;
3996                         var func = symbol.fvalue;
3997                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3998                         return func;
3999                     })()(id, l3.value), ")");
4000                 })();
4001             }
4002             catch (cf){
4003                 if (cf.type == 'block' && cf.id == 117)
4004                     return cf.value;
4005                 else
4006                     throw cf;
4007             }
4008         })();
4009
4010     }));
4011     return l134;
4012 })();
4013 var l136 = {name: "JS!SELFCALL"};
4014 l136;
4015 var l137 = {name: "PRIN1-TO-STRING"};
4016 var l138 = {name: "ESCAPE-STRING"};
4017 (function(){
4018     (l137).fvalue = (function(v292){
4019         ((v292)["fname"] = "PRIN1-TO-STRING");
4020         return v292;
4021     })((function (values,v287){
4022         if (arguments.length < 2) throw 'too few arguments';
4023         if (arguments.length > 2) throw 'too many arguments';
4024         return (function(){
4025             try {
4026                 return (function(){
4027                     return (((function(){
4028                         var tmp = v287;
4029                         return (typeof tmp == 'object' && 'name' in tmp);
4030                     })()?l4.value: l3.value) !== l3.value ? (function(){
4031                         return ((function(){
4032                             var tmp = l118.fvalue(id, (v287).name, (function(){
4033                                 var symbol = l115;
4034                                 var value = symbol.value;
4035                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4036                                 return value;
4037                             })());
4038                             return tmp === l3.value? l3.value: tmp.cdr;
4039                         })() !== l3.value ? (v287).name : (function(v288,v289){
4040                             return l126.fvalue(id, (l11.fvalue(id, v288) !== l3.value ? (function(){
4041                                 return "#";
4042                             })() : (((v288 === l105.fvalue(id, "KEYWORD"))?l4.value: l3.value) !== l3.value ? (function(){
4043                                 return "";
4044                             })() : (function(){
4045                                 return l106.fvalue(id, v288);
4046                             })())), ":", v289);
4047                         })(l114.fvalue(id, v287),(v287).name));
4048                     })() : (l75.fvalue(id, v287) !== l3.value ? (function(){
4049                         return l16.fvalue(id, v287);
4050                     })() : (((typeof(v287) == "string")?l4.value: l3.value) !== l3.value ? (function(){
4051                         return l126.fvalue(id, "\"", (function(){
4052                             var symbol = l138;
4053                             var func = symbol.fvalue;
4054                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4055                             return func;
4056                         })()(id, v287), "\"");
4057                     })() : (((typeof v287 == 'function')?l4.value: l3.value) !== l3.value ? (function(){
4058                         return (function(v290){
4059                             return (v290 !== l3.value ? l126.fvalue(id, "#<FUNCTION ", v290, ">") : l126.fvalue(id, "#<FUNCTION>"));
4060                         })((function(){
4061                             var tmp = (v287)["fname"];
4062                             return tmp == undefined? l3.value: tmp ;
4063                         })());
4064                     })() : (l57.fvalue(id, v287) !== l3.value ? (function(){
4065                         return l126.fvalue(id, "(", l129.fvalue(id, l69.fvalue(id, (function(){
4066                             var symbol = l137;
4067                             var func = symbol.fvalue;
4068                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4069                             return func;
4070                         })(), l81.fvalue(id, v287)), " "), (function(v291){
4071                             return (l11.fvalue(id, (function(){
4072                                 var tmp = v291;
4073                                 return tmp === l3.value? l3.value: tmp.cdr;
4074                             })()) !== l3.value ? l137.fvalue(id, (function(){
4075                                 var tmp = v291;
4076                                 return tmp === l3.value? l3.value: tmp.car;
4077                             })()) : l126.fvalue(id, l137.fvalue(id, (function(){
4078                                 var tmp = v291;
4079                                 return tmp === l3.value? l3.value: tmp.car;
4080                             })()), " . ", l137.fvalue(id, (function(){
4081                                 var tmp = v291;
4082                                 return tmp === l3.value? l3.value: tmp.cdr;
4083                             })())));
4084                         })(l80.fvalue(id, v287)), ")");
4085                     })() : (((function(){
4086                         var x = v287;
4087                         return typeof x === 'object' && 'length' in x;
4088                     })()?l4.value: l3.value) !== l3.value ? (function(){
4089                         return l126.fvalue(id, "#", l137.fvalue(id, l131.fvalue(id, v287)));
4090                     })() : (l104.fvalue(id, v287) !== l3.value ? (function(){
4091                         return l126.fvalue(id, "#<PACKAGE ", l106.fvalue(id, v287), ">");
4092                     })() : l3.value)))))));
4093                 })();
4094             }
4095             catch (cf){
4096                 if (cf.type == 'block' && cf.id == 118)
4097                     return cf.value;
4098                 else
4099                     throw cf;
4100             }
4101         })();
4102
4103     }));
4104     return l137;
4105 })();
4106 (function(){
4107     (l96).fvalue = (function(v294){
4108         ((v294)["fname"] = "WRITE-LINE");
4109         return v294;
4110     })((function (values,v293){
4111         if (arguments.length < 2) throw 'too few arguments';
4112         if (arguments.length > 2) throw 'too many arguments';
4113         return (function(){
4114             try {
4115                 return (function(){
4116                     (function(){
4117                         var x = v293;
4118                         if (typeof x != 'string')
4119                             throw 'The value ' + x + ' is not a type string.';
4120                         return lisp.write(x);
4121                     })();
4122                     (function(){
4123                         var x = (function(){
4124                             var symbol = l125;
4125                             var value = symbol.value;
4126                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4127                             return value;
4128                         })();
4129                         if (typeof x != 'string')
4130                             throw 'The value ' + x + ' is not a type string.';
4131                         return lisp.write(x);
4132                     })();
4133                     return v293;
4134                 })();
4135             }
4136             catch (cf){
4137                 if (cf.type == 'block' && cf.id == 119)
4138                     return cf.value;
4139                 else
4140                     throw cf;
4141             }
4142         })();
4143
4144     }));
4145     return l96;
4146 })();
4147 var l139 = {name: "WARN"};
4148 (function(){
4149     (l139).fvalue = (function(v296){
4150         ((v296)["fname"] = "WARN");
4151         return v296;
4152     })((function (values,v295){
4153         if (arguments.length < 2) throw 'too few arguments';
4154         if (arguments.length > 2) throw 'too many arguments';
4155         return (function(){
4156             try {
4157                 return (function(){
4158                     (function(){
4159                         var x = "WARNING: ";
4160                         if (typeof x != 'string')
4161                             throw 'The value ' + x + ' is not a type string.';
4162                         return lisp.write(x);
4163                     })();
4164                     return l96.fvalue(id, v295);
4165                 })();
4166             }
4167             catch (cf){
4168                 if (cf.type == 'block' && cf.id == 120)
4169                     return cf.value;
4170                 else
4171                     throw cf;
4172             }
4173         })();
4174
4175     }));
4176     return l139;
4177 })();
4178 var l140 = {name: "PRINT"};
4179 (function(){
4180     (l140).fvalue = (function(v298){
4181         ((v298)["fname"] = "PRINT");
4182         return v298;
4183     })((function (values,v297){
4184         if (arguments.length < 2) throw 'too few arguments';
4185         if (arguments.length > 2) throw 'too many arguments';
4186         return (function(){
4187             try {
4188                 return (function(){
4189                     l96.fvalue(id, l137.fvalue(id, v297));
4190                     return v297;
4191                 })();
4192             }
4193             catch (cf){
4194                 if (cf.type == 'block' && cf.id == 121)
4195                     return cf.value;
4196                 else
4197                     throw cf;
4198             }
4199         })();
4200
4201     }));
4202     return l140;
4203 })();
4204 var l141 = {name: "MAKE-STRING-STREAM"};
4205 (function(){
4206     (l141).fvalue = (function(v300){
4207         ((v300)["fname"] = "MAKE-STRING-STREAM");
4208         return v300;
4209     })((function (values,v299){
4210         if (arguments.length < 2) throw 'too few arguments';
4211         if (arguments.length > 2) throw 'too many arguments';
4212         return (function(){
4213             try {
4214                 return (function(){
4215                     return ({car: v299, cdr: 0});
4216                 })();
4217             }
4218             catch (cf){
4219                 if (cf.type == 'block' && cf.id == 122)
4220                     return cf.value;
4221                 else
4222                     throw cf;
4223             }
4224         })();
4225
4226     }));
4227     return l141;
4228 })();
4229 var l142 = {name: "%PEEK-CHAR"};
4230 (function(){
4231     (l142).fvalue = (function(v302){
4232         ((v302)["fname"] = "%PEEK-CHAR");
4233         return v302;
4234     })((function (values,v301){
4235         if (arguments.length < 2) throw 'too few arguments';
4236         if (arguments.length > 2) throw 'too many arguments';
4237         return (function(){
4238             try {
4239                 return (function(){
4240                     return ((function(){
4241                         var x1 = (function(){
4242                             var tmp = v301;
4243                             return tmp === l3.value? l3.value: tmp.cdr;
4244                         })();
4245                         if (typeof x1 !== 'number') throw 'Not a number!';
4246                         var x2 = l67.fvalue(id, (function(){
4247                             var tmp = v301;
4248                             return tmp === l3.value? l3.value: tmp.car;
4249                         })());
4250                         if (typeof x2 !== 'number') throw 'Not a number!';
4251                         return (x1<x2?l4.value: l3.value);
4252                     })() !== l3.value ? (function(){
4253                         var string = (function(){
4254                             var tmp = v301;
4255                             return tmp === l3.value? l3.value: tmp.car;
4256                         })();
4257                         var index = (function(){
4258                             var tmp = v301;
4259                             return tmp === l3.value? l3.value: tmp.cdr;
4260                         })();
4261                         if (typeof string != 'string')
4262                             throw 'The value ' + string + ' is not a type string.';
4263                         if (typeof index != 'number')
4264                             throw 'The value ' + index + ' is not a type number.';
4265                         return string.charCodeAt(index);
4266                     })() : l3.value);
4267                 })();
4268             }
4269             catch (cf){
4270                 if (cf.type == 'block' && cf.id == 123)
4271                     return cf.value;
4272                 else
4273                     throw cf;
4274             }
4275         })();
4276
4277     }));
4278     return l142;
4279 })();
4280 var l143 = {name: "%READ-CHAR"};
4281 (function(){
4282     (l143).fvalue = (function(v305){
4283         ((v305)["fname"] = "%READ-CHAR");
4284         return v305;
4285     })((function (values,v303){
4286         if (arguments.length < 2) throw 'too few arguments';
4287         if (arguments.length > 2) throw 'too many arguments';
4288         return (function(){
4289             try {
4290                 return (function(){
4291                     return ((function(){
4292                         var x1 = (function(){
4293                             var tmp = v303;
4294                             return tmp === l3.value? l3.value: tmp.cdr;
4295                         })();
4296                         if (typeof x1 !== 'number') throw 'Not a number!';
4297                         var x2 = l67.fvalue(id, (function(){
4298                             var tmp = v303;
4299                             return tmp === l3.value? l3.value: tmp.car;
4300                         })());
4301                         if (typeof x2 !== 'number') throw 'Not a number!';
4302                         return (x1<x2?l4.value: l3.value);
4303                     })() !== l3.value ? (function(v304){
4304                         (function(){
4305                             var x = v303;
4306                             if (typeof x != 'object')
4307                                 throw 'The value ' + x + ' is not a type object.';
4308                             return (x.cdr = l21.fvalue(id, (function(){
4309                                 var tmp = v303;
4310                                 return tmp === l3.value? l3.value: tmp.cdr;
4311                             })()));
4312                         })();
4313                         return v304;
4314                     })((function(){
4315                         var string = (function(){
4316                             var tmp = v303;
4317                             return tmp === l3.value? l3.value: tmp.car;
4318                         })();
4319                         var index = (function(){
4320                             var tmp = v303;
4321                             return tmp === l3.value? l3.value: tmp.cdr;
4322                         })();
4323                         if (typeof string != 'string')
4324                             throw 'The value ' + string + ' is not a type string.';
4325                         if (typeof index != 'number')
4326                             throw 'The value ' + index + ' is not a type number.';
4327                         return string.charCodeAt(index);
4328                     })()) : l3.value);
4329                 })();
4330             }
4331             catch (cf){
4332                 if (cf.type == 'block' && cf.id == 124)
4333                     return cf.value;
4334                 else
4335                     throw cf;
4336             }
4337         })();
4338
4339     }));
4340     return l143;
4341 })();
4342 var l144 = {name: "WHITESPACEP"};
4343 (function(){
4344     (l144).fvalue = (function(v309){
4345         ((v309)["fname"] = "WHITESPACEP");
4346         return v309;
4347     })((function (values,v306){
4348         if (arguments.length < 2) throw 'too few arguments';
4349         if (arguments.length > 2) throw 'too many arguments';
4350         return (function(){
4351             try {
4352                 return (function(){
4353                     return (function(v307){
4354                         return (v307 !== l3.value ? v307 : (function(v308){
4355                             return (v308 !== l3.value ? v308 : l74.fvalue(id, v306, 9));
4356                         })(l74.fvalue(id, v306, 10)));
4357                     })(l74.fvalue(id, v306, 32));
4358                 })();
4359             }
4360             catch (cf){
4361                 if (cf.type == 'block' && cf.id == 125)
4362                     return cf.value;
4363                 else
4364                     throw cf;
4365             }
4366         })();
4367
4368     }));
4369     return l144;
4370 })();
4371 var l145 = {name: "SKIP-WHITESPACES"};
4372 (function(){
4373     (l145).fvalue = (function(v312){
4374         ((v312)["fname"] = "SKIP-WHITESPACES");
4375         return v312;
4376     })((function (values,v310){
4377         if (arguments.length < 2) throw 'too few arguments';
4378         if (arguments.length > 2) throw 'too many arguments';
4379         return (function(){
4380             try {
4381                 return (function(){
4382                     return (function(v311){
4383                         (v311 = l142.fvalue(id, v310));
4384                         return (function(){
4385                             try {
4386                                 return (function(){
4387                                     return (function(){
4388                                         while((v311 !== l3.value ? l144.fvalue(id, v311) : l3.value) !== l3.value){
4389                                             l143.fvalue(id, v310);
4390                                             (v311 = l142.fvalue(id, v310));
4391                                         }return l3.value;
4392                                     })();
4393                                 })();
4394                             }
4395                             catch (cf){
4396                                 if (cf.type == 'block' && cf.id == 127)
4397                                     return cf.value;
4398                                 else
4399                                     throw cf;
4400                             }
4401                         })();
4402                     })(l3.value);
4403                 })();
4404             }
4405             catch (cf){
4406                 if (cf.type == 'block' && cf.id == 126)
4407                     return cf.value;
4408                 else
4409                     throw cf;
4410             }
4411         })();
4412
4413     }));
4414     return l145;
4415 })();
4416 var l146 = {name: "TERMINALP"};
4417 (function(){
4418     (l146).fvalue = (function(v317){
4419         ((v317)["fname"] = "TERMINALP");
4420         return v317;
4421     })((function (values,v313){
4422         if (arguments.length < 2) throw 'too few arguments';
4423         if (arguments.length > 2) throw 'too many arguments';
4424         return (function(){
4425             try {
4426                 return (function(){
4427                     return (function(v314){
4428                         return (v314 !== l3.value ? v314 : (function(v315){
4429                             return (v315 !== l3.value ? v315 : (function(v316){
4430                                 return (v316 !== l3.value ? v316 : l74.fvalue(id, 40, v313));
4431                             })(l74.fvalue(id, 41, v313)));
4432                         })(l144.fvalue(id, v313)));
4433                     })(l11.fvalue(id, v313));
4434                 })();
4435             }
4436             catch (cf){
4437                 if (cf.type == 'block' && cf.id == 128)
4438                     return cf.value;
4439                 else
4440                     throw cf;
4441             }
4442         })();
4443
4444     }));
4445     return l146;
4446 })();
4447 var l147 = {name: "READ-UNTIL"};
4448 (function(){
4449     (l147).fvalue = (function(v322){
4450         ((v322)["fname"] = "READ-UNTIL");
4451         return v322;
4452     })((function (values,v318,v319){
4453         if (arguments.length < 3) throw 'too few arguments';
4454         if (arguments.length > 3) throw 'too many arguments';
4455         return (function(){
4456             try {
4457                 return (function(){
4458                     return (function(v320,v321){
4459                         (v321 = l142.fvalue(id, v318));
4460                         (function(){
4461                             try {
4462                                 return (function(){
4463                                     return (function(){
4464                                         while((v321 !== l3.value ? l26.fvalue(id, (v319)(id, v321)) : l3.value) !== l3.value){
4465                                             (v320 = l126.fvalue(id, v320, l92.fvalue(id, v321)));
4466                                             l143.fvalue(id, v318);
4467                                             (v321 = l142.fvalue(id, v318));
4468                                         }return l3.value;
4469                                     })();
4470                                 })();
4471                             }
4472                             catch (cf){
4473                                 if (cf.type == 'block' && cf.id == 130)
4474                                     return cf.value;
4475                                 else
4476                                     throw cf;
4477                             }
4478                         })();
4479                         return v320;
4480                     })("",l3.value);
4481                 })();
4482             }
4483             catch (cf){
4484                 if (cf.type == 'block' && cf.id == 129)
4485                     return cf.value;
4486                 else
4487                     throw cf;
4488             }
4489         })();
4490
4491     }));
4492     return l147;
4493 })();
4494 var l148 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
4495 (function(){
4496     (l148).fvalue = (function(v326){
4497         ((v326)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
4498         return v326;
4499     })((function (values,v323){
4500         if (arguments.length < 2) throw 'too few arguments';
4501         if (arguments.length > 2) throw 'too many arguments';
4502         return (function(){
4503             try {
4504                 return (function(){
4505                     return (function(v324){
4506                         l145.fvalue(id, v323);
4507                         (v324 = l142.fvalue(id, v323));
4508                         return (function(){
4509                             try {
4510                                 return (function(){
4511                                     return (function(){
4512                                         while((v324 !== l3.value ? l74.fvalue(id, v324, 59) : l3.value) !== l3.value){
4513                                             l147.fvalue(id, v323, (function (values,v325){
4514                                                 if (arguments.length < 2) throw 'too few arguments';
4515                                                 if (arguments.length > 2) throw 'too many arguments';
4516                                                 return l74.fvalue(id, v325, 10);
4517
4518                                             }));
4519                                             l145.fvalue(id, v323);
4520                                             (v324 = l142.fvalue(id, v323));
4521                                         }return l3.value;
4522                                     })();
4523                                 })();
4524                             }
4525                             catch (cf){
4526                                 if (cf.type == 'block' && cf.id == 132)
4527                                     return cf.value;
4528                                 else
4529                                     throw cf;
4530                             }
4531                         })();
4532                     })(l3.value);
4533                 })();
4534             }
4535             catch (cf){
4536                 if (cf.type == 'block' && cf.id == 131)
4537                     return cf.value;
4538                 else
4539                     throw cf;
4540             }
4541         })();
4542
4543     }));
4544     return l148;
4545 })();
4546 var l149 = {name: "%READ-LIST"};
4547 var l150 = {name: "LS-READ"};
4548 (function(){
4549     (l149).fvalue = (function(v330){
4550         ((v330)["fname"] = "%READ-LIST");
4551         return v330;
4552     })((function (values,v327){
4553         if (arguments.length < 2) throw 'too few arguments';
4554         if (arguments.length > 2) throw 'too many arguments';
4555         return (function(){
4556             try {
4557                 return (function(){
4558                     l148.fvalue(id, v327);
4559                     return (function(v328){
4560                         return (l11.fvalue(id, v328) !== l3.value ? (function(){
4561                             return (function(){
4562                                 throw "Unspected EOF";
4563                             })();
4564                         })() : (l74.fvalue(id, v328, 41) !== l3.value ? (function(){
4565                             l143.fvalue(id, v327);
4566                             return l3.value;
4567                         })() : (l74.fvalue(id, v328, 46) !== l3.value ? (function(){
4568                             l143.fvalue(id, v327);
4569                             return (function(v329){
4570                                 l148.fvalue(id, v327);
4571                                 (l74.fvalue(id, l143.fvalue(id, v327), 41) !== l3.value ? l3.value : (function(){
4572                                     return (function(){
4573                                         throw "')' was expected.";
4574                                     })();
4575                                 })());
4576                                 return v329;
4577                             })((function(){
4578                                 var symbol = l150;
4579                                 var func = symbol.fvalue;
4580                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4581                                 return func;
4582                             })()(id, v327));
4583                         })() : (function(){
4584                             return ({car: (function(){
4585                                 var symbol = l150;
4586                                 var func = symbol.fvalue;
4587                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4588                                 return func;
4589                             })()(id, v327), cdr: l149.fvalue(id, v327)});
4590                         })())));
4591                     })(l142.fvalue(id, v327));
4592                 })();
4593             }
4594             catch (cf){
4595                 if (cf.type == 'block' && cf.id == 133)
4596                     return cf.value;
4597                 else
4598                     throw cf;
4599             }
4600         })();
4601
4602     }));
4603     return l149;
4604 })();
4605 var l151 = {name: "READ-STRING"};
4606 (function(){
4607     (l151).fvalue = (function(v334){
4608         ((v334)["fname"] = "READ-STRING");
4609         return v334;
4610     })((function (values,v331){
4611         if (arguments.length < 2) throw 'too few arguments';
4612         if (arguments.length > 2) throw 'too many arguments';
4613         return (function(){
4614             try {
4615                 return (function(){
4616                     return (function(v332,v333){
4617                         (v333 = l143.fvalue(id, v331));
4618                         (function(){
4619                             try {
4620                                 return (function(){
4621                                     return (function(){
4622                                         while(l26.fvalue(id, l25.fvalue(id, v333, 34)) !== l3.value){
4623                                             (l11.fvalue(id, v333) !== l3.value ? (function(){
4624                                                 return (function(){
4625                                                     throw "Unexpected EOF";
4626                                                 })();
4627                                             })() : l3.value);
4628                                             (l25.fvalue(id, v333, 92) !== l3.value ? (function(){
4629                                                 return (v333 = l143.fvalue(id, v331));
4630                                             })() : l3.value);
4631                                             (v332 = l126.fvalue(id, v332, l92.fvalue(id, v333)));
4632                                             (v333 = l143.fvalue(id, v331));
4633                                         }return l3.value;
4634                                     })();
4635                                 })();
4636                             }
4637                             catch (cf){
4638                                 if (cf.type == 'block' && cf.id == 135)
4639                                     return cf.value;
4640                                 else
4641                                     throw cf;
4642                             }
4643                         })();
4644                         return v332;
4645                     })("",l3.value);
4646                 })();
4647             }
4648             catch (cf){
4649                 if (cf.type == 'block' && cf.id == 134)
4650                     return cf.value;
4651                 else
4652                     throw cf;
4653             }
4654         })();
4655
4656     }));
4657     return l151;
4658 })();
4659 var l152 = {name: "READ-SHARP"};
4660 (function(){
4661     (l152).fvalue = (function(v339){
4662         ((v339)["fname"] = "READ-SHARP");
4663         return v339;
4664     })((function (values,v335){
4665         if (arguments.length < 2) throw 'too few arguments';
4666         if (arguments.length > 2) throw 'too many arguments';
4667         return (function(){
4668             try {
4669                 return (function(){
4670                     l143.fvalue(id, v335);
4671                     return (function(v336){
4672                         return (l25.fvalue(id, v336, 39) !== l3.value ? (function(){
4673                             return l42.fvalue(id, l98, (function(){
4674                                 var symbol = l150;
4675                                 var func = symbol.fvalue;
4676                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4677                                 return func;
4678                             })()(id, v335));
4679                         })() : (l25.fvalue(id, v336, 40) !== l3.value ? (function(){
4680                             return l132.fvalue(id, l149.fvalue(id, v335));
4681                         })() : (l25.fvalue(id, v336, 58) !== l3.value ? (function(){
4682                             return (function(){
4683                                 var name = (function(){
4684                                     var x = l147.fvalue(id, v335, (function(){
4685                                         var symbol = l146;
4686                                         var func = symbol.fvalue;
4687                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4688                                         return func;
4689                                     })());
4690                                     if (typeof x != 'string')
4691                                         throw 'The value ' + x + ' is not a type string.';
4692                                     return x.toUpperCase();
4693                                 })();
4694                                 if (typeof name != 'string')
4695                                     throw 'The value ' + name + ' is not a type string.';
4696                                 return ({name: name});
4697                             })();
4698                         })() : (l25.fvalue(id, v336, 92) !== l3.value ? (function(){
4699                             return (function(v337){
4700                                 return (l93.fvalue(id, v337, "space") !== l3.value ? (function(){
4701                                     return l73.fvalue(id, 32);
4702                                 })() : (l93.fvalue(id, v337, "tab") !== l3.value ? (function(){
4703                                     return l73.fvalue(id, 9);
4704                                 })() : (l93.fvalue(id, v337, "newline") !== l3.value ? (function(){
4705                                     return l73.fvalue(id, 10);
4706                                 })() : (function(){
4707                                     return l73.fvalue(id, (function(){
4708                                         var string = v337;
4709                                         var index = 0;
4710                                         if (typeof string != 'string')
4711                                             throw 'The value ' + string + ' is not a type string.';
4712                                         if (typeof index != 'number')
4713                                             throw 'The value ' + index + ' is not a type number.';
4714                                         return string.charCodeAt(index);
4715                                     })());
4716                                 })())));
4717                             })(l126.fvalue(id, l92.fvalue(id, l143.fvalue(id, v335)), l147.fvalue(id, v335, (function(){
4718                                 var symbol = l146;
4719                                 var func = symbol.fvalue;
4720                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4721                                 return func;
4722                             })())));
4723                         })() : (l25.fvalue(id, v336, 43) !== l3.value ? (function(){
4724                             return (function(v338){
4725                                 return (l93.fvalue(id, v338, "common-lisp") !== l3.value ? (function(){
4726                                     (function(){
4727                                         var symbol = l150;
4728                                         var func = symbol.fvalue;
4729                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4730                                         return func;
4731                                     })()(id, v335);
4732                                     return (function(){
4733                                         var symbol = l150;
4734                                         var func = symbol.fvalue;
4735                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4736                                         return func;
4737                                     })()(id, v335);
4738                                 })() : (l93.fvalue(id, v338, "ecmalisp") !== l3.value ? (function(){
4739                                     return (function(){
4740                                         var symbol = l150;
4741                                         var func = symbol.fvalue;
4742                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4743                                         return func;
4744                                     })()(id, v335);
4745                                 })() : (function(){
4746                                     return (function(){
4747                                         throw "Unknown reader form.";
4748                                     })();
4749                                 })()));
4750                             })(l147.fvalue(id, v335, (function(){
4751                                 var symbol = l146;
4752                                 var func = symbol.fvalue;
4753                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4754                                 return func;
4755                             })()));
4756                         })() : (function(){
4757                             return (function(){
4758                                 throw "ECASE expression failed.";
4759                             })();
4760                         })())))));
4761                     })(l143.fvalue(id, v335));
4762                 })();
4763             }
4764             catch (cf){
4765                 if (cf.type == 'block' && cf.id == 136)
4766                     return cf.value;
4767                 else
4768                     throw cf;
4769             }
4770         })();
4771
4772     }));
4773     return l152;
4774 })();
4775 var l153 = {name: "READ-SYMBOL"};
4776 (function(){
4777     (l153).fvalue = (function(v347){
4778         ((v347)["fname"] = "READ-SYMBOL");
4779         return v347;
4780     })((function (values,v340){
4781         if (arguments.length < 2) throw 'too few arguments';
4782         if (arguments.length > 2) throw 'too many arguments';
4783         return (function(){
4784             try {
4785                 return (function(){
4786                     return (function(v341,v342,v343,v344,v345){
4787                         (v345 = 0);
4788                         (function(){
4789                             try {
4790                                 return (function(){
4791                                     return (function(){
4792                                         while(((function(){
4793                                             var x1 = v345;
4794                                             if (typeof x1 !== 'number') throw 'Not a number!';
4795                                             var x2 = v341;
4796                                             if (typeof x2 !== 'number') throw 'Not a number!';
4797                                             return (x1<x2?l4.value: l3.value);
4798                                         })() !== l3.value ? l26.fvalue(id, l74.fvalue(id, (function(){
4799                                             var string = v340;
4800                                             var index = v345;
4801                                             if (typeof string != 'string')
4802                                                 throw 'The value ' + string + ' is not a type string.';
4803                                             if (typeof index != 'number')
4804                                                 throw 'The value ' + index + ' is not a type number.';
4805                                             return string.charCodeAt(index);
4806                                         })(), 58)) : l3.value) !== l3.value){
4807                                             (v345 = (function(){
4808                                                 var x1 = v345;
4809                                                 if (typeof x1 !== 'number') throw 'Not a number!';
4810                                                 var x2 = 1;
4811                                                 if (typeof x2 !== 'number') throw 'Not a number!';
4812                                                 return x1+x2;
4813                                             })());
4814                                         }return l3.value;
4815                                     })();
4816                                 })();
4817                             }
4818                             catch (cf){
4819                                 if (cf.type == 'block' && cf.id == 138)
4820                                     return cf.value;
4821                                 else
4822                                     throw cf;
4823                             }
4824                         })();
4825                         ((function(){
4826                             var x1 = v345;
4827                             if (typeof x1 !== 'number') throw 'Not a number!';
4828                             var x2 = v341;
4829                             if (typeof x2 !== 'number') throw 'Not a number!';
4830                             return (x1==x2?l4.value: l3.value);
4831                         })() !== l3.value ? (function(){
4832                             (v343 = v340);
4833                             (v342 = (function(){
4834                                 var symbol = l115;
4835                                 var value = symbol.value;
4836                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4837                                 return value;
4838                             })());
4839                             return (v344 = l4.value);
4840                         })() : (function(){
4841                             (l23.fvalue(id, v345) !== l3.value ? (v342 = "KEYWORD") : (v342 = (function(){
4842                                 var x = l87.fvalue(id, v340, 0, v345);
4843                                 if (typeof x != 'string')
4844                                     throw 'The value ' + x + ' is not a type string.';
4845                                 return x.toUpperCase();
4846                             })()));
4847                             (v345 = (function(){
4848                                 var x1 = v345;
4849                                 if (typeof x1 !== 'number') throw 'Not a number!';
4850                                 var x2 = 1;
4851                                 if (typeof x2 !== 'number') throw 'Not a number!';
4852                                 return x1+x2;
4853                             })());
4854                             (l74.fvalue(id, (function(){
4855                                 var string = v340;
4856                                 var index = v345;
4857                                 if (typeof string != 'string')
4858                                     throw 'The value ' + string + ' is not a type string.';
4859                                 if (typeof index != 'number')
4860                                     throw 'The value ' + index + ' is not a type number.';
4861                                 return string.charCodeAt(index);
4862                             })(), 58) !== l3.value ? (function(){
4863                                 (v344 = l4.value);
4864                                 return (v345 = (function(){
4865                                     var x1 = v345;
4866                                     if (typeof x1 !== 'number') throw 'Not a number!';
4867                                     var x2 = 1;
4868                                     if (typeof x2 !== 'number') throw 'Not a number!';
4869                                     return x1+x2;
4870                                 })());
4871                             })() : l3.value);
4872                             return (v343 = l87.fvalue(id, v340, v345));
4873                         })());
4874                         (v343 = (function(){
4875                             var x = v343;
4876                             if (typeof x != 'string')
4877                                 throw 'The value ' + x + ' is not a type string.';
4878                             return x.toUpperCase();
4879                         })());
4880                         (v342 = l105.fvalue(id, v342));
4881                         return ((function(v346){
4882                             return (v346 !== l3.value ? v346 : ((v342 === l105.fvalue(id, "KEYWORD"))?l4.value: l3.value));
4883                         })(v344) !== l3.value ? l120.fvalue(id, v343, v342) : l119.fvalue(id, v343, v342));
4884                     })(l67.fvalue(id, v340),l3.value,l3.value,l3.value,l3.value);
4885                 })();
4886             }
4887             catch (cf){
4888                 if (cf.type == 'block' && cf.id == 137)
4889                     return cf.value;
4890                 else
4891                     throw cf;
4892             }
4893         })();
4894
4895     }));
4896     return l153;
4897 })();
4898 var l154 = {name: "*EOF*"};
4899 (function(){
4900     (((l154.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
4901         return ((l154).value = l15.fvalue(id));
4902     })());
4903     return l154;
4904 })();
4905 var l155 = {name: "QUOTE"};
4906 var l156 = {name: "BACKQUOTE"};
4907 var l157 = {name: "UNQUOTE-SPLICING"};
4908 var l158 = {name: "UNQUOTE"};
4909 (function(){
4910     (l150).fvalue = (function(v352){
4911         ((v352)["fname"] = "LS-READ");
4912         return v352;
4913     })((function (values,v348){
4914         if (arguments.length < 2) throw 'too few arguments';
4915         if (arguments.length > 2) throw 'too many arguments';
4916         return (function(){
4917             try {
4918                 return (function(){
4919                     l148.fvalue(id, v348);
4920                     return (function(v349){
4921                         return ((function(v350){
4922                             return (v350 !== l3.value ? v350 : l74.fvalue(id, v349, 41));
4923                         })(l11.fvalue(id, v349)) !== l3.value ? (function(){
4924                             return (function(){
4925                                 var symbol = l154;
4926                                 var value = symbol.value;
4927                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4928                                 return value;
4929                             })();
4930                         })() : (l74.fvalue(id, v349, 40) !== l3.value ? (function(){
4931                             l143.fvalue(id, v348);
4932                             return l149.fvalue(id, v348);
4933                         })() : (l74.fvalue(id, v349, 39) !== l3.value ? (function(){
4934                             l143.fvalue(id, v348);
4935                             return l42.fvalue(id, l155, l150.fvalue(id, v348));
4936                         })() : (l74.fvalue(id, v349, 96) !== l3.value ? (function(){
4937                             l143.fvalue(id, v348);
4938                             return l42.fvalue(id, l156, l150.fvalue(id, v348));
4939                         })() : (l74.fvalue(id, v349, 34) !== l3.value ? (function(){
4940                             l143.fvalue(id, v348);
4941                             return l151.fvalue(id, v348);
4942                         })() : (l74.fvalue(id, v349, 44) !== l3.value ? (function(){
4943                             l143.fvalue(id, v348);
4944                             return (l25.fvalue(id, l142.fvalue(id, v348), 64) !== l3.value ? (function(){
4945                                 l143.fvalue(id, v348);
4946                                 return l42.fvalue(id, l157, l150.fvalue(id, v348));
4947                             })() : l42.fvalue(id, l158, l150.fvalue(id, v348)));
4948                         })() : (l74.fvalue(id, v349, 35) !== l3.value ? (function(){
4949                             return l152.fvalue(id, v348);
4950                         })() : (function(){
4951                             return (function(v351){
4952                                 return (l90.fvalue(id, (function(){
4953                                     var symbol = l86;
4954                                     var func = symbol.fvalue;
4955                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4956                                     return func;
4957                                 })(), v351) !== l3.value ? l88.fvalue(id, v351) : l153.fvalue(id, v351));
4958                             })(l147.fvalue(id, v348, (function(){
4959                                 var symbol = l146;
4960                                 var func = symbol.fvalue;
4961                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4962                                 return func;
4963                             })()));
4964                         })())))))));
4965                     })(l142.fvalue(id, v348));
4966                 })();
4967             }
4968             catch (cf){
4969                 if (cf.type == 'block' && cf.id == 139)
4970                     return cf.value;
4971                 else
4972                     throw cf;
4973             }
4974         })();
4975
4976     }));
4977     return l150;
4978 })();
4979 var l159 = {name: "LS-READ-FROM-STRING"};
4980 (function(){
4981     (l159).fvalue = (function(v354){
4982         ((v354)["fname"] = "LS-READ-FROM-STRING");
4983         return v354;
4984     })((function (values,v353){
4985         if (arguments.length < 2) throw 'too few arguments';
4986         if (arguments.length > 2) throw 'too many arguments';
4987         return (function(){
4988             try {
4989                 return (function(){
4990                     return l150.fvalue(id, l141.fvalue(id, v353));
4991                 })();
4992             }
4993             catch (cf){
4994                 if (cf.type == 'block' && cf.id == 140)
4995                     return cf.value;
4996                 else
4997                     throw cf;
4998             }
4999         })();
5000
5001     }));
5002     return l159;
5003 })();
5004 var l160 = {name: "*COMPILATION-UNIT-CHECKS*"};
5005 (function(){
5006     (((l160.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
5007         return ((l160).value = l3);
5008     })());
5009     return l160;
5010 })();
5011 var l161 = {name: "MAKE-BINDING"};
5012 (function(){
5013     (l161).fvalue = (function(v359){
5014         ((v359)["fname"] = "MAKE-BINDING");
5015         return v359;
5016     })((function (values,v355,v356,v357,v358){
5017         if (arguments.length < 4) throw 'too few arguments';
5018         if (arguments.length > 5) throw 'too many arguments';
5019         switch(arguments.length-1){
5020         case 3:
5021         v358=l3.value;
5022         default: break;
5023         }
5024         return (function(){
5025             try {
5026                 return (function(){
5027                     return l42.fvalue(id, v355, v356, v357, v358);
5028                 })();
5029             }
5030             catch (cf){
5031                 if (cf.type == 'block' && cf.id == 141)
5032                     return cf.value;
5033                 else
5034                     throw cf;
5035             }
5036         })();
5037
5038     }));
5039     return l161;
5040 })();
5041 var l162 = {name: "BINDING-NAME"};
5042 (function(){
5043     (l162).fvalue = (function(v361){
5044         ((v361)["fname"] = "BINDING-NAME");
5045         return v361;
5046     })((function (values,v360){
5047         if (arguments.length < 2) throw 'too few arguments';
5048         if (arguments.length > 2) throw 'too many arguments';
5049         return (function(){
5050             try {
5051                 return (function(){
5052                     return l38.fvalue(id, v360);
5053                 })();
5054             }
5055             catch (cf){
5056                 if (cf.type == 'block' && cf.id == 142)
5057                     return cf.value;
5058                 else
5059                     throw cf;
5060             }
5061         })();
5062
5063     }));
5064     return l162;
5065 })();
5066 var l163 = {name: "BINDING-TYPE"};
5067 (function(){
5068     (l163).fvalue = (function(v363){
5069         ((v363)["fname"] = "BINDING-TYPE");
5070         return v363;
5071     })((function (values,v362){
5072         if (arguments.length < 2) throw 'too few arguments';
5073         if (arguments.length > 2) throw 'too many arguments';
5074         return (function(){
5075             try {
5076                 return (function(){
5077                     return l39.fvalue(id, v362);
5078                 })();
5079             }
5080             catch (cf){
5081                 if (cf.type == 'block' && cf.id == 143)
5082                     return cf.value;
5083                 else
5084                     throw cf;
5085             }
5086         })();
5087
5088     }));
5089     return l163;
5090 })();
5091 var l164 = {name: "BINDING-VALUE"};
5092 (function(){
5093     (l164).fvalue = (function(v365){
5094         ((v365)["fname"] = "BINDING-VALUE");
5095         return v365;
5096     })((function (values,v364){
5097         if (arguments.length < 2) throw 'too few arguments';
5098         if (arguments.length > 2) throw 'too many arguments';
5099         return (function(){
5100             try {
5101                 return (function(){
5102                     return l40.fvalue(id, v364);
5103                 })();
5104             }
5105             catch (cf){
5106                 if (cf.type == 'block' && cf.id == 144)
5107                     return cf.value;
5108                 else
5109                     throw cf;
5110             }
5111         })();
5112
5113     }));
5114     return l164;
5115 })();
5116 var l165 = {name: "BINDING-DECLARATIONS"};
5117 (function(){
5118     (l165).fvalue = (function(v367){
5119         ((v367)["fname"] = "BINDING-DECLARATIONS");
5120         return v367;
5121     })((function (values,v366){
5122         if (arguments.length < 2) throw 'too few arguments';
5123         if (arguments.length > 2) throw 'too many arguments';
5124         return (function(){
5125             try {
5126                 return (function(){
5127                     return l41.fvalue(id, v366);
5128                 })();
5129             }
5130             catch (cf){
5131                 if (cf.type == 'block' && cf.id == 145)
5132                     return cf.value;
5133                 else
5134                     throw cf;
5135             }
5136         })();
5137
5138     }));
5139     return l165;
5140 })();
5141 var l166 = {name: "SET-BINDING-VALUE"};
5142 (function(){
5143     (l166).fvalue = (function(v370){
5144         ((v370)["fname"] = "SET-BINDING-VALUE");
5145         return v370;
5146     })((function (values,v368,v369){
5147         if (arguments.length < 3) throw 'too few arguments';
5148         if (arguments.length > 3) throw 'too many arguments';
5149         return (function(){
5150             try {
5151                 return (function(){
5152                     return (function(){
5153                         var x = l34.fvalue(id, v368);
5154                         if (typeof x != 'object')
5155                             throw 'The value ' + x + ' is not a type object.';
5156                         return (x.car = v369);
5157                     })();
5158                 })();
5159             }
5160             catch (cf){
5161                 if (cf.type == 'block' && cf.id == 146)
5162                     return cf.value;
5163                 else
5164                     throw cf;
5165             }
5166         })();
5167
5168     }));
5169     return l166;
5170 })();
5171 var l167 = {name: "SET-BINDING-DECLARATIONS"};
5172 (function(){
5173     (l167).fvalue = (function(v373){
5174         ((v373)["fname"] = "SET-BINDING-DECLARATIONS");
5175         return v373;
5176     })((function (values,v371,v372){
5177         if (arguments.length < 3) throw 'too few arguments';
5178         if (arguments.length > 3) throw 'too many arguments';
5179         return (function(){
5180             try {
5181                 return (function(){
5182                     return (function(){
5183                         var x = l36.fvalue(id, v371);
5184                         if (typeof x != 'object')
5185                             throw 'The value ' + x + ' is not a type object.';
5186                         return (x.car = v372);
5187                     })();
5188                 })();
5189             }
5190             catch (cf){
5191                 if (cf.type == 'block' && cf.id == 147)
5192                     return cf.value;
5193                 else
5194                     throw cf;
5195             }
5196         })();
5197
5198     }));
5199     return l167;
5200 })();
5201 var l168 = {name: "PUSH-BINDING-DECLARATION"};
5202 (function(){
5203     (l168).fvalue = (function(v376){
5204         ((v376)["fname"] = "PUSH-BINDING-DECLARATION");
5205         return v376;
5206     })((function (values,v374,v375){
5207         if (arguments.length < 3) throw 'too few arguments';
5208         if (arguments.length > 3) throw 'too many arguments';
5209         return (function(){
5210             try {
5211                 return (function(){
5212                     return l167.fvalue(id, v375, ({car: v374, cdr: l165.fvalue(id, v375)}));
5213                 })();
5214             }
5215             catch (cf){
5216                 if (cf.type == 'block' && cf.id == 148)
5217                     return cf.value;
5218                 else
5219                     throw cf;
5220             }
5221         })();
5222
5223     }));
5224     return l168;
5225 })();
5226 var l169 = {name: "MAKE-LEXENV"};
5227 (function(){
5228     (l169).fvalue = (function(v377){
5229         ((v377)["fname"] = "MAKE-LEXENV");
5230         return v377;
5231     })((function (values){
5232         if (arguments.length > 1) throw 'too many arguments';
5233         return (function(){
5234             try {
5235                 return (function(){
5236                     return l42.fvalue(id, l3.value, l3.value, l3.value, l3.value);
5237                 })();
5238             }
5239             catch (cf){
5240                 if (cf.type == 'block' && cf.id == 149)
5241                     return cf.value;
5242                 else
5243                     throw cf;
5244             }
5245         })();
5246
5247     }));
5248     return l169;
5249 })();
5250 var l170 = {name: "COPY-LEXENV"};
5251 (function(){
5252     (l170).fvalue = (function(v379){
5253         ((v379)["fname"] = "COPY-LEXENV");
5254         return v379;
5255     })((function (values,v378){
5256         if (arguments.length < 2) throw 'too few arguments';
5257         if (arguments.length > 2) throw 'too many arguments';
5258         return (function(){
5259             try {
5260                 return (function(){
5261                     return l71.fvalue(id, v378);
5262                 })();
5263             }
5264             catch (cf){
5265                 if (cf.type == 'block' && cf.id == 150)
5266                     return cf.value;
5267                 else
5268                     throw cf;
5269             }
5270         })();
5271
5272     }));
5273     return l170;
5274 })();
5275 var l171 = {name: "PUSH-TO-LEXENV"};
5276 var l172 = {name: "BLOCK"};
5277 var l173 = {name: "GOTAG"};
5278 (function(){
5279     (l171).fvalue = (function(v384){
5280         ((v384)["fname"] = "PUSH-TO-LEXENV");
5281         return v384;
5282     })((function (values,v380,v381,v382){
5283         if (arguments.length < 4) throw 'too few arguments';
5284         if (arguments.length > 4) throw 'too many arguments';
5285         return (function(){
5286             try {
5287                 return (function(){
5288                     return (function(v383){
5289                         return (l25.fvalue(id, v383, l99) !== l3.value ? (function(){
5290                             return (function(){
5291                                 var x = v381;
5292                                 if (typeof x != 'object')
5293                                     throw 'The value ' + x + ' is not a type object.';
5294                                 return (x.car = ({car: v380, cdr: (function(){
5295                                     var tmp = v381;
5296                                     return tmp === l3.value? l3.value: tmp.car;
5297                                 })()}));
5298                             })();
5299                         })() : (l25.fvalue(id, v383, l98) !== l3.value ? (function(){
5300                             return (function(){
5301                                 var x = (function(){
5302                                     var tmp = v381;
5303                                     return tmp === l3.value? l3.value: tmp.cdr;
5304                                 })();
5305                                 if (typeof x != 'object')
5306                                     throw 'The value ' + x + ' is not a type object.';
5307                                 return (x.car = ({car: v380, cdr: l32.fvalue(id, v381)}));
5308                             })();
5309                         })() : (l25.fvalue(id, v383, l172) !== l3.value ? (function(){
5310                             return (function(){
5311                                 var x = l34.fvalue(id, v381);
5312                                 if (typeof x != 'object')
5313                                     throw 'The value ' + x + ' is not a type object.';
5314                                 return (x.car = ({car: v380, cdr: l35.fvalue(id, v381)}));
5315                             })();
5316                         })() : (l25.fvalue(id, v383, l173) !== l3.value ? (function(){
5317                             return (function(){
5318                                 var x = l36.fvalue(id, v381);
5319                                 if (typeof x != 'object')
5320                                     throw 'The value ' + x + ' is not a type object.';
5321                                 return (x.car = ({car: v380, cdr: l37.fvalue(id, v381)}));
5322                             })();
5323                         })() : (function(){
5324                             return (function(){
5325                                 throw "ECASE expression failed.";
5326                             })();
5327                         })()))));
5328                     })(v382);
5329                 })();
5330             }
5331             catch (cf){
5332                 if (cf.type == 'block' && cf.id == 151)
5333                     return cf.value;
5334                 else
5335                     throw cf;
5336             }
5337         })();
5338
5339     }));
5340     return l171;
5341 })();
5342 var l174 = {name: "EXTEND-LEXENV"};
5343 (function(){
5344     (l174).fvalue = (function(v391){
5345         ((v391)["fname"] = "EXTEND-LEXENV");
5346         return v391;
5347     })((function (values,v385,v386,v387){
5348         if (arguments.length < 4) throw 'too few arguments';
5349         if (arguments.length > 4) throw 'too many arguments';
5350         return (function(){
5351             try {
5352                 return (function(){
5353                     return (function(v388){
5354                         return (function(){
5355                             try {
5356                                 return (function(){
5357                                     return (function(v389,v390){
5358                                         (function(){
5359                                             while(v389 !== l3.value){
5360                                                 (v390 = (function(){
5361                                                     var tmp = v389;
5362                                                     return tmp === l3.value? l3.value: tmp.car;
5363                                                 })());
5364                                                 (function(){
5365                                                     l171.fvalue(id, v390, v388, v387);
5366                                                     return l3.value;
5367                                                 })();
5368                                                 (v389 = (function(){
5369                                                     var tmp = v389;
5370                                                     return tmp === l3.value? l3.value: tmp.cdr;
5371                                                 })());
5372                                             }return l3.value;
5373                                         })();
5374                                         return v388;
5375                                     })(l64.fvalue(id, v385),l3.value);
5376                                 })();
5377                             }
5378                             catch (cf){
5379                                 if (cf.type == 'block' && cf.id == 153)
5380                                     return cf.value;
5381                                 else
5382                                     throw cf;
5383                             }
5384                         })();
5385                     })(l170.fvalue(id, v386));
5386                 })();
5387             }
5388             catch (cf){
5389                 if (cf.type == 'block' && cf.id == 152)
5390                     return cf.value;
5391                 else
5392                     throw cf;
5393             }
5394         })();
5395
5396     }));
5397     return l174;
5398 })();
5399 var l175 = {name: "LOOKUP-IN-LEXENV"};
5400 (function(){
5401     (l175).fvalue = (function(v396){
5402         ((v396)["fname"] = "LOOKUP-IN-LEXENV");
5403         return v396;
5404     })((function (values,v392,v393,v394){
5405         if (arguments.length < 4) throw 'too few arguments';
5406         if (arguments.length > 4) throw 'too many arguments';
5407         return (function(){
5408             try {
5409                 return (function(){
5410                     return l91.fvalue(id, v392, (function(v395){
5411                         return (l25.fvalue(id, v395, l99) !== l3.value ? (function(){
5412                             return l38.fvalue(id, v393);
5413                         })() : (l25.fvalue(id, v395, l98) !== l3.value ? (function(){
5414                             return l39.fvalue(id, v393);
5415                         })() : (l25.fvalue(id, v395, l172) !== l3.value ? (function(){
5416                             return l40.fvalue(id, v393);
5417                         })() : (l25.fvalue(id, v395, l173) !== l3.value ? (function(){
5418                             return l41.fvalue(id, v393);
5419                         })() : (function(){
5420                             return (function(){
5421                                 throw "ECASE expression failed.";
5422                             })();
5423                         })()))));
5424                     })(v394));
5425                 })();
5426             }
5427             catch (cf){
5428                 if (cf.type == 'block' && cf.id == 154)
5429                     return cf.value;
5430                 else
5431                     throw cf;
5432             }
5433         })();
5434
5435     }));
5436     return l175;
5437 })();
5438 var l176 = {name: "*ENVIRONMENT*"};
5439 (function(){
5440     (((l176.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
5441         return ((l176).value = l169.fvalue(id));
5442     })());
5443     return l176;
5444 })();
5445 var l177 = {name: "*VARIABLE-COUNTER*"};
5446 (function(){
5447     (((l177.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
5448         return ((l177).value = 0);
5449     })());
5450     return l177;
5451 })();
5452 var l178 = {name: "GVARNAME"};
5453 (function(){
5454     (l178).fvalue = (function(v398){
5455         ((v398)["fname"] = "GVARNAME");
5456         return v398;
5457     })((function (values,v397){
5458         if (arguments.length < 2) throw 'too few arguments';
5459         if (arguments.length > 2) throw 'too many arguments';
5460         return (function(){
5461             try {
5462                 return (function(){
5463                     return l126.fvalue(id, "v", l16.fvalue(id, ((l177).value = (function(){
5464                         var x1 = (function(){
5465                             var symbol = l177;
5466                             var value = symbol.value;
5467                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5468                             return value;
5469                         })();
5470                         if (typeof x1 !== 'number') throw 'Not a number!';
5471                         var x2 = 1;
5472                         if (typeof x2 !== 'number') throw 'Not a number!';
5473                         return x1+x2;
5474                     })())));
5475                 })();
5476             }
5477             catch (cf){
5478                 if (cf.type == 'block' && cf.id == 155)
5479                     return cf.value;
5480                 else
5481                     throw cf;
5482             }
5483         })();
5484
5485     }));
5486     return l178;
5487 })();
5488 var l179 = {name: "TRANSLATE-VARIABLE"};
5489 (function(){
5490     (l179).fvalue = (function(v400){
5491         ((v400)["fname"] = "TRANSLATE-VARIABLE");
5492         return v400;
5493     })((function (values,v399){
5494         if (arguments.length < 2) throw 'too few arguments';
5495         if (arguments.length > 2) throw 'too many arguments';
5496         return (function(){
5497             try {
5498                 return (function(){
5499                     return l164.fvalue(id, l175.fvalue(id, v399, (function(){
5500                         var symbol = l176;
5501                         var value = symbol.value;
5502                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5503                         return value;
5504                     })(), l99));
5505                 })();
5506             }
5507             catch (cf){
5508                 if (cf.type == 'block' && cf.id == 156)
5509                     return cf.value;
5510                 else
5511                     throw cf;
5512             }
5513         })();
5514
5515     }));
5516     return l179;
5517 })();
5518 var l180 = {name: "EXTEND-LOCAL-ENV"};
5519 var l181 = {name: "LEXICAL-VARIABLE"};
5520 (function(){
5521     (l180).fvalue = (function(v406){
5522         ((v406)["fname"] = "EXTEND-LOCAL-ENV");
5523         return v406;
5524     })((function (values,v401){
5525         if (arguments.length < 2) throw 'too few arguments';
5526         if (arguments.length > 2) throw 'too many arguments';
5527         return (function(){
5528             try {
5529                 return (function(){
5530                     return (function(v402){
5531                         return (function(){
5532                             try {
5533                                 return (function(){
5534                                     return (function(v403,v404){
5535                                         (function(){
5536                                             while(v403 !== l3.value){
5537                                                 (v404 = (function(){
5538                                                     var tmp = v403;
5539                                                     return tmp === l3.value? l3.value: tmp.car;
5540                                                 })());
5541                                                 (function(){
5542                                                     (function(v405){
5543                                                         return l171.fvalue(id, v405, v402, l99);
5544                                                     })(l161.fvalue(id, v404, l181, l178.fvalue(id, v404)));
5545                                                     return l3.value;
5546                                                 })();
5547                                                 (v403 = (function(){
5548                                                     var tmp = v403;
5549                                                     return tmp === l3.value? l3.value: tmp.cdr;
5550                                                 })());
5551                                             }return l3.value;
5552                                         })();
5553                                         return v402;
5554                                     })(v401,l3.value);
5555                                 })();
5556                             }
5557                             catch (cf){
5558                                 if (cf.type == 'block' && cf.id == 158)
5559                                     return cf.value;
5560                                 else
5561                                     throw cf;
5562                             }
5563                         })();
5564                     })(l170.fvalue(id, (function(){
5565                         var symbol = l176;
5566                         var value = symbol.value;
5567                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5568                         return value;
5569                     })()));
5570                 })();
5571             }
5572             catch (cf){
5573                 if (cf.type == 'block' && cf.id == 157)
5574                     return cf.value;
5575                 else
5576                     throw cf;
5577             }
5578         })();
5579
5580     }));
5581     return l180;
5582 })();
5583 var l182 = {name: "*TOPLEVEL-COMPILATIONS*"};
5584 (function(){
5585     (((l182.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
5586         return ((l182).value = l3.value);
5587     })());
5588     return l182;
5589 })();
5590 var l183 = {name: "TOPLEVEL-COMPILATION"};
5591 (function(){
5592     (l183).fvalue = (function(v408){
5593         ((v408)["fname"] = "TOPLEVEL-COMPILATION");
5594         return v408;
5595     })((function (values,v407){
5596         if (arguments.length < 2) throw 'too few arguments';
5597         if (arguments.length > 2) throw 'too many arguments';
5598         return (function(){
5599             try {
5600                 return (function(){
5601                     return ((l182).value = ({car: v407, cdr: (function(){
5602                         var symbol = l182;
5603                         var value = symbol.value;
5604                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5605                         return value;
5606                     })()}));
5607                 })();
5608             }
5609             catch (cf){
5610                 if (cf.type == 'block' && cf.id == 159)
5611                     return cf.value;
5612                 else
5613                     throw cf;
5614             }
5615         })();
5616
5617     }));
5618     return l183;
5619 })();
5620 var l184 = {name: "NULL-OR-EMPTY-P"};
5621 (function(){
5622     (l184).fvalue = (function(v410){
5623         ((v410)["fname"] = "NULL-OR-EMPTY-P");
5624         return v410;
5625     })((function (values,v409){
5626         if (arguments.length < 2) throw 'too few arguments';
5627         if (arguments.length > 2) throw 'too many arguments';
5628         return (function(){
5629             try {
5630                 return (function(){
5631                     return l23.fvalue(id, l67.fvalue(id, v409));
5632                 })();
5633             }
5634             catch (cf){
5635                 if (cf.type == 'block' && cf.id == 160)
5636                     return cf.value;
5637                 else
5638                     throw cf;
5639             }
5640         })();
5641
5642     }));
5643     return l184;
5644 })();
5645 var l185 = {name: "GET-TOPLEVEL-COMPILATIONS"};
5646 (function(){
5647     (l185).fvalue = (function(v411){
5648         ((v411)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
5649         return v411;
5650     })((function (values){
5651         if (arguments.length > 1) throw 'too many arguments';
5652         return (function(){
5653             try {
5654                 return (function(){
5655                     return l64.fvalue(id, l84.fvalue(id, (function(){
5656                         var symbol = l184;
5657                         var func = symbol.fvalue;
5658                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5659                         return func;
5660                     })(), (function(){
5661                         var symbol = l182;
5662                         var value = symbol.value;
5663                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5664                         return value;
5665                     })()));
5666                 })();
5667             }
5668             catch (cf){
5669                 if (cf.type == 'block' && cf.id == 161)
5670                     return cf.value;
5671                 else
5672                     throw cf;
5673             }
5674         })();
5675
5676     }));
5677     return l185;
5678 })();
5679 var l186 = {name: "%COMPILE-DEFMACRO"};
5680 var l187 = {name: "MACRO"};
5681 (function(){
5682     (l186).fvalue = (function(v414){
5683         ((v414)["fname"] = "%COMPILE-DEFMACRO");
5684         return v414;
5685     })((function (values,v412,v413){
5686         if (arguments.length < 3) throw 'too few arguments';
5687         if (arguments.length > 3) throw 'too many arguments';
5688         return (function(){
5689             try {
5690                 return (function(){
5691                     l183.fvalue(id, (function(){
5692                         var symbol = l135;
5693                         var func = symbol.fvalue;
5694                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5695                         return func;
5696                     })()(id, l62.fvalue(id, l42.fvalue(id, l155), l42.fvalue(id, v412))));
5697                     return l171.fvalue(id, l161.fvalue(id, v412, l187, v413), (function(){
5698                         var symbol = l176;
5699                         var value = symbol.value;
5700                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5701                         return value;
5702                     })(), l98);
5703                 })();
5704             }
5705             catch (cf){
5706                 if (cf.type == 'block' && cf.id == 162)
5707                     return cf.value;
5708                 else
5709                     throw cf;
5710             }
5711         })();
5712
5713     }));
5714     return l186;
5715 })();
5716 var l188 = {name: "GLOBAL-BINDING"};
5717 (function(){
5718     (l188).fvalue = (function(v420){
5719         ((v420)["fname"] = "GLOBAL-BINDING");
5720         return v420;
5721     })((function (values,v415,v416,v417){
5722         if (arguments.length < 4) throw 'too few arguments';
5723         if (arguments.length > 4) throw 'too many arguments';
5724         return (function(){
5725             try {
5726                 return (function(){
5727                     return (function(v418){
5728                         return (v418 !== l3.value ? v418 : (function(v419){
5729                             l171.fvalue(id, v419, (function(){
5730                                 var symbol = l176;
5731                                 var value = symbol.value;
5732                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5733                                 return value;
5734                             })(), v417);
5735                             return v419;
5736                         })(l161.fvalue(id, v415, v416, l3.value)));
5737                     })(l175.fvalue(id, v415, (function(){
5738                         var symbol = l176;
5739                         var value = symbol.value;
5740                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5741                         return value;
5742                     })(), v417));
5743                 })();
5744             }
5745             catch (cf){
5746                 if (cf.type == 'block' && cf.id == 163)
5747                     return cf.value;
5748                 else
5749                     throw cf;
5750             }
5751         })();
5752
5753     }));
5754     return l188;
5755 })();
5756 var l189 = {name: "CLAIMP"};
5757 (function(){
5758     (l189).fvalue = (function(v425){
5759         ((v425)["fname"] = "CLAIMP");
5760         return v425;
5761     })((function (values,v421,v422,v423){
5762         if (arguments.length < 4) throw 'too few arguments';
5763         if (arguments.length > 4) throw 'too many arguments';
5764         return (function(){
5765             try {
5766                 return (function(){
5767                     return (function(v424){
5768                         return (v424 !== l3.value ? l82.fvalue(id, v423, l165.fvalue(id, v424)) : l3.value);
5769                     })(l175.fvalue(id, v421, (function(){
5770                         var symbol = l176;
5771                         var value = symbol.value;
5772                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5773                         return value;
5774                     })(), v422));
5775                 })();
5776             }
5777             catch (cf){
5778                 if (cf.type == 'block' && cf.id == 164)
5779                     return cf.value;
5780                 else
5781                     throw cf;
5782             }
5783         })();
5784
5785     }));
5786     return l189;
5787 })();
5788 var l190 = {name: "!PROCLAIM"};
5789 var l191 = {name: "SPECIAL"};
5790 var l192 = {name: "NOTINLINE"};
5791 var l193 = {name: "CONSTANT"};
5792 var l194 = {name: "NON-OVERRIDABLE"};
5793 (function(){
5794     (l190).fvalue = (function(v440){
5795         ((v440)["fname"] = "!PROCLAIM");
5796         return v440;
5797     })((function (values,v426){
5798         if (arguments.length < 2) throw 'too few arguments';
5799         if (arguments.length > 2) throw 'too many arguments';
5800         return (function(){
5801             try {
5802                 return (function(){
5803                     return (function(v427){
5804                         return (l25.fvalue(id, v427, l191) !== l3.value ? (function(){
5805                             return (function(){
5806                                 try {
5807                                     return (function(){
5808                                         return (function(v428,v429){
5809                                             (function(){
5810                                                 while(v428 !== l3.value){
5811                                                     (v429 = (function(){
5812                                                         var tmp = v428;
5813                                                         return tmp === l3.value? l3.value: tmp.car;
5814                                                     })());
5815                                                     (function(){
5816                                                         (function(v430){
5817                                                             return l168.fvalue(id, l191, v430);
5818                                                         })(l188.fvalue(id, v429, l99, l99));
5819                                                         return l3.value;
5820                                                     })();
5821                                                     (v428 = (function(){
5822                                                         var tmp = v428;
5823                                                         return tmp === l3.value? l3.value: tmp.cdr;
5824                                                     })());
5825                                                 }return l3.value;
5826                                             })();
5827                                             return l3.value;
5828                                         })((function(){
5829                                             var tmp = v426;
5830                                             return tmp === l3.value? l3.value: tmp.cdr;
5831                                         })(),l3.value);
5832                                     })();
5833                                 }
5834                                 catch (cf){
5835                                     if (cf.type == 'block' && cf.id == 166)
5836                                         return cf.value;
5837                                     else
5838                                         throw cf;
5839                                 }
5840                             })();
5841                         })() : (l25.fvalue(id, v427, l192) !== l3.value ? (function(){
5842                             return (function(){
5843                                 try {
5844                                     return (function(){
5845                                         return (function(v431,v432){
5846                                             (function(){
5847                                                 while(v431 !== l3.value){
5848                                                     (v432 = (function(){
5849                                                         var tmp = v431;
5850                                                         return tmp === l3.value? l3.value: tmp.car;
5851                                                     })());
5852                                                     (function(){
5853                                                         (function(v433){
5854                                                             return l168.fvalue(id, l192, v433);
5855                                                         })(l188.fvalue(id, v432, l98, l98));
5856                                                         return l3.value;
5857                                                     })();
5858                                                     (v431 = (function(){
5859                                                         var tmp = v431;
5860                                                         return tmp === l3.value? l3.value: tmp.cdr;
5861                                                     })());
5862                                                 }return l3.value;
5863                                             })();
5864                                             return l3.value;
5865                                         })((function(){
5866                                             var tmp = v426;
5867                                             return tmp === l3.value? l3.value: tmp.cdr;
5868                                         })(),l3.value);
5869                                     })();
5870                                 }
5871                                 catch (cf){
5872                                     if (cf.type == 'block' && cf.id == 167)
5873                                         return cf.value;
5874                                     else
5875                                         throw cf;
5876                                 }
5877                             })();
5878                         })() : (l25.fvalue(id, v427, l193) !== l3.value ? (function(){
5879                             return (function(){
5880                                 try {
5881                                     return (function(){
5882                                         return (function(v434,v435){
5883                                             (function(){
5884                                                 while(v434 !== l3.value){
5885                                                     (v435 = (function(){
5886                                                         var tmp = v434;
5887                                                         return tmp === l3.value? l3.value: tmp.car;
5888                                                     })());
5889                                                     (function(){
5890                                                         (function(v436){
5891                                                             return l168.fvalue(id, l193, v436);
5892                                                         })(l188.fvalue(id, v435, l99, l99));
5893                                                         return l3.value;
5894                                                     })();
5895                                                     (v434 = (function(){
5896                                                         var tmp = v434;
5897                                                         return tmp === l3.value? l3.value: tmp.cdr;
5898                                                     })());
5899                                                 }return l3.value;
5900                                             })();
5901                                             return l3.value;
5902                                         })((function(){
5903                                             var tmp = v426;
5904                                             return tmp === l3.value? l3.value: tmp.cdr;
5905                                         })(),l3.value);
5906                                     })();
5907                                 }
5908                                 catch (cf){
5909                                     if (cf.type == 'block' && cf.id == 168)
5910                                         return cf.value;
5911                                     else
5912                                         throw cf;
5913                                 }
5914                             })();
5915                         })() : (l25.fvalue(id, v427, l194) !== l3.value ? (function(){
5916                             return (function(){
5917                                 try {
5918                                     return (function(){
5919                                         return (function(v437,v438){
5920                                             (function(){
5921                                                 while(v437 !== l3.value){
5922                                                     (v438 = (function(){
5923                                                         var tmp = v437;
5924                                                         return tmp === l3.value? l3.value: tmp.car;
5925                                                     })());
5926                                                     (function(){
5927                                                         (function(v439){
5928                                                             return l168.fvalue(id, l194, v439);
5929                                                         })(l188.fvalue(id, v438, l98, l98));
5930                                                         return l3.value;
5931                                                     })();
5932                                                     (v437 = (function(){
5933                                                         var tmp = v437;
5934                                                         return tmp === l3.value? l3.value: tmp.cdr;
5935                                                     })());
5936                                                 }return l3.value;
5937                                             })();
5938                                             return l3.value;
5939                                         })((function(){
5940                                             var tmp = v426;
5941                                             return tmp === l3.value? l3.value: tmp.cdr;
5942                                         })(),l3.value);
5943                                     })();
5944                                 }
5945                                 catch (cf){
5946                                     if (cf.type == 'block' && cf.id == 169)
5947                                         return cf.value;
5948                                     else
5949                                         throw cf;
5950                                 }
5951                             })();
5952                         })() : l3.value))));
5953                     })((function(){
5954                         var tmp = v426;
5955                         return tmp === l3.value? l3.value: tmp.car;
5956                     })());
5957                 })();
5958             }
5959             catch (cf){
5960                 if (cf.type == 'block' && cf.id == 165)
5961                     return cf.value;
5962                 else
5963                     throw cf;
5964             }
5965         })();
5966
5967     }));
5968     return l190;
5969 })();
5970 var l195 = {name: "PROCLAIM"};
5971 (l195).fvalue = (function(){
5972     var symbol = l190;
5973     var func = symbol.fvalue;
5974     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5975     return func;
5976 })();
5977 var l196 = {name: "*COMPILATIONS*"};
5978 (function(){
5979     (((l196.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
5980         return ((l196).value = l3.value);
5981     })());
5982     return l196;
5983 })();
5984 var l197 = {name: "DEFINE-COMPILATION"};
5985 l197;
5986 var l198 = {name: "IF"};
5987 ((l196).value = ({car: l42.fvalue(id, l198, (function (values,v441,v442,v443){
5988     if (arguments.length < 4) throw 'too few arguments';
5989     if (arguments.length > 4) throw 'too many arguments';
5990     return (function(){
5991         try {
5992             return (function(){
5993                 return l126.fvalue(id, "(", (function(){
5994                     var symbol = l135;
5995                     var func = symbol.fvalue;
5996                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5997                     return func;
5998                 })()(id, v441), " !== ", (function(){
5999                     var symbol = l135;
6000                     var func = symbol.fvalue;
6001                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6002                     return func;
6003                 })()(id, l3.value), " ? ", (function(){
6004                     var symbol = l135;
6005                     var func = symbol.fvalue;
6006                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6007                     return func;
6008                 })()(id, v442), " : ", (function(){
6009                     var symbol = l135;
6010                     var func = symbol.fvalue;
6011                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6012                     return func;
6013                 })()(id, v443), ")");
6014             })();
6015         }
6016         catch (cf){
6017             if (cf.type == 'block' && cf.id == 170)
6018                 return cf.value;
6019             else
6020                 throw cf;
6021         }
6022     })();
6023
6024 })), cdr: (function(){
6025     var symbol = l196;
6026     var value = symbol.value;
6027     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6028     return value;
6029 })()}));
6030 var l199 = {name: "*LAMBDA-LIST-KEYWORDS*"};
6031 var l200 = {name: "&OPTIONAL"};
6032 var l201 = {name: "&REST"};
6033 var l202 = {car: l200, cdr: {car: l201, cdr: l3}};
6034 (function(){
6035     (((l199.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
6036         return ((l199).value = l202);
6037     })());
6038     return l199;
6039 })();
6040 var l203 = {name: "LIST-UNTIL-KEYWORD"};
6041 (function(){
6042     (l203).fvalue = (function(v446){
6043         ((v446)["fname"] = "LIST-UNTIL-KEYWORD");
6044         return v446;
6045     })((function (values,v444){
6046         if (arguments.length < 2) throw 'too few arguments';
6047         if (arguments.length > 2) throw 'too many arguments';
6048         return (function(){
6049             try {
6050                 return (function(){
6051                     return ((function(v445){
6052                         return (v445 !== l3.value ? v445 : l82.fvalue(id, (function(){
6053                             var tmp = v444;
6054                             return tmp === l3.value? l3.value: tmp.car;
6055                         })(), (function(){
6056                             var symbol = l199;
6057                             var value = symbol.value;
6058                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6059                             return value;
6060                         })()));
6061                     })(l11.fvalue(id, v444)) !== l3.value ? l3.value : ({car: (function(){
6062                         var tmp = v444;
6063                         return tmp === l3.value? l3.value: tmp.car;
6064                     })(), cdr: l203.fvalue(id, (function(){
6065                         var tmp = v444;
6066                         return tmp === l3.value? l3.value: tmp.cdr;
6067                     })())}));
6068                 })();
6069             }
6070             catch (cf){
6071                 if (cf.type == 'block' && cf.id == 171)
6072                     return cf.value;
6073                 else
6074                     throw cf;
6075             }
6076         })();
6077
6078     }));
6079     return l203;
6080 })();
6081 var l204 = {name: "LAMBDA-LIST-REQUIRED-ARGUMENTS"};
6082 (function(){
6083     (l204).fvalue = (function(v448){
6084         ((v448)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
6085         return v448;
6086     })((function (values,v447){
6087         if (arguments.length < 2) throw 'too few arguments';
6088         if (arguments.length > 2) throw 'too many arguments';
6089         return (function(){
6090             try {
6091                 return (function(){
6092                     return l203.fvalue(id, v447);
6093                 })();
6094             }
6095             catch (cf){
6096                 if (cf.type == 'block' && cf.id == 172)
6097                     return cf.value;
6098                 else
6099                     throw cf;
6100             }
6101         })();
6102
6103     }));
6104     return l204;
6105 })();
6106 var l205 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"};
6107 (function(){
6108     (l205).fvalue = (function(v450){
6109         ((v450)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
6110         return v450;
6111     })((function (values,v449){
6112         if (arguments.length < 2) throw 'too few arguments';
6113         if (arguments.length > 2) throw 'too many arguments';
6114         return (function(){
6115             try {
6116                 return (function(){
6117                     return l69.fvalue(id, (function(){
6118                         var symbol = l56;
6119                         var func = symbol.fvalue;
6120                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6121                         return func;
6122                     })(), l203.fvalue(id, (function(){
6123                         var tmp = l82.fvalue(id, l200, v449);
6124                         return tmp === l3.value? l3.value: tmp.cdr;
6125                     })()));
6126                 })();
6127             }
6128             catch (cf){
6129                 if (cf.type == 'block' && cf.id == 173)
6130                     return cf.value;
6131                 else
6132                     throw cf;
6133             }
6134         })();
6135
6136     }));
6137     return l205;
6138 })();
6139 var l206 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS"};
6140 (function(){
6141     (l206).fvalue = (function(v452){
6142         ((v452)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
6143         return v452;
6144     })((function (values,v451){
6145         if (arguments.length < 2) throw 'too few arguments';
6146         if (arguments.length > 2) throw 'too many arguments';
6147         return (function(){
6148             try {
6149                 return (function(){
6150                     return l69.fvalue(id, (function(){
6151                         var symbol = l29;
6152                         var func = symbol.fvalue;
6153                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6154                         return func;
6155                     })(), l205.fvalue(id, v451));
6156                 })();
6157             }
6158             catch (cf){
6159                 if (cf.type == 'block' && cf.id == 174)
6160                     return cf.value;
6161                 else
6162                     throw cf;
6163             }
6164         })();
6165
6166     }));
6167     return l206;
6168 })();
6169 var l207 = {name: "LAMBDA-LIST-REST-ARGUMENT"};
6170 (function(){
6171     (l207).fvalue = (function(v455){
6172         ((v455)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
6173         return v455;
6174     })((function (values,v453){
6175         if (arguments.length < 2) throw 'too few arguments';
6176         if (arguments.length > 2) throw 'too many arguments';
6177         return (function(){
6178             try {
6179                 return (function(){
6180                     return (function(v454){
6181                         ((function(){
6182                             var tmp = v454;
6183                             return tmp === l3.value? l3.value: tmp.cdr;
6184                         })() !== l3.value ? (function(){
6185                             return (function(){
6186                                 throw "Bad lambda-list";
6187                             })();
6188                         })() : l3.value);
6189                         return (function(){
6190                             var tmp = v454;
6191                             return tmp === l3.value? l3.value: tmp.car;
6192                         })();
6193                     })(l203.fvalue(id, (function(){
6194                         var tmp = l82.fvalue(id, l201, v453);
6195                         return tmp === l3.value? l3.value: tmp.cdr;
6196                     })()));
6197                 })();
6198             }
6199             catch (cf){
6200                 if (cf.type == 'block' && cf.id == 175)
6201                     return cf.value;
6202                 else
6203                     throw cf;
6204             }
6205         })();
6206
6207     }));
6208     return l207;
6209 })();
6210 var l208 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
6211 (function(){
6212     (l208).fvalue = (function(v458){
6213         ((v458)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
6214         return v458;
6215     })((function (values,v457){
6216         if (arguments.length < 2) throw 'too few arguments';
6217         var v456= l3.value;
6218         for (var i = arguments.length-1; i>=2; i--)
6219             v456 = {car: arguments[i], cdr:
6220         v456};
6221         return (function(){
6222             try {
6223                 return (function(){
6224                     return (v457 !== l3.value ? l126.fvalue(id, "(function(){", (function(){
6225                         var symbol = l125;
6226                         var value = symbol.value;
6227                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6228                         return value;
6229                     })(), l133.fvalue(id, "var func = ", l128.fvalue(id, v456), ";", (function(){
6230                         var symbol = l125;
6231                         var value = symbol.value;
6232                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6233                         return value;
6234                     })(), "func.docstring = '", v457, "';", (function(){
6235                         var symbol = l125;
6236                         var value = symbol.value;
6237                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6238                         return value;
6239                     })(), "return func;", (function(){
6240                         var symbol = l125;
6241                         var value = symbol.value;
6242                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6243                         return value;
6244                     })()), "})()") : l128.fvalue(id, v456));
6245                 })();
6246             }
6247             catch (cf){
6248                 if (cf.type == 'block' && cf.id == 176)
6249                     return cf.value;
6250                 else
6251                     throw cf;
6252             }
6253         })();
6254
6255     }));
6256     return l208;
6257 })();
6258 var l209 = {name: "LAMBDA"};
6259 var l210 = {name: "LS-COMPILE-BLOCK"};
6260 ((l196).value = ({car: l42.fvalue(id, l209, (function (values,v460){
6261     if (arguments.length < 2) throw 'too few arguments';
6262     var v459= l3.value;
6263     for (var i = arguments.length-1; i>=2; i--)
6264         v459 = {car: arguments[i], cdr:
6265     v459};
6266     return (function(){
6267         try {
6268             return (function(){
6269                 return (function(v461,v462,v463,v464){
6270                     ((((typeof((function(){
6271                         var tmp = v459;
6272                         return tmp === l3.value? l3.value: tmp.car;
6273                     })()) == "string")?l4.value: l3.value) !== l3.value ? l26.fvalue(id, l11.fvalue(id, (function(){
6274                         var tmp = v459;
6275                         return tmp === l3.value? l3.value: tmp.cdr;
6276                     })())) : l3.value) !== l3.value ? (function(){
6277                         (v464 = (function(){
6278                             var tmp = v459;
6279                             return tmp === l3.value? l3.value: tmp.car;
6280                         })());
6281                         return (v459 = (function(){
6282                             var tmp = v459;
6283                             return tmp === l3.value? l3.value: tmp.cdr;
6284                         })());
6285                     })() : l3.value);
6286                     return (function(v465,v466,v467){
6287                         try {
6288                             var tmp;
6289                             tmp = l176.value;
6290                             l176.value = v467;
6291                             v467 = tmp;
6292                             return l208.fvalue(id, v464, "(function (", l128.fvalue(id, ({car: "values", cdr: l69.fvalue(id, (function(){
6293                                 var symbol = l179;
6294                                 var func = symbol.fvalue;
6295                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6296                                 return func;
6297                             })(), l62.fvalue(id, v461, v462))}), ","), "){", (function(){
6298                                 var symbol = l125;
6299                                 var value = symbol.value;
6300                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6301                                 return value;
6302                             })(), l133.fvalue(id, (v461 !== l3.value ? l126.fvalue(id, "if (arguments.length < ", l16.fvalue(id, l21.fvalue(id, v465)), ") throw 'too few arguments';", (function(){
6303                                 var symbol = l125;
6304                                 var value = symbol.value;
6305                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6306                                 return value;
6307                             })()) : ""), (l26.fvalue(id, v463) !== l3.value ? l126.fvalue(id, "if (arguments.length > ", l16.fvalue(id, (function(){
6308                                 var x1 = 1;
6309                                 if (typeof x1 !== 'number') throw 'Not a number!';
6310                                 var x2 = v465;
6311                                 if (typeof x2 !== 'number') throw 'Not a number!';
6312                                 var x3 = v466;
6313                                 if (typeof x3 !== 'number') throw 'Not a number!';
6314                                 return x1+x2+x3;
6315                             })()), ") throw 'too many arguments';", (function(){
6316                                 var symbol = l125;
6317                                 var value = symbol.value;
6318                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6319                                 return value;
6320                             })()) : ""), (v462 !== l3.value ? l126.fvalue(id, "switch(arguments.length-1){", (function(){
6321                                 var symbol = l125;
6322                                 var value = symbol.value;
6323                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6324                                 return value;
6325                             })(), (function(v468,v469,v470){
6326                                 return (function(){
6327                                     (function(){
6328                                         try {
6329                                             return (function(){
6330                                                 return (function(){
6331                                                     while((function(){
6332                                                         var x1 = v470;
6333                                                         if (typeof x1 !== 'number') throw 'Not a number!';
6334                                                         var x2 = v466;
6335                                                         if (typeof x2 !== 'number') throw 'Not a number!';
6336                                                         return (x1<x2?l4.value: l3.value);
6337                                                     })() !== l3.value){
6338                                                         (function(v471){
6339                                                             (v469 = ({car: l126.fvalue(id, "case ", l16.fvalue(id, (function(){
6340                                                                 var x1 = v470;
6341                                                                 if (typeof x1 !== 'number') throw 'Not a number!';
6342                                                                 var x2 = v465;
6343                                                                 if (typeof x2 !== 'number') throw 'Not a number!';
6344                                                                 return x1+x2;
6345                                                             })()), ":", (function(){
6346                                                                 var symbol = l125;
6347                                                                 var value = symbol.value;
6348                                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6349                                                                 return value;
6350                                                             })(), l179.fvalue(id, (function(){
6351                                                                 var tmp = v471;
6352                                                                 return tmp === l3.value? l3.value: tmp.car;
6353                                                             })()), "=", (function(){
6354                                                                 var symbol = l135;
6355                                                                 var func = symbol.fvalue;
6356                                                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6357                                                                 return func;
6358                                                             })()(id, l32.fvalue(id, v471)), ";", (function(){
6359                                                                 var symbol = l125;
6360                                                                 var value = symbol.value;
6361                                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6362                                                                 return value;
6363                                                             })()), cdr: v469}));
6364                                                             return (v470 = (function(){
6365                                                                 var x1 = v470;
6366                                                                 if (typeof x1 !== 'number') throw 'Not a number!';
6367                                                                 var x2 = 1;
6368                                                                 if (typeof x2 !== 'number') throw 'Not a number!';
6369                                                                 return x1+x2;
6370                                                             })());
6371                                                         })(l79.fvalue(id, v470, v468));
6372                                                     }return l3.value;
6373                                                 })();
6374                                             })();
6375                                         }
6376                                         catch (cf){
6377                                             if (cf.type == 'block' && cf.id == 178)
6378                                                 return cf.value;
6379                                             else
6380                                                 throw cf;
6381                                         }
6382                                     })();
6383                                     (v469 = ({car: l126.fvalue(id, "default: break;", (function(){
6384                                         var symbol = l125;
6385                                         var value = symbol.value;
6386                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6387                                         return value;
6388                                     })()), cdr: v469}));
6389                                     return l128.fvalue(id, l64.fvalue(id, v469));
6390                                 })();
6391                             })(l205.fvalue(id, v460),l3.value,0), "}", (function(){
6392                                 var symbol = l125;
6393                                 var value = symbol.value;
6394                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6395                                 return value;
6396                             })()) : ""), (v463 !== l3.value ? (function(v472){
6397                                 return l126.fvalue(id, "var ", v472, "= ", (function(){
6398                                     var symbol = l135;
6399                                     var func = symbol.fvalue;
6400                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6401                                     return func;
6402                                 })()(id, l3.value), ";", (function(){
6403                                     var symbol = l125;
6404                                     var value = symbol.value;
6405                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6406                                     return value;
6407                                 })(), "for (var i = arguments.length-1; i>=", l16.fvalue(id, (function(){
6408                                     var x1 = 1;
6409                                     if (typeof x1 !== 'number') throw 'Not a number!';
6410                                     var x2 = v465;
6411                                     if (typeof x2 !== 'number') throw 'Not a number!';
6412                                     var x3 = v466;
6413                                     if (typeof x3 !== 'number') throw 'Not a number!';
6414                                     return x1+x2+x3;
6415                                 })()), "; i--)", (function(){
6416                                     var symbol = l125;
6417                                     var value = symbol.value;
6418                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6419                                     return value;
6420                                 })(), l133.fvalue(id, v472, " = ", "{car: arguments[i], cdr: "), v472, "};", (function(){
6421                                     var symbol = l125;
6422                                     var value = symbol.value;
6423                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6424                                     return value;
6425                                 })());
6426                             })(l179.fvalue(id, v463)) : ""), (function(){
6427                                 var symbol = l210;
6428                                 var func = symbol.fvalue;
6429                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6430                                 return func;
6431                             })()(id, v459, l4.value)), (function(){
6432                                 var symbol = l125;
6433                                 var value = symbol.value;
6434                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6435                                 return value;
6436                             })(), "})");
6437                         }
6438                         finally {
6439                             l176.value = v467;
6440                         }
6441                     })(l67.fvalue(id, v461),l67.fvalue(id, v462),l180.fvalue(id, l62.fvalue(id, l56.fvalue(id, v463), v461, v462)));
6442                 })(l204.fvalue(id, v460),l206.fvalue(id, v460),l207.fvalue(id, v460),l3.value);
6443             })();
6444         }
6445         catch (cf){
6446             if (cf.type == 'block' && cf.id == 177)
6447                 return cf.value;
6448             else
6449                 throw cf;
6450         }
6451     })();
6452
6453 })), cdr: (function(){
6454     var symbol = l196;
6455     var value = symbol.value;
6456     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6457     return value;
6458 })()}));
6459 var l211 = {name: "SETQ-PAIR"};
6460 var l212 = {name: "SET"};
6461 (function(){
6462     (l211).fvalue = (function(v476){
6463         ((v476)["fname"] = "SETQ-PAIR");
6464         return v476;
6465     })((function (values,v473,v474){
6466         if (arguments.length < 3) throw 'too few arguments';
6467         if (arguments.length > 3) throw 'too many arguments';
6468         return (function(){
6469             try {
6470                 return (function(){
6471                     return (function(v475){
6472                         return (((l163.fvalue(id, v475) === l181)?l4.value: l3.value) !== l3.value ? l126.fvalue(id, l164.fvalue(id, v475), " = ", (function(){
6473                             var symbol = l135;
6474                             var func = symbol.fvalue;
6475                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6476                             return func;
6477                         })()(id, v474)) : (function(){
6478                             var symbol = l135;
6479                             var func = symbol.fvalue;
6480                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6481                             return func;
6482                         })()(id, l62.fvalue(id, l42.fvalue(id, l212), l42.fvalue(id, l62.fvalue(id, l42.fvalue(id, l155), l42.fvalue(id, v473))), l42.fvalue(id, v474))));
6483                     })(l175.fvalue(id, v473, (function(){
6484                         var symbol = l176;
6485                         var value = symbol.value;
6486                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6487                         return value;
6488                     })(), l99));
6489                 })();
6490             }
6491             catch (cf){
6492                 if (cf.type == 'block' && cf.id == 179)
6493                     return cf.value;
6494                 else
6495                     throw cf;
6496             }
6497         })();
6498
6499     }));
6500     return l211;
6501 })();
6502 var l213 = {name: "SETQ"};
6503 ((l196).value = ({car: l42.fvalue(id, l213, (function (values){
6504     var v477= l3.value;
6505     for (var i = arguments.length-1; i>=1; i--)
6506         v477 = {car: arguments[i], cdr:
6507     v477};
6508     return (function(){
6509         try {
6510             return (function(){
6511                 return (function(v478){
6512                     (function(){
6513                         try {
6514                             return (function(){
6515                                 return (function(){
6516                                     while(l4.value !== l3.value){
6517                                         (l11.fvalue(id, v477) !== l3.value ? (function(){
6518                                             return (function(){
6519                                                 throw ({type: 'block', id: 181, value: l3.value, message: 'Return from unknown block NIL.'})
6520                                             })();
6521                                         })() : (l11.fvalue(id, (function(){
6522                                             var tmp = v477;
6523                                             return tmp === l3.value? l3.value: tmp.cdr;
6524                                         })()) !== l3.value ? (function(){
6525                                             return (function(){
6526                                                 throw "Odd paris in SETQ";
6527                                             })();
6528                                         })() : (function(){
6529                                             (v478 = l126.fvalue(id, v478, (function(){
6530                                                 return l126.fvalue(id, l211.fvalue(id, (function(){
6531                                                     var tmp = v477;
6532                                                     return tmp === l3.value? l3.value: tmp.car;
6533                                                 })(), l32.fvalue(id, v477)), (l11.fvalue(id, l34.fvalue(id, v477)) !== l3.value ? "" : ", "));
6534                                             })()));
6535                                             return (v477 = l34.fvalue(id, v477));
6536                                         })()));
6537                                     }return l3.value;
6538                                 })();
6539                             })();
6540                         }
6541                         catch (cf){
6542                             if (cf.type == 'block' && cf.id == 181)
6543                                 return cf.value;
6544                             else
6545                                 throw cf;
6546                         }
6547                     })();
6548                     return l126.fvalue(id, "(", v478, ")");
6549                 })("");
6550             })();
6551         }
6552         catch (cf){
6553             if (cf.type == 'block' && cf.id == 180)
6554                 return cf.value;
6555             else
6556                 throw cf;
6557         }
6558     })();
6559
6560 })), cdr: (function(){
6561     var symbol = l196;
6562     var value = symbol.value;
6563     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6564     return value;
6565 })()}));
6566 var l214 = {name: "JS-VREF"};
6567 ((l196).value = ({car: l42.fvalue(id, l214, (function (values,v479){
6568     if (arguments.length < 2) throw 'too few arguments';
6569     if (arguments.length > 2) throw 'too many arguments';
6570     return (function(){
6571         try {
6572             return (function(){
6573                 return v479;
6574             })();
6575         }
6576         catch (cf){
6577             if (cf.type == 'block' && cf.id == 182)
6578                 return cf.value;
6579             else
6580                 throw cf;
6581         }
6582     })();
6583
6584 })), cdr: (function(){
6585     var symbol = l196;
6586     var value = symbol.value;
6587     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6588     return value;
6589 })()}));
6590 var l215 = {name: "JS-VSET"};
6591 ((l196).value = ({car: l42.fvalue(id, l215, (function (values,v480,v481){
6592     if (arguments.length < 3) throw 'too few arguments';
6593     if (arguments.length > 3) throw 'too many arguments';
6594     return (function(){
6595         try {
6596             return (function(){
6597                 return l126.fvalue(id, "(", v480, " = ", (function(){
6598                     var symbol = l135;
6599                     var func = symbol.fvalue;
6600                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6601                     return func;
6602                 })()(id, v481), ")");
6603             })();
6604         }
6605         catch (cf){
6606             if (cf.type == 'block' && cf.id == 183)
6607                 return cf.value;
6608             else
6609                 throw cf;
6610         }
6611     })();
6612
6613 })), cdr: (function(){
6614     var symbol = l196;
6615     var value = symbol.value;
6616     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6617     return value;
6618 })()}));
6619 (function(){
6620     (l138).fvalue = (function(v488){
6621         ((v488)["fname"] = "ESCAPE-STRING");
6622         return v488;
6623     })((function (values,v482){
6624         if (arguments.length < 2) throw 'too few arguments';
6625         if (arguments.length > 2) throw 'too many arguments';
6626         return (function(){
6627             try {
6628                 return (function(){
6629                     return (function(v483,v484,v485){
6630                         (function(){
6631                             try {
6632                                 return (function(){
6633                                     return (function(){
6634                                         while((function(){
6635                                             var x1 = v484;
6636                                             if (typeof x1 !== 'number') throw 'Not a number!';
6637                                             var x2 = v485;
6638                                             if (typeof x2 !== 'number') throw 'Not a number!';
6639                                             return (x1<x2?l4.value: l3.value);
6640                                         })() !== l3.value){
6641                                             (function(v486){
6642                                                 ((function(v487){
6643                                                     return (v487 !== l3.value ? v487 : l74.fvalue(id, v486, 92));
6644                                                 })(l74.fvalue(id, v486, 34)) !== l3.value ? (function(){
6645                                                     return (v483 = l126.fvalue(id, v483, "\\"));
6646                                                 })() : l3.value);
6647                                                 (l74.fvalue(id, v486, 10) !== l3.value ? (function(){
6648                                                     (v483 = l126.fvalue(id, v483, "\\"));
6649                                                     return (v486 = 110);
6650                                                 })() : l3.value);
6651                                                 return (v483 = l126.fvalue(id, v483, l92.fvalue(id, v486)));
6652                                             })((function(){
6653                                                 var string = v482;
6654                                                 var index = v484;
6655                                                 if (typeof string != 'string')
6656                                                     throw 'The value ' + string + ' is not a type string.';
6657                                                 if (typeof index != 'number')
6658                                                     throw 'The value ' + index + ' is not a type number.';
6659                                                 return string.charCodeAt(index);
6660                                             })());
6661                                             (v484 = (function(){
6662                                                 var x1 = v484;
6663                                                 if (typeof x1 !== 'number') throw 'Not a number!';
6664                                                 var x2 = 1;
6665                                                 if (typeof x2 !== 'number') throw 'Not a number!';
6666                                                 return x1+x2;
6667                                             })());
6668                                         }return l3.value;
6669                                     })();
6670                                 })();
6671                             }
6672                             catch (cf){
6673                                 if (cf.type == 'block' && cf.id == 185)
6674                                     return cf.value;
6675                                 else
6676                                     throw cf;
6677                             }
6678                         })();
6679                         return v483;
6680                     })("",0,l67.fvalue(id, v482));
6681                 })();
6682             }
6683             catch (cf){
6684                 if (cf.type == 'block' && cf.id == 184)
6685                     return cf.value;
6686                 else
6687                     throw cf;
6688             }
6689         })();
6690
6691     }));
6692     return l138;
6693 })();
6694 var l216 = {name: "*LITERAL-SYMBOLS*"};
6695 (function(){
6696     (((l216.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
6697         return ((l216).value = l3.value);
6698     })());
6699     return l216;
6700 })();
6701 var l217 = {name: "*LITERAL-COUNTER*"};
6702 (function(){
6703     (((l217.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
6704         return ((l217).value = 0);
6705     })());
6706     return l217;
6707 })();
6708 var l218 = {name: "GENLIT"};
6709 (function(){
6710     (l218).fvalue = (function(v489){
6711         ((v489)["fname"] = "GENLIT");
6712         return v489;
6713     })((function (values){
6714         if (arguments.length > 1) throw 'too many arguments';
6715         return (function(){
6716             try {
6717                 return (function(){
6718                     return l126.fvalue(id, "l", l16.fvalue(id, ((l217).value = (function(){
6719                         var x1 = (function(){
6720                             var symbol = l217;
6721                             var value = symbol.value;
6722                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6723                             return value;
6724                         })();
6725                         if (typeof x1 !== 'number') throw 'Not a number!';
6726                         var x2 = 1;
6727                         if (typeof x2 !== 'number') throw 'Not a number!';
6728                         return x1+x2;
6729                     })())));
6730                 })();
6731             }
6732             catch (cf){
6733                 if (cf.type == 'block' && cf.id == 186)
6734                     return cf.value;
6735                 else
6736                     throw cf;
6737             }
6738         })();
6739
6740     }));
6741     return l218;
6742 })();
6743 var l219 = {name: "LITERAL"};
6744 (function(){
6745     (l219).fvalue = (function(v501){
6746         ((v501)["fname"] = "LITERAL");
6747         return v501;
6748     })((function (values,v490,v491){
6749         if (arguments.length < 2) throw 'too few arguments';
6750         if (arguments.length > 3) throw 'too many arguments';
6751         switch(arguments.length-1){
6752         case 1:
6753         v491=l3.value;
6754         default: break;
6755         }
6756         return (function(){
6757             try {
6758                 return (function(){
6759                     return (l75.fvalue(id, v490) !== l3.value ? (function(){
6760                         return l16.fvalue(id, v490);
6761                     })() : (((typeof(v490) == "string")?l4.value: l3.value) !== l3.value ? (function(){
6762                         return l126.fvalue(id, "\"", l138.fvalue(id, v490), "\"");
6763                     })() : (((function(){
6764                         var tmp = v490;
6765                         return (typeof tmp == 'object' && 'name' in tmp);
6766                     })()?l4.value: l3.value) !== l3.value ? (function(){
6767                         return (function(v492){
6768                             return (v492 !== l3.value ? v492 : (function(v494,v495){
6769                                 ((l216).value = ({car: ({car: v490, cdr: v494}), cdr: (function(){
6770                                     var symbol = l216;
6771                                     var value = symbol.value;
6772                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6773                                     return value;
6774                                 })()}));
6775                                 l183.fvalue(id, l126.fvalue(id, "var ", v494, " = ", v495));
6776                                 return v494;
6777                             })(l218.fvalue(id),(function(v493){
6778                                 return (l11.fvalue(id, v493) !== l3.value ? l126.fvalue(id, "{name: \"", l138.fvalue(id, (v490).name), "\"}") : (function(){
6779                                     var symbol = l135;
6780                                     var func = symbol.fvalue;
6781                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6782                                     return func;
6783                                 })()(id, l62.fvalue(id, l42.fvalue(id, l120), l42.fvalue(id, (v490).name), l42.fvalue(id, l106.fvalue(id, v493)))));
6784                             })(l114.fvalue(id, v490))));
6785                         })((function(){
6786                             var tmp = l91.fvalue(id, v490, (function(){
6787                                 var symbol = l216;
6788                                 var value = symbol.value;
6789                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6790                                 return value;
6791                             })());
6792                             return tmp === l3.value? l3.value: tmp.cdr;
6793                         })());
6794                     })() : (((function(){
6795                         var tmp = v490;
6796                         return (typeof tmp == 'object' && 'car' in tmp);
6797                     })()?l4.value: l3.value) !== l3.value ? (function(){
6798                         return (function(v496){
6799                             return (v491 !== l3.value ? v496 : (function(v497){
6800                                 l183.fvalue(id, l126.fvalue(id, "var ", v497, " = ", v496));
6801                                 return v497;
6802                             })(l218.fvalue(id)));
6803                         })(l126.fvalue(id, "{car: ", l219.fvalue(id, (function(){
6804                             var tmp = v490;
6805                             return tmp === l3.value? l3.value: tmp.car;
6806                         })(), l4.value), ", ", "cdr: ", l219.fvalue(id, (function(){
6807                             var tmp = v490;
6808                             return tmp === l3.value? l3.value: tmp.cdr;
6809                         })(), l4.value), "}"));
6810                     })() : (((function(){
6811                         var x = v490;
6812                         return typeof x === 'object' && 'length' in x;
6813                     })()?l4.value: l3.value) !== l3.value ? (function(){
6814                         return (function(v498){
6815                             return (function(v499){
6816                                 return (v491 !== l3.value ? v499 : (function(v500){
6817                                     l183.fvalue(id, l126.fvalue(id, "var ", v500, " = ", v499));
6818                                     return v500;
6819                                 })(l218.fvalue(id)));
6820                             })(l126.fvalue(id, "[", l128.fvalue(id, l69.fvalue(id, (function(){
6821                                 var symbol = l219;
6822                                 var func = symbol.fvalue;
6823                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6824                                 return func;
6825                             })(), v498), ", "), "]"));
6826                         })(l131.fvalue(id, v490));
6827                     })() : l3.value)))));
6828                 })();
6829             }
6830             catch (cf){
6831                 if (cf.type == 'block' && cf.id == 187)
6832                     return cf.value;
6833                 else
6834                     throw cf;
6835             }
6836         })();
6837
6838     }));
6839     return l219;
6840 })();
6841 ((l196).value = ({car: l42.fvalue(id, l155, (function (values,v502){
6842     if (arguments.length < 2) throw 'too few arguments';
6843     if (arguments.length > 2) throw 'too many arguments';
6844     return (function(){
6845         try {
6846             return (function(){
6847                 return l219.fvalue(id, v502);
6848             })();
6849         }
6850         catch (cf){
6851             if (cf.type == 'block' && cf.id == 188)
6852                 return cf.value;
6853             else
6854                 throw cf;
6855         }
6856     })();
6857
6858 })), cdr: (function(){
6859     var symbol = l196;
6860     var value = symbol.value;
6861     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6862     return value;
6863 })()}));
6864 var l220 = {name: "%WHILE"};
6865 ((l196).value = ({car: l42.fvalue(id, l220, (function (values,v504){
6866     if (arguments.length < 2) throw 'too few arguments';
6867     var v503= l3.value;
6868     for (var i = arguments.length-1; i>=2; i--)
6869         v503 = {car: arguments[i], cdr:
6870     v503};
6871     return (function(){
6872         try {
6873             return (function(){
6874                 return l126.fvalue(id, "(function(){", (function(){
6875                     var symbol = l125;
6876                     var value = symbol.value;
6877                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6878                     return value;
6879                 })(), l133.fvalue(id, "while(", (function(){
6880                     var symbol = l135;
6881                     var func = symbol.fvalue;
6882                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6883                     return func;
6884                 })()(id, v504), " !== ", (function(){
6885                     var symbol = l135;
6886                     var func = symbol.fvalue;
6887                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6888                     return func;
6889                 })()(id, l3.value), "){", (function(){
6890                     var symbol = l125;
6891                     var value = symbol.value;
6892                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6893                     return value;
6894                 })(), l133.fvalue(id, (function(){
6895                     var symbol = l210;
6896                     var func = symbol.fvalue;
6897                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6898                     return func;
6899                 })()(id, v503)), "}", "return ", (function(){
6900                     var symbol = l135;
6901                     var func = symbol.fvalue;
6902                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6903                     return func;
6904                 })()(id, l3.value), ";", (function(){
6905                     var symbol = l125;
6906                     var value = symbol.value;
6907                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6908                     return value;
6909                 })()), "})()");
6910             })();
6911         }
6912         catch (cf){
6913             if (cf.type == 'block' && cf.id == 189)
6914                 return cf.value;
6915             else
6916                 throw cf;
6917         }
6918     })();
6919
6920 })), cdr: (function(){
6921     var symbol = l196;
6922     var value = symbol.value;
6923     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6924     return value;
6925 })()}));
6926 var l221 = {name: "SYMBOL-FUNCTION"};
6927 ((l196).value = ({car: l42.fvalue(id, l98, (function (values,v505){
6928     if (arguments.length < 2) throw 'too few arguments';
6929     if (arguments.length > 2) throw 'too many arguments';
6930     return (function(){
6931         try {
6932             return (function(){
6933                 return ((l57.fvalue(id, v505) !== l3.value ? (((function(){
6934                     var tmp = v505;
6935                     return tmp === l3.value? l3.value: tmp.car;
6936                 })() === l209)?l4.value: l3.value) : l3.value) !== l3.value ? (function(){
6937                     return (function(){
6938                         var symbol = l135;
6939                         var func = symbol.fvalue;
6940                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6941                         return func;
6942                     })()(id, v505);
6943                 })() : (((function(){
6944                     var tmp = v505;
6945                     return (typeof tmp == 'object' && 'name' in tmp);
6946                 })()?l4.value: l3.value) !== l3.value ? (function(){
6947                     return (function(){
6948                         var symbol = l135;
6949                         var func = symbol.fvalue;
6950                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6951                         return func;
6952                     })()(id, l62.fvalue(id, l42.fvalue(id, l221), l42.fvalue(id, l62.fvalue(id, l42.fvalue(id, l155), l42.fvalue(id, v505)))));
6953                 })() : l3.value));
6954             })();
6955         }
6956         catch (cf){
6957             if (cf.type == 'block' && cf.id == 190)
6958                 return cf.value;
6959             else
6960                 throw cf;
6961         }
6962     })();
6963
6964 })), cdr: (function(){
6965     var symbol = l196;
6966     var value = symbol.value;
6967     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6968     return value;
6969 })()}));
6970 var l222 = {name: "EVAL-WHEN-COMPILE"};
6971 var l223 = {name: "EVAL"};
6972 var l224 = {name: "PROGN"};
6973 ((l196).value = ({car: l42.fvalue(id, l222, (function (values){
6974     var v506= l3.value;
6975     for (var i = arguments.length-1; i>=1; i--)
6976         v506 = {car: arguments[i], cdr:
6977     v506};
6978     return (function(){
6979         try {
6980             return (function(){
6981                 (function(){
6982                     var symbol = l223;
6983                     var func = symbol.fvalue;
6984                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6985                     return func;
6986                 })()(id, ({car: l224, cdr: v506}));
6987                 return l3.value;
6988             })();
6989         }
6990         catch (cf){
6991             if (cf.type == 'block' && cf.id == 191)
6992                 return cf.value;
6993             else
6994                 throw cf;
6995         }
6996     })();
6997
6998 })), cdr: (function(){
6999     var symbol = l196;
7000     var value = symbol.value;
7001     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7002     return value;
7003 })()}));
7004 var l225 = {name: "DEFINE-TRANSFORMATION"};
7005 l225;
7006 ((l196).value = ({car: l42.fvalue(id, l224, (function (values){
7007     var v507= l3.value;
7008     for (var i = arguments.length-1; i>=1; i--)
7009         v507 = {car: arguments[i], cdr:
7010     v507};
7011     return (function(){
7012         try {
7013             return (function(){
7014                 return l126.fvalue(id, "(function(){", (function(){
7015                     var symbol = l125;
7016                     var value = symbol.value;
7017                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7018                     return value;
7019                 })(), l133.fvalue(id, (function(){
7020                     var symbol = l210;
7021                     var func = symbol.fvalue;
7022                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7023                     return func;
7024                 })()(id, v507, l4.value)), "})()");
7025             })();
7026         }
7027         catch (cf){
7028             if (cf.type == 'block' && cf.id == 192)
7029                 return cf.value;
7030             else
7031                 throw cf;
7032         }
7033     })();
7034
7035 })), cdr: (function(){
7036     var symbol = l196;
7037     var value = symbol.value;
7038     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7039     return value;
7040 })()}));
7041 var l226 = {name: "SPECIAL-VARIABLE-P"};
7042 (function(){
7043     (l226).fvalue = (function(v509){
7044         ((v509)["fname"] = "SPECIAL-VARIABLE-P");
7045         return v509;
7046     })((function (values,v508){
7047         if (arguments.length < 2) throw 'too few arguments';
7048         if (arguments.length > 2) throw 'too many arguments';
7049         return (function(){
7050             try {
7051                 return (function(){
7052                     return (l189.fvalue(id, v508, l99, l191) !== l3.value ? l4.value : l3.value);
7053                 })();
7054             }
7055             catch (cf){
7056                 if (cf.type == 'block' && cf.id == 193)
7057                     return cf.value;
7058                 else
7059                     throw cf;
7060             }
7061         })();
7062
7063     }));
7064     return l226;
7065 })();
7066 var l227 = {name: "LET-BINDING-WRAPPER"};
7067 (function(){
7068     (l227).fvalue = (function(v516){
7069         ((v516)["fname"] = "LET-BINDING-WRAPPER");
7070         return v516;
7071     })((function (values,v510,v511){
7072         if (arguments.length < 3) throw 'too few arguments';
7073         if (arguments.length > 3) throw 'too many arguments';
7074         return (function(){
7075             try {
7076                 return (function(){
7077                     (l11.fvalue(id, v510) !== l3.value ? (function(){
7078                         return (function(){
7079                             throw ({type: 'block', id: 194, value: v511, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
7080                         })();
7081                     })() : l3.value);
7082                     return l126.fvalue(id, "try {", (function(){
7083                         var symbol = l125;
7084                         var value = symbol.value;
7085                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7086                         return value;
7087                     })(), l133.fvalue(id, "var tmp;", (function(){
7088                         var symbol = l125;
7089                         var value = symbol.value;
7090                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7091                         return value;
7092                     })(), l130.fvalue(id, (function (values,v512){
7093                         if (arguments.length < 2) throw 'too few arguments';
7094                         if (arguments.length > 2) throw 'too many arguments';
7095                         return (function(v513){
7096                             return l126.fvalue(id, "tmp = ", v513, ".value;", (function(){
7097                                 var symbol = l125;
7098                                 var value = symbol.value;
7099                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7100                                 return value;
7101                             })(), v513, ".value = ", (function(){
7102                                 var tmp = v512;
7103                                 return tmp === l3.value? l3.value: tmp.cdr;
7104                             })(), ";", (function(){
7105                                 var symbol = l125;
7106                                 var value = symbol.value;
7107                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7108                                 return value;
7109                             })(), (function(){
7110                                 var tmp = v512;
7111                                 return tmp === l3.value? l3.value: tmp.cdr;
7112                             })(), " = tmp;", (function(){
7113                                 var symbol = l125;
7114                                 var value = symbol.value;
7115                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7116                                 return value;
7117                             })());
7118                         })((function(){
7119                             var symbol = l135;
7120                             var func = symbol.fvalue;
7121                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7122                             return func;
7123                         })()(id, l62.fvalue(id, l42.fvalue(id, l155), l42.fvalue(id, (function(){
7124                             var tmp = v512;
7125                             return tmp === l3.value? l3.value: tmp.car;
7126                         })()))));
7127
7128                     }), v510), v511, (function(){
7129                         var symbol = l125;
7130                         var value = symbol.value;
7131                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7132                         return value;
7133                     })()), "}", (function(){
7134                         var symbol = l125;
7135                         var value = symbol.value;
7136                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7137                         return value;
7138                     })(), "finally {", (function(){
7139                         var symbol = l125;
7140                         var value = symbol.value;
7141                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7142                         return value;
7143                     })(), l133.fvalue(id, l130.fvalue(id, (function (values,v514){
7144                         if (arguments.length < 2) throw 'too few arguments';
7145                         if (arguments.length > 2) throw 'too many arguments';
7146                         return (function(v515){
7147                             return l126.fvalue(id, v515, ".value", " = ", (function(){
7148                                 var tmp = v514;
7149                                 return tmp === l3.value? l3.value: tmp.cdr;
7150                             })(), ";", (function(){
7151                                 var symbol = l125;
7152                                 var value = symbol.value;
7153                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7154                                 return value;
7155                             })());
7156                         })((function(){
7157                             var symbol = l135;
7158                             var func = symbol.fvalue;
7159                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7160                             return func;
7161                         })()(id, l62.fvalue(id, l42.fvalue(id, l155), l42.fvalue(id, (function(){
7162                             var tmp = v514;
7163                             return tmp === l3.value? l3.value: tmp.car;
7164                         })()))));
7165
7166                     }), v510)), "}", (function(){
7167                         var symbol = l125;
7168                         var value = symbol.value;
7169                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7170                         return value;
7171                     })());
7172                 })();
7173             }
7174             catch (cf){
7175                 if (cf.type == 'block' && cf.id == 194)
7176                     return cf.value;
7177                 else
7178                     throw cf;
7179             }
7180         })();
7181
7182     }));
7183     return l227;
7184 })();
7185 var l228 = {name: "LET"};
7186 var l229 = {name: "DYNAMIC-BINDINGS"};
7187 ((l196).value = ({car: l42.fvalue(id, l228, (function (values,v518){
7188     if (arguments.length < 2) throw 'too few arguments';
7189     var v517= l3.value;
7190     for (var i = arguments.length-1; i>=2; i--)
7191         v517 = {car: arguments[i], cdr:
7192     v517};
7193     return (function(){
7194         try {
7195             return (function(){
7196                 return (function(){
7197                     try {
7198                         var v526 = l176.value;
7199                         var v519 = l69.fvalue(id, (function(){
7200                             var symbol = l56;
7201                             var func = symbol.fvalue;
7202                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7203                             return func;
7204                         })(), v518);
7205                         var v520 = l69.fvalue(id, (function(){
7206                             var symbol = l38;
7207                             var func = symbol.fvalue;
7208                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7209                             return func;
7210                         })(), v519);
7211                         var v521 = l69.fvalue(id, (function(){
7212                             var symbol = l135;
7213                             var func = symbol.fvalue;
7214                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7215                             return func;
7216                         })(), l69.fvalue(id, (function(){
7217                             var symbol = l39;
7218                             var func = symbol.fvalue;
7219                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7220                             return func;
7221                         })(), v519));
7222                         ((l176).value = l180.fvalue(id, l84.fvalue(id, (function(){
7223                             var symbol = l226;
7224                             var func = symbol.fvalue;
7225                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7226                             return func;
7227                         })(), v520)));
7228                         var v522 = l3.value;
7229                         return l126.fvalue(id, "(function(", l128.fvalue(id, l69.fvalue(id, (function (values,v523){
7230                             if (arguments.length < 2) throw 'too few arguments';
7231                             if (arguments.length > 2) throw 'too many arguments';
7232                             return (l226.fvalue(id, v523) !== l3.value ? (function(v524){
7233                                 ((l229).value = ({car: ({car: v523, cdr: v524}), cdr: v522}));
7234                                 return v524;
7235                             })(l178.fvalue(id, v523)) : l179.fvalue(id, v523));
7236
7237                         }), v520), ","), "){", (function(){
7238                             var symbol = l125;
7239                             var value = symbol.value;
7240                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7241                             return value;
7242                         })(), (function(v525){
7243                             return l133.fvalue(id, l227.fvalue(id, v522, v525));
7244                         })((function(){
7245                             var symbol = l210;
7246                             var func = symbol.fvalue;
7247                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7248                             return func;
7249                         })()(id, v517, l4.value)), "})(", l128.fvalue(id, v521, ","), ")");
7250                     }
7251                     finally {
7252                         l176.value = v526;
7253                     }
7254                 })();
7255             })();
7256         }
7257         catch (cf){
7258             if (cf.type == 'block' && cf.id == 195)
7259                 return cf.value;
7260             else
7261                 throw cf;
7262         }
7263     })();
7264
7265 })), cdr: (function(){
7266     var symbol = l196;
7267     var value = symbol.value;
7268     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7269     return value;
7270 })()}));
7271 var l230 = {name: "LET*-INITIALIZE-VALUE"};
7272 (function(){
7273     (l230).fvalue = (function(v533){
7274         ((v533)["fname"] = "LET*-INITIALIZE-VALUE");
7275         return v533;
7276     })((function (values,v527){
7277         if (arguments.length < 2) throw 'too few arguments';
7278         if (arguments.length > 2) throw 'too many arguments';
7279         return (function(){
7280             try {
7281                 return (function(){
7282                     return (function(v528,v529){
7283                         return (l226.fvalue(id, v528) !== l3.value ? l126.fvalue(id, (function(){
7284                             var symbol = l135;
7285                             var func = symbol.fvalue;
7286                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7287                             return func;
7288                         })()(id, l62.fvalue(id, l42.fvalue(id, l213), l42.fvalue(id, v528), l42.fvalue(id, v529))), ";", (function(){
7289                             var symbol = l125;
7290                             var value = symbol.value;
7291                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7292                             return value;
7293                         })()) : (function(){
7294                             var v530 = l178.fvalue(id, v528);
7295                             var v531 = l161.fvalue(id, v528, l99, v530);
7296                             return (function(v532){
7297                                 l171.fvalue(id, v531, (function(){
7298                                     var symbol = l176;
7299                                     var value = symbol.value;
7300                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7301                                     return value;
7302                                 })(), l99);
7303                                 return v532;
7304                             })(l126.fvalue(id, "var ", v530, " = ", (function(){
7305                                 var symbol = l135;
7306                                 var func = symbol.fvalue;
7307                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7308                                 return func;
7309                             })()(id, v529), ";", (function(){
7310                                 var symbol = l125;
7311                                 var value = symbol.value;
7312                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7313                                 return value;
7314                             })()));
7315                         })());
7316                     })(l38.fvalue(id, v527),l39.fvalue(id, v527));
7317                 })();
7318             }
7319             catch (cf){
7320                 if (cf.type == 'block' && cf.id == 196)
7321                     return cf.value;
7322                 else
7323                     throw cf;
7324             }
7325         })();
7326
7327     }));
7328     return l230;
7329 })();
7330 var l231 = {name: "LET*-BINDING-WRAPPER"};
7331 (function(){
7332     (l231).fvalue = (function(v542){
7333         ((v542)["fname"] = "LET*-BINDING-WRAPPER");
7334         return v542;
7335     })((function (values,v534,v535){
7336         if (arguments.length < 3) throw 'too few arguments';
7337         if (arguments.length > 3) throw 'too many arguments';
7338         return (function(){
7339             try {
7340                 return (function(){
7341                     (l11.fvalue(id, v534) !== l3.value ? (function(){
7342                         return (function(){
7343                             throw ({type: 'block', id: 197, value: v535, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
7344                         })();
7345                     })() : l3.value);
7346                     return (function(v537){
7347                         return l126.fvalue(id, "try {", (function(){
7348                             var symbol = l125;
7349                             var value = symbol.value;
7350                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7351                             return value;
7352                         })(), l133.fvalue(id, l130.fvalue(id, (function (values,v538){
7353                             if (arguments.length < 2) throw 'too few arguments';
7354                             if (arguments.length > 2) throw 'too many arguments';
7355                             return (function(v539){
7356                                 return l126.fvalue(id, "var ", (function(){
7357                                     var tmp = v538;
7358                                     return tmp === l3.value? l3.value: tmp.cdr;
7359                                 })(), " = ", v539, ".value;", (function(){
7360                                     var symbol = l125;
7361                                     var value = symbol.value;
7362                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7363                                     return value;
7364                                 })());
7365                             })((function(){
7366                                 var symbol = l135;
7367                                 var func = symbol.fvalue;
7368                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7369                                 return func;
7370                             })()(id, l62.fvalue(id, l42.fvalue(id, l155), l42.fvalue(id, (function(){
7371                                 var tmp = v538;
7372                                 return tmp === l3.value? l3.value: tmp.car;
7373                             })()))));
7374
7375                         }), v537), v535), "}", (function(){
7376                             var symbol = l125;
7377                             var value = symbol.value;
7378                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7379                             return value;
7380                         })(), "finally {", (function(){
7381                             var symbol = l125;
7382                             var value = symbol.value;
7383                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7384                             return value;
7385                         })(), l133.fvalue(id, l130.fvalue(id, (function (values,v540){
7386                             if (arguments.length < 2) throw 'too few arguments';
7387                             if (arguments.length > 2) throw 'too many arguments';
7388                             return (function(v541){
7389                                 return l126.fvalue(id, v541, ".value", " = ", (function(){
7390                                     var tmp = v540;
7391                                     return tmp === l3.value? l3.value: tmp.cdr;
7392                                 })(), ";", (function(){
7393                                     var symbol = l125;
7394                                     var value = symbol.value;
7395                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7396                                     return value;
7397                                 })());
7398                             })((function(){
7399                                 var symbol = l135;
7400                                 var func = symbol.fvalue;
7401                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7402                                 return func;
7403                             })()(id, l62.fvalue(id, l42.fvalue(id, l155), l42.fvalue(id, (function(){
7404                                 var tmp = v540;
7405                                 return tmp === l3.value? l3.value: tmp.car;
7406                             })()))));
7407
7408                         }), v537)), "}", (function(){
7409                             var symbol = l125;
7410                             var value = symbol.value;
7411                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7412                             return value;
7413                         })());
7414                     })(l69.fvalue(id, (function (values,v536){
7415                         if (arguments.length < 2) throw 'too few arguments';
7416                         if (arguments.length > 2) throw 'too many arguments';
7417                         return ({car: v536, cdr: l178.fvalue(id, v536)});
7418
7419                     }), l85.fvalue(id, (function(){
7420                         var symbol = l226;
7421                         var func = symbol.fvalue;
7422                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7423                         return func;
7424                     })(), v534)));
7425                 })();
7426             }
7427             catch (cf){
7428                 if (cf.type == 'block' && cf.id == 197)
7429                     return cf.value;
7430                 else
7431                     throw cf;
7432             }
7433         })();
7434
7435     }));
7436     return l231;
7437 })();
7438 var l232 = {name: "LET*"};
7439 ((l196).value = ({car: l42.fvalue(id, l232, (function (values,v544){
7440     if (arguments.length < 2) throw 'too few arguments';
7441     var v543= l3.value;
7442     for (var i = arguments.length-1; i>=2; i--)
7443         v543 = {car: arguments[i], cdr:
7444     v543};
7445     return (function(){
7446         try {
7447             return (function(){
7448                 return (function(v545,v546){
7449                     try {
7450                         var tmp;
7451                         tmp = l176.value;
7452                         l176.value = v546;
7453                         v546 = tmp;
7454                         return l126.fvalue(id, "(function(){", (function(){
7455                             var symbol = l125;
7456                             var value = symbol.value;
7457                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7458                             return value;
7459                         })(), l133.fvalue(id, (function(v547,v548){
7460                             return l231.fvalue(id, v547, v548);
7461                         })(l85.fvalue(id, (function(){
7462                             var symbol = l226;
7463                             var func = symbol.fvalue;
7464                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7465                             return func;
7466                         })(), l69.fvalue(id, (function(){
7467                             var symbol = l38;
7468                             var func = symbol.fvalue;
7469                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7470                             return func;
7471                         })(), v545)),l126.fvalue(id, l130.fvalue(id, (function(){
7472                             var symbol = l230;
7473                             var func = symbol.fvalue;
7474                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7475                             return func;
7476                         })(), v545), (function(){
7477                             var symbol = l210;
7478                             var func = symbol.fvalue;
7479                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7480                             return func;
7481                         })()(id, v543, l4.value)))), "})()");
7482                     }
7483                     finally {
7484                         l176.value = v546;
7485                     }
7486                 })(l69.fvalue(id, (function(){
7487                     var symbol = l56;
7488                     var func = symbol.fvalue;
7489                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7490                     return func;
7491                 })(), v544),l170.fvalue(id, (function(){
7492                     var symbol = l176;
7493                     var value = symbol.value;
7494                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7495                     return value;
7496                 })()));
7497             })();
7498         }
7499         catch (cf){
7500             if (cf.type == 'block' && cf.id == 198)
7501                 return cf.value;
7502             else
7503                 throw cf;
7504         }
7505     })();
7506
7507 })), cdr: (function(){
7508     var symbol = l196;
7509     var value = symbol.value;
7510     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7511     return value;
7512 })()}));
7513 var l233 = {name: "*BLOCK-COUNTER*"};
7514 (function(){
7515     (((l233.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
7516         return ((l233).value = 0);
7517     })());
7518     return l233;
7519 })();
7520 ((l196).value = ({car: l42.fvalue(id, l172, (function (values,v550){
7521     if (arguments.length < 2) throw 'too few arguments';
7522     var v549= l3.value;
7523     for (var i = arguments.length-1; i>=2; i--)
7524         v549 = {car: arguments[i], cdr:
7525     v549};
7526     return (function(){
7527         try {
7528             return (function(){
7529                 return (function(v551){
7530                     return (function(v552){
7531                         return l126.fvalue(id, "(function(){", (function(){
7532                             var symbol = l125;
7533                             var value = symbol.value;
7534                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7535                             return value;
7536                         })(), l133.fvalue(id, "try {", (function(){
7537                             var symbol = l125;
7538                             var value = symbol.value;
7539                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7540                             return value;
7541                         })(), (function(v553){
7542                             try {
7543                                 var tmp;
7544                                 tmp = l176.value;
7545                                 l176.value = v553;
7546                                 v553 = tmp;
7547                                 return l133.fvalue(id, "return ", (function(){
7548                                     var symbol = l135;
7549                                     var func = symbol.fvalue;
7550                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7551                                     return func;
7552                                 })()(id, l62.fvalue(id, l42.fvalue(id, l224), v549)), ";", (function(){
7553                                     var symbol = l125;
7554                                     var value = symbol.value;
7555                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7556                                     return value;
7557                                 })());
7558                             }
7559                             finally {
7560                                 l176.value = v553;
7561                             }
7562                         })(l174.fvalue(id, l42.fvalue(id, v552), (function(){
7563                             var symbol = l176;
7564                             var value = symbol.value;
7565                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7566                             return value;
7567                         })(), l172)), "}", (function(){
7568                             var symbol = l125;
7569                             var value = symbol.value;
7570                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7571                             return value;
7572                         })(), "catch (cf){", (function(){
7573                             var symbol = l125;
7574                             var value = symbol.value;
7575                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7576                             return value;
7577                         })(), "    if (cf.type == 'block' && cf.id == ", v551, ")", (function(){
7578                             var symbol = l125;
7579                             var value = symbol.value;
7580                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7581                             return value;
7582                         })(), "        return cf.value;", (function(){
7583                             var symbol = l125;
7584                             var value = symbol.value;
7585                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7586                             return value;
7587                         })(), "    else", (function(){
7588                             var symbol = l125;
7589                             var value = symbol.value;
7590                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7591                             return value;
7592                         })(), "        throw cf;", (function(){
7593                             var symbol = l125;
7594                             var value = symbol.value;
7595                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7596                             return value;
7597                         })(), "}", (function(){
7598                             var symbol = l125;
7599                             var value = symbol.value;
7600                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7601                             return value;
7602                         })()), "})()");
7603                     })(l161.fvalue(id, v550, l172, v551));
7604                 })(l16.fvalue(id, ((l233).value = (function(){
7605                     var x1 = (function(){
7606                         var symbol = l233;
7607                         var value = symbol.value;
7608                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7609                         return value;
7610                     })();
7611                     if (typeof x1 !== 'number') throw 'Not a number!';
7612                     var x2 = 1;
7613                     if (typeof x2 !== 'number') throw 'Not a number!';
7614                     return x1+x2;
7615                 })())));
7616             })();
7617         }
7618         catch (cf){
7619             if (cf.type == 'block' && cf.id == 199)
7620                 return cf.value;
7621             else
7622                 throw cf;
7623         }
7624     })();
7625
7626 })), cdr: (function(){
7627     var symbol = l196;
7628     var value = symbol.value;
7629     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7630     return value;
7631 })()}));
7632 var l234 = {name: "RETURN-FROM"};
7633 ((l196).value = ({car: l42.fvalue(id, l234, (function (values,v554,v555){
7634     if (arguments.length < 2) throw 'too few arguments';
7635     if (arguments.length > 3) throw 'too many arguments';
7636     switch(arguments.length-1){
7637     case 1:
7638     v555=l3.value;
7639     default: break;
7640     }
7641     return (function(){
7642         try {
7643             return (function(){
7644                 return (function(v556){
7645                     return (v556 !== l3.value ? l126.fvalue(id, "(function(){", (function(){
7646                         var symbol = l125;
7647                         var value = symbol.value;
7648                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7649                         return value;
7650                     })(), l133.fvalue(id, "throw ({", "type: 'block', ", "id: ", l164.fvalue(id, v556), ", ", "value: ", (function(){
7651                         var symbol = l135;
7652                         var func = symbol.fvalue;
7653                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7654                         return func;
7655                     })()(id, v555), ", ", "message: 'Return from unknown block ", (v554).name, ".'", "})"), "})()") : (function(){
7656                         throw l126.fvalue(id, "Unknown block `", (v554).name, "'.");
7657                     })());
7658                 })(l175.fvalue(id, v554, (function(){
7659                     var symbol = l176;
7660                     var value = symbol.value;
7661                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7662                     return value;
7663                 })(), l172));
7664             })();
7665         }
7666         catch (cf){
7667             if (cf.type == 'block' && cf.id == 200)
7668                 return cf.value;
7669             else
7670                 throw cf;
7671         }
7672     })();
7673
7674 })), cdr: (function(){
7675     var symbol = l196;
7676     var value = symbol.value;
7677     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7678     return value;
7679 })()}));
7680 var l235 = {name: "CATCH"};
7681 ((l196).value = ({car: l42.fvalue(id, l235, (function (values,v558){
7682     if (arguments.length < 2) throw 'too few arguments';
7683     var v557= l3.value;
7684     for (var i = arguments.length-1; i>=2; i--)
7685         v557 = {car: arguments[i], cdr:
7686     v557};
7687     return (function(){
7688         try {
7689             return (function(){
7690                 return l126.fvalue(id, "(function(){", (function(){
7691                     var symbol = l125;
7692                     var value = symbol.value;
7693                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7694                     return value;
7695                 })(), l133.fvalue(id, "var id = ", (function(){
7696                     var symbol = l135;
7697                     var func = symbol.fvalue;
7698                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7699                     return func;
7700                 })()(id, v558), ";", (function(){
7701                     var symbol = l125;
7702                     var value = symbol.value;
7703                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7704                     return value;
7705                 })(), "try {", (function(){
7706                     var symbol = l125;
7707                     var value = symbol.value;
7708                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7709                     return value;
7710                 })(), l133.fvalue(id, "return ", (function(){
7711                     var symbol = l135;
7712                     var func = symbol.fvalue;
7713                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7714                     return func;
7715                 })()(id, l62.fvalue(id, l42.fvalue(id, l224), v557)), ";", (function(){
7716                     var symbol = l125;
7717                     var value = symbol.value;
7718                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7719                     return value;
7720                 })()), "}", (function(){
7721                     var symbol = l125;
7722                     var value = symbol.value;
7723                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7724                     return value;
7725                 })(), "catch (cf){", (function(){
7726                     var symbol = l125;
7727                     var value = symbol.value;
7728                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7729                     return value;
7730                 })(), "    if (cf.type == 'catch' && cf.id == id)", (function(){
7731                     var symbol = l125;
7732                     var value = symbol.value;
7733                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7734                     return value;
7735                 })(), "        return cf.value;", (function(){
7736                     var symbol = l125;
7737                     var value = symbol.value;
7738                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7739                     return value;
7740                 })(), "    else", (function(){
7741                     var symbol = l125;
7742                     var value = symbol.value;
7743                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7744                     return value;
7745                 })(), "        throw cf;", (function(){
7746                     var symbol = l125;
7747                     var value = symbol.value;
7748                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7749                     return value;
7750                 })(), "}", (function(){
7751                     var symbol = l125;
7752                     var value = symbol.value;
7753                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7754                     return value;
7755                 })()), "})()");
7756             })();
7757         }
7758         catch (cf){
7759             if (cf.type == 'block' && cf.id == 201)
7760                 return cf.value;
7761             else
7762                 throw cf;
7763         }
7764     })();
7765
7766 })), cdr: (function(){
7767     var symbol = l196;
7768     var value = symbol.value;
7769     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7770     return value;
7771 })()}));
7772 var l236 = {name: "THROW"};
7773 ((l196).value = ({car: l42.fvalue(id, l236, (function (values,v559,v560){
7774     if (arguments.length < 3) throw 'too few arguments';
7775     if (arguments.length > 3) throw 'too many arguments';
7776     return (function(){
7777         try {
7778             return (function(){
7779                 return l126.fvalue(id, "(function(){", (function(){
7780                     var symbol = l125;
7781                     var value = symbol.value;
7782                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7783                     return value;
7784                 })(), l133.fvalue(id, "throw ({", "type: 'catch', ", "id: ", (function(){
7785                     var symbol = l135;
7786                     var func = symbol.fvalue;
7787                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7788                     return func;
7789                 })()(id, v559), ", ", "value: ", (function(){
7790                     var symbol = l135;
7791                     var func = symbol.fvalue;
7792                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7793                     return func;
7794                 })()(id, v560), ", ", "message: 'Throw uncatched.'", "})"), "})()");
7795             })();
7796         }
7797         catch (cf){
7798             if (cf.type == 'block' && cf.id == 202)
7799                 return cf.value;
7800             else
7801                 throw cf;
7802         }
7803     })();
7804
7805 })), cdr: (function(){
7806     var symbol = l196;
7807     var value = symbol.value;
7808     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7809     return value;
7810 })()}));
7811 var l237 = {name: "*TAGBODY-COUNTER*"};
7812 (function(){
7813     (((l237.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
7814         return ((l237).value = 0);
7815     })());
7816     return l237;
7817 })();
7818 var l238 = {name: "*GO-TAG-COUNTER*"};
7819 (function(){
7820     (((l238.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
7821         return ((l238).value = 0);
7822     })());
7823     return l238;
7824 })();
7825 var l239 = {name: "GO-TAG-P"};
7826 (function(){
7827     (l239).fvalue = (function(v563){
7828         ((v563)["fname"] = "GO-TAG-P");
7829         return v563;
7830     })((function (values,v561){
7831         if (arguments.length < 2) throw 'too few arguments';
7832         if (arguments.length > 2) throw 'too many arguments';
7833         return (function(){
7834             try {
7835                 return (function(){
7836                     return (function(v562){
7837                         return (v562 !== l3.value ? v562 : ((function(){
7838                             var tmp = v561;
7839                             return (typeof tmp == 'object' && 'name' in tmp);
7840                         })()?l4.value: l3.value));
7841                     })(l75.fvalue(id, v561));
7842                 })();
7843             }
7844             catch (cf){
7845                 if (cf.type == 'block' && cf.id == 203)
7846                     return cf.value;
7847                 else
7848                     throw cf;
7849             }
7850         })();
7851
7852     }));
7853     return l239;
7854 })();
7855 var l240 = {name: "DECLARE-TAGBODY-TAGS"};
7856 (function(){
7857     (l240).fvalue = (function(v569){
7858         ((v569)["fname"] = "DECLARE-TAGBODY-TAGS");
7859         return v569;
7860     })((function (values,v564,v565){
7861         if (arguments.length < 3) throw 'too few arguments';
7862         if (arguments.length > 3) throw 'too many arguments';
7863         return (function(){
7864             try {
7865                 return (function(){
7866                     return (function(v568){
7867                         return l174.fvalue(id, v568, (function(){
7868                             var symbol = l176;
7869                             var value = symbol.value;
7870                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7871                             return value;
7872                         })(), l173);
7873                     })(l69.fvalue(id, (function (values,v566){
7874                         if (arguments.length < 2) throw 'too few arguments';
7875                         if (arguments.length > 2) throw 'too many arguments';
7876                         return (function(v567){
7877                             return l161.fvalue(id, v566, l173, l42.fvalue(id, v564, v567));
7878                         })(l16.fvalue(id, ((l238).value = (function(){
7879                             var x1 = (function(){
7880                                 var symbol = l238;
7881                                 var value = symbol.value;
7882                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7883                                 return value;
7884                             })();
7885                             if (typeof x1 !== 'number') throw 'Not a number!';
7886                             var x2 = 1;
7887                             if (typeof x2 !== 'number') throw 'Not a number!';
7888                             return x1+x2;
7889                         })())));
7890
7891                     }), l85.fvalue(id, (function(){
7892                         var symbol = l239;
7893                         var func = symbol.fvalue;
7894                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7895                         return func;
7896                     })(), v565)));
7897                 })();
7898             }
7899             catch (cf){
7900                 if (cf.type == 'block' && cf.id == 204)
7901                     return cf.value;
7902                 else
7903                     throw cf;
7904             }
7905         })();
7906
7907     }));
7908     return l240;
7909 })();
7910 var l241 = {name: "TAGBODY"};
7911 ((l196).value = ({car: l42.fvalue(id, l241, (function (values){
7912     var v570= l3.value;
7913     for (var i = arguments.length-1; i>=1; i--)
7914         v570 = {car: arguments[i], cdr:
7915     v570};
7916     return (function(){
7917         try {
7918             return (function(){
7919                 (l89.fvalue(id, (function(){
7920                     var symbol = l239;
7921                     var func = symbol.fvalue;
7922                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7923                     return func;
7924                 })(), v570) !== l3.value ? l3.value : (function(){
7925                     return (function(){
7926                         throw ({type: 'block', id: 205, value: (function(){
7927                             var symbol = l135;
7928                             var func = symbol.fvalue;
7929                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7930                             return func;
7931                         })()(id, l62.fvalue(id, l42.fvalue(id, l224), v570, l42.fvalue(id, l3))), message: 'Return from unknown block TAGBODY.'})
7932                     })();
7933                 })());
7934                 (l239.fvalue(id, (function(){
7935                     var tmp = v570;
7936                     return tmp === l3.value? l3.value: tmp.car;
7937                 })()) !== l3.value ? l3.value : (function(){
7938                     return (v570 = ({car: l15.fvalue(id, "START"), cdr: v570}));
7939                 })());
7940                 return (function(v571){
7941                     return (function(v573,v572){
7942                         try {
7943                             var tmp;
7944                             tmp = l176.value;
7945                             l176.value = v573;
7946                             v573 = tmp;
7947                             (function(v574){
7948                                 return (v572 = l39.fvalue(id, l164.fvalue(id, v574)));
7949                             })(l175.fvalue(id, l38.fvalue(id, v570), (function(){
7950                                 var symbol = l176;
7951                                 var value = symbol.value;
7952                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7953                                 return value;
7954                             })(), l173));
7955                             return l126.fvalue(id, "(function(){", (function(){
7956                                 var symbol = l125;
7957                                 var value = symbol.value;
7958                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7959                                 return value;
7960                             })(), l133.fvalue(id, "var tagbody_", v571, " = ", v572, ";", (function(){
7961                                 var symbol = l125;
7962                                 var value = symbol.value;
7963                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7964                                 return value;
7965                             })(), "tbloop:", (function(){
7966                                 var symbol = l125;
7967                                 var value = symbol.value;
7968                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7969                                 return value;
7970                             })(), "while (true) {", (function(){
7971                                 var symbol = l125;
7972                                 var value = symbol.value;
7973                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7974                                 return value;
7975                             })(), l133.fvalue(id, "try {", (function(){
7976                                 var symbol = l125;
7977                                 var value = symbol.value;
7978                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7979                                 return value;
7980                             })(), l133.fvalue(id, (function(v575){
7981                                 return l126.fvalue(id, "switch(tagbody_", v571, "){", (function(){
7982                                     var symbol = l125;
7983                                     var value = symbol.value;
7984                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7985                                     return value;
7986                                 })(), "case ", v572, ":", (function(){
7987                                     var symbol = l125;
7988                                     var value = symbol.value;
7989                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7990                                     return value;
7991                                 })(), (function(){
7992                                     try {
7993                                         return (function(){
7994                                             return (function(v576,v577){
7995                                                 (function(){
7996                                                     while(v576 !== l3.value){
7997                                                         (v577 = (function(){
7998                                                             var tmp = v576;
7999                                                             return tmp === l3.value? l3.value: tmp.car;
8000                                                         })());
8001                                                         (function(){
8002                                                             (v575 = l126.fvalue(id, v575, (function(){
8003                                                                 return (l26.fvalue(id, l239.fvalue(id, v577)) !== l3.value ? l133.fvalue(id, (function(){
8004                                                                     var symbol = l135;
8005                                                                     var func = symbol.fvalue;
8006                                                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8007                                                                     return func;
8008                                                                 })()(id, v577), ";", (function(){
8009                                                                     var symbol = l125;
8010                                                                     var value = symbol.value;
8011                                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8012                                                                     return value;
8013                                                                 })()) : (function(v578){
8014                                                                     return l126.fvalue(id, "case ", l39.fvalue(id, l164.fvalue(id, v578)), ":", (function(){
8015                                                                         var symbol = l125;
8016                                                                         var value = symbol.value;
8017                                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8018                                                                         return value;
8019                                                                     })());
8020                                                                 })(l175.fvalue(id, v577, (function(){
8021                                                                     var symbol = l176;
8022                                                                     var value = symbol.value;
8023                                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8024                                                                     return value;
8025                                                                 })(), l173)));
8026                                                             })()));
8027                                                             return l3.value;
8028                                                         })();
8029                                                         (v576 = (function(){
8030                                                             var tmp = v576;
8031                                                             return tmp === l3.value? l3.value: tmp.cdr;
8032                                                         })());
8033                                                     }return l3.value;
8034                                                 })();
8035                                                 return v575;
8036                                             })((function(){
8037                                                 var tmp = v570;
8038                                                 return tmp === l3.value? l3.value: tmp.cdr;
8039                                             })(),l3.value);
8040                                         })();
8041                                     }
8042                                     catch (cf){
8043                                         if (cf.type == 'block' && cf.id == 206)
8044                                             return cf.value;
8045                                         else
8046                                             throw cf;
8047                                     }
8048                                 })(), "default:", (function(){
8049                                     var symbol = l125;
8050                                     var value = symbol.value;
8051                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8052                                     return value;
8053                                 })(), "    break tbloop;", (function(){
8054                                     var symbol = l125;
8055                                     var value = symbol.value;
8056                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8057                                     return value;
8058                                 })(), "}", (function(){
8059                                     var symbol = l125;
8060                                     var value = symbol.value;
8061                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8062                                     return value;
8063                                 })());
8064                             })("")), "}", (function(){
8065                                 var symbol = l125;
8066                                 var value = symbol.value;
8067                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8068                                 return value;
8069                             })(), "catch (jump) {", (function(){
8070                                 var symbol = l125;
8071                                 var value = symbol.value;
8072                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8073                                 return value;
8074                             })(), "    if (jump.type == 'tagbody' && jump.id == ", v571, ")", (function(){
8075                                 var symbol = l125;
8076                                 var value = symbol.value;
8077                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8078                                 return value;
8079                             })(), "        tagbody_", v571, " = jump.label;", (function(){
8080                                 var symbol = l125;
8081                                 var value = symbol.value;
8082                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8083                                 return value;
8084                             })(), "    else", (function(){
8085                                 var symbol = l125;
8086                                 var value = symbol.value;
8087                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8088                                 return value;
8089                             })(), "        throw(jump);", (function(){
8090                                 var symbol = l125;
8091                                 var value = symbol.value;
8092                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8093                                 return value;
8094                             })(), "}", (function(){
8095                                 var symbol = l125;
8096                                 var value = symbol.value;
8097                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8098                                 return value;
8099                             })()), "}", (function(){
8100                                 var symbol = l125;
8101                                 var value = symbol.value;
8102                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8103                                 return value;
8104                             })(), "return ", (function(){
8105                                 var symbol = l135;
8106                                 var func = symbol.fvalue;
8107                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8108                                 return func;
8109                             })()(id, l3.value), ";", (function(){
8110                                 var symbol = l125;
8111                                 var value = symbol.value;
8112                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8113                                 return value;
8114                             })()), "})()");
8115                         }
8116                         finally {
8117                             l176.value = v573;
8118                         }
8119                     })(l240.fvalue(id, v571, v570),l3.value);
8120                 })(l16.fvalue(id, (function(){
8121                     var symbol = l237;
8122                     var value = symbol.value;
8123                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8124                     return value;
8125                 })()));
8126             })();
8127         }
8128         catch (cf){
8129             if (cf.type == 'block' && cf.id == 205)
8130                 return cf.value;
8131             else
8132                 throw cf;
8133         }
8134     })();
8135
8136 })), cdr: (function(){
8137     var symbol = l196;
8138     var value = symbol.value;
8139     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8140     return value;
8141 })()}));
8142 var l242 = {name: "GO"};
8143 ((l196).value = ({car: l42.fvalue(id, l242, (function (values,v579){
8144     if (arguments.length < 2) throw 'too few arguments';
8145     if (arguments.length > 2) throw 'too many arguments';
8146     return (function(){
8147         try {
8148             return (function(){
8149                 return (function(v580,v581){
8150                     return (v580 !== l3.value ? l126.fvalue(id, "(function(){", (function(){
8151                         var symbol = l125;
8152                         var value = symbol.value;
8153                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8154                         return value;
8155                     })(), l133.fvalue(id, "throw ({", "type: 'tagbody', ", "id: ", l38.fvalue(id, l164.fvalue(id, v580)), ", ", "label: ", l39.fvalue(id, l164.fvalue(id, v580)), ", ", "message: 'Attempt to GO to non-existing tag ", v581, "'", "})", (function(){
8156                         var symbol = l125;
8157                         var value = symbol.value;
8158                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8159                         return value;
8160                     })()), "})()") : (function(){
8161                         throw l126.fvalue(id, "Unknown tag `", v581, "'.");
8162                     })());
8163                 })(l175.fvalue(id, v579, (function(){
8164                     var symbol = l176;
8165                     var value = symbol.value;
8166                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8167                     return value;
8168                 })(), l173),(((function(){
8169                     var tmp = v579;
8170                     return (typeof tmp == 'object' && 'name' in tmp);
8171                 })()?l4.value: l3.value) !== l3.value ? (function(){
8172                     return (v579).name;
8173                 })() : (l75.fvalue(id, v579) !== l3.value ? (function(){
8174                     return l16.fvalue(id, v579);
8175                 })() : l3.value)));
8176             })();
8177         }
8178         catch (cf){
8179             if (cf.type == 'block' && cf.id == 207)
8180                 return cf.value;
8181             else
8182                 throw cf;
8183         }
8184     })();
8185
8186 })), cdr: (function(){
8187     var symbol = l196;
8188     var value = symbol.value;
8189     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8190     return value;
8191 })()}));
8192 var l243 = {name: "UNWIND-PROTECT"};
8193 ((l196).value = ({car: l42.fvalue(id, l243, (function (values,v583){
8194     if (arguments.length < 2) throw 'too few arguments';
8195     var v582= l3.value;
8196     for (var i = arguments.length-1; i>=2; i--)
8197         v582 = {car: arguments[i], cdr:
8198     v582};
8199     return (function(){
8200         try {
8201             return (function(){
8202                 return l126.fvalue(id, "(function(){", (function(){
8203                     var symbol = l125;
8204                     var value = symbol.value;
8205                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8206                     return value;
8207                 })(), l133.fvalue(id, "var ret = ", (function(){
8208                     var symbol = l135;
8209                     var func = symbol.fvalue;
8210                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8211                     return func;
8212                 })()(id, l3.value), ";", (function(){
8213                     var symbol = l125;
8214                     var value = symbol.value;
8215                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8216                     return value;
8217                 })(), "try {", (function(){
8218                     var symbol = l125;
8219                     var value = symbol.value;
8220                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8221                     return value;
8222                 })(), l133.fvalue(id, "ret = ", (function(){
8223                     var symbol = l135;
8224                     var func = symbol.fvalue;
8225                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8226                     return func;
8227                 })()(id, v583), ";", (function(){
8228                     var symbol = l125;
8229                     var value = symbol.value;
8230                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8231                     return value;
8232                 })()), "} finally {", (function(){
8233                     var symbol = l125;
8234                     var value = symbol.value;
8235                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8236                     return value;
8237                 })(), l133.fvalue(id, (function(){
8238                     var symbol = l210;
8239                     var func = symbol.fvalue;
8240                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8241                     return func;
8242                 })()(id, v582)), "}", (function(){
8243                     var symbol = l125;
8244                     var value = symbol.value;
8245                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8246                     return value;
8247                 })(), "return ret;", (function(){
8248                     var symbol = l125;
8249                     var value = symbol.value;
8250                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8251                     return value;
8252                 })()), "})()");
8253             })();
8254         }
8255         catch (cf){
8256             if (cf.type == 'block' && cf.id == 208)
8257                 return cf.value;
8258             else
8259                 throw cf;
8260         }
8261     })();
8262
8263 })), cdr: (function(){
8264     var symbol = l196;
8265     var value = symbol.value;
8266     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8267     return value;
8268 })()}));
8269 var l244 = {name: "MULTIPLE-VALUE-CALL"};
8270 ((l196).value = ({car: l42.fvalue(id, l244, (function (values,v585){
8271     if (arguments.length < 2) throw 'too few arguments';
8272     var v584= l3.value;
8273     for (var i = arguments.length-1; i>=2; i--)
8274         v584 = {car: arguments[i], cdr:
8275     v584};
8276     return (function(){
8277         try {
8278             return (function(){
8279                 return (function(v586){
8280                     return l126.fvalue(id, "(function(){", (function(){
8281                         var symbol = l125;
8282                         var value = symbol.value;
8283                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8284                         return value;
8285                     })(), l133.fvalue(id, "var args = [values];", (function(){
8286                         var symbol = l125;
8287                         var value = symbol.value;
8288                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8289                         return value;
8290                     })(), "function values(){", (function(){
8291                         var symbol = l125;
8292                         var value = symbol.value;
8293                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8294                         return value;
8295                     })(), l133.fvalue(id, "var result = [];", (function(){
8296                         var symbol = l125;
8297                         var value = symbol.value;
8298                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8299                         return value;
8300                     })(), "for (var i=0; i<arguments.length; i++)", (function(){
8301                         var symbol = l125;
8302                         var value = symbol.value;
8303                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8304                         return value;
8305                     })(), l133.fvalue(id, "result.push(arguments[i]);")), "}", (function(){
8306                         var symbol = l125;
8307                         var value = symbol.value;
8308                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8309                         return value;
8310                     })(), l130.fvalue(id, (function (values,v587){
8311                         if (arguments.length < 2) throw 'too few arguments';
8312                         if (arguments.length > 2) throw 'too many arguments';
8313                         return (function(){
8314                             var symbol = l135;
8315                             var func = symbol.fvalue;
8316                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8317                             return func;
8318                         })()(id, v587);
8319
8320                     }), v584), "return (", v586, ").apply(window, [args]);"), "})()");
8321                 })((function(){
8322                     var symbol = l135;
8323                     var func = symbol.fvalue;
8324                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8325                     return func;
8326                 })()(id, v585));
8327             })();
8328         }
8329         catch (cf){
8330             if (cf.type == 'block' && cf.id == 209)
8331                 return cf.value;
8332             else
8333                 throw cf;
8334         }
8335     })();
8336
8337 })), cdr: (function(){
8338     var symbol = l196;
8339     var value = symbol.value;
8340     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8341     return value;
8342 })()}));
8343 var l245 = {name: "BACKQUOTE-EXPAND-1"};
8344 (function(){
8345     (l245).fvalue = (function(v590){
8346         ((v590)["fname"] = "BACKQUOTE-EXPAND-1");
8347         return v590;
8348     })((function (values,v588){
8349         if (arguments.length < 2) throw 'too few arguments';
8350         if (arguments.length > 2) throw 'too many arguments';
8351         return (function(){
8352             try {
8353                 return (function(){
8354                     return (((function(){
8355                         var tmp = v588;
8356                         return (typeof tmp == 'object' && 'name' in tmp);
8357                     })()?l4.value: l3.value) !== l3.value ? (function(){
8358                         return l42.fvalue(id, l155, v588);
8359                     })() : (l43.fvalue(id, v588) !== l3.value ? (function(){
8360                         return v588;
8361                     })() : ((((function(){
8362                         var tmp = v588;
8363                         return tmp === l3.value? l3.value: tmp.car;
8364                     })() === l158)?l4.value: l3.value) !== l3.value ? (function(){
8365                         return (function(){
8366                             var tmp = v588;
8367                             return tmp === l3.value? l3.value: tmp.car;
8368                         })();
8369                     })() : ((((function(){
8370                         var tmp = v588;
8371                         return tmp === l3.value? l3.value: tmp.car;
8372                     })() === l156)?l4.value: l3.value) !== l3.value ? (function(){
8373                         return l245.fvalue(id, l245.fvalue(id, l32.fvalue(id, v588)));
8374                     })() : (function(){
8375                         return ({car: l62, cdr: l69.fvalue(id, (function (values,v589){
8376                             if (arguments.length < 2) throw 'too few arguments';
8377                             if (arguments.length > 2) throw 'too many arguments';
8378                             return ((l57.fvalue(id, v589) !== l3.value ? (((function(){
8379                                 var tmp = v589;
8380                                 return tmp === l3.value? l3.value: tmp.car;
8381                             })() === l158)?l4.value: l3.value) : l3.value) !== l3.value ? (function(){
8382                                 return l42.fvalue(id, l42, l32.fvalue(id, v589));
8383                             })() : ((l57.fvalue(id, v589) !== l3.value ? (((function(){
8384                                 var tmp = v589;
8385                                 return tmp === l3.value? l3.value: tmp.car;
8386                             })() === l157)?l4.value: l3.value) : l3.value) !== l3.value ? (function(){
8387                                 return l32.fvalue(id, v589);
8388                             })() : (function(){
8389                                 return l42.fvalue(id, l42, l245.fvalue(id, v589));
8390                             })()));
8391
8392                         }), v588)});
8393                     })()))));
8394                 })();
8395             }
8396             catch (cf){
8397                 if (cf.type == 'block' && cf.id == 210)
8398                     return cf.value;
8399                 else
8400                     throw cf;
8401             }
8402         })();
8403
8404     }));
8405     return l245;
8406 })();
8407 var l246 = {name: "BACKQUOTE-EXPAND"};
8408 (function(){
8409     (l246).fvalue = (function(v592){
8410         ((v592)["fname"] = "BACKQUOTE-EXPAND");
8411         return v592;
8412     })((function (values,v591){
8413         if (arguments.length < 2) throw 'too few arguments';
8414         if (arguments.length > 2) throw 'too many arguments';
8415         return (function(){
8416             try {
8417                 return (function(){
8418                     return ((l57.fvalue(id, v591) !== l3.value ? (((function(){
8419                         var tmp = v591;
8420                         return tmp === l3.value? l3.value: tmp.car;
8421                     })() === l156)?l4.value: l3.value) : l3.value) !== l3.value ? l245.fvalue(id, l32.fvalue(id, v591)) : v591);
8422                 })();
8423             }
8424             catch (cf){
8425                 if (cf.type == 'block' && cf.id == 211)
8426                     return cf.value;
8427                 else
8428                     throw cf;
8429             }
8430         })();
8431
8432     }));
8433     return l246;
8434 })();
8435 l156;
8436 ((l196).value = ({car: l42.fvalue(id, l156, (function (values,v593){
8437     if (arguments.length < 2) throw 'too few arguments';
8438     if (arguments.length > 2) throw 'too many arguments';
8439     return (function(){
8440         try {
8441             return (function(){
8442                 return (function(){
8443                     var symbol = l135;
8444                     var func = symbol.fvalue;
8445                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8446                     return func;
8447                 })()(id, l245.fvalue(id, v593));
8448             })();
8449         }
8450         catch (cf){
8451             if (cf.type == 'block' && cf.id == 212)
8452                 return cf.value;
8453             else
8454                 throw cf;
8455         }
8456     })();
8457
8458 })), cdr: (function(){
8459     var symbol = l196;
8460     var value = symbol.value;
8461     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8462     return value;
8463 })()}));
8464 var l247 = {name: "*BUILTINS*"};
8465 (function(){
8466     (((l247.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
8467         return ((l247).value = l3.value);
8468     })());
8469     return l247;
8470 })();
8471 var l248 = {name: "DEFINE-RAW-BUILTIN"};
8472 l248;
8473 var l249 = {name: "DEFINE-BUILTIN"};
8474 l249;
8475 var l250 = {name: "TYPE-CHECK"};
8476 l250;
8477 var l251 = {name: "VARIABLE-ARITY-CALL"};
8478 (function(){
8479     (l251).fvalue = (function(v602){
8480         ((v602)["fname"] = "VARIABLE-ARITY-CALL");
8481         return v602;
8482     })((function (values,v594,v595){
8483         if (arguments.length < 3) throw 'too few arguments';
8484         if (arguments.length > 3) throw 'too many arguments';
8485         return (function(){
8486             try {
8487                 return (function(){
8488                     (((function(){
8489                         var tmp = v594;
8490                         return (typeof tmp == 'object' && 'car' in tmp);
8491                     })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
8492                         return (function(){
8493                             throw "ARGS must be a non-empty list";
8494                         })();
8495                     })());
8496                     return (function(v596,v597,v598){
8497                         (function(){
8498                             try {
8499                                 return (function(){
8500                                     return (function(v599,v600){
8501                                         (function(){
8502                                             while(v599 !== l3.value){
8503                                                 (v600 = (function(){
8504                                                     var tmp = v599;
8505                                                     return tmp === l3.value? l3.value: tmp.car;
8506                                                 })());
8507                                                 (function(){
8508                                                     (function(v601){
8509                                                         (v597 = ({car: v601, cdr: v597}));
8510                                                         return (v598 = l126.fvalue(id, v598, (function(){
8511                                                             return l126.fvalue(id, "var ", v601, " = ", (function(){
8512                                                                 var symbol = l135;
8513                                                                 var func = symbol.fvalue;
8514                                                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8515                                                                 return func;
8516                                                             })()(id, v600), ";", (function(){
8517                                                                 var symbol = l125;
8518                                                                 var value = symbol.value;
8519                                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8520                                                                 return value;
8521                                                             })(), "if (typeof ", v601, " !== 'number') throw 'Not a number!';", (function(){
8522                                                                 var symbol = l125;
8523                                                                 var value = symbol.value;
8524                                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8525                                                                 return value;
8526                                                             })());
8527                                                         })()));
8528                                                     })(l126.fvalue(id, "x", l16.fvalue(id, (v596 = (function(){
8529                                                         var x1 = v596;
8530                                                         if (typeof x1 !== 'number') throw 'Not a number!';
8531                                                         var x2 = 1;
8532                                                         if (typeof x2 !== 'number') throw 'Not a number!';
8533                                                         return x1+x2;
8534                                                     })()))));
8535                                                     return l3.value;
8536                                                 })();
8537                                                 (v599 = (function(){
8538                                                     var tmp = v599;
8539                                                     return tmp === l3.value? l3.value: tmp.cdr;
8540                                                 })());
8541                                             }return l3.value;
8542                                         })();
8543                                         return l3.value;
8544                                     })(v594,l3.value);
8545                                 })();
8546                             }
8547                             catch (cf){
8548                                 if (cf.type == 'block' && cf.id == 214)
8549                                     return cf.value;
8550                                 else
8551                                     throw cf;
8552                             }
8553                         })();
8554                         return l126.fvalue(id, "(function(){", (function(){
8555                             var symbol = l125;
8556                             var value = symbol.value;
8557                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8558                             return value;
8559                         })(), l133.fvalue(id, v598, (v595)(id, l64.fvalue(id, v597))), "})()");
8560                     })(0,l3,"");
8561                 })();
8562             }
8563             catch (cf){
8564                 if (cf.type == 'block' && cf.id == 213)
8565                     return cf.value;
8566                 else
8567                     throw cf;
8568             }
8569         })();
8570
8571     }));
8572     return l251;
8573 })();
8574 var l252 = {name: "VARIABLE-ARITY"};
8575 l252;
8576 var l253 = {name: "NUM-OP-NUM"};
8577 (function(){
8578     (l253).fvalue = (function(v606){
8579         ((v606)["fname"] = "NUM-OP-NUM");
8580         return v606;
8581     })((function (values,v603,v604,v605){
8582         if (arguments.length < 4) throw 'too few arguments';
8583         if (arguments.length > 4) throw 'too many arguments';
8584         return (function(){
8585             try {
8586                 return (function(){
8587                     return l126.fvalue(id, "(function(){", (function(){
8588                         var symbol = l125;
8589                         var value = symbol.value;
8590                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8591                         return value;
8592                     })(), l133.fvalue(id, l126.fvalue(id, "var ", "x", " = ", v603, ";", (function(){
8593                         var symbol = l125;
8594                         var value = symbol.value;
8595                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8596                         return value;
8597                     })()), l126.fvalue(id, "var ", "y", " = ", v605, ";", (function(){
8598                         var symbol = l125;
8599                         var value = symbol.value;
8600                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8601                         return value;
8602                     })()), l126.fvalue(id, "if (typeof ", "x", " != '", "number", "')", (function(){
8603                         var symbol = l125;
8604                         var value = symbol.value;
8605                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8606                         return value;
8607                     })(), l133.fvalue(id, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
8608                         var symbol = l125;
8609                         var value = symbol.value;
8610                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8611                         return value;
8612                     })())), l126.fvalue(id, "if (typeof ", "y", " != '", "number", "')", (function(){
8613                         var symbol = l125;
8614                         var value = symbol.value;
8615                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8616                         return value;
8617                     })(), l133.fvalue(id, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
8618                         var symbol = l125;
8619                         var value = symbol.value;
8620                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8621                         return value;
8622                     })())), l126.fvalue(id, "return ", (function(){
8623                         return l126.fvalue(id, "x", v604, "y");
8624                     })(), ";", (function(){
8625                         var symbol = l125;
8626                         var value = symbol.value;
8627                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8628                         return value;
8629                     })())), "})()");
8630                 })();
8631             }
8632             catch (cf){
8633                 if (cf.type == 'block' && cf.id == 215)
8634                     return cf.value;
8635                 else
8636                     throw cf;
8637             }
8638         })();
8639
8640     }));
8641     return l253;
8642 })();
8643 ((l247).value = ({car: l42.fvalue(id, l59, (function (values){
8644     var v607= l3.value;
8645     for (var i = arguments.length-1; i>=1; i--)
8646         v607 = {car: arguments[i], cdr:
8647     v607};
8648     return (function(){
8649         try {
8650             return (function(){
8651                 return (l11.fvalue(id, v607) !== l3.value ? "0" : l251.fvalue(id, v607, (function (values,v608){
8652                     if (arguments.length < 2) throw 'too few arguments';
8653                     if (arguments.length > 2) throw 'too many arguments';
8654                     return l126.fvalue(id, "return ", l128.fvalue(id, v608, "+"), ";", (function(){
8655                         var symbol = l125;
8656                         var value = symbol.value;
8657                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8658                         return value;
8659                     })());
8660
8661                 })));
8662             })();
8663         }
8664         catch (cf){
8665             if (cf.type == 'block' && cf.id == 216)
8666                 return cf.value;
8667             else
8668                 throw cf;
8669         }
8670     })();
8671
8672 })), cdr: (function(){
8673     var symbol = l247;
8674     var value = symbol.value;
8675     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8676     return value;
8677 })()}));
8678 ((l247).value = ({car: l42.fvalue(id, l60, (function (values,v610){
8679     if (arguments.length < 2) throw 'too few arguments';
8680     var v609= l3.value;
8681     for (var i = arguments.length-1; i>=2; i--)
8682         v609 = {car: arguments[i], cdr:
8683     v609};
8684     return (function(){
8685         try {
8686             return (function(){
8687                 return (function(v611){
8688                     return l251.fvalue(id, v611, (function (values,v612){
8689                         if (arguments.length < 2) throw 'too few arguments';
8690                         if (arguments.length > 2) throw 'too many arguments';
8691                         return l126.fvalue(id, "return ", (l11.fvalue(id, v609) !== l3.value ? l126.fvalue(id, "-", (function(){
8692                             var tmp = v612;
8693                             return tmp === l3.value? l3.value: tmp.car;
8694                         })()) : l128.fvalue(id, v612, "-")), ";", (function(){
8695                             var symbol = l125;
8696                             var value = symbol.value;
8697                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8698                             return value;
8699                         })());
8700
8701                     }));
8702                 })(({car: v610, cdr: v609}));
8703             })();
8704         }
8705         catch (cf){
8706             if (cf.type == 'block' && cf.id == 217)
8707                 return cf.value;
8708             else
8709                 throw cf;
8710         }
8711     })();
8712
8713 })), cdr: (function(){
8714     var symbol = l247;
8715     var value = symbol.value;
8716     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8717     return value;
8718 })()}));
8719 ((l247).value = ({car: l42.fvalue(id, l19, (function (values){
8720     var v613= l3.value;
8721     for (var i = arguments.length-1; i>=1; i--)
8722         v613 = {car: arguments[i], cdr:
8723     v613};
8724     return (function(){
8725         try {
8726             return (function(){
8727                 return (l11.fvalue(id, v613) !== l3.value ? "1" : l251.fvalue(id, v613, (function (values,v614){
8728                     if (arguments.length < 2) throw 'too few arguments';
8729                     if (arguments.length > 2) throw 'too many arguments';
8730                     return l126.fvalue(id, "return ", l128.fvalue(id, v614, "*"), ";", (function(){
8731                         var symbol = l125;
8732                         var value = symbol.value;
8733                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8734                         return value;
8735                     })());
8736
8737                 })));
8738             })();
8739         }
8740         catch (cf){
8741             if (cf.type == 'block' && cf.id == 218)
8742                 return cf.value;
8743             else
8744                 throw cf;
8745         }
8746     })();
8747
8748 })), cdr: (function(){
8749     var symbol = l247;
8750     var value = symbol.value;
8751     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8752     return value;
8753 })()}));
8754 ((l247).value = ({car: l42.fvalue(id, l20, (function (values,v616){
8755     if (arguments.length < 2) throw 'too few arguments';
8756     var v615= l3.value;
8757     for (var i = arguments.length-1; i>=2; i--)
8758         v615 = {car: arguments[i], cdr:
8759     v615};
8760     return (function(){
8761         try {
8762             return (function(){
8763                 return (function(v617){
8764                     return l251.fvalue(id, v617, (function (values,v618){
8765                         if (arguments.length < 2) throw 'too few arguments';
8766                         if (arguments.length > 2) throw 'too many arguments';
8767                         return l126.fvalue(id, "return ", (l11.fvalue(id, v615) !== l3.value ? l126.fvalue(id, "1 /", (function(){
8768                             var tmp = v618;
8769                             return tmp === l3.value? l3.value: tmp.car;
8770                         })()) : l128.fvalue(id, v618, "/")), ";", (function(){
8771                             var symbol = l125;
8772                             var value = symbol.value;
8773                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8774                             return value;
8775                         })());
8776
8777                     }));
8778                 })(({car: v616, cdr: v615}));
8779             })();
8780         }
8781         catch (cf){
8782             if (cf.type == 'block' && cf.id == 219)
8783                 return cf.value;
8784             else
8785                 throw cf;
8786         }
8787     })();
8788
8789 })), cdr: (function(){
8790     var symbol = l247;
8791     var value = symbol.value;
8792     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8793     return value;
8794 })()}));
8795 var l254 = {name: "MOD"};
8796 (function(){
8797     return ((l247).value = ({car: l42.fvalue(id, l254, (function (values,v619,v620){
8798         if (arguments.length < 3) throw 'too few arguments';
8799         if (arguments.length > 3) throw 'too many arguments';
8800         return (function(){
8801             try {
8802                 return (function(){
8803                     return (function(v621,v622){
8804                         return l253.fvalue(id, v621, "%", v622);
8805                     })((function(){
8806                         var symbol = l135;
8807                         var func = symbol.fvalue;
8808                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8809                         return func;
8810                     })()(id, v619),(function(){
8811                         var symbol = l135;
8812                         var func = symbol.fvalue;
8813                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8814                         return func;
8815                     })()(id, v620));
8816                 })();
8817             }
8818             catch (cf){
8819                 if (cf.type == 'block' && cf.id == 220)
8820                     return cf.value;
8821                 else
8822                     throw cf;
8823             }
8824         })();
8825
8826     })), cdr: (function(){
8827         var symbol = l247;
8828         var value = symbol.value;
8829         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8830         return value;
8831     })()}));
8832 })();
8833 var l255 = {name: "COMPARISON-CONJUNTION"};
8834 (function(){
8835     (l255).fvalue = (function(v625){
8836         ((v625)["fname"] = "COMPARISON-CONJUNTION");
8837         return v625;
8838     })((function (values,v623,v624){
8839         if (arguments.length < 3) throw 'too few arguments';
8840         if (arguments.length > 3) throw 'too many arguments';
8841         return (function(){
8842             try {
8843                 return (function(){
8844                     return (l11.fvalue(id, (function(){
8845                         var tmp = v623;
8846                         return tmp === l3.value? l3.value: tmp.cdr;
8847                     })()) !== l3.value ? (function(){
8848                         return "true";
8849                     })() : (l11.fvalue(id, l34.fvalue(id, v623)) !== l3.value ? (function(){
8850                         return l126.fvalue(id, (function(){
8851                             var tmp = v623;
8852                             return tmp === l3.value? l3.value: tmp.car;
8853                         })(), v624, l32.fvalue(id, v623));
8854                     })() : (function(){
8855                         return l126.fvalue(id, (function(){
8856                             var tmp = v623;
8857                             return tmp === l3.value? l3.value: tmp.car;
8858                         })(), v624, l32.fvalue(id, v623), " && ", l255.fvalue(id, (function(){
8859                             var tmp = v623;
8860                             return tmp === l3.value? l3.value: tmp.cdr;
8861                         })(), v624));
8862                     })()));
8863                 })();
8864             }
8865             catch (cf){
8866                 if (cf.type == 'block' && cf.id == 221)
8867                     return cf.value;
8868                 else
8869                     throw cf;
8870             }
8871         })();
8872
8873     }));
8874     return l255;
8875 })();
8876 var l256 = {name: "DEFINE-BUILTIN-COMPARISON"};
8877 l256;
8878 var l257 = {name: ">"};
8879 ((l247).value = ({car: l42.fvalue(id, l257, (function (values,v627){
8880     if (arguments.length < 2) throw 'too few arguments';
8881     var v626= l3.value;
8882     for (var i = arguments.length-1; i>=2; i--)
8883         v626 = {car: arguments[i], cdr:
8884     v626};
8885     return (function(){
8886         try {
8887             return (function(){
8888                 return (function(v628){
8889                     return l251.fvalue(id, v628, (function (values,v629){
8890                         if (arguments.length < 2) throw 'too few arguments';
8891                         if (arguments.length > 2) throw 'too many arguments';
8892                         return l126.fvalue(id, "return ", l134.fvalue(id, l255.fvalue(id, v629, ">")), ";", (function(){
8893                             var symbol = l125;
8894                             var value = symbol.value;
8895                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8896                             return value;
8897                         })());
8898
8899                     }));
8900                 })(({car: v627, cdr: v626}));
8901             })();
8902         }
8903         catch (cf){
8904             if (cf.type == 'block' && cf.id == 222)
8905                 return cf.value;
8906             else
8907                 throw cf;
8908         }
8909     })();
8910
8911 })), cdr: (function(){
8912     var symbol = l247;
8913     var value = symbol.value;
8914     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8915     return value;
8916 })()}));
8917 var l258 = {name: "<"};
8918 ((l247).value = ({car: l42.fvalue(id, l258, (function (values,v631){
8919     if (arguments.length < 2) throw 'too few arguments';
8920     var v630= l3.value;
8921     for (var i = arguments.length-1; i>=2; i--)
8922         v630 = {car: arguments[i], cdr:
8923     v630};
8924     return (function(){
8925         try {
8926             return (function(){
8927                 return (function(v632){
8928                     return l251.fvalue(id, v632, (function (values,v633){
8929                         if (arguments.length < 2) throw 'too few arguments';
8930                         if (arguments.length > 2) throw 'too many arguments';
8931                         return l126.fvalue(id, "return ", l134.fvalue(id, l255.fvalue(id, v633, "<")), ";", (function(){
8932                             var symbol = l125;
8933                             var value = symbol.value;
8934                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8935                             return value;
8936                         })());
8937
8938                     }));
8939                 })(({car: v631, cdr: v630}));
8940             })();
8941         }
8942         catch (cf){
8943             if (cf.type == 'block' && cf.id == 223)
8944                 return cf.value;
8945             else
8946                 throw cf;
8947         }
8948     })();
8949
8950 })), cdr: (function(){
8951     var symbol = l247;
8952     var value = symbol.value;
8953     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8954     return value;
8955 })()}));
8956 var l259 = {name: ">="};
8957 ((l247).value = ({car: l42.fvalue(id, l259, (function (values,v635){
8958     if (arguments.length < 2) throw 'too few arguments';
8959     var v634= l3.value;
8960     for (var i = arguments.length-1; i>=2; i--)
8961         v634 = {car: arguments[i], cdr:
8962     v634};
8963     return (function(){
8964         try {
8965             return (function(){
8966                 return (function(v636){
8967                     return l251.fvalue(id, v636, (function (values,v637){
8968                         if (arguments.length < 2) throw 'too few arguments';
8969                         if (arguments.length > 2) throw 'too many arguments';
8970                         return l126.fvalue(id, "return ", l134.fvalue(id, l255.fvalue(id, v637, ">=")), ";", (function(){
8971                             var symbol = l125;
8972                             var value = symbol.value;
8973                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8974                             return value;
8975                         })());
8976
8977                     }));
8978                 })(({car: v635, cdr: v634}));
8979             })();
8980         }
8981         catch (cf){
8982             if (cf.type == 'block' && cf.id == 224)
8983                 return cf.value;
8984             else
8985                 throw cf;
8986         }
8987     })();
8988
8989 })), cdr: (function(){
8990     var symbol = l247;
8991     var value = symbol.value;
8992     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8993     return value;
8994 })()}));
8995 var l260 = {name: "<="};
8996 ((l247).value = ({car: l42.fvalue(id, l260, (function (values,v639){
8997     if (arguments.length < 2) throw 'too few arguments';
8998     var v638= l3.value;
8999     for (var i = arguments.length-1; i>=2; i--)
9000         v638 = {car: arguments[i], cdr:
9001     v638};
9002     return (function(){
9003         try {
9004             return (function(){
9005                 return (function(v640){
9006                     return l251.fvalue(id, v640, (function (values,v641){
9007                         if (arguments.length < 2) throw 'too few arguments';
9008                         if (arguments.length > 2) throw 'too many arguments';
9009                         return l126.fvalue(id, "return ", l134.fvalue(id, l255.fvalue(id, v641, "<=")), ";", (function(){
9010                             var symbol = l125;
9011                             var value = symbol.value;
9012                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9013                             return value;
9014                         })());
9015
9016                     }));
9017                 })(({car: v639, cdr: v638}));
9018             })();
9019         }
9020         catch (cf){
9021             if (cf.type == 'block' && cf.id == 225)
9022                 return cf.value;
9023             else
9024                 throw cf;
9025         }
9026     })();
9027
9028 })), cdr: (function(){
9029     var symbol = l247;
9030     var value = symbol.value;
9031     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9032     return value;
9033 })()}));
9034 ((l247).value = ({car: l42.fvalue(id, l18, (function (values,v643){
9035     if (arguments.length < 2) throw 'too few arguments';
9036     var v642= l3.value;
9037     for (var i = arguments.length-1; i>=2; i--)
9038         v642 = {car: arguments[i], cdr:
9039     v642};
9040     return (function(){
9041         try {
9042             return (function(){
9043                 return (function(v644){
9044                     return l251.fvalue(id, v644, (function (values,v645){
9045                         if (arguments.length < 2) throw 'too few arguments';
9046                         if (arguments.length > 2) throw 'too many arguments';
9047                         return l126.fvalue(id, "return ", l134.fvalue(id, l255.fvalue(id, v645, "==")), ";", (function(){
9048                             var symbol = l125;
9049                             var value = symbol.value;
9050                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9051                             return value;
9052                         })());
9053
9054                     }));
9055                 })(({car: v643, cdr: v642}));
9056             })();
9057         }
9058         catch (cf){
9059             if (cf.type == 'block' && cf.id == 226)
9060                 return cf.value;
9061             else
9062                 throw cf;
9063         }
9064     })();
9065
9066 })), cdr: (function(){
9067     var symbol = l247;
9068     var value = symbol.value;
9069     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9070     return value;
9071 })()}));
9072 var l261 = {name: "NUMBERP"};
9073 (function(){
9074     return ((l247).value = ({car: l42.fvalue(id, l261, (function (values,v646){
9075         if (arguments.length < 2) throw 'too few arguments';
9076         if (arguments.length > 2) throw 'too many arguments';
9077         return (function(){
9078             try {
9079                 return (function(){
9080                     return (function(v647){
9081                         return l134.fvalue(id, l126.fvalue(id, "(typeof (", v647, ") == \"number\")"));
9082                     })((function(){
9083                         var symbol = l135;
9084                         var func = symbol.fvalue;
9085                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9086                         return func;
9087                     })()(id, v646));
9088                 })();
9089             }
9090             catch (cf){
9091                 if (cf.type == 'block' && cf.id == 227)
9092                     return cf.value;
9093                 else
9094                     throw cf;
9095             }
9096         })();
9097
9098     })), cdr: (function(){
9099         var symbol = l247;
9100         var value = symbol.value;
9101         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9102         return value;
9103     })()}));
9104 })();
9105 var l262 = {name: "FLOOR"};
9106 (function(){
9107     return ((l247).value = ({car: l42.fvalue(id, l262, (function (values,v648){
9108         if (arguments.length < 2) throw 'too few arguments';
9109         if (arguments.length > 2) throw 'too many arguments';
9110         return (function(){
9111             try {
9112                 return (function(){
9113                     return (function(v649){
9114                         return l126.fvalue(id, "(function(){", (function(){
9115                             var symbol = l125;
9116                             var value = symbol.value;
9117                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9118                             return value;
9119                         })(), l133.fvalue(id, l126.fvalue(id, "var ", "x", " = ", v649, ";", (function(){
9120                             var symbol = l125;
9121                             var value = symbol.value;
9122                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9123                             return value;
9124                         })()), l126.fvalue(id, "if (typeof ", "x", " != '", "number", "')", (function(){
9125                             var symbol = l125;
9126                             var value = symbol.value;
9127                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9128                             return value;
9129                         })(), l133.fvalue(id, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
9130                             var symbol = l125;
9131                             var value = symbol.value;
9132                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9133                             return value;
9134                         })())), l126.fvalue(id, "return ", (function(){
9135                             return "Math.floor(x)";
9136                         })(), ";", (function(){
9137                             var symbol = l125;
9138                             var value = symbol.value;
9139                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9140                             return value;
9141                         })())), "})()");
9142                     })((function(){
9143                         var symbol = l135;
9144                         var func = symbol.fvalue;
9145                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9146                         return func;
9147                     })()(id, v648));
9148                 })();
9149             }
9150             catch (cf){
9151                 if (cf.type == 'block' && cf.id == 228)
9152                     return cf.value;
9153                 else
9154                     throw cf;
9155             }
9156         })();
9157
9158     })), cdr: (function(){
9159         var symbol = l247;
9160         var value = symbol.value;
9161         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9162         return value;
9163     })()}));
9164 })();
9165 (function(){
9166     return ((l247).value = ({car: l42.fvalue(id, l27, (function (values,v650,v651){
9167         if (arguments.length < 3) throw 'too few arguments';
9168         if (arguments.length > 3) throw 'too many arguments';
9169         return (function(){
9170             try {
9171                 return (function(){
9172                     return (function(v652,v653){
9173                         return l126.fvalue(id, "({car: ", v652, ", cdr: ", v653, "})");
9174                     })((function(){
9175                         var symbol = l135;
9176                         var func = symbol.fvalue;
9177                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9178                         return func;
9179                     })()(id, v650),(function(){
9180                         var symbol = l135;
9181                         var func = symbol.fvalue;
9182                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9183                         return func;
9184                     })()(id, v651));
9185                 })();
9186             }
9187             catch (cf){
9188                 if (cf.type == 'block' && cf.id == 229)
9189                     return cf.value;
9190                 else
9191                     throw cf;
9192             }
9193         })();
9194
9195     })), cdr: (function(){
9196         var symbol = l247;
9197         var value = symbol.value;
9198         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9199         return value;
9200     })()}));
9201 })();
9202 (function(){
9203     return ((l247).value = ({car: l42.fvalue(id, l28, (function (values,v654){
9204         if (arguments.length < 2) throw 'too few arguments';
9205         if (arguments.length > 2) throw 'too many arguments';
9206         return (function(){
9207             try {
9208                 return (function(){
9209                     return (function(v655){
9210                         return l134.fvalue(id, l126.fvalue(id, "(function(){", (function(){
9211                             var symbol = l125;
9212                             var value = symbol.value;
9213                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9214                             return value;
9215                         })(), l133.fvalue(id, "var tmp = ", v655, ";", (function(){
9216                             var symbol = l125;
9217                             var value = symbol.value;
9218                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9219                             return value;
9220                         })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
9221                             var symbol = l125;
9222                             var value = symbol.value;
9223                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9224                             return value;
9225                         })()), "})()"));
9226                     })((function(){
9227                         var symbol = l135;
9228                         var func = symbol.fvalue;
9229                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9230                         return func;
9231                     })()(id, v654));
9232                 })();
9233             }
9234             catch (cf){
9235                 if (cf.type == 'block' && cf.id == 230)
9236                     return cf.value;
9237                 else
9238                     throw cf;
9239             }
9240         })();
9241
9242     })), cdr: (function(){
9243         var symbol = l247;
9244         var value = symbol.value;
9245         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9246         return value;
9247     })()}));
9248 })();
9249 (function(){
9250     return ((l247).value = ({car: l42.fvalue(id, l29, (function (values,v656){
9251         if (arguments.length < 2) throw 'too few arguments';
9252         if (arguments.length > 2) throw 'too many arguments';
9253         return (function(){
9254             try {
9255                 return (function(){
9256                     return (function(v657){
9257                         return l126.fvalue(id, "(function(){", (function(){
9258                             var symbol = l125;
9259                             var value = symbol.value;
9260                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9261                             return value;
9262                         })(), l133.fvalue(id, "var tmp = ", v657, ";", (function(){
9263                             var symbol = l125;
9264                             var value = symbol.value;
9265                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9266                             return value;
9267                         })(), "return tmp === ", (function(){
9268                             var symbol = l135;
9269                             var func = symbol.fvalue;
9270                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9271                             return func;
9272                         })()(id, l3.value), "? ", (function(){
9273                             var symbol = l135;
9274                             var func = symbol.fvalue;
9275                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9276                             return func;
9277                         })()(id, l3.value), ": tmp.car;", (function(){
9278                             var symbol = l125;
9279                             var value = symbol.value;
9280                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9281                             return value;
9282                         })()), "})()");
9283                     })((function(){
9284                         var symbol = l135;
9285                         var func = symbol.fvalue;
9286                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9287                         return func;
9288                     })()(id, v656));
9289                 })();
9290             }
9291             catch (cf){
9292                 if (cf.type == 'block' && cf.id == 231)
9293                     return cf.value;
9294                 else
9295                     throw cf;
9296             }
9297         })();
9298
9299     })), cdr: (function(){
9300         var symbol = l247;
9301         var value = symbol.value;
9302         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9303         return value;
9304     })()}));
9305 })();
9306 (function(){
9307     return ((l247).value = ({car: l42.fvalue(id, l30, (function (values,v658){
9308         if (arguments.length < 2) throw 'too few arguments';
9309         if (arguments.length > 2) throw 'too many arguments';
9310         return (function(){
9311             try {
9312                 return (function(){
9313                     return (function(v659){
9314                         return l126.fvalue(id, "(function(){", (function(){
9315                             var symbol = l125;
9316                             var value = symbol.value;
9317                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9318                             return value;
9319                         })(), l133.fvalue(id, "var tmp = ", v659, ";", (function(){
9320                             var symbol = l125;
9321                             var value = symbol.value;
9322                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9323                             return value;
9324                         })(), "return tmp === ", (function(){
9325                             var symbol = l135;
9326                             var func = symbol.fvalue;
9327                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9328                             return func;
9329                         })()(id, l3.value), "? ", (function(){
9330                             var symbol = l135;
9331                             var func = symbol.fvalue;
9332                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9333                             return func;
9334                         })()(id, l3.value), ": tmp.cdr;", (function(){
9335                             var symbol = l125;
9336                             var value = symbol.value;
9337                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9338                             return value;
9339                         })()), "})()");
9340                     })((function(){
9341                         var symbol = l135;
9342                         var func = symbol.fvalue;
9343                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9344                         return func;
9345                     })()(id, v658));
9346                 })();
9347             }
9348             catch (cf){
9349                 if (cf.type == 'block' && cf.id == 232)
9350                     return cf.value;
9351                 else
9352                     throw cf;
9353             }
9354         })();
9355
9356     })), cdr: (function(){
9357         var symbol = l247;
9358         var value = symbol.value;
9359         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9360         return value;
9361     })()}));
9362 })();
9363 var l263 = {name: "SETCAR"};
9364 (function(){
9365     return ((l247).value = ({car: l42.fvalue(id, l263, (function (values,v660,v661){
9366         if (arguments.length < 3) throw 'too few arguments';
9367         if (arguments.length > 3) throw 'too many arguments';
9368         return (function(){
9369             try {
9370                 return (function(){
9371                     return (function(v662,v663){
9372                         return l126.fvalue(id, "(function(){", (function(){
9373                             var symbol = l125;
9374                             var value = symbol.value;
9375                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9376                             return value;
9377                         })(), l133.fvalue(id, l126.fvalue(id, "var ", "x", " = ", v662, ";", (function(){
9378                             var symbol = l125;
9379                             var value = symbol.value;
9380                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9381                             return value;
9382                         })()), l126.fvalue(id, "if (typeof ", "x", " != '", "object", "')", (function(){
9383                             var symbol = l125;
9384                             var value = symbol.value;
9385                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9386                             return value;
9387                         })(), l133.fvalue(id, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
9388                             var symbol = l125;
9389                             var value = symbol.value;
9390                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9391                             return value;
9392                         })())), l126.fvalue(id, "return ", (function(){
9393                             return l126.fvalue(id, "(x.car = ", v663, ")");
9394                         })(), ";", (function(){
9395                             var symbol = l125;
9396                             var value = symbol.value;
9397                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9398                             return value;
9399                         })())), "})()");
9400                     })((function(){
9401                         var symbol = l135;
9402                         var func = symbol.fvalue;
9403                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9404                         return func;
9405                     })()(id, v660),(function(){
9406                         var symbol = l135;
9407                         var func = symbol.fvalue;
9408                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9409                         return func;
9410                     })()(id, v661));
9411                 })();
9412             }
9413             catch (cf){
9414                 if (cf.type == 'block' && cf.id == 233)
9415                     return cf.value;
9416                 else
9417                     throw cf;
9418             }
9419         })();
9420
9421     })), cdr: (function(){
9422         var symbol = l247;
9423         var value = symbol.value;
9424         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9425         return value;
9426     })()}));
9427 })();
9428 var l264 = {name: "SETCDR"};
9429 (function(){
9430     return ((l247).value = ({car: l42.fvalue(id, l264, (function (values,v664,v665){
9431         if (arguments.length < 3) throw 'too few arguments';
9432         if (arguments.length > 3) throw 'too many arguments';
9433         return (function(){
9434             try {
9435                 return (function(){
9436                     return (function(v666,v667){
9437                         return l126.fvalue(id, "(function(){", (function(){
9438                             var symbol = l125;
9439                             var value = symbol.value;
9440                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9441                             return value;
9442                         })(), l133.fvalue(id, l126.fvalue(id, "var ", "x", " = ", v666, ";", (function(){
9443                             var symbol = l125;
9444                             var value = symbol.value;
9445                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9446                             return value;
9447                         })()), l126.fvalue(id, "if (typeof ", "x", " != '", "object", "')", (function(){
9448                             var symbol = l125;
9449                             var value = symbol.value;
9450                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9451                             return value;
9452                         })(), l133.fvalue(id, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
9453                             var symbol = l125;
9454                             var value = symbol.value;
9455                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9456                             return value;
9457                         })())), l126.fvalue(id, "return ", (function(){
9458                             return l126.fvalue(id, "(x.cdr = ", v667, ")");
9459                         })(), ";", (function(){
9460                             var symbol = l125;
9461                             var value = symbol.value;
9462                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9463                             return value;
9464                         })())), "})()");
9465                     })((function(){
9466                         var symbol = l135;
9467                         var func = symbol.fvalue;
9468                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9469                         return func;
9470                     })()(id, v664),(function(){
9471                         var symbol = l135;
9472                         var func = symbol.fvalue;
9473                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9474                         return func;
9475                     })()(id, v665));
9476                 })();
9477             }
9478             catch (cf){
9479                 if (cf.type == 'block' && cf.id == 234)
9480                     return cf.value;
9481                 else
9482                     throw cf;
9483             }
9484         })();
9485
9486     })), cdr: (function(){
9487         var symbol = l247;
9488         var value = symbol.value;
9489         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9490         return value;
9491     })()}));
9492 })();
9493 var l265 = {name: "SYMBOLP"};
9494 (function(){
9495     return ((l247).value = ({car: l42.fvalue(id, l265, (function (values,v668){
9496         if (arguments.length < 2) throw 'too few arguments';
9497         if (arguments.length > 2) throw 'too many arguments';
9498         return (function(){
9499             try {
9500                 return (function(){
9501                     return (function(v669){
9502                         return l134.fvalue(id, l126.fvalue(id, "(function(){", (function(){
9503                             var symbol = l125;
9504                             var value = symbol.value;
9505                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9506                             return value;
9507                         })(), l133.fvalue(id, "var tmp = ", v669, ";", (function(){
9508                             var symbol = l125;
9509                             var value = symbol.value;
9510                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9511                             return value;
9512                         })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
9513                             var symbol = l125;
9514                             var value = symbol.value;
9515                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9516                             return value;
9517                         })()), "})()"));
9518                     })((function(){
9519                         var symbol = l135;
9520                         var func = symbol.fvalue;
9521                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9522                         return func;
9523                     })()(id, v668));
9524                 })();
9525             }
9526             catch (cf){
9527                 if (cf.type == 'block' && cf.id == 235)
9528                     return cf.value;
9529                 else
9530                     throw cf;
9531             }
9532         })();
9533
9534     })), cdr: (function(){
9535         var symbol = l247;
9536         var value = symbol.value;
9537         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9538         return value;
9539     })()}));
9540 })();
9541 var l266 = {name: "MAKE-SYMBOL"};
9542 (function(){
9543     return ((l247).value = ({car: l42.fvalue(id, l266, (function (values,v670){
9544         if (arguments.length < 2) throw 'too few arguments';
9545         if (arguments.length > 2) throw 'too many arguments';
9546         return (function(){
9547             try {
9548                 return (function(){
9549                     return (function(v671){
9550                         return l126.fvalue(id, "(function(){", (function(){
9551                             var symbol = l125;
9552                             var value = symbol.value;
9553                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9554                             return value;
9555                         })(), l133.fvalue(id, l126.fvalue(id, "var ", "name", " = ", v671, ";", (function(){
9556                             var symbol = l125;
9557                             var value = symbol.value;
9558                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9559                             return value;
9560                         })()), l126.fvalue(id, "if (typeof ", "name", " != '", "string", "')", (function(){
9561                             var symbol = l125;
9562                             var value = symbol.value;
9563                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9564                             return value;
9565                         })(), l133.fvalue(id, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
9566                             var symbol = l125;
9567                             var value = symbol.value;
9568                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9569                             return value;
9570                         })())), l126.fvalue(id, "return ", (function(){
9571                             return "({name: name})";
9572                         })(), ";", (function(){
9573                             var symbol = l125;
9574                             var value = symbol.value;
9575                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9576                             return value;
9577                         })())), "})()");
9578                     })((function(){
9579                         var symbol = l135;
9580                         var func = symbol.fvalue;
9581                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9582                         return func;
9583                     })()(id, v670));
9584                 })();
9585             }
9586             catch (cf){
9587                 if (cf.type == 'block' && cf.id == 236)
9588                     return cf.value;
9589                 else
9590                     throw cf;
9591             }
9592         })();
9593
9594     })), cdr: (function(){
9595         var symbol = l247;
9596         var value = symbol.value;
9597         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9598         return value;
9599     })()}));
9600 })();
9601 var l267 = {name: "SYMBOL-NAME"};
9602 (function(){
9603     return ((l247).value = ({car: l42.fvalue(id, l267, (function (values,v672){
9604         if (arguments.length < 2) throw 'too few arguments';
9605         if (arguments.length > 2) throw 'too many arguments';
9606         return (function(){
9607             try {
9608                 return (function(){
9609                     return (function(v673){
9610                         return l126.fvalue(id, "(", v673, ").name");
9611                     })((function(){
9612                         var symbol = l135;
9613                         var func = symbol.fvalue;
9614                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9615                         return func;
9616                     })()(id, v672));
9617                 })();
9618             }
9619             catch (cf){
9620                 if (cf.type == 'block' && cf.id == 237)
9621                     return cf.value;
9622                 else
9623                     throw cf;
9624             }
9625         })();
9626
9627     })), cdr: (function(){
9628         var symbol = l247;
9629         var value = symbol.value;
9630         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9631         return value;
9632     })()}));
9633 })();
9634 (function(){
9635     return ((l247).value = ({car: l42.fvalue(id, l212, (function (values,v674,v675){
9636         if (arguments.length < 3) throw 'too few arguments';
9637         if (arguments.length > 3) throw 'too many arguments';
9638         return (function(){
9639             try {
9640                 return (function(){
9641                     return (function(v676,v677){
9642                         return l126.fvalue(id, "(", v676, ").value = ", v677);
9643                     })((function(){
9644                         var symbol = l135;
9645                         var func = symbol.fvalue;
9646                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9647                         return func;
9648                     })()(id, v674),(function(){
9649                         var symbol = l135;
9650                         var func = symbol.fvalue;
9651                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9652                         return func;
9653                     })()(id, v675));
9654                 })();
9655             }
9656             catch (cf){
9657                 if (cf.type == 'block' && cf.id == 238)
9658                     return cf.value;
9659                 else
9660                     throw cf;
9661             }
9662         })();
9663
9664     })), cdr: (function(){
9665         var symbol = l247;
9666         var value = symbol.value;
9667         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9668         return value;
9669     })()}));
9670 })();
9671 var l268 = {name: "FSET"};
9672 (function(){
9673     return ((l247).value = ({car: l42.fvalue(id, l268, (function (values,v678,v679){
9674         if (arguments.length < 3) throw 'too few arguments';
9675         if (arguments.length > 3) throw 'too many arguments';
9676         return (function(){
9677             try {
9678                 return (function(){
9679                     return (function(v680,v681){
9680                         return l126.fvalue(id, "(", v680, ").fvalue = ", v681);
9681                     })((function(){
9682                         var symbol = l135;
9683                         var func = symbol.fvalue;
9684                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9685                         return func;
9686                     })()(id, v678),(function(){
9687                         var symbol = l135;
9688                         var func = symbol.fvalue;
9689                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9690                         return func;
9691                     })()(id, v679));
9692                 })();
9693             }
9694             catch (cf){
9695                 if (cf.type == 'block' && cf.id == 239)
9696                     return cf.value;
9697                 else
9698                     throw cf;
9699             }
9700         })();
9701
9702     })), cdr: (function(){
9703         var symbol = l247;
9704         var value = symbol.value;
9705         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9706         return value;
9707     })()}));
9708 })();
9709 (function(){
9710     return ((l247).value = ({car: l42.fvalue(id, l17, (function (values,v682){
9711         if (arguments.length < 2) throw 'too few arguments';
9712         if (arguments.length > 2) throw 'too many arguments';
9713         return (function(){
9714             try {
9715                 return (function(){
9716                     return (function(v683){
9717                         return l134.fvalue(id, l126.fvalue(id, "(", v683, ".value !== undefined)"));
9718                     })((function(){
9719                         var symbol = l135;
9720                         var func = symbol.fvalue;
9721                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9722                         return func;
9723                     })()(id, v682));
9724                 })();
9725             }
9726             catch (cf){
9727                 if (cf.type == 'block' && cf.id == 240)
9728                     return cf.value;
9729                 else
9730                     throw cf;
9731             }
9732         })();
9733
9734     })), cdr: (function(){
9735         var symbol = l247;
9736         var value = symbol.value;
9737         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9738         return value;
9739     })()}));
9740 })();
9741 var l269 = {name: "SYMBOL-VALUE"};
9742 (function(){
9743     return ((l247).value = ({car: l42.fvalue(id, l269, (function (values,v684){
9744         if (arguments.length < 2) throw 'too few arguments';
9745         if (arguments.length > 2) throw 'too many arguments';
9746         return (function(){
9747             try {
9748                 return (function(){
9749                     return (function(v685){
9750                         return l126.fvalue(id, "(function(){", (function(){
9751                             var symbol = l125;
9752                             var value = symbol.value;
9753                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9754                             return value;
9755                         })(), l133.fvalue(id, "var symbol = ", v685, ";", (function(){
9756                             var symbol = l125;
9757                             var value = symbol.value;
9758                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9759                             return value;
9760                         })(), "var value = symbol.value;", (function(){
9761                             var symbol = l125;
9762                             var value = symbol.value;
9763                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9764                             return value;
9765                         })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
9766                             var symbol = l125;
9767                             var value = symbol.value;
9768                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9769                             return value;
9770                         })(), "return value;", (function(){
9771                             var symbol = l125;
9772                             var value = symbol.value;
9773                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9774                             return value;
9775                         })()), "})()");
9776                     })((function(){
9777                         var symbol = l135;
9778                         var func = symbol.fvalue;
9779                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9780                         return func;
9781                     })()(id, v684));
9782                 })();
9783             }
9784             catch (cf){
9785                 if (cf.type == 'block' && cf.id == 241)
9786                     return cf.value;
9787                 else
9788                     throw cf;
9789             }
9790         })();
9791
9792     })), cdr: (function(){
9793         var symbol = l247;
9794         var value = symbol.value;
9795         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9796         return value;
9797     })()}));
9798 })();
9799 (function(){
9800     return ((l247).value = ({car: l42.fvalue(id, l221, (function (values,v686){
9801         if (arguments.length < 2) throw 'too few arguments';
9802         if (arguments.length > 2) throw 'too many arguments';
9803         return (function(){
9804             try {
9805                 return (function(){
9806                     return (function(v687){
9807                         return l126.fvalue(id, "(function(){", (function(){
9808                             var symbol = l125;
9809                             var value = symbol.value;
9810                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9811                             return value;
9812                         })(), l133.fvalue(id, "var symbol = ", v687, ";", (function(){
9813                             var symbol = l125;
9814                             var value = symbol.value;
9815                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9816                             return value;
9817                         })(), "var func = symbol.fvalue;", (function(){
9818                             var symbol = l125;
9819                             var value = symbol.value;
9820                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9821                             return value;
9822                         })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
9823                             var symbol = l125;
9824                             var value = symbol.value;
9825                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9826                             return value;
9827                         })(), "return func;", (function(){
9828                             var symbol = l125;
9829                             var value = symbol.value;
9830                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9831                             return value;
9832                         })()), "})()");
9833                     })((function(){
9834                         var symbol = l135;
9835                         var func = symbol.fvalue;
9836                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9837                         return func;
9838                     })()(id, v686));
9839                 })();
9840             }
9841             catch (cf){
9842                 if (cf.type == 'block' && cf.id == 242)
9843                     return cf.value;
9844                 else
9845                     throw cf;
9846             }
9847         })();
9848
9849     })), cdr: (function(){
9850         var symbol = l247;
9851         var value = symbol.value;
9852         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9853         return value;
9854     })()}));
9855 })();
9856 var l270 = {name: "SYMBOL-PLIST"};
9857 (function(){
9858     return ((l247).value = ({car: l42.fvalue(id, l270, (function (values,v688){
9859         if (arguments.length < 2) throw 'too few arguments';
9860         if (arguments.length > 2) throw 'too many arguments';
9861         return (function(){
9862             try {
9863                 return (function(){
9864                     return (function(v689){
9865                         return l126.fvalue(id, "((", v689, ").plist || ", (function(){
9866                             var symbol = l135;
9867                             var func = symbol.fvalue;
9868                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9869                             return func;
9870                         })()(id, l3.value), ")");
9871                     })((function(){
9872                         var symbol = l135;
9873                         var func = symbol.fvalue;
9874                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9875                         return func;
9876                     })()(id, v688));
9877                 })();
9878             }
9879             catch (cf){
9880                 if (cf.type == 'block' && cf.id == 243)
9881                     return cf.value;
9882                 else
9883                     throw cf;
9884             }
9885         })();
9886
9887     })), cdr: (function(){
9888         var symbol = l247;
9889         var value = symbol.value;
9890         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9891         return value;
9892     })()}));
9893 })();
9894 var l271 = {name: "LAMBDA-CODE"};
9895 (function(){
9896     return ((l247).value = ({car: l42.fvalue(id, l271, (function (values,v690){
9897         if (arguments.length < 2) throw 'too few arguments';
9898         if (arguments.length > 2) throw 'too many arguments';
9899         return (function(){
9900             try {
9901                 return (function(){
9902                     return (function(v691){
9903                         return l126.fvalue(id, "(", v691, ").toString()");
9904                     })((function(){
9905                         var symbol = l135;
9906                         var func = symbol.fvalue;
9907                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9908                         return func;
9909                     })()(id, v690));
9910                 })();
9911             }
9912             catch (cf){
9913                 if (cf.type == 'block' && cf.id == 244)
9914                     return cf.value;
9915                 else
9916                     throw cf;
9917             }
9918         })();
9919
9920     })), cdr: (function(){
9921         var symbol = l247;
9922         var value = symbol.value;
9923         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9924         return value;
9925     })()}));
9926 })();
9927 var l272 = {name: "EQ"};
9928 (function(){
9929     return ((l247).value = ({car: l42.fvalue(id, l272, (function (values,v692,v693){
9930         if (arguments.length < 3) throw 'too few arguments';
9931         if (arguments.length > 3) throw 'too many arguments';
9932         return (function(){
9933             try {
9934                 return (function(){
9935                     return (function(v694,v695){
9936                         return l134.fvalue(id, l126.fvalue(id, "(", v694, " === ", v695, ")"));
9937                     })((function(){
9938                         var symbol = l135;
9939                         var func = symbol.fvalue;
9940                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9941                         return func;
9942                     })()(id, v692),(function(){
9943                         var symbol = l135;
9944                         var func = symbol.fvalue;
9945                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9946                         return func;
9947                     })()(id, v693));
9948                 })();
9949             }
9950             catch (cf){
9951                 if (cf.type == 'block' && cf.id == 245)
9952                     return cf.value;
9953                 else
9954                     throw cf;
9955             }
9956         })();
9957
9958     })), cdr: (function(){
9959         var symbol = l247;
9960         var value = symbol.value;
9961         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9962         return value;
9963     })()}));
9964 })();
9965 var l273 = {name: "EQUAL"};
9966 (function(){
9967     return ((l247).value = ({car: l42.fvalue(id, l273, (function (values,v696,v697){
9968         if (arguments.length < 3) throw 'too few arguments';
9969         if (arguments.length > 3) throw 'too many arguments';
9970         return (function(){
9971             try {
9972                 return (function(){
9973                     return (function(v698,v699){
9974                         return l134.fvalue(id, l126.fvalue(id, "(", v698, " == ", v699, ")"));
9975                     })((function(){
9976                         var symbol = l135;
9977                         var func = symbol.fvalue;
9978                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9979                         return func;
9980                     })()(id, v696),(function(){
9981                         var symbol = l135;
9982                         var func = symbol.fvalue;
9983                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9984                         return func;
9985                     })()(id, v697));
9986                 })();
9987             }
9988             catch (cf){
9989                 if (cf.type == 'block' && cf.id == 246)
9990                     return cf.value;
9991                 else
9992                     throw cf;
9993             }
9994         })();
9995
9996     })), cdr: (function(){
9997         var symbol = l247;
9998         var value = symbol.value;
9999         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10000         return value;
10001     })()}));
10002 })();
10003 var l274 = {name: "CHAR-TO-STRING"};
10004 (function(){
10005     return ((l247).value = ({car: l42.fvalue(id, l274, (function (values,v700){
10006         if (arguments.length < 2) throw 'too few arguments';
10007         if (arguments.length > 2) throw 'too many arguments';
10008         return (function(){
10009             try {
10010                 return (function(){
10011                     return (function(v701){
10012                         return l126.fvalue(id, "(function(){", (function(){
10013                             var symbol = l125;
10014                             var value = symbol.value;
10015                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10016                             return value;
10017                         })(), l133.fvalue(id, l126.fvalue(id, "var ", "x", " = ", v701, ";", (function(){
10018                             var symbol = l125;
10019                             var value = symbol.value;
10020                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10021                             return value;
10022                         })()), l126.fvalue(id, "if (typeof ", "x", " != '", "number", "')", (function(){
10023                             var symbol = l125;
10024                             var value = symbol.value;
10025                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10026                             return value;
10027                         })(), l133.fvalue(id, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
10028                             var symbol = l125;
10029                             var value = symbol.value;
10030                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10031                             return value;
10032                         })())), l126.fvalue(id, "return ", (function(){
10033                             return "String.fromCharCode(x)";
10034                         })(), ";", (function(){
10035                             var symbol = l125;
10036                             var value = symbol.value;
10037                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10038                             return value;
10039                         })())), "})()");
10040                     })((function(){
10041                         var symbol = l135;
10042                         var func = symbol.fvalue;
10043                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10044                         return func;
10045                     })()(id, v700));
10046                 })();
10047             }
10048             catch (cf){
10049                 if (cf.type == 'block' && cf.id == 247)
10050                     return cf.value;
10051                 else
10052                     throw cf;
10053             }
10054         })();
10055
10056     })), cdr: (function(){
10057         var symbol = l247;
10058         var value = symbol.value;
10059         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10060         return value;
10061     })()}));
10062 })();
10063 var l275 = {name: "STRINGP"};
10064 (function(){
10065     return ((l247).value = ({car: l42.fvalue(id, l275, (function (values,v702){
10066         if (arguments.length < 2) throw 'too few arguments';
10067         if (arguments.length > 2) throw 'too many arguments';
10068         return (function(){
10069             try {
10070                 return (function(){
10071                     return (function(v703){
10072                         return l134.fvalue(id, l126.fvalue(id, "(typeof(", v703, ") == \"string\")"));
10073                     })((function(){
10074                         var symbol = l135;
10075                         var func = symbol.fvalue;
10076                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10077                         return func;
10078                     })()(id, v702));
10079                 })();
10080             }
10081             catch (cf){
10082                 if (cf.type == 'block' && cf.id == 248)
10083                     return cf.value;
10084                 else
10085                     throw cf;
10086             }
10087         })();
10088
10089     })), cdr: (function(){
10090         var symbol = l247;
10091         var value = symbol.value;
10092         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10093         return value;
10094     })()}));
10095 })();
10096 var l276 = {name: "STRING-UPCASE"};
10097 (function(){
10098     return ((l247).value = ({car: l42.fvalue(id, l276, (function (values,v704){
10099         if (arguments.length < 2) throw 'too few arguments';
10100         if (arguments.length > 2) throw 'too many arguments';
10101         return (function(){
10102             try {
10103                 return (function(){
10104                     return (function(v705){
10105                         return l126.fvalue(id, "(function(){", (function(){
10106                             var symbol = l125;
10107                             var value = symbol.value;
10108                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10109                             return value;
10110                         })(), l133.fvalue(id, l126.fvalue(id, "var ", "x", " = ", v705, ";", (function(){
10111                             var symbol = l125;
10112                             var value = symbol.value;
10113                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10114                             return value;
10115                         })()), l126.fvalue(id, "if (typeof ", "x", " != '", "string", "')", (function(){
10116                             var symbol = l125;
10117                             var value = symbol.value;
10118                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10119                             return value;
10120                         })(), l133.fvalue(id, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
10121                             var symbol = l125;
10122                             var value = symbol.value;
10123                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10124                             return value;
10125                         })())), l126.fvalue(id, "return ", (function(){
10126                             return "x.toUpperCase()";
10127                         })(), ";", (function(){
10128                             var symbol = l125;
10129                             var value = symbol.value;
10130                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10131                             return value;
10132                         })())), "})()");
10133                     })((function(){
10134                         var symbol = l135;
10135                         var func = symbol.fvalue;
10136                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10137                         return func;
10138                     })()(id, v704));
10139                 })();
10140             }
10141             catch (cf){
10142                 if (cf.type == 'block' && cf.id == 249)
10143                     return cf.value;
10144                 else
10145                     throw cf;
10146             }
10147         })();
10148
10149     })), cdr: (function(){
10150         var symbol = l247;
10151         var value = symbol.value;
10152         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10153         return value;
10154     })()}));
10155 })();
10156 var l277 = {name: "STRING-LENGTH"};
10157 (function(){
10158     return ((l247).value = ({car: l42.fvalue(id, l277, (function (values,v706){
10159         if (arguments.length < 2) throw 'too few arguments';
10160         if (arguments.length > 2) throw 'too many arguments';
10161         return (function(){
10162             try {
10163                 return (function(){
10164                     return (function(v707){
10165                         return l126.fvalue(id, "(function(){", (function(){
10166                             var symbol = l125;
10167                             var value = symbol.value;
10168                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10169                             return value;
10170                         })(), l133.fvalue(id, l126.fvalue(id, "var ", "x", " = ", v707, ";", (function(){
10171                             var symbol = l125;
10172                             var value = symbol.value;
10173                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10174                             return value;
10175                         })()), l126.fvalue(id, "if (typeof ", "x", " != '", "string", "')", (function(){
10176                             var symbol = l125;
10177                             var value = symbol.value;
10178                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10179                             return value;
10180                         })(), l133.fvalue(id, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
10181                             var symbol = l125;
10182                             var value = symbol.value;
10183                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10184                             return value;
10185                         })())), l126.fvalue(id, "return ", (function(){
10186                             return "x.length";
10187                         })(), ";", (function(){
10188                             var symbol = l125;
10189                             var value = symbol.value;
10190                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10191                             return value;
10192                         })())), "})()");
10193                     })((function(){
10194                         var symbol = l135;
10195                         var func = symbol.fvalue;
10196                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10197                         return func;
10198                     })()(id, v706));
10199                 })();
10200             }
10201             catch (cf){
10202                 if (cf.type == 'block' && cf.id == 250)
10203                     return cf.value;
10204                 else
10205                     throw cf;
10206             }
10207         })();
10208
10209     })), cdr: (function(){
10210         var symbol = l247;
10211         var value = symbol.value;
10212         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10213         return value;
10214     })()}));
10215 })();
10216 var l278 = {name: "SLICE"};
10217 ((l247).value = ({car: l42.fvalue(id, l278, (function (values,v708,v709,v710){
10218     if (arguments.length < 3) throw 'too few arguments';
10219     if (arguments.length > 4) throw 'too many arguments';
10220     switch(arguments.length-1){
10221     case 2:
10222     v710=l3.value;
10223     default: break;
10224     }
10225     return (function(){
10226         try {
10227             return (function(){
10228                 return l126.fvalue(id, "(function(){", (function(){
10229                     var symbol = l125;
10230                     var value = symbol.value;
10231                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10232                     return value;
10233                 })(), l133.fvalue(id, "var str = ", (function(){
10234                     var symbol = l135;
10235                     var func = symbol.fvalue;
10236                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10237                     return func;
10238                 })()(id, v708), ";", (function(){
10239                     var symbol = l125;
10240                     var value = symbol.value;
10241                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10242                     return value;
10243                 })(), "var a = ", (function(){
10244                     var symbol = l135;
10245                     var func = symbol.fvalue;
10246                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10247                     return func;
10248                 })()(id, v709), ";", (function(){
10249                     var symbol = l125;
10250                     var value = symbol.value;
10251                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10252                     return value;
10253                 })(), "var b;", (function(){
10254                     var symbol = l125;
10255                     var value = symbol.value;
10256                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10257                     return value;
10258                 })(), (v710 !== l3.value ? l126.fvalue(id, "b = ", (function(){
10259                     var symbol = l135;
10260                     var func = symbol.fvalue;
10261                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10262                     return func;
10263                 })()(id, v710), ";", (function(){
10264                     var symbol = l125;
10265                     var value = symbol.value;
10266                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10267                     return value;
10268                 })()) : ""), "return str.slice(a,b);", (function(){
10269                     var symbol = l125;
10270                     var value = symbol.value;
10271                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10272                     return value;
10273                 })()), "})()");
10274             })();
10275         }
10276         catch (cf){
10277             if (cf.type == 'block' && cf.id == 251)
10278                 return cf.value;
10279             else
10280                 throw cf;
10281         }
10282     })();
10283
10284 })), cdr: (function(){
10285     var symbol = l247;
10286     var value = symbol.value;
10287     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10288     return value;
10289 })()}));
10290 var l279 = {name: "CHAR"};
10291 (function(){
10292     return ((l247).value = ({car: l42.fvalue(id, l279, (function (values,v711,v712){
10293         if (arguments.length < 3) throw 'too few arguments';
10294         if (arguments.length > 3) throw 'too many arguments';
10295         return (function(){
10296             try {
10297                 return (function(){
10298                     return (function(v713,v714){
10299                         return l126.fvalue(id, "(function(){", (function(){
10300                             var symbol = l125;
10301                             var value = symbol.value;
10302                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10303                             return value;
10304                         })(), l133.fvalue(id, l126.fvalue(id, "var ", "string", " = ", v713, ";", (function(){
10305                             var symbol = l125;
10306                             var value = symbol.value;
10307                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10308                             return value;
10309                         })()), l126.fvalue(id, "var ", "index", " = ", v714, ";", (function(){
10310                             var symbol = l125;
10311                             var value = symbol.value;
10312                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10313                             return value;
10314                         })()), l126.fvalue(id, "if (typeof ", "string", " != '", "string", "')", (function(){
10315                             var symbol = l125;
10316                             var value = symbol.value;
10317                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10318                             return value;
10319                         })(), l133.fvalue(id, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
10320                             var symbol = l125;
10321                             var value = symbol.value;
10322                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10323                             return value;
10324                         })())), l126.fvalue(id, "if (typeof ", "index", " != '", "number", "')", (function(){
10325                             var symbol = l125;
10326                             var value = symbol.value;
10327                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10328                             return value;
10329                         })(), l133.fvalue(id, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
10330                             var symbol = l125;
10331                             var value = symbol.value;
10332                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10333                             return value;
10334                         })())), l126.fvalue(id, "return ", (function(){
10335                             return "string.charCodeAt(index)";
10336                         })(), ";", (function(){
10337                             var symbol = l125;
10338                             var value = symbol.value;
10339                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10340                             return value;
10341                         })())), "})()");
10342                     })((function(){
10343                         var symbol = l135;
10344                         var func = symbol.fvalue;
10345                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10346                         return func;
10347                     })()(id, v711),(function(){
10348                         var symbol = l135;
10349                         var func = symbol.fvalue;
10350                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10351                         return func;
10352                     })()(id, v712));
10353                 })();
10354             }
10355             catch (cf){
10356                 if (cf.type == 'block' && cf.id == 252)
10357                     return cf.value;
10358                 else
10359                     throw cf;
10360             }
10361         })();
10362
10363     })), cdr: (function(){
10364         var symbol = l247;
10365         var value = symbol.value;
10366         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10367         return value;
10368     })()}));
10369 })();
10370 (function(){
10371     return ((l247).value = ({car: l42.fvalue(id, l68, (function (values,v715,v716){
10372         if (arguments.length < 3) throw 'too few arguments';
10373         if (arguments.length > 3) throw 'too many arguments';
10374         return (function(){
10375             try {
10376                 return (function(){
10377                     return (function(v717,v718){
10378                         return l126.fvalue(id, "(function(){", (function(){
10379                             var symbol = l125;
10380                             var value = symbol.value;
10381                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10382                             return value;
10383                         })(), l133.fvalue(id, l126.fvalue(id, "var ", "string1", " = ", v717, ";", (function(){
10384                             var symbol = l125;
10385                             var value = symbol.value;
10386                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10387                             return value;
10388                         })()), l126.fvalue(id, "var ", "string2", " = ", v718, ";", (function(){
10389                             var symbol = l125;
10390                             var value = symbol.value;
10391                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10392                             return value;
10393                         })()), l126.fvalue(id, "if (typeof ", "string1", " != '", "string", "')", (function(){
10394                             var symbol = l125;
10395                             var value = symbol.value;
10396                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10397                             return value;
10398                         })(), l133.fvalue(id, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
10399                             var symbol = l125;
10400                             var value = symbol.value;
10401                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10402                             return value;
10403                         })())), l126.fvalue(id, "if (typeof ", "string2", " != '", "string", "')", (function(){
10404                             var symbol = l125;
10405                             var value = symbol.value;
10406                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10407                             return value;
10408                         })(), l133.fvalue(id, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
10409                             var symbol = l125;
10410                             var value = symbol.value;
10411                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10412                             return value;
10413                         })())), l126.fvalue(id, "return ", (function(){
10414                             return "string1.concat(string2)";
10415                         })(), ";", (function(){
10416                             var symbol = l125;
10417                             var value = symbol.value;
10418                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10419                             return value;
10420                         })())), "})()");
10421                     })((function(){
10422                         var symbol = l135;
10423                         var func = symbol.fvalue;
10424                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10425                         return func;
10426                     })()(id, v715),(function(){
10427                         var symbol = l135;
10428                         var func = symbol.fvalue;
10429                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10430                         return func;
10431                     })()(id, v716));
10432                 })();
10433             }
10434             catch (cf){
10435                 if (cf.type == 'block' && cf.id == 253)
10436                     return cf.value;
10437                 else
10438                     throw cf;
10439             }
10440         })();
10441
10442     })), cdr: (function(){
10443         var symbol = l247;
10444         var value = symbol.value;
10445         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10446         return value;
10447     })()}));
10448 })();
10449 var l280 = {name: "FUNCALL"};
10450 ((l247).value = ({car: l42.fvalue(id, l280, (function (values,v720){
10451     if (arguments.length < 2) throw 'too few arguments';
10452     var v719= l3.value;
10453     for (var i = arguments.length-1; i>=2; i--)
10454         v719 = {car: arguments[i], cdr:
10455     v719};
10456     return (function(){
10457         try {
10458             return (function(){
10459                 return l126.fvalue(id, "(", (function(){
10460                     var symbol = l135;
10461                     var func = symbol.fvalue;
10462                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10463                     return func;
10464                 })()(id, v720), ")(", l128.fvalue(id, ({car: "id", cdr: l69.fvalue(id, (function(){
10465                     var symbol = l135;
10466                     var func = symbol.fvalue;
10467                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10468                     return func;
10469                 })(), v719)}), ", "), ")");
10470             })();
10471         }
10472         catch (cf){
10473             if (cf.type == 'block' && cf.id == 254)
10474                 return cf.value;
10475             else
10476                 throw cf;
10477         }
10478     })();
10479
10480 })), cdr: (function(){
10481     var symbol = l247;
10482     var value = symbol.value;
10483     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10484     return value;
10485 })()}));
10486 var l281 = {name: "APPLY"};
10487 ((l247).value = ({car: l42.fvalue(id, l281, (function (values,v722){
10488     if (arguments.length < 2) throw 'too few arguments';
10489     var v721= l3.value;
10490     for (var i = arguments.length-1; i>=2; i--)
10491         v721 = {car: arguments[i], cdr:
10492     v721};
10493     return (function(){
10494         try {
10495             return (function(){
10496                 return (l11.fvalue(id, v721) !== l3.value ? l126.fvalue(id, "(", (function(){
10497                     var symbol = l135;
10498                     var func = symbol.fvalue;
10499                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10500                     return func;
10501                 })()(id, v722), ")()") : (function(v723,v724){
10502                     return l126.fvalue(id, "(function(){", (function(){
10503                         var symbol = l125;
10504                         var value = symbol.value;
10505                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10506                         return value;
10507                     })(), l133.fvalue(id, "var f = ", (function(){
10508                         var symbol = l135;
10509                         var func = symbol.fvalue;
10510                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10511                         return func;
10512                     })()(id, v722), ";", (function(){
10513                         var symbol = l125;
10514                         var value = symbol.value;
10515                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10516                         return value;
10517                     })(), "var args = [", l128.fvalue(id, ({car: "id", cdr: l69.fvalue(id, (function(){
10518                         var symbol = l135;
10519                         var func = symbol.fvalue;
10520                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10521                         return func;
10522                     })(), v723)}), ", "), "];", (function(){
10523                         var symbol = l125;
10524                         var value = symbol.value;
10525                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10526                         return value;
10527                     })(), "var tail = (", (function(){
10528                         var symbol = l135;
10529                         var func = symbol.fvalue;
10530                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10531                         return func;
10532                     })()(id, v724), ");", (function(){
10533                         var symbol = l125;
10534                         var value = symbol.value;
10535                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10536                         return value;
10537                     })(), "while (tail != ", (function(){
10538                         var symbol = l135;
10539                         var func = symbol.fvalue;
10540                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10541                         return func;
10542                     })()(id, l3.value), "){", (function(){
10543                         var symbol = l125;
10544                         var value = symbol.value;
10545                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10546                         return value;
10547                     })(), "    args.push(tail.car);", (function(){
10548                         var symbol = l125;
10549                         var value = symbol.value;
10550                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10551                         return value;
10552                     })(), "    tail = tail.cdr;", (function(){
10553                         var symbol = l125;
10554                         var value = symbol.value;
10555                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10556                         return value;
10557                     })(), "}", (function(){
10558                         var symbol = l125;
10559                         var value = symbol.value;
10560                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10561                         return value;
10562                     })(), "return f.apply(this, args);", (function(){
10563                         var symbol = l125;
10564                         var value = symbol.value;
10565                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10566                         return value;
10567                     })()), "})()");
10568                 })(l81.fvalue(id, v721),(function(){
10569                     var tmp = l80.fvalue(id, v721);
10570                     return tmp === l3.value? l3.value: tmp.car;
10571                 })()));
10572             })();
10573         }
10574         catch (cf){
10575             if (cf.type == 'block' && cf.id == 255)
10576                 return cf.value;
10577             else
10578                 throw cf;
10579         }
10580     })();
10581
10582 })), cdr: (function(){
10583     var symbol = l247;
10584     var value = symbol.value;
10585     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10586     return value;
10587 })()}));
10588 var l282 = {name: "JS-EVAL"};
10589 (function(){
10590     return ((l247).value = ({car: l42.fvalue(id, l282, (function (values,v725){
10591         if (arguments.length < 2) throw 'too few arguments';
10592         if (arguments.length > 2) throw 'too many arguments';
10593         return (function(){
10594             try {
10595                 return (function(){
10596                     return (function(v726){
10597                         return l126.fvalue(id, "(function(){", (function(){
10598                             var symbol = l125;
10599                             var value = symbol.value;
10600                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10601                             return value;
10602                         })(), l133.fvalue(id, l126.fvalue(id, "var ", "string", " = ", v726, ";", (function(){
10603                             var symbol = l125;
10604                             var value = symbol.value;
10605                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10606                             return value;
10607                         })()), l126.fvalue(id, "if (typeof ", "string", " != '", "string", "')", (function(){
10608                             var symbol = l125;
10609                             var value = symbol.value;
10610                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10611                             return value;
10612                         })(), l133.fvalue(id, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
10613                             var symbol = l125;
10614                             var value = symbol.value;
10615                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10616                             return value;
10617                         })())), l126.fvalue(id, "return ", (function(){
10618                             return "eval.apply(window, [string])";
10619                         })(), ";", (function(){
10620                             var symbol = l125;
10621                             var value = symbol.value;
10622                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10623                             return value;
10624                         })())), "})()");
10625                     })((function(){
10626                         var symbol = l135;
10627                         var func = symbol.fvalue;
10628                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10629                         return func;
10630                     })()(id, v725));
10631                 })();
10632             }
10633             catch (cf){
10634                 if (cf.type == 'block' && cf.id == 256)
10635                     return cf.value;
10636                 else
10637                     throw cf;
10638             }
10639         })();
10640
10641     })), cdr: (function(){
10642         var symbol = l247;
10643         var value = symbol.value;
10644         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10645         return value;
10646     })()}));
10647 })();
10648 var l283 = {name: "ERROR"};
10649 (function(){
10650     return ((l247).value = ({car: l42.fvalue(id, l283, (function (values,v727){
10651         if (arguments.length < 2) throw 'too few arguments';
10652         if (arguments.length > 2) throw 'too many arguments';
10653         return (function(){
10654             try {
10655                 return (function(){
10656                     return (function(v728){
10657                         return l126.fvalue(id, "(function(){", (function(){
10658                             var symbol = l125;
10659                             var value = symbol.value;
10660                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10661                             return value;
10662                         })(), l133.fvalue(id, "throw ", v728, ";", (function(){
10663                             var symbol = l125;
10664                             var value = symbol.value;
10665                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10666                             return value;
10667                         })()), "})()");
10668                     })((function(){
10669                         var symbol = l135;
10670                         var func = symbol.fvalue;
10671                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10672                         return func;
10673                     })()(id, v727));
10674                 })();
10675             }
10676             catch (cf){
10677                 if (cf.type == 'block' && cf.id == 257)
10678                     return cf.value;
10679                 else
10680                     throw cf;
10681             }
10682         })();
10683
10684     })), cdr: (function(){
10685         var symbol = l247;
10686         var value = symbol.value;
10687         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10688         return value;
10689     })()}));
10690 })();
10691 var l284 = {name: "NEW"};
10692 (function(){
10693     return ((l247).value = ({car: l42.fvalue(id, l284, (function (values){
10694         if (arguments.length > 1) throw 'too many arguments';
10695         return (function(){
10696             try {
10697                 return (function(){
10698                     return (function(){
10699                         return "{}";
10700                     })();
10701                 })();
10702             }
10703             catch (cf){
10704                 if (cf.type == 'block' && cf.id == 258)
10705                     return cf.value;
10706                 else
10707                     throw cf;
10708             }
10709         })();
10710
10711     })), cdr: (function(){
10712         var symbol = l247;
10713         var value = symbol.value;
10714         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10715         return value;
10716     })()}));
10717 })();
10718 var l285 = {name: "OBJECTP"};
10719 (function(){
10720     return ((l247).value = ({car: l42.fvalue(id, l285, (function (values,v729){
10721         if (arguments.length < 2) throw 'too few arguments';
10722         if (arguments.length > 2) throw 'too many arguments';
10723         return (function(){
10724             try {
10725                 return (function(){
10726                     return (function(v730){
10727                         return l134.fvalue(id, l126.fvalue(id, "(typeof (", v730, ") === 'object')"));
10728                     })((function(){
10729                         var symbol = l135;
10730                         var func = symbol.fvalue;
10731                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10732                         return func;
10733                     })()(id, v729));
10734                 })();
10735             }
10736             catch (cf){
10737                 if (cf.type == 'block' && cf.id == 259)
10738                     return cf.value;
10739                 else
10740                     throw cf;
10741             }
10742         })();
10743
10744     })), cdr: (function(){
10745         var symbol = l247;
10746         var value = symbol.value;
10747         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10748         return value;
10749     })()}));
10750 })();
10751 var l286 = {name: "OGET"};
10752 (function(){
10753     return ((l247).value = ({car: l42.fvalue(id, l286, (function (values,v731,v732){
10754         if (arguments.length < 3) throw 'too few arguments';
10755         if (arguments.length > 3) throw 'too many arguments';
10756         return (function(){
10757             try {
10758                 return (function(){
10759                     return (function(v733,v734){
10760                         return l126.fvalue(id, "(function(){", (function(){
10761                             var symbol = l125;
10762                             var value = symbol.value;
10763                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10764                             return value;
10765                         })(), l133.fvalue(id, "var tmp = ", "(", v733, ")[", v734, "];", (function(){
10766                             var symbol = l125;
10767                             var value = symbol.value;
10768                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10769                             return value;
10770                         })(), "return tmp == undefined? ", (function(){
10771                             var symbol = l135;
10772                             var func = symbol.fvalue;
10773                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10774                             return func;
10775                         })()(id, l3.value), ": tmp ;", (function(){
10776                             var symbol = l125;
10777                             var value = symbol.value;
10778                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10779                             return value;
10780                         })()), "})()");
10781                     })((function(){
10782                         var symbol = l135;
10783                         var func = symbol.fvalue;
10784                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10785                         return func;
10786                     })()(id, v731),(function(){
10787                         var symbol = l135;
10788                         var func = symbol.fvalue;
10789                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10790                         return func;
10791                     })()(id, v732));
10792                 })();
10793             }
10794             catch (cf){
10795                 if (cf.type == 'block' && cf.id == 260)
10796                     return cf.value;
10797                 else
10798                     throw cf;
10799             }
10800         })();
10801
10802     })), cdr: (function(){
10803         var symbol = l247;
10804         var value = symbol.value;
10805         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10806         return value;
10807     })()}));
10808 })();
10809 var l287 = {name: "OSET"};
10810 (function(){
10811     return ((l247).value = ({car: l42.fvalue(id, l287, (function (values,v735,v736,v737){
10812         if (arguments.length < 4) throw 'too few arguments';
10813         if (arguments.length > 4) throw 'too many arguments';
10814         return (function(){
10815             try {
10816                 return (function(){
10817                     return (function(v738,v739,v740){
10818                         return l126.fvalue(id, "((", v738, ")[", v739, "] = ", v740, ")");
10819                     })((function(){
10820                         var symbol = l135;
10821                         var func = symbol.fvalue;
10822                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10823                         return func;
10824                     })()(id, v735),(function(){
10825                         var symbol = l135;
10826                         var func = symbol.fvalue;
10827                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10828                         return func;
10829                     })()(id, v736),(function(){
10830                         var symbol = l135;
10831                         var func = symbol.fvalue;
10832                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10833                         return func;
10834                     })()(id, v737));
10835                 })();
10836             }
10837             catch (cf){
10838                 if (cf.type == 'block' && cf.id == 261)
10839                     return cf.value;
10840                 else
10841                     throw cf;
10842             }
10843         })();
10844
10845     })), cdr: (function(){
10846         var symbol = l247;
10847         var value = symbol.value;
10848         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10849         return value;
10850     })()}));
10851 })();
10852 var l288 = {name: "IN"};
10853 (function(){
10854     return ((l247).value = ({car: l42.fvalue(id, l288, (function (values,v741,v742){
10855         if (arguments.length < 3) throw 'too few arguments';
10856         if (arguments.length > 3) throw 'too many arguments';
10857         return (function(){
10858             try {
10859                 return (function(){
10860                     return (function(v743,v744){
10861                         return l134.fvalue(id, l126.fvalue(id, "((", v743, ") in (", v744, "))"));
10862                     })((function(){
10863                         var symbol = l135;
10864                         var func = symbol.fvalue;
10865                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10866                         return func;
10867                     })()(id, v741),(function(){
10868                         var symbol = l135;
10869                         var func = symbol.fvalue;
10870                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10871                         return func;
10872                     })()(id, v742));
10873                 })();
10874             }
10875             catch (cf){
10876                 if (cf.type == 'block' && cf.id == 262)
10877                     return cf.value;
10878                 else
10879                     throw cf;
10880             }
10881         })();
10882
10883     })), cdr: (function(){
10884         var symbol = l247;
10885         var value = symbol.value;
10886         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10887         return value;
10888     })()}));
10889 })();
10890 var l289 = {name: "FUNCTIONP"};
10891 (function(){
10892     return ((l247).value = ({car: l42.fvalue(id, l289, (function (values,v745){
10893         if (arguments.length < 2) throw 'too few arguments';
10894         if (arguments.length > 2) throw 'too many arguments';
10895         return (function(){
10896             try {
10897                 return (function(){
10898                     return (function(v746){
10899                         return l134.fvalue(id, l126.fvalue(id, "(typeof ", v746, " == 'function')"));
10900                     })((function(){
10901                         var symbol = l135;
10902                         var func = symbol.fvalue;
10903                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10904                         return func;
10905                     })()(id, v745));
10906                 })();
10907             }
10908             catch (cf){
10909                 if (cf.type == 'block' && cf.id == 263)
10910                     return cf.value;
10911                 else
10912                     throw cf;
10913             }
10914         })();
10915
10916     })), cdr: (function(){
10917         var symbol = l247;
10918         var value = symbol.value;
10919         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10920         return value;
10921     })()}));
10922 })();
10923 var l290 = {name: "WRITE-STRING"};
10924 (function(){
10925     return ((l247).value = ({car: l42.fvalue(id, l290, (function (values,v747){
10926         if (arguments.length < 2) throw 'too few arguments';
10927         if (arguments.length > 2) throw 'too many arguments';
10928         return (function(){
10929             try {
10930                 return (function(){
10931                     return (function(v748){
10932                         return l126.fvalue(id, "(function(){", (function(){
10933                             var symbol = l125;
10934                             var value = symbol.value;
10935                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10936                             return value;
10937                         })(), l133.fvalue(id, l126.fvalue(id, "var ", "x", " = ", v748, ";", (function(){
10938                             var symbol = l125;
10939                             var value = symbol.value;
10940                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10941                             return value;
10942                         })()), l126.fvalue(id, "if (typeof ", "x", " != '", "string", "')", (function(){
10943                             var symbol = l125;
10944                             var value = symbol.value;
10945                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10946                             return value;
10947                         })(), l133.fvalue(id, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
10948                             var symbol = l125;
10949                             var value = symbol.value;
10950                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10951                             return value;
10952                         })())), l126.fvalue(id, "return ", (function(){
10953                             return "lisp.write(x)";
10954                         })(), ";", (function(){
10955                             var symbol = l125;
10956                             var value = symbol.value;
10957                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10958                             return value;
10959                         })())), "})()");
10960                     })((function(){
10961                         var symbol = l135;
10962                         var func = symbol.fvalue;
10963                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10964                         return func;
10965                     })()(id, v747));
10966                 })();
10967             }
10968             catch (cf){
10969                 if (cf.type == 'block' && cf.id == 264)
10970                     return cf.value;
10971                 else
10972                     throw cf;
10973             }
10974         })();
10975
10976     })), cdr: (function(){
10977         var symbol = l247;
10978         var value = symbol.value;
10979         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10980         return value;
10981     })()}));
10982 })();
10983 var l291 = {name: "MAKE-ARRAY"};
10984 (function(){
10985     return ((l247).value = ({car: l42.fvalue(id, l291, (function (values,v749){
10986         if (arguments.length < 2) throw 'too few arguments';
10987         if (arguments.length > 2) throw 'too many arguments';
10988         return (function(){
10989             try {
10990                 return (function(){
10991                     return (function(v750){
10992                         return l126.fvalue(id, "(function(){", (function(){
10993                             var symbol = l125;
10994                             var value = symbol.value;
10995                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10996                             return value;
10997                         })(), l133.fvalue(id, "var r = [];", (function(){
10998                             var symbol = l125;
10999                             var value = symbol.value;
11000                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11001                             return value;
11002                         })(), "for (var i = 0; i < ", v750, "; i++)", (function(){
11003                             var symbol = l125;
11004                             var value = symbol.value;
11005                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11006                             return value;
11007                         })(), l133.fvalue(id, "r.push(", (function(){
11008                             var symbol = l135;
11009                             var func = symbol.fvalue;
11010                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11011                             return func;
11012                         })()(id, l3.value), ");", (function(){
11013                             var symbol = l125;
11014                             var value = symbol.value;
11015                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11016                             return value;
11017                         })()), "return r;", (function(){
11018                             var symbol = l125;
11019                             var value = symbol.value;
11020                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11021                             return value;
11022                         })()), "})()");
11023                     })((function(){
11024                         var symbol = l135;
11025                         var func = symbol.fvalue;
11026                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11027                         return func;
11028                     })()(id, v749));
11029                 })();
11030             }
11031             catch (cf){
11032                 if (cf.type == 'block' && cf.id == 265)
11033                     return cf.value;
11034                 else
11035                     throw cf;
11036             }
11037         })();
11038
11039     })), cdr: (function(){
11040         var symbol = l247;
11041         var value = symbol.value;
11042         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11043         return value;
11044     })()}));
11045 })();
11046 var l292 = {name: "ARRAYP"};
11047 (function(){
11048     return ((l247).value = ({car: l42.fvalue(id, l292, (function (values,v751){
11049         if (arguments.length < 2) throw 'too few arguments';
11050         if (arguments.length > 2) throw 'too many arguments';
11051         return (function(){
11052             try {
11053                 return (function(){
11054                     return (function(v752){
11055                         return l134.fvalue(id, l126.fvalue(id, "(function(){", (function(){
11056                             var symbol = l125;
11057                             var value = symbol.value;
11058                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11059                             return value;
11060                         })(), l133.fvalue(id, "var x = ", v752, ";", (function(){
11061                             var symbol = l125;
11062                             var value = symbol.value;
11063                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11064                             return value;
11065                         })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
11066                     })((function(){
11067                         var symbol = l135;
11068                         var func = symbol.fvalue;
11069                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11070                         return func;
11071                     })()(id, v751));
11072                 })();
11073             }
11074             catch (cf){
11075                 if (cf.type == 'block' && cf.id == 266)
11076                     return cf.value;
11077                 else
11078                     throw cf;
11079             }
11080         })();
11081
11082     })), cdr: (function(){
11083         var symbol = l247;
11084         var value = symbol.value;
11085         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11086         return value;
11087     })()}));
11088 })();
11089 var l293 = {name: "AREF"};
11090 (function(){
11091     return ((l247).value = ({car: l42.fvalue(id, l293, (function (values,v753,v754){
11092         if (arguments.length < 3) throw 'too few arguments';
11093         if (arguments.length > 3) throw 'too many arguments';
11094         return (function(){
11095             try {
11096                 return (function(){
11097                     return (function(v755,v756){
11098                         return l126.fvalue(id, "(function(){", (function(){
11099                             var symbol = l125;
11100                             var value = symbol.value;
11101                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11102                             return value;
11103                         })(), l133.fvalue(id, "var x = ", "(", v755, ")[", v756, "];", (function(){
11104                             var symbol = l125;
11105                             var value = symbol.value;
11106                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11107                             return value;
11108                         })(), "if (x === undefined) throw 'Out of range';", (function(){
11109                             var symbol = l125;
11110                             var value = symbol.value;
11111                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11112                             return value;
11113                         })(), "return x;", (function(){
11114                             var symbol = l125;
11115                             var value = symbol.value;
11116                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11117                             return value;
11118                         })()), "})()");
11119                     })((function(){
11120                         var symbol = l135;
11121                         var func = symbol.fvalue;
11122                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11123                         return func;
11124                     })()(id, v753),(function(){
11125                         var symbol = l135;
11126                         var func = symbol.fvalue;
11127                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11128                         return func;
11129                     })()(id, v754));
11130                 })();
11131             }
11132             catch (cf){
11133                 if (cf.type == 'block' && cf.id == 267)
11134                     return cf.value;
11135                 else
11136                     throw cf;
11137             }
11138         })();
11139
11140     })), cdr: (function(){
11141         var symbol = l247;
11142         var value = symbol.value;
11143         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11144         return value;
11145     })()}));
11146 })();
11147 var l294 = {name: "ASET"};
11148 (function(){
11149     return ((l247).value = ({car: l42.fvalue(id, l294, (function (values,v757,v758,v759){
11150         if (arguments.length < 4) throw 'too few arguments';
11151         if (arguments.length > 4) throw 'too many arguments';
11152         return (function(){
11153             try {
11154                 return (function(){
11155                     return (function(v760,v761,v762){
11156                         return l126.fvalue(id, "(function(){", (function(){
11157                             var symbol = l125;
11158                             var value = symbol.value;
11159                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11160                             return value;
11161                         })(), l133.fvalue(id, "var x = ", v760, ";", (function(){
11162                             var symbol = l125;
11163                             var value = symbol.value;
11164                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11165                             return value;
11166                         })(), "var i = ", v761, ";", (function(){
11167                             var symbol = l125;
11168                             var value = symbol.value;
11169                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11170                             return value;
11171                         })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
11172                             var symbol = l125;
11173                             var value = symbol.value;
11174                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11175                             return value;
11176                         })(), "return x[i] = ", v762, ";", (function(){
11177                             var symbol = l125;
11178                             var value = symbol.value;
11179                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11180                             return value;
11181                         })()), "})()");
11182                     })((function(){
11183                         var symbol = l135;
11184                         var func = symbol.fvalue;
11185                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11186                         return func;
11187                     })()(id, v757),(function(){
11188                         var symbol = l135;
11189                         var func = symbol.fvalue;
11190                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11191                         return func;
11192                     })()(id, v758),(function(){
11193                         var symbol = l135;
11194                         var func = symbol.fvalue;
11195                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11196                         return func;
11197                     })()(id, v759));
11198                 })();
11199             }
11200             catch (cf){
11201                 if (cf.type == 'block' && cf.id == 268)
11202                     return cf.value;
11203                 else
11204                     throw cf;
11205             }
11206         })();
11207
11208     })), cdr: (function(){
11209         var symbol = l247;
11210         var value = symbol.value;
11211         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11212         return value;
11213     })()}));
11214 })();
11215 var l295 = {name: "GET-UNIX-TIME"};
11216 (function(){
11217     return ((l247).value = ({car: l42.fvalue(id, l295, (function (values){
11218         if (arguments.length > 1) throw 'too many arguments';
11219         return (function(){
11220             try {
11221                 return (function(){
11222                     return (function(){
11223                         return l126.fvalue(id, "(Math.round(new Date() / 1000))");
11224                     })();
11225                 })();
11226             }
11227             catch (cf){
11228                 if (cf.type == 'block' && cf.id == 269)
11229                     return cf.value;
11230                 else
11231                     throw cf;
11232             }
11233         })();
11234
11235     })), cdr: (function(){
11236         var symbol = l247;
11237         var value = symbol.value;
11238         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11239         return value;
11240     })()}));
11241 })();
11242 (function(){
11243     return ((l247).value = ({car: l42.fvalue(id, l123, (function (values,v763){
11244         if (arguments.length < 2) throw 'too few arguments';
11245         if (arguments.length > 2) throw 'too many arguments';
11246         return (function(){
11247             try {
11248                 return (function(){
11249                     return (function(v764){
11250                         return l126.fvalue(id, "values(", v764, ")");
11251                     })((function(){
11252                         var symbol = l135;
11253                         var func = symbol.fvalue;
11254                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11255                         return func;
11256                     })()(id, v763));
11257                 })();
11258             }
11259             catch (cf){
11260                 if (cf.type == 'block' && cf.id == 270)
11261                     return cf.value;
11262                 else
11263                     throw cf;
11264             }
11265         })();
11266
11267     })), cdr: (function(){
11268         var symbol = l247;
11269         var value = symbol.value;
11270         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11271         return value;
11272     })()}));
11273 })();
11274 (function(){
11275     (l187).fvalue = (function(v767){
11276         ((v767)["fname"] = "MACRO");
11277         return v767;
11278     })((function (values,v765){
11279         if (arguments.length < 2) throw 'too few arguments';
11280         if (arguments.length > 2) throw 'too many arguments';
11281         return (function(){
11282             try {
11283                 return (function(){
11284                     return (((function(){
11285                         var tmp = v765;
11286                         return (typeof tmp == 'object' && 'name' in tmp);
11287                     })()?l4.value: l3.value) !== l3.value ? (function(v766){
11288                         return (((l163.fvalue(id, v766) === l187)?l4.value: l3.value) !== l3.value ? v766 : l3.value);
11289                     })(l175.fvalue(id, v765, (function(){
11290                         var symbol = l176;
11291                         var value = symbol.value;
11292                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11293                         return value;
11294                     })(), l98)) : l3.value);
11295                 })();
11296             }
11297             catch (cf){
11298                 if (cf.type == 'block' && cf.id == 271)
11299                     return cf.value;
11300                 else
11301                     throw cf;
11302             }
11303         })();
11304
11305     }));
11306     return l187;
11307 })();
11308 var l296 = {name: "LS-MACROEXPAND-1"};
11309 (function(){
11310     (l296).fvalue = (function(v772){
11311         ((v772)["fname"] = "LS-MACROEXPAND-1");
11312         return v772;
11313     })((function (values,v768){
11314         if (arguments.length < 2) throw 'too few arguments';
11315         if (arguments.length > 2) throw 'too many arguments';
11316         return (function(){
11317             try {
11318                 return (function(){
11319                     return (function(v769){
11320                         return (v769 !== l3.value ? (function(v770){
11321                             (l57.fvalue(id, v770) !== l3.value ? (function(){
11322                                 return (function(v771){
11323                                     l166.fvalue(id, v769, v771);
11324                                     return (v770 = v771);
11325                                 })((function(){
11326                                     var symbol = l223;
11327                                     var func = symbol.fvalue;
11328                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11329                                     return func;
11330                                 })()(id, v770));
11331                             })() : l3.value);
11332                             return (function(){
11333                                 var f = v770;
11334                                 var args = [id];
11335                                 var tail = ((function(){
11336                                     var tmp = v768;
11337                                     return tmp === l3.value? l3.value: tmp.cdr;
11338                                 })());
11339                                 while (tail != l3.value){
11340                                     args.push(tail.car);
11341                                     tail = tail.cdr;
11342                                 }
11343                                 return f.apply(this, args);
11344                             })();
11345                         })(l164.fvalue(id, v769)) : v768);
11346                     })(l187.fvalue(id, (function(){
11347                         var tmp = v768;
11348                         return tmp === l3.value? l3.value: tmp.car;
11349                     })()));
11350                 })();
11351             }
11352             catch (cf){
11353                 if (cf.type == 'block' && cf.id == 272)
11354                     return cf.value;
11355                 else
11356                     throw cf;
11357             }
11358         })();
11359
11360     }));
11361     return l296;
11362 })();
11363 var l297 = {name: "COMPILE-FUNCALL"};
11364 (function(){
11365     (l297).fvalue = (function(v775){
11366         ((v775)["fname"] = "COMPILE-FUNCALL");
11367         return v775;
11368     })((function (values,v773,v774){
11369         if (arguments.length < 3) throw 'too few arguments';
11370         if (arguments.length > 3) throw 'too many arguments';
11371         return (function(){
11372             try {
11373                 return (function(){
11374                     return ((((function(){
11375                         var tmp = v773;
11376                         return (typeof tmp == 'object' && 'name' in tmp);
11377                     })()?l4.value: l3.value) !== l3.value ? l189.fvalue(id, v773, l98, l194) : l3.value) !== l3.value ? l126.fvalue(id, (function(){
11378                         var symbol = l135;
11379                         var func = symbol.fvalue;
11380                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11381                         return func;
11382                     })()(id, l62.fvalue(id, l42.fvalue(id, l155), l42.fvalue(id, v773))), ".fvalue(", l128.fvalue(id, ({car: "id", cdr: l69.fvalue(id, (function(){
11383                         var symbol = l135;
11384                         var func = symbol.fvalue;
11385                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11386                         return func;
11387                     })(), v774)}), ", "), ")") : l126.fvalue(id, (function(){
11388                         var symbol = l135;
11389                         var func = symbol.fvalue;
11390                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11391                         return func;
11392                     })()(id, l62.fvalue(id, l42.fvalue(id, l98), l42.fvalue(id, v773))), "(", l128.fvalue(id, ({car: "id", cdr: l69.fvalue(id, (function(){
11393                         var symbol = l135;
11394                         var func = symbol.fvalue;
11395                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11396                         return func;
11397                     })(), v774)}), ", "), ")"));
11398                 })();
11399             }
11400             catch (cf){
11401                 if (cf.type == 'block' && cf.id == 273)
11402                     return cf.value;
11403                 else
11404                     throw cf;
11405             }
11406         })();
11407
11408     }));
11409     return l297;
11410 })();
11411 (function(){
11412     (l210).fvalue = (function(v778){
11413         ((v778)["fname"] = "LS-COMPILE-BLOCK");
11414         return v778;
11415     })((function (values,v776,v777){
11416         if (arguments.length < 2) throw 'too few arguments';
11417         if (arguments.length > 3) throw 'too many arguments';
11418         switch(arguments.length-1){
11419         case 1:
11420         v777=l3.value;
11421         default: break;
11422         }
11423         return (function(){
11424             try {
11425                 return (function(){
11426                     return (v777 !== l3.value ? l126.fvalue(id, l210.fvalue(id, l81.fvalue(id, v776)), "return ", (function(){
11427                         var symbol = l135;
11428                         var func = symbol.fvalue;
11429                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11430                         return func;
11431                     })()(id, (function(){
11432                         var tmp = l80.fvalue(id, v776);
11433                         return tmp === l3.value? l3.value: tmp.car;
11434                     })()), ";") : l129.fvalue(id, l84.fvalue(id, (function(){
11435                         var symbol = l184;
11436                         var func = symbol.fvalue;
11437                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11438                         return func;
11439                     })(), l69.fvalue(id, (function(){
11440                         var symbol = l135;
11441                         var func = symbol.fvalue;
11442                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11443                         return func;
11444                     })(), v776)), l126.fvalue(id, ";", (function(){
11445                         var symbol = l125;
11446                         var value = symbol.value;
11447                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11448                         return value;
11449                     })())));
11450                 })();
11451             }
11452             catch (cf){
11453                 if (cf.type == 'block' && cf.id == 274)
11454                     return cf.value;
11455                 else
11456                     throw cf;
11457             }
11458         })();
11459
11460     }));
11461     return l210;
11462 })();
11463 (function(){
11464     (l135).fvalue = (function(v786){
11465         ((v786)["fname"] = "LS-COMPILE");
11466         return v786;
11467     })((function (values,v779){
11468         if (arguments.length < 2) throw 'too few arguments';
11469         if (arguments.length > 2) throw 'too many arguments';
11470         return (function(){
11471             try {
11472                 return (function(){
11473                     return (((function(){
11474                         var tmp = v779;
11475                         return (typeof tmp == 'object' && 'name' in tmp);
11476                     })()?l4.value: l3.value) !== l3.value ? (function(){
11477                         return (function(v780){
11478                             return ((v780 !== l3.value ? l26.fvalue(id, l82.fvalue(id, l191, l165.fvalue(id, v780))) : l3.value) !== l3.value ? (function(){
11479                                 return l164.fvalue(id, v780);
11480                             })() : ((function(v781){
11481                                 return (v781 !== l3.value ? v781 : l82.fvalue(id, l193, l165.fvalue(id, v780)));
11482                             })(l113.fvalue(id, v779)) !== l3.value ? (function(){
11483                                 return l126.fvalue(id, l135.fvalue(id, l62.fvalue(id, l42.fvalue(id, l155), l42.fvalue(id, v779))), ".value");
11484                             })() : (function(){
11485                                 return l135.fvalue(id, l62.fvalue(id, l42.fvalue(id, l269), l42.fvalue(id, l62.fvalue(id, l42.fvalue(id, l155), l42.fvalue(id, v779)))));
11486                             })()));
11487                         })(l175.fvalue(id, v779, (function(){
11488                             var symbol = l176;
11489                             var value = symbol.value;
11490                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11491                             return value;
11492                         })(), l99));
11493                     })() : (l75.fvalue(id, v779) !== l3.value ? (function(){
11494                         return l16.fvalue(id, v779);
11495                     })() : (((typeof(v779) == "string")?l4.value: l3.value) !== l3.value ? (function(){
11496                         return l126.fvalue(id, "\"", l138.fvalue(id, v779), "\"");
11497                     })() : (((function(){
11498                         var x = v779;
11499                         return typeof x === 'object' && 'length' in x;
11500                     })()?l4.value: l3.value) !== l3.value ? (function(){
11501                         return l219.fvalue(id, v779);
11502                     })() : (l57.fvalue(id, v779) !== l3.value ? (function(){
11503                         return (function(v782,v783){
11504                             return (l91.fvalue(id, v782, (function(){
11505                                 var symbol = l196;
11506                                 var value = symbol.value;
11507                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11508                                 return value;
11509                             })()) !== l3.value ? (function(){
11510                                 return (function(v784){
11511                                     return (function(){
11512                                         var f = v784;
11513                                         var args = [id];
11514                                         var tail = (v783);
11515                                         while (tail != l3.value){
11516                                             args.push(tail.car);
11517                                             tail = tail.cdr;
11518                                         }
11519                                         return f.apply(this, args);
11520                                     })();
11521                                 })(l39.fvalue(id, l91.fvalue(id, v782, (function(){
11522                                     var symbol = l196;
11523                                     var value = symbol.value;
11524                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11525                                     return value;
11526                                 })())));
11527                             })() : ((l91.fvalue(id, v782, (function(){
11528                                 var symbol = l247;
11529                                 var value = symbol.value;
11530                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11531                                 return value;
11532                             })()) !== l3.value ? l26.fvalue(id, l189.fvalue(id, v782, l98, l192)) : l3.value) !== l3.value ? (function(){
11533                                 return (function(v785){
11534                                     return (function(){
11535                                         var f = v785;
11536                                         var args = [id];
11537                                         var tail = (v783);
11538                                         while (tail != l3.value){
11539                                             args.push(tail.car);
11540                                             tail = tail.cdr;
11541                                         }
11542                                         return f.apply(this, args);
11543                                     })();
11544                                 })(l39.fvalue(id, l91.fvalue(id, v782, (function(){
11545                                     var symbol = l247;
11546                                     var value = symbol.value;
11547                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11548                                     return value;
11549                                 })())));
11550                             })() : (function(){
11551                                 return (l187.fvalue(id, v782) !== l3.value ? l135.fvalue(id, l296.fvalue(id, v779)) : l297.fvalue(id, v782, v783));
11552                             })()));
11553                         })((function(){
11554                             var tmp = v779;
11555                             return tmp === l3.value? l3.value: tmp.car;
11556                         })(),(function(){
11557                             var tmp = v779;
11558                             return tmp === l3.value? l3.value: tmp.cdr;
11559                         })());
11560                     })() : (function(){
11561                         return (function(){
11562                             throw "How should I compile this?";
11563                         })();
11564                     })())))));
11565                 })();
11566             }
11567             catch (cf){
11568                 if (cf.type == 'block' && cf.id == 275)
11569                     return cf.value;
11570                 else
11571                     throw cf;
11572             }
11573         })();
11574
11575     }));
11576     return l135;
11577 })();
11578 var l298 = {name: "LS-COMPILE-TOPLEVEL"};
11579 (function(){
11580     (l298).fvalue = (function(v791){
11581         ((v791)["fname"] = "LS-COMPILE-TOPLEVEL");
11582         return v791;
11583     })((function (values,v787){
11584         if (arguments.length < 2) throw 'too few arguments';
11585         if (arguments.length > 2) throw 'too many arguments';
11586         return (function(){
11587             try {
11588                 return (function(){
11589                     return (function(v788){
11590                         try {
11591                             var tmp;
11592                             tmp = l182.value;
11593                             l182.value = v788;
11594                             v788 = tmp;
11595                             return ((((function(){
11596                                 var tmp = v787;
11597                                 return (typeof tmp == 'object' && 'car' in tmp);
11598                             })()?l4.value: l3.value) !== l3.value ? (((function(){
11599                                 var tmp = v787;
11600                                 return tmp === l3.value? l3.value: tmp.car;
11601                             })() === l224)?l4.value: l3.value) : l3.value) !== l3.value ? (function(){
11602                                 return (function(v789){
11603                                     return l128.fvalue(id, l84.fvalue(id, (function(){
11604                                         var symbol = l184;
11605                                         var func = symbol.fvalue;
11606                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11607                                         return func;
11608                                     })(), v789));
11609                                 })(l69.fvalue(id, (function(){
11610                                     var symbol = l298;
11611                                     var func = symbol.fvalue;
11612                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11613                                     return func;
11614                                 })(), (function(){
11615                                     var tmp = v787;
11616                                     return tmp === l3.value? l3.value: tmp.cdr;
11617                                 })()));
11618                             })() : (function(){
11619                                 return (function(v790){
11620                                     return l126.fvalue(id, l129.fvalue(id, l185.fvalue(id), l126.fvalue(id, ";", (function(){
11621                                         var symbol = l125;
11622                                         var value = symbol.value;
11623                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11624                                         return value;
11625                                     })())), (v790 !== l3.value ? l126.fvalue(id, v790, ";", (function(){
11626                                         var symbol = l125;
11627                                         var value = symbol.value;
11628                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11629                                         return value;
11630                                     })()) : ""));
11631                                 })(l135.fvalue(id, v787));
11632                             })());
11633                         }
11634                         finally {
11635                             l182.value = v788;
11636                         }
11637                     })(l3.value);
11638                 })();
11639             }
11640             catch (cf){
11641                 if (cf.type == 'block' && cf.id == 276)
11642                     return cf.value;
11643                 else
11644                     throw cf;
11645             }
11646         })();
11647
11648     }));
11649     return l298;
11650 })();
11651 var l299 = {name: "WITH-COMPILATION-UNIT"};
11652 l299;
11653 (function(){
11654     (l223).fvalue = (function(v797){
11655         ((v797)["fname"] = "EVAL");
11656         return v797;
11657     })((function (values,v792){
11658         if (arguments.length < 2) throw 'too few arguments';
11659         if (arguments.length > 2) throw 'too many arguments';
11660         return (function(){
11661             try {
11662                 return (function(){
11663                     return (function(v796){
11664                         return (function(){
11665                             var string = v796;
11666                             if (typeof string != 'string')
11667                                 throw 'The value ' + string + ' is not a type string.';
11668                             return eval.apply(window, [string]);
11669                         })();
11670                     })((function(v793){
11671                         (function(){
11672                             try {
11673                                 return (function(){
11674                                     return (function(v794,v795){
11675                                         (function(){
11676                                             while(v794 !== l3.value){
11677                                                 (v795 = (function(){
11678                                                     var tmp = v794;
11679                                                     return tmp === l3.value? l3.value: tmp.car;
11680                                                 })());
11681                                                 (function(){
11682                                                     (v795)(id);
11683                                                     return l3.value;
11684                                                 })();
11685                                                 (v794 = (function(){
11686                                                     var tmp = v794;
11687                                                     return tmp === l3.value? l3.value: tmp.cdr;
11688                                                 })());
11689                                             }return l3.value;
11690                                         })();
11691                                         return l3.value;
11692                                     })((function(){
11693                                         var symbol = l160;
11694                                         var value = symbol.value;
11695                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11696                                         return value;
11697                                     })(),l3.value);
11698                                 })();
11699                             }
11700                             catch (cf){
11701                                 if (cf.type == 'block' && cf.id == 278)
11702                                     return cf.value;
11703                                 else
11704                                     throw cf;
11705                             }
11706                         })();
11707                         return v793;
11708                     })((function(){
11709                         ((l160).value = l3.value);
11710                         return l298.fvalue(id, v792);
11711                     })()));
11712                 })();
11713             }
11714             catch (cf){
11715                 if (cf.type == 'block' && cf.id == 277)
11716                     return cf.value;
11717                 else
11718                     throw cf;
11719             }
11720         })();
11721
11722     }));
11723     return l223;
11724 })();
11725 var l300 = {name: "&BODY"};
11726 var l301 = {car: l201, cdr: {car: l200, cdr: {car: l300, cdr: {car: l19, cdr: {car: l14, cdr: {car: l115, cdr: {car: l59, cdr: {car: l60, cdr: {car: l20, cdr: {car: l21, cdr: {car: l22, cdr: {car: l258, cdr: {car: l260, cdr: {car: l18, cdr: {car: l18, cdr: {car: l257, cdr: {car: l259, cdr: {car: l52, cdr: {car: l62, cdr: {car: l281, cdr: {car: l293, cdr: {car: l292, cdr: {car: l294, cdr: {car: l91, cdr: {car: l43, cdr: {car: l172, cdr: {car: l17, cdr: {car: l17, cdr: {car: l81, cdr: {car: l31, cdr: {car: l37, cdr: {car: l35, cdr: {car: l32, cdr: {car: l29, cdr: {car: l29, cdr: {car: l50, cdr: {car: l235, cdr: {car: l33, cdr: {car: l36, cdr: {car: l34, cdr: {car: l30, cdr: {car: l30, cdr: {car: l279, cdr: {car: l73, cdr: {car: l74, cdr: {car: l72, cdr: {car: l49, cdr: {car: l27, cdr: {car: l28, cdr: {car: l71, cdr: {car: l45, cdr: {car: l2, cdr: {car: l8, cdr: {car: l10, cdr: {car: l1, cdr: {car: l7, cdr: {car: l86, cdr: {car: l95, cdr: {car: l97, cdr: {car: l47, cdr: {car: l48, cdr: {car: l51, cdr: {car: l272, cdr: {car: l25, cdr: {car: l273, cdr: {car: l283, cdr: {car: l223, cdr: {car: l90, cdr: {car: l121, cdr: {car: l94, cdr: {car: l105, cdr: {car: l119, cdr: {car: l38, cdr: {car: l41, cdr: {car: l268, cdr: {car: l280, cdr: {car: l98, cdr: {car: l289, cdr: {car: l15, cdr: {car: l122, cdr: {car: l242, cdr: {car: l70, cdr: {car: l198, cdr: {car: l116, cdr: {car: l44, cdr: {car: l75, cdr: {car: l75, cdr: {car: l120, cdr: {car: l113, cdr: {car: l209, cdr: {car: l80, cdr: {car: l67, cdr: {car: l228, cdr: {car: l232, cdr: {car: l101, cdr: {car: l42, cdr: {car: l57, cdr: {car: l291, cdr: {car: l102, cdr: {car: l266, cdr: {car: l69, cdr: {car: l82, cdr: {car: l77, cdr: {car: l254, cdr: {car: l3, cdr: {car: l26, cdr: {car: l79, cdr: {car: l78, cdr: {car: l11, cdr: {car: l261, cdr: {car: l53, cdr: {car: l106, cdr: {car: l108, cdr: {car: l104, cdr: {car: l76, cdr: {car: l137, cdr: {car: l140, cdr: {car: l195, cdr: {car: l54, cdr: {car: l55, cdr: {car: l224, cdr: {car: l65, cdr: {car: l46, cdr: {car: l155, cdr: {car: l83, cdr: {car: l84, cdr: {car: l85, cdr: {car: l12, cdr: {car: l234, cdr: {car: l63, cdr: {car: l64, cdr: {car: l39, cdr: {car: l212, cdr: {car: l213, cdr: {car: l89, cdr: {car: l276, cdr: {car: l92, cdr: {car: l93, cdr: {car: l275, cdr: {car: l87, cdr: {car: l221, cdr: {car: l267, cdr: {car: l114, cdr: {car: l270, cdr: {car: l269, cdr: {car: l265, cdr: {car: l4, cdr: {car: l241, cdr: {car: l40, cdr: {car: l236, cdr: {car: l24, cdr: {car: l6, cdr: {car: l243, cdr: {car: l99, cdr: {car: l139, cdr: {car: l5, cdr: {car: l96, cdr: {car: l290, cdr: {car: l23, cdr: l3}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}};
11727 l121.fvalue(id, l301);
11728 ((l115).value = (function(){
11729     var symbol = l111;
11730     var value = symbol.value;
11731     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
11732     return value;
11733 })());
11734 (function(){
11735     var string = "var lisp";
11736     if (typeof string != 'string')
11737         throw 'The value ' + string + ' is not a type string.';
11738     return eval.apply(window, [string]);
11739 })();
11740 (lisp = {});
11741 (lisp.read = (function(){
11742     var symbol = l159;
11743     var func = symbol.fvalue;
11744     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11745     return func;
11746 })());
11747 (lisp.print = (function(){
11748     var symbol = l137;
11749     var func = symbol.fvalue;
11750     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11751     return func;
11752 })());
11753 (lisp.eval = (function(){
11754     var symbol = l223;
11755     var func = symbol.fvalue;
11756     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11757     return func;
11758 })());
11759 (lisp.compile = (function(){
11760     var symbol = l298;
11761     var func = symbol.fvalue;
11762     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
11763     return func;
11764 })());
11765 (lisp.evalString = (function (values,v798){
11766     if (arguments.length < 2) throw 'too few arguments';
11767     if (arguments.length > 2) throw 'too many arguments';
11768     return l223.fvalue(id, l159.fvalue(id, v798));
11769
11770 }));
11771 (lisp.compileString = (function (values,v799){
11772     if (arguments.length < 2) throw 'too few arguments';
11773     if (arguments.length > 2) throw 'too many arguments';
11774     return l298.fvalue(id, l159.fvalue(id, v799));
11775
11776 }));
11777 var l302 = {car: {car: l300, cdr: "l300"}, cdr: {car: {car: l299, cdr: "l299"}, cdr: {car: {car: l298, cdr: "l298"}, cdr: {car: {car: l297, cdr: "l297"}, cdr: {car: {car: l296, cdr: "l296"}, cdr: {car: {car: l295, cdr: "l295"}, cdr: {car: {car: l294, cdr: "l294"}, cdr: {car: {car: l293, cdr: "l293"}, cdr: {car: {car: l292, cdr: "l292"}, cdr: {car: {car: l291, cdr: "l291"}, cdr: {car: {car: l290, cdr: "l290"}, cdr: {car: {car: l289, cdr: "l289"}, cdr: {car: {car: l288, cdr: "l288"}, cdr: {car: {car: l287, cdr: "l287"}, cdr: {car: {car: l286, cdr: "l286"}, cdr: {car: {car: l285, cdr: "l285"}, cdr: {car: {car: l284, cdr: "l284"}, cdr: {car: {car: l283, cdr: "l283"}, cdr: {car: {car: l282, cdr: "l282"}, cdr: {car: {car: l281, cdr: "l281"}, cdr: {car: {car: l280, cdr: "l280"}, cdr: {car: {car: l279, cdr: "l279"}, cdr: {car: {car: l278, cdr: "l278"}, cdr: {car: {car: l277, cdr: "l277"}, cdr: {car: {car: l276, cdr: "l276"}, cdr: {car: {car: l275, cdr: "l275"}, cdr: {car: {car: l274, cdr: "l274"}, cdr: {car: {car: l273, cdr: "l273"}, cdr: {car: {car: l272, cdr: "l272"}, cdr: {car: {car: l271, cdr: "l271"}, cdr: {car: {car: l270, cdr: "l270"}, cdr: {car: {car: l269, cdr: "l269"}, cdr: {car: {car: l268, cdr: "l268"}, cdr: {car: {car: l267, cdr: "l267"}, cdr: {car: {car: l266, cdr: "l266"}, cdr: {car: {car: l265, cdr: "l265"}, cdr: {car: {car: l264, cdr: "l264"}, cdr: {car: {car: l263, cdr: "l263"}, cdr: {car: {car: l262, cdr: "l262"}, cdr: {car: {car: l261, cdr: "l261"}, cdr: {car: {car: l260, cdr: "l260"}, cdr: {car: {car: l259, cdr: "l259"}, cdr: {car: {car: l258, cdr: "l258"}, cdr: {car: {car: l257, cdr: "l257"}, cdr: {car: {car: l256, cdr: "l256"}, cdr: {car: {car: l255, cdr: "l255"}, cdr: {car: {car: l254, cdr: "l254"}, cdr: {car: {car: l253, cdr: "l253"}, cdr: {car: {car: l252, cdr: "l252"}, cdr: {car: {car: l251, cdr: "l251"}, cdr: {car: {car: l250, cdr: "l250"}, cdr: {car: {car: l249, cdr: "l249"}, cdr: {car: {car: l248, cdr: "l248"}, cdr: {car: {car: l247, cdr: "l247"}, cdr: {car: {car: l246, cdr: "l246"}, cdr: {car: {car: l245, cdr: "l245"}, cdr: {car: {car: l244, cdr: "l244"}, cdr: {car: {car: l243, cdr: "l243"}, cdr: {car: {car: l242, cdr: "l242"}, cdr: {car: {car: l241, cdr: "l241"}, cdr: {car: {car: l240, cdr: "l240"}, cdr: {car: {car: l239, cdr: "l239"}, cdr: {car: {car: l238, cdr: "l238"}, cdr: {car: {car: l237, cdr: "l237"}, cdr: {car: {car: l236, cdr: "l236"}, cdr: {car: {car: l235, cdr: "l235"}, cdr: {car: {car: l234, cdr: "l234"}, cdr: {car: {car: l233, cdr: "l233"}, cdr: {car: {car: l232, cdr: "l232"}, cdr: {car: {car: l231, cdr: "l231"}, cdr: {car: {car: l230, cdr: "l230"}, cdr: {car: {car: l229, cdr: "l229"}, cdr: {car: {car: l228, cdr: "l228"}, cdr: {car: {car: l227, cdr: "l227"}, cdr: {car: {car: l226, cdr: "l226"}, cdr: {car: {car: l225, cdr: "l225"}, cdr: {car: {car: l224, cdr: "l224"}, cdr: {car: {car: l223, cdr: "l223"}, cdr: {car: {car: l222, cdr: "l222"}, cdr: {car: {car: l221, cdr: "l221"}, cdr: {car: {car: l220, cdr: "l220"}, cdr: {car: {car: l219, cdr: "l219"}, cdr: {car: {car: l218, cdr: "l218"}, cdr: {car: {car: l217, cdr: "l217"}, cdr: {car: {car: l216, cdr: "l216"}, cdr: {car: {car: l215, cdr: "l215"}, cdr: {car: {car: l214, cdr: "l214"}, cdr: {car: {car: l213, cdr: "l213"}, cdr: {car: {car: l212, cdr: "l212"}, cdr: {car: {car: l211, cdr: "l211"}, cdr: {car: {car: l210, cdr: "l210"}, cdr: {car: {car: l209, cdr: "l209"}, cdr: {car: {car: l208, cdr: "l208"}, cdr: {car: {car: l207, cdr: "l207"}, cdr: {car: {car: l206, cdr: "l206"}, cdr: {car: {car: l205, cdr: "l205"}, cdr: {car: {car: l204, cdr: "l204"}, cdr: {car: {car: l203, cdr: "l203"}, cdr: {car: {car: l201, cdr: "l201"}, cdr: {car: {car: l200, cdr: "l200"}, cdr: {car: {car: l199, cdr: "l199"}, cdr: {car: {car: l198, cdr: "l198"}, cdr: {car: {car: l197, cdr: "l197"}, cdr: {car: {car: l196, cdr: "l196"}, cdr: {car: {car: l195, cdr: "l195"}, cdr: {car: {car: l194, cdr: "l194"}, cdr: {car: {car: l193, cdr: "l193"}, cdr: {car: {car: l192, cdr: "l192"}, cdr: {car: {car: l191, cdr: "l191"}, cdr: {car: {car: l190, cdr: "l190"}, cdr: {car: {car: l189, cdr: "l189"}, cdr: {car: {car: l188, cdr: "l188"}, cdr: {car: {car: l187, cdr: "l187"}, cdr: {car: {car: l186, cdr: "l186"}, cdr: {car: {car: l185, cdr: "l185"}, cdr: {car: {car: l184, cdr: "l184"}, cdr: {car: {car: l183, cdr: "l183"}, cdr: {car: {car: l182, cdr: "l182"}, cdr: {car: {car: l181, cdr: "l181"}, cdr: {car: {car: l180, cdr: "l180"}, cdr: {car: {car: l179, cdr: "l179"}, cdr: {car: {car: l178, cdr: "l178"}, cdr: {car: {car: l177, cdr: "l177"}, cdr: {car: {car: l176, cdr: "l176"}, cdr: {car: {car: l175, cdr: "l175"}, cdr: {car: {car: l174, cdr: "l174"}, cdr: {car: {car: l173, cdr: "l173"}, cdr: {car: {car: l172, cdr: "l172"}, cdr: {car: {car: l171, cdr: "l171"}, cdr: {car: {car: l170, cdr: "l170"}, cdr: {car: {car: l169, cdr: "l169"}, cdr: {car: {car: l168, cdr: "l168"}, cdr: {car: {car: l167, cdr: "l167"}, cdr: {car: {car: l166, cdr: "l166"}, cdr: {car: {car: l165, cdr: "l165"}, cdr: {car: {car: l164, cdr: "l164"}, cdr: {car: {car: l163, cdr: "l163"}, cdr: {car: {car: l162, cdr: "l162"}, cdr: {car: {car: l161, cdr: "l161"}, cdr: {car: {car: l160, cdr: "l160"}, cdr: {car: {car: l159, cdr: "l159"}, cdr: {car: {car: l158, cdr: "l158"}, cdr: {car: {car: l157, cdr: "l157"}, cdr: {car: {car: l156, cdr: "l156"}, cdr: {car: {car: l155, cdr: "l155"}, cdr: {car: {car: l154, cdr: "l154"}, cdr: {car: {car: l153, cdr: "l153"}, cdr: {car: {car: l152, cdr: "l152"}, cdr: {car: {car: l151, cdr: "l151"}, cdr: {car: {car: l150, cdr: "l150"}, cdr: {car: {car: l149, cdr: "l149"}, cdr: {car: {car: l148, cdr: "l148"}, cdr: {car: {car: l147, cdr: "l147"}, cdr: {car: {car: l146, cdr: "l146"}, cdr: {car: {car: l145, cdr: "l145"}, cdr: {car: {car: l144, cdr: "l144"}, cdr: {car: {car: l143, cdr: "l143"}, cdr: {car: {car: l142, cdr: "l142"}, cdr: {car: {car: l141, cdr: "l141"}, cdr: {car: {car: l140, cdr: "l140"}, cdr: {car: {car: l139, cdr: "l139"}, cdr: {car: {car: l138, cdr: "l138"}, cdr: {car: {car: l137, cdr: "l137"}, cdr: {car: {car: l136, cdr: "l136"}, cdr: {car: {car: l135, cdr: "l135"}, cdr: {car: {car: l134, cdr: "l134"}, cdr: {car: {car: l133, cdr: "l133"}, cdr: {car: {car: l132, cdr: "l132"}, cdr: {car: {car: l131, cdr: "l131"}, cdr: {car: {car: l130, cdr: "l130"}, cdr: {car: {car: l129, cdr: "l129"}, cdr: {car: {car: l128, cdr: "l128"}, cdr: {car: {car: l127, cdr: "l127"}, cdr: {car: {car: l126, cdr: "l126"}, cdr: {car: {car: l125, cdr: "l125"}, cdr: {car: {car: l124, cdr: "l124"}, cdr: {car: {car: l123, cdr: "l123"}, cdr: {car: {car: l122, cdr: "l122"}, cdr: {car: {car: l121, cdr: "l121"}, cdr: {car: {car: l120, cdr: "l120"}, cdr: {car: {car: l119, cdr: "l119"}, cdr: {car: {car: l118, cdr: "l118"}, cdr: {car: {car: l117, cdr: "l117"}, cdr: {car: {car: l116, cdr: "l116"}, cdr: {car: {car: l115, cdr: "l115"}, cdr: {car: {car: l114, cdr: "l114"}, cdr: {car: {car: l113, cdr: "l113"}, cdr: {car: {car: l112, cdr: "l112"}, cdr: {car: {car: l111, cdr: "l111"}, cdr: {car: {car: l110, cdr: "l110"}, cdr: {car: {car: l109, cdr: "l109"}, cdr: {car: {car: l108, cdr: "l108"}, cdr: {car: {car: l107, cdr: "l107"}, cdr: {car: {car: l106, cdr: "l106"}, cdr: {car: {car: l105, cdr: "l105"}, cdr: {car: {car: l104, cdr: "l104"}, cdr: {car: {car: l103, cdr: "l103"}, cdr: {car: {car: l102, cdr: "l102"}, cdr: {car: {car: l101, cdr: "l101"}, cdr: {car: {car: l100, cdr: "l100"}, cdr: {car: {car: l99, cdr: "l99"}, cdr: {car: {car: l98, cdr: "l98"}, cdr: {car: {car: l97, cdr: "l97"}, cdr: {car: {car: l96, cdr: "l96"}, cdr: {car: {car: l95, cdr: "l95"}, cdr: {car: {car: l94, cdr: "l94"}, cdr: {car: {car: l93, cdr: "l93"}, cdr: {car: {car: l92, cdr: "l92"}, cdr: {car: {car: l91, cdr: "l91"}, cdr: {car: {car: l90, cdr: "l90"}, cdr: {car: {car: l89, cdr: "l89"}, cdr: {car: {car: l88, cdr: "l88"}, cdr: {car: {car: l87, cdr: "l87"}, cdr: {car: {car: l86, cdr: "l86"}, cdr: {car: {car: l85, cdr: "l85"}, cdr: {car: {car: l84, cdr: "l84"}, cdr: {car: {car: l83, cdr: "l83"}, cdr: {car: {car: l82, cdr: "l82"}, cdr: {car: {car: l81, cdr: "l81"}, cdr: {car: {car: l80, cdr: "l80"}, cdr: {car: {car: l79, cdr: "l79"}, cdr: {car: {car: l78, cdr: "l78"}, cdr: {car: {car: l77, cdr: "l77"}, cdr: {car: {car: l76, cdr: "l76"}, cdr: {car: {car: l75, cdr: "l75"}, cdr: {car: {car: l74, cdr: "l74"}, cdr: {car: {car: l73, cdr: "l73"}, cdr: {car: {car: l72, cdr: "l72"}, cdr: {car: {car: l71, cdr: "l71"}, cdr: {car: {car: l70, cdr: "l70"}, cdr: {car: {car: l69, cdr: "l69"}, cdr: {car: {car: l68, cdr: "l68"}, cdr: {car: {car: l67, cdr: "l67"}, cdr: {car: {car: l66, cdr: "l66"}, cdr: {car: {car: l65, cdr: "l65"}, cdr: {car: {car: l64, cdr: "l64"}, cdr: {car: {car: l63, cdr: "l63"}, cdr: {car: {car: l62, cdr: "l62"}, cdr: {car: {car: l61, cdr: "l61"}, cdr: {car: {car: l60, cdr: "l60"}, cdr: {car: {car: l59, cdr: "l59"}, cdr: {car: {car: l58, cdr: "l58"}, cdr: {car: {car: l57, cdr: "l57"}, cdr: {car: {car: l56, cdr: "l56"}, cdr: {car: {car: l55, cdr: "l55"}, cdr: {car: {car: l54, cdr: "l54"}, cdr: {car: {car: l53, cdr: "l53"}, cdr: {car: {car: l52, cdr: "l52"}, cdr: {car: {car: l51, cdr: "l51"}, cdr: {car: {car: l50, cdr: "l50"}, cdr: {car: {car: l49, cdr: "l49"}, cdr: {car: {car: l48, cdr: "l48"}, cdr: {car: {car: l47, cdr: "l47"}, cdr: {car: {car: l46, cdr: "l46"}, cdr: {car: {car: l45, cdr: "l45"}, cdr: {car: {car: l44, cdr: "l44"}, cdr: {car: {car: l43, cdr: "l43"}, cdr: {car: {car: l42, cdr: "l42"}, cdr: {car: {car: l41, cdr: "l41"}, cdr: {car: {car: l40, cdr: "l40"}, cdr: {car: {car: l39, cdr: "l39"}, cdr: {car: {car: l38, cdr: "l38"}, cdr: {car: {car: l37, cdr: "l37"}, cdr: {car: {car: l36, cdr: "l36"}, cdr: {car: {car: l35, cdr: "l35"}, cdr: {car: {car: l34, cdr: "l34"}, cdr: {car: {car: l33, cdr: "l33"}, cdr: {car: {car: l32, cdr: "l32"}, cdr: {car: {car: l31, cdr: "l31"}, cdr: {car: {car: l30, cdr: "l30"}, cdr: {car: {car: l29, cdr: "l29"}, cdr: {car: {car: l28, cdr: "l28"}, cdr: {car: {car: l27, cdr: "l27"}, cdr: {car: {car: l26, cdr: "l26"}, cdr: {car: {car: l25, cdr: "l25"}, cdr: {car: {car: l24, cdr: "l24"}, cdr: {car: {car: l23, cdr: "l23"}, cdr: {car: {car: l22, cdr: "l22"}, cdr: {car: {car: l21, cdr: "l21"}, cdr: {car: {car: l20, cdr: "l20"}, cdr: {car: {car: l19, cdr: "l19"}, cdr: {car: {car: l18, cdr: "l18"}, cdr: {car: {car: l17, cdr: "l17"}, cdr: {car: {car: l16, cdr: "l16"}, cdr: {car: {car: l15, cdr: "l15"}, cdr: {car: {car: l14, cdr: "l14"}, cdr: {car: {car: l13, cdr: "l13"}, cdr: {car: {car: l12, cdr: "l12"}, cdr: {car: {car: l11, cdr: "l11"}, cdr: {car: {car: l10, cdr: "l10"}, cdr: {car: {car: l9, cdr: "l9"}, cdr: {car: {car: l8, cdr: "l8"}, cdr: {car: {car: l7, cdr: "l7"}, cdr: {car: {car: l6, cdr: "l6"}, cdr: {car: {car: l5, cdr: "l5"}, cdr: {car: {car: l4, cdr: "l4"}, cdr: {car: {car: l3, cdr: "l3"}, cdr: {car: {car: l2, cdr: "l2"}, cdr: {car: {car: l1, cdr: "l1"}, cdr: l3}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}};
11778 var l303 = {name: "BODY"};
11779 var l304 = {name: "CHECK"};
11780 var l305 = {name: "OP"};
11781 var l306 = {name: "SYM"};
11782 var l307 = {name: "X"};
11783 var l308 = {name: "ARGS"};
11784 var l309 = {name: "DECLS"};
11785 var l310 = {name: "DECL"};
11786 var l311 = {name: "NAME"};
11787 var l312 = {name: "ARG"};
11788 var l313 = {name: "FORM"};
11789 var l314 = {name: "PACKAGE-DESIGNATOR"};
11790 var l315 = {name: "PAIRS"};
11791 var l316 = {name: "ASSIGNMENTS"};
11792 var l317 = {name: "VALUE"};
11793 var l318 = {name: "FORM1"};
11794 var l319 = {name: "RESULT"};
11795 var l320 = {name: "FORMS"};
11796 var l321 = {name: "G"};
11797 var l322 = {name: "CLAUSULES"};
11798 var l323 = {name: "!FORM"};
11799 var l324 = {name: "CLAUSULE"};
11800 var l325 = {name: "ITER"};
11801 var l326 = {name: "G!TO"};
11802 var l327 = {name: "VAR"};
11803 var l328 = {name: "TO"};
11804 var l329 = {name: "G!LIST"};
11805 var l330 = {name: "PLACE"};
11806 var l331 = {name: "DELTA"};
11807 var l332 = {name: "CONDITION"};
11808 var l333 = {name: "DOCSTRING"};
11809 var l334 = {car: {car: {car: l247, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l238, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l237, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l233, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l217, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l216, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l199, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l196, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l182, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l177, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l176, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l160, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l154, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l125, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l115, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l112, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l111, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l110, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l100, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l14, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l4, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: {car: l193, cdr: l3}}, cdr: l3}}}}, cdr: {car: {car: l3, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l191, cdr: {car: l193, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}}}}}}}}}}}}}}}}}}}}, cdr: {car: {car: {car: l223, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l299, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l201, cdr: {car: l303, cdr: l3}}, cdr: {car: {car: l156, cdr: {car: {car: l54, cdr: {car: {car: l224, cdr: {car: {car: l213, cdr: {car: l160, cdr: {car: l3, cdr: l3}}}, cdr: {car: {car: l157, cdr: {car: l303, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l47, cdr: {car: {car: l304, cdr: {car: l160, cdr: l3}}, cdr: {car: {car: l280, cdr: {car: l304, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l298, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l135, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l210, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l297, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l296, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l187, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l256, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l305, cdr: {car: l306, cdr: l3}}, cdr: {car: {car: l156, cdr: {car: {car: l248, cdr: {car: {car: l158, cdr: {car: l305, cdr: l3}}, cdr: {car: {car: l307, cdr: {car: l201, cdr: {car: l308, cdr: l3}}}, cdr: {car: {car: l228, cdr: {car: {car: {car: l308, cdr: {car: {car: l27, cdr: {car: l307, cdr: {car: l308, cdr: l3}}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l252, cdr: {car: l308, cdr: {car: {car: l134, cdr: {car: {car: l255, cdr: {car: l308, cdr: {car: {car: l158, cdr: {car: l306, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l255, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l253, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l252, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l308, cdr: {car: l201, cdr: {car: l303, cdr: l3}}}, cdr: {car: {car: l6, cdr: {car: {car: l265, cdr: {car: l308, cdr: l3}}, cdr: {car: {car: l283, cdr: {car: "Bad usage of VARIABLE-ARITY, you must pass a symbol", cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l156, cdr: {car: {car: l251, cdr: {car: {car: l158, cdr: {car: l308, cdr: l3}}, cdr: {car: {car: l209, cdr: {car: {car: {car: l158, cdr: {car: l308, cdr: l3}}, cdr: l3}, cdr: {car: {car: l126, cdr: {car: "return ", cdr: {car: {car: l157, cdr: {car: l303, cdr: l3}}, cdr: {car: ";", cdr: {car: l125, cdr: l3}}}}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l251, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l250, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l309, cdr: {car: l201, cdr: {car: l303, cdr: l3}}}, cdr: {car: {car: l156, cdr: {car: {car: l136, cdr: {car: {car: l157, cdr: {car: {car: l69, cdr: {car: {car: l209, cdr: {car: {car: l310, cdr: l3}, cdr: {car: {car: l156, cdr: {car: {car: l126, cdr: {car: "var ", cdr: {car: {car: l158, cdr: {car: {car: l38, cdr: {car: l310, cdr: l3}}, cdr: l3}}, cdr: {car: " = ", cdr: {car: {car: l158, cdr: {car: {car: l40, cdr: {car: l310, cdr: l3}}, cdr: l3}}, cdr: {car: ";", cdr: {car: l125, cdr: l3}}}}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l309, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l157, cdr: {car: {car: l69, cdr: {car: {car: l209, cdr: {car: {car: l310, cdr: l3}, cdr: {car: {car: l156, cdr: {car: {car: l126, cdr: {car: "if (typeof ", cdr: {car: {car: l158, cdr: {car: {car: l38, cdr: {car: l310, cdr: l3}}, cdr: l3}}, cdr: {car: " != '", cdr: {car: {car: l158, cdr: {car: {car: l39, cdr: {car: l310, cdr: l3}}, cdr: l3}}, cdr: {car: "')", cdr: {car: l125, cdr: {car: {car: l133, cdr: {car: "throw 'The value ' + ", cdr: {car: {car: l158, cdr: {car: {car: l38, cdr: {car: l310, cdr: l3}}, cdr: l3}}, cdr: {car: " + ' is not a type ", cdr: {car: {car: l158, cdr: {car: {car: l39, cdr: {car: l310, cdr: l3}}, cdr: l3}}, cdr: {car: ".';", cdr: {car: l125, cdr: l3}}}}}}}, cdr: l3}}}}}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l309, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l126, cdr: {car: "return ", cdr: {car: {car: l224, cdr: {car: {car: l157, cdr: {car: l303, cdr: l3}}, cdr: l3}}, cdr: {car: ";", cdr: {car: l125, cdr: l3}}}}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l249, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l311, cdr: {car: l308, cdr: {car: l201, cdr: {car: l303, cdr: l3}}}}, cdr: {car: {car: l156, cdr: {car: {car: l224, cdr: {car: {car: l248, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: l308, cdr: l3}}, cdr: {car: {car: l228, cdr: {car: {car: l158, cdr: {car: {car: l69, cdr: {car: {car: l209, cdr: {car: {car: l312, cdr: l3}, cdr: {car: {car: l156, cdr: {car: {car: {car: l158, cdr: {car: l312, cdr: l3}}, cdr: {car: {car: l135, cdr: {car: {car: l158, cdr: {car: l312, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l308, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l157, cdr: {car: l303, cdr: l3}}, cdr: l3}}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l248, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l311, cdr: {car: l308, cdr: {car: l201, cdr: {car: l303, cdr: l3}}}}, cdr: {car: {car: l156, cdr: {car: {car: l46, cdr: {car: {car: l42, cdr: {car: {car: l155, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l209, cdr: {car: {car: l158, cdr: {car: l308, cdr: l3}}, cdr: {car: {car: l172, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: {car: {car: l157, cdr: {car: l303, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l247, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l156, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l313, cdr: l3}, cdr: {car: {car: l245, cdr: {car: l313, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l246, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l245, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l240, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l239, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l231, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l230, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l227, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l226, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l225, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l311, cdr: {car: l308, cdr: {car: l313, cdr: l3}}}, cdr: {car: {car: l156, cdr: {car: {car: l197, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: l308, cdr: l3}}, cdr: {car: {car: l135, cdr: {car: {car: l158, cdr: {car: l313, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l219, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l218, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l138, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l211, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l208, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l207, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l206, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l205, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l204, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l203, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l197, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l311, cdr: {car: l308, cdr: {car: l201, cdr: {car: l303, cdr: l3}}}}, cdr: {car: {car: l156, cdr: {car: {car: l46, cdr: {car: {car: l42, cdr: {car: {car: l155, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l209, cdr: {car: {car: l158, cdr: {car: l308, cdr: l3}}, cdr: {car: {car: l172, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: {car: {car: l157, cdr: {car: l303, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l196, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l190, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l189, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l188, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l186, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l185, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l184, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l183, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l180, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l179, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l178, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l175, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l174, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l171, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l170, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l169, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l168, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l167, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l166, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l165, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l164, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l163, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l162, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l161, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l159, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l150, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l153, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l152, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l151, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l149, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l148, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l147, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l146, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l145, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l144, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l143, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l142, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l141, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l140, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l139, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l96, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l137, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l136, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l201, cdr: {car: l303, cdr: l3}}, cdr: {car: {car: l156, cdr: {car: {car: l126, cdr: {car: "(function(){", cdr: {car: l125, cdr: {car: {car: l133, cdr: {car: {car: l157, cdr: {car: l303, cdr: l3}}, cdr: l3}}, cdr: {car: "})()", cdr: l3}}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l134, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l16, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l133, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l132, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l131, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l130, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l129, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l128, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l127, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l99, cdr: {car: l201, cdr: {car: l313, cdr: l3}}}, cdr: {car: {car: l156, cdr: {car: {car: l213, cdr: {car: {car: l158, cdr: {car: l99, cdr: l3}}, cdr: {car: {car: l126, cdr: {car: {car: l158, cdr: {car: l99, cdr: l3}}, cdr: {car: {car: l224, cdr: {car: {car: l157, cdr: {car: l313, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l126, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l124, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l123, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l192, cdr: {car: l194, cdr: l3}}, cdr: l3}}}}, cdr: {car: {car: l122, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l121, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l114, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l120, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l119, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l118, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l117, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l116, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l314, cdr: l3}, cdr: {car: {car: l156, cdr: {car: {car: l222, cdr: {car: {car: l213, cdr: {car: l115, cdr: {car: {car: l103, cdr: {car: {car: l158, cdr: {car: l314, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l113, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l109, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l108, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l107, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l106, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l103, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l105, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l104, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l102, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l101, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l97, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l95, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l94, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l93, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l92, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l91, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l90, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l89, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l88, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l87, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l86, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l85, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l84, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l83, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l82, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l81, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l80, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l79, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l78, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l57, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l77, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l76, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l75, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l74, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l73, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l72, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l71, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l70, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l69, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l68, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l67, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l66, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l65, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l201, cdr: {car: l315, cdr: l3}}, cdr: {car: {car: l228, cdr: {car: {car: {car: l316, cdr: {car: {car: l155, cdr: {car: l3, cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l13, cdr: {car: l4, cdr: {car: {car: l49, cdr: {car: {car: {car: l11, cdr: {car: l315, cdr: l3}}, cdr: {car: {car: l12, cdr: l3}, cdr: l3}}, cdr: {car: {car: {car: l11, cdr: {car: {car: l30, cdr: {car: l315, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l283, cdr: {car: "Odd paris in PSETQ", cdr: l3}}, cdr: l3}}, cdr: {car: {car: l4, cdr: {car: {car: l228, cdr: {car: {car: {car: l99, cdr: {car: {car: l29, cdr: {car: l315, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l317, cdr: {car: {car: l32, cdr: {car: l315, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l46, cdr: {car: {car: l156, cdr: {car: {car: {car: l158, cdr: {car: l99, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: l317, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: {car: l316, cdr: l3}}}, cdr: {car: {car: l213, cdr: {car: l315, cdr: {car: {car: l34, cdr: {car: l315, cdr: l3}}, cdr: l3}}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: {car: {car: l213, cdr: {car: l316, cdr: {car: {car: l64, cdr: {car: l316, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l156, cdr: {car: {car: l228, cdr: {car: {car: l158, cdr: {car: {car: l69, cdr: {car: {car: l98, cdr: {car: l30, cdr: l3}}, cdr: {car: l316, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l213, cdr: {car: {car: l157, cdr: {car: {car: l58, cdr: {car: {car: l98, cdr: {car: l62, cdr: l3}}, cdr: {car: {car: l69, cdr: {car: {car: l98, cdr: {car: l81, cdr: l3}}, cdr: {car: l316, cdr: l3}}}, cdr: {car: {car: l155, cdr: {car: l3, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l64, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l63, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l62, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l61, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l60, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l59, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l58, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l56, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l55, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l318, cdr: {car: l319, cdr: {car: l201, cdr: {car: l303, cdr: l3}}}}, cdr: {car: {car: l156, cdr: {car: {car: l54, cdr: {car: {car: l224, cdr: {car: {car: l158, cdr: {car: l318, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: l319, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l157, cdr: {car: l303, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l54, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l313, cdr: {car: l201, cdr: {car: l303, cdr: l3}}}, cdr: {car: {car: l228, cdr: {car: {car: {car: l317, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l156, cdr: {car: {car: l228, cdr: {car: {car: {car: {car: l158, cdr: {car: l317, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: l313, cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l157, cdr: {car: l303, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: l317, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l53, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l201, cdr: {car: l320, cdr: l3}}, cdr: {car: {car: l49, cdr: {car: {car: {car: l11, cdr: {car: l320, cdr: l3}}, cdr: {car: l3, cdr: l3}}, cdr: {car: {car: {car: l11, cdr: {car: {car: l30, cdr: {car: l320, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l29, cdr: {car: l320, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l4, cdr: {car: {car: l228, cdr: {car: {car: {car: l321, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l156, cdr: {car: {car: l228, cdr: {car: {car: {car: {car: l158, cdr: {car: l321, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: {car: l29, cdr: {car: l320, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l198, cdr: {car: {car: l158, cdr: {car: l321, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: l321, cdr: l3}}, cdr: {car: {car: l53, cdr: {car: {car: l157, cdr: {car: {car: l30, cdr: {car: l320, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l52, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l201, cdr: {car: l320, cdr: l3}}, cdr: {car: {car: l49, cdr: {car: {car: {car: l11, cdr: {car: l320, cdr: l3}}, cdr: {car: l4, cdr: l3}}, cdr: {car: {car: {car: l11, cdr: {car: {car: l30, cdr: {car: l320, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l29, cdr: {car: l320, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l4, cdr: {car: {car: l156, cdr: {car: {car: l198, cdr: {car: {car: l158, cdr: {car: {car: l29, cdr: {car: l320, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l52, cdr: {car: {car: l157, cdr: {car: {car: l30, cdr: {car: l320, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: l3, cdr: l3}}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l51, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l313, cdr: {car: l201, cdr: {car: l322, cdr: l3}}}, cdr: {car: {car: l156, cdr: {car: {car: l50, cdr: {car: {car: l158, cdr: {car: l313, cdr: l3}}, cdr: {car: {car: l157, cdr: {car: {car: l62, cdr: {car: l322, cdr: {car: {car: l156, cdr: {car: {car: {car: l4, cdr: {car: {car: l283, cdr: {car: "ECASE expression failed.", cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l50, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l313, cdr: {car: l201, cdr: {car: l322, cdr: l3}}}, cdr: {car: {car: l228, cdr: {car: {car: {car: l323, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l156, cdr: {car: {car: l228, cdr: {car: {car: {car: {car: l158, cdr: {car: l323, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: l313, cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l49, cdr: {car: {car: l157, cdr: {car: {car: l69, cdr: {car: {car: l209, cdr: {car: {car: l324, cdr: l3}, cdr: {car: {car: l198, cdr: {car: {car: l272, cdr: {car: {car: l29, cdr: {car: l324, cdr: l3}}, cdr: {car: l4, cdr: l3}}}, cdr: {car: l324, cdr: {car: {car: l156, cdr: {car: {car: {car: l25, cdr: {car: {car: l158, cdr: {car: l323, cdr: l3}}, cdr: {car: {car: l155, cdr: {car: {car: l158, cdr: {car: {car: l29, cdr: {car: l324, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l157, cdr: {car: {car: l30, cdr: {car: l324, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: {car: l322, cdr: l3}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l49, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l201, cdr: {car: l322, cdr: l3}}, cdr: {car: {car: l198, cdr: {car: {car: l11, cdr: {car: l322, cdr: l3}}, cdr: {car: l3, cdr: {car: {car: l198, cdr: {car: {car: l272, cdr: {car: {car: l31, cdr: {car: l322, cdr: l3}}, cdr: {car: l4, cdr: l3}}}, cdr: {car: {car: l156, cdr: {car: {car: l224, cdr: {car: {car: l157, cdr: {car: {car: l33, cdr: {car: l322, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l156, cdr: {car: {car: l198, cdr: {car: {car: l158, cdr: {car: {car: l31, cdr: {car: l322, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l224, cdr: {car: {car: l157, cdr: {car: {car: l33, cdr: {car: l322, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l49, cdr: {car: {car: l157, cdr: {car: {car: l30, cdr: {car: l322, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l48, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l325, cdr: {car: l201, cdr: {car: l303, cdr: l3}}}, cdr: {car: {car: l228, cdr: {car: {car: {car: l326, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: {car: {car: l327, cdr: {car: {car: l38, cdr: {car: l325, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l328, cdr: {car: {car: l39, cdr: {car: l325, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l319, cdr: {car: {car: l40, cdr: {car: l325, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: {car: {car: l156, cdr: {car: {car: l172, cdr: {car: l3, cdr: {car: {car: l228, cdr: {car: {car: {car: {car: l158, cdr: {car: l327, cdr: l3}}, cdr: {car: 0, cdr: l3}}, cdr: {car: {car: {car: l158, cdr: {car: l326, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: l328, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l220, cdr: {car: {car: l258, cdr: {car: {car: l158, cdr: {car: l327, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: l326, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l241, cdr: {car: {car: l157, cdr: {car: l303, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l44, cdr: {car: {car: l158, cdr: {car: l327, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: {car: {car: l158, cdr: {car: l319, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l47, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l325, cdr: {car: l201, cdr: {car: l303, cdr: l3}}}, cdr: {car: {car: l228, cdr: {car: {car: {car: l327, cdr: {car: {car: l38, cdr: {car: l325, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l329, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l156, cdr: {car: {car: l172, cdr: {car: l3, cdr: {car: {car: l228, cdr: {car: {car: {car: {car: l158, cdr: {car: l329, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: {car: l39, cdr: {car: l325, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: {car: l158, cdr: {car: l327, cdr: l3}}, cdr: {car: l3, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l220, cdr: {car: {car: l158, cdr: {car: l329, cdr: l3}}, cdr: {car: {car: l213, cdr: {car: {car: l158, cdr: {car: l327, cdr: l3}}, cdr: {car: {car: l29, cdr: {car: {car: l158, cdr: {car: l329, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l241, cdr: {car: {car: l157, cdr: {car: l303, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l213, cdr: {car: {car: l158, cdr: {car: l329, cdr: l3}}, cdr: {car: {car: l30, cdr: {car: {car: l158, cdr: {car: l329, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}}}, cdr: {car: {car: l158, cdr: {car: {car: l40, cdr: {car: l325, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l46, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l307, cdr: {car: l330, cdr: l3}}, cdr: {car: {car: l156, cdr: {car: {car: l213, cdr: {car: {car: l158, cdr: {car: l330, cdr: l3}}, cdr: {car: {car: l27, cdr: {car: {car: l158, cdr: {car: l307, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: l330, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l45, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l307, cdr: {car: l200, cdr: {car: {car: l331, cdr: {car: 1, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l156, cdr: {car: {car: l213, cdr: {car: {car: l158, cdr: {car: l307, cdr: l3}}, cdr: {car: {car: l60, cdr: {car: {car: l158, cdr: {car: l307, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: l331, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l44, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l307, cdr: {car: l200, cdr: {car: {car: l331, cdr: {car: 1, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l156, cdr: {car: {car: l213, cdr: {car: {car: l158, cdr: {car: l307, cdr: l3}}, cdr: {car: {car: l59, cdr: {car: {car: l158, cdr: {car: l307, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: l331, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l43, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l42, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l41, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l40, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l39, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l38, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l37, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l36, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l35, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l34, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l33, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l32, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l31, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l30, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l29, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l28, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l27, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l26, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l25, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l24, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l23, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l22, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l21, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l20, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l19, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l18, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l17, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l15, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l13, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l332, cdr: {car: l201, cdr: {car: l303, cdr: l3}}}, cdr: {car: {car: l156, cdr: {car: {car: l172, cdr: {car: l3, cdr: {car: {car: l220, cdr: {car: {car: l158, cdr: {car: l332, cdr: l3}}, cdr: {car: {car: l157, cdr: {car: l303, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l12, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l200, cdr: {car: l317, cdr: l3}}, cdr: {car: {car: l156, cdr: {car: {car: l234, cdr: {car: l3, cdr: {car: {car: l158, cdr: {car: l317, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l11, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l10, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l311, cdr: {car: l308, cdr: {car: l201, cdr: {car: l303, cdr: l3}}}}, cdr: {car: {car: l156, cdr: {car: {car: l224, cdr: {car: {car: l2, cdr: {car: {car: l194, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l268, cdr: {car: {car: l155, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l9, cdr: {car: {car: l158, cdr: {car: {car: l267, cdr: {car: l311, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: l308, cdr: l3}}, cdr: {car: {car: l157, cdr: {car: {car: l198, cdr: {car: {car: l52, cdr: {car: {car: l275, cdr: {car: {car: l29, cdr: {car: l303, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l26, cdr: {car: {car: l11, cdr: {car: {car: l30, cdr: {car: l303, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l156, cdr: {car: {car: {car: l158, cdr: {car: {car: l29, cdr: {car: l303, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l172, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: {car: {car: l157, cdr: {car: {car: l30, cdr: {car: l303, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l156, cdr: {car: {car: {car: l172, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: {car: {car: l157, cdr: {car: l303, cdr: l3}}, cdr: l3}}}, cdr: l3}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: {car: {car: l155, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l9, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l311, cdr: {car: l308, cdr: {car: l201, cdr: {car: l303, cdr: l3}}}}, cdr: {car: {car: l228, cdr: {car: {car: {car: l307, cdr: {car: {car: l15, cdr: {car: "FN", cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l156, cdr: {car: {car: l228, cdr: {car: {car: {car: {car: l158, cdr: {car: l307, cdr: l3}}, cdr: {car: {car: l209, cdr: {car: {car: l158, cdr: {car: l308, cdr: l3}}, cdr: {car: {car: l157, cdr: {car: l303, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l287, cdr: {car: {car: l158, cdr: {car: l307, cdr: l3}}, cdr: {car: "fname", cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: l3}}}}, cdr: {car: {car: l158, cdr: {car: l307, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l8, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l311, cdr: {car: l317, cdr: {car: l200, cdr: {car: l333, cdr: l3}}}}, cdr: {car: {car: l156, cdr: {car: {car: l224, cdr: {car: {car: l213, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: l317, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l157, cdr: {car: {car: l5, cdr: {car: {car: l275, cdr: {car: l333, cdr: l3}}, cdr: {car: {car: l156, cdr: {car: {car: {car: l287, cdr: {car: {car: l155, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: l3}}, cdr: {car: "vardoc", cdr: {car: {car: l158, cdr: {car: l333, cdr: l3}}, cdr: l3}}}}, cdr: l3}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l155, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l7, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l311, cdr: {car: l317, cdr: {car: l200, cdr: {car: l333, cdr: l3}}}}, cdr: {car: {car: l156, cdr: {car: {car: l224, cdr: {car: {car: l2, cdr: {car: {car: l191, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l6, cdr: {car: {car: l17, cdr: {car: {car: l155, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l213, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: l317, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: {car: l157, cdr: {car: {car: l5, cdr: {car: {car: l275, cdr: {car: l333, cdr: l3}}, cdr: {car: {car: l156, cdr: {car: {car: {car: l287, cdr: {car: {car: l155, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: l3}}, cdr: {car: "vardoc", cdr: {car: {car: l158, cdr: {car: l333, cdr: l3}}, cdr: l3}}}}, cdr: l3}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l155, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: l3}}, cdr: l3}}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l6, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l332, cdr: {car: l201, cdr: {car: l303, cdr: l3}}}, cdr: {car: {car: l156, cdr: {car: {car: l198, cdr: {car: {car: l158, cdr: {car: l332, cdr: l3}}, cdr: {car: l3, cdr: {car: {car: l224, cdr: {car: {car: l157, cdr: {car: l303, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l5, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l332, cdr: {car: l201, cdr: {car: l303, cdr: l3}}}, cdr: {car: {car: l156, cdr: {car: {car: l198, cdr: {car: {car: l158, cdr: {car: l332, cdr: l3}}, cdr: {car: {car: l224, cdr: {car: {car: l157, cdr: {car: l303, cdr: l3}}, cdr: l3}}, cdr: {car: l3, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l2, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l201, cdr: {car: l309, cdr: l3}}, cdr: {car: {car: l156, cdr: {car: {car: l222, cdr: {car: {car: l157, cdr: {car: {car: l69, cdr: {car: {car: l209, cdr: {car: {car: l310, cdr: l3}, cdr: {car: {car: l156, cdr: {car: {car: l190, cdr: {car: {car: l155, cdr: {car: {car: l158, cdr: {car: l310, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l309, cdr: l3}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l1, cdr: {car: l187, cdr: {car: {car: l209, cdr: {car: {car: l311, cdr: {car: l308, cdr: {car: l201, cdr: {car: l303, cdr: l3}}}}, cdr: {car: {car: l156, cdr: {car: {car: l222, cdr: {car: {car: l186, cdr: {car: {car: l155, cdr: {car: {car: l158, cdr: {car: l311, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l155, cdr: {car: {car: l209, cdr: {car: {car: l158, cdr: {car: {car: l69, cdr: {car: {car: l209, cdr: {car: {car: l307, cdr: l3}, cdr: {car: {car: l198, cdr: {car: {car: l272, cdr: {car: l307, cdr: {car: {car: l155, cdr: {car: l300, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l155, cdr: {car: l201, cdr: l3}}, cdr: {car: l307, cdr: l3}}}}, cdr: l3}}}, cdr: {car: l308, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l157, cdr: {car: l303, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: l3}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}, cdr: {car: l3, cdr: {car: l3, cdr: l3}}}};
11810 (function(){
11811     l117.fvalue(id, l300);
11812     l117.fvalue(id, l299);
11813     l117.fvalue(id, l298);
11814     l117.fvalue(id, l297);
11815     l117.fvalue(id, l296);
11816     l117.fvalue(id, l295);
11817     l117.fvalue(id, l294);
11818     l117.fvalue(id, l293);
11819     l117.fvalue(id, l292);
11820     l117.fvalue(id, l291);
11821     l117.fvalue(id, l290);
11822     l117.fvalue(id, l289);
11823     l117.fvalue(id, l288);
11824     l117.fvalue(id, l287);
11825     l117.fvalue(id, l286);
11826     l117.fvalue(id, l285);
11827     l117.fvalue(id, l284);
11828     l117.fvalue(id, l283);
11829     l117.fvalue(id, l282);
11830     l117.fvalue(id, l281);
11831     l117.fvalue(id, l280);
11832     l117.fvalue(id, l279);
11833     l117.fvalue(id, l278);
11834     l117.fvalue(id, l277);
11835     l117.fvalue(id, l276);
11836     l117.fvalue(id, l275);
11837     l117.fvalue(id, l274);
11838     l117.fvalue(id, l273);
11839     l117.fvalue(id, l272);
11840     l117.fvalue(id, l271);
11841     l117.fvalue(id, l270);
11842     l117.fvalue(id, l269);
11843     l117.fvalue(id, l268);
11844     l117.fvalue(id, l267);
11845     l117.fvalue(id, l266);
11846     l117.fvalue(id, l265);
11847     l117.fvalue(id, l264);
11848     l117.fvalue(id, l263);
11849     l117.fvalue(id, l262);
11850     l117.fvalue(id, l261);
11851     l117.fvalue(id, l260);
11852     l117.fvalue(id, l259);
11853     l117.fvalue(id, l258);
11854     l117.fvalue(id, l257);
11855     l117.fvalue(id, l256);
11856     l117.fvalue(id, l255);
11857     l117.fvalue(id, l254);
11858     l117.fvalue(id, l253);
11859     l117.fvalue(id, l252);
11860     l117.fvalue(id, l251);
11861     l117.fvalue(id, l250);
11862     l117.fvalue(id, l249);
11863     l117.fvalue(id, l248);
11864     l117.fvalue(id, l247);
11865     l117.fvalue(id, l246);
11866     l117.fvalue(id, l245);
11867     l117.fvalue(id, l244);
11868     l117.fvalue(id, l243);
11869     l117.fvalue(id, l242);
11870     l117.fvalue(id, l241);
11871     l117.fvalue(id, l240);
11872     l117.fvalue(id, l239);
11873     l117.fvalue(id, l238);
11874     l117.fvalue(id, l237);
11875     l117.fvalue(id, l236);
11876     l117.fvalue(id, l235);
11877     l117.fvalue(id, l234);
11878     l117.fvalue(id, l233);
11879     l117.fvalue(id, l232);
11880     l117.fvalue(id, l231);
11881     l117.fvalue(id, l230);
11882     l117.fvalue(id, l229);
11883     l117.fvalue(id, l228);
11884     l117.fvalue(id, l227);
11885     l117.fvalue(id, l226);
11886     l117.fvalue(id, l225);
11887     l117.fvalue(id, l224);
11888     l117.fvalue(id, l223);
11889     l117.fvalue(id, l222);
11890     l117.fvalue(id, l221);
11891     l117.fvalue(id, l220);
11892     l117.fvalue(id, l219);
11893     l117.fvalue(id, l218);
11894     l117.fvalue(id, l217);
11895     l117.fvalue(id, l216);
11896     l117.fvalue(id, l215);
11897     l117.fvalue(id, l214);
11898     l117.fvalue(id, l213);
11899     l117.fvalue(id, l212);
11900     l117.fvalue(id, l211);
11901     l117.fvalue(id, l210);
11902     l117.fvalue(id, l209);
11903     l117.fvalue(id, l208);
11904     l117.fvalue(id, l207);
11905     l117.fvalue(id, l206);
11906     l117.fvalue(id, l205);
11907     l117.fvalue(id, l204);
11908     l117.fvalue(id, l203);
11909     l117.fvalue(id, l201);
11910     l117.fvalue(id, l200);
11911     l117.fvalue(id, l199);
11912     l117.fvalue(id, l198);
11913     l117.fvalue(id, l197);
11914     l117.fvalue(id, l196);
11915     l117.fvalue(id, l195);
11916     l117.fvalue(id, l194);
11917     l117.fvalue(id, l193);
11918     l117.fvalue(id, l192);
11919     l117.fvalue(id, l191);
11920     l117.fvalue(id, l190);
11921     l117.fvalue(id, l189);
11922     l117.fvalue(id, l188);
11923     l117.fvalue(id, l187);
11924     l117.fvalue(id, l186);
11925     l117.fvalue(id, l185);
11926     l117.fvalue(id, l184);
11927     l117.fvalue(id, l183);
11928     l117.fvalue(id, l182);
11929     l117.fvalue(id, l181);
11930     l117.fvalue(id, l180);
11931     l117.fvalue(id, l179);
11932     l117.fvalue(id, l178);
11933     l117.fvalue(id, l177);
11934     l117.fvalue(id, l176);
11935     l117.fvalue(id, l175);
11936     l117.fvalue(id, l174);
11937     l117.fvalue(id, l173);
11938     l117.fvalue(id, l172);
11939     l117.fvalue(id, l171);
11940     l117.fvalue(id, l170);
11941     l117.fvalue(id, l169);
11942     l117.fvalue(id, l168);
11943     l117.fvalue(id, l167);
11944     l117.fvalue(id, l166);
11945     l117.fvalue(id, l165);
11946     l117.fvalue(id, l164);
11947     l117.fvalue(id, l163);
11948     l117.fvalue(id, l162);
11949     l117.fvalue(id, l161);
11950     l117.fvalue(id, l160);
11951     l117.fvalue(id, l159);
11952     l117.fvalue(id, l158);
11953     l117.fvalue(id, l157);
11954     l117.fvalue(id, l156);
11955     l117.fvalue(id, l155);
11956     l117.fvalue(id, l154);
11957     l117.fvalue(id, l153);
11958     l117.fvalue(id, l152);
11959     l117.fvalue(id, l151);
11960     l117.fvalue(id, l150);
11961     l117.fvalue(id, l149);
11962     l117.fvalue(id, l148);
11963     l117.fvalue(id, l147);
11964     l117.fvalue(id, l146);
11965     l117.fvalue(id, l145);
11966     l117.fvalue(id, l144);
11967     l117.fvalue(id, l143);
11968     l117.fvalue(id, l142);
11969     l117.fvalue(id, l141);
11970     l117.fvalue(id, l140);
11971     l117.fvalue(id, l139);
11972     l117.fvalue(id, l138);
11973     l117.fvalue(id, l137);
11974     l117.fvalue(id, l136);
11975     l117.fvalue(id, l135);
11976     l117.fvalue(id, l134);
11977     l117.fvalue(id, l133);
11978     l117.fvalue(id, l132);
11979     l117.fvalue(id, l131);
11980     l117.fvalue(id, l130);
11981     l117.fvalue(id, l129);
11982     l117.fvalue(id, l128);
11983     l117.fvalue(id, l127);
11984     l117.fvalue(id, l126);
11985     l117.fvalue(id, l125);
11986     l117.fvalue(id, l124);
11987     l117.fvalue(id, l123);
11988     l117.fvalue(id, l122);
11989     l117.fvalue(id, l121);
11990     l117.fvalue(id, l120);
11991     l117.fvalue(id, l119);
11992     l117.fvalue(id, l118);
11993     l117.fvalue(id, l117);
11994     l117.fvalue(id, l116);
11995     l117.fvalue(id, l115);
11996     l117.fvalue(id, l114);
11997     l117.fvalue(id, l113);
11998     l117.fvalue(id, l112);
11999     l117.fvalue(id, l111);
12000     l117.fvalue(id, l110);
12001     l117.fvalue(id, l109);
12002     l117.fvalue(id, l108);
12003     l117.fvalue(id, l107);
12004     l117.fvalue(id, l106);
12005     l117.fvalue(id, l105);
12006     l117.fvalue(id, l104);
12007     l117.fvalue(id, l103);
12008     l117.fvalue(id, l102);
12009     l117.fvalue(id, l101);
12010     l117.fvalue(id, l100);
12011     l117.fvalue(id, l99);
12012     l117.fvalue(id, l98);
12013     l117.fvalue(id, l97);
12014     l117.fvalue(id, l96);
12015     l117.fvalue(id, l95);
12016     l117.fvalue(id, l94);
12017     l117.fvalue(id, l93);
12018     l117.fvalue(id, l92);
12019     l117.fvalue(id, l91);
12020     l117.fvalue(id, l90);
12021     l117.fvalue(id, l89);
12022     l117.fvalue(id, l88);
12023     l117.fvalue(id, l87);
12024     l117.fvalue(id, l86);
12025     l117.fvalue(id, l85);
12026     l117.fvalue(id, l84);
12027     l117.fvalue(id, l83);
12028     l117.fvalue(id, l82);
12029     l117.fvalue(id, l81);
12030     l117.fvalue(id, l80);
12031     l117.fvalue(id, l79);
12032     l117.fvalue(id, l78);
12033     l117.fvalue(id, l77);
12034     l117.fvalue(id, l76);
12035     l117.fvalue(id, l75);
12036     l117.fvalue(id, l74);
12037     l117.fvalue(id, l73);
12038     l117.fvalue(id, l72);
12039     l117.fvalue(id, l71);
12040     l117.fvalue(id, l70);
12041     l117.fvalue(id, l69);
12042     l117.fvalue(id, l68);
12043     l117.fvalue(id, l67);
12044     l117.fvalue(id, l66);
12045     l117.fvalue(id, l65);
12046     l117.fvalue(id, l64);
12047     l117.fvalue(id, l63);
12048     l117.fvalue(id, l62);
12049     l117.fvalue(id, l61);
12050     l117.fvalue(id, l60);
12051     l117.fvalue(id, l59);
12052     l117.fvalue(id, l58);
12053     l117.fvalue(id, l57);
12054     l117.fvalue(id, l56);
12055     l117.fvalue(id, l55);
12056     l117.fvalue(id, l54);
12057     l117.fvalue(id, l53);
12058     l117.fvalue(id, l52);
12059     l117.fvalue(id, l51);
12060     l117.fvalue(id, l50);
12061     l117.fvalue(id, l49);
12062     l117.fvalue(id, l48);
12063     l117.fvalue(id, l47);
12064     l117.fvalue(id, l46);
12065     l117.fvalue(id, l45);
12066     l117.fvalue(id, l44);
12067     l117.fvalue(id, l43);
12068     l117.fvalue(id, l42);
12069     l117.fvalue(id, l41);
12070     l117.fvalue(id, l40);
12071     l117.fvalue(id, l39);
12072     l117.fvalue(id, l38);
12073     l117.fvalue(id, l37);
12074     l117.fvalue(id, l36);
12075     l117.fvalue(id, l35);
12076     l117.fvalue(id, l34);
12077     l117.fvalue(id, l33);
12078     l117.fvalue(id, l32);
12079     l117.fvalue(id, l31);
12080     l117.fvalue(id, l30);
12081     l117.fvalue(id, l29);
12082     l117.fvalue(id, l28);
12083     l117.fvalue(id, l27);
12084     l117.fvalue(id, l26);
12085     l117.fvalue(id, l25);
12086     l117.fvalue(id, l24);
12087     l117.fvalue(id, l23);
12088     l117.fvalue(id, l22);
12089     l117.fvalue(id, l21);
12090     l117.fvalue(id, l20);
12091     l117.fvalue(id, l19);
12092     l117.fvalue(id, l18);
12093     l117.fvalue(id, l17);
12094     l117.fvalue(id, l16);
12095     l117.fvalue(id, l15);
12096     l117.fvalue(id, l14);
12097     l117.fvalue(id, l13);
12098     l117.fvalue(id, l12);
12099     l117.fvalue(id, l11);
12100     l117.fvalue(id, l10);
12101     l117.fvalue(id, l9);
12102     l117.fvalue(id, l8);
12103     l117.fvalue(id, l7);
12104     l117.fvalue(id, l6);
12105     l117.fvalue(id, l5);
12106     l117.fvalue(id, l4);
12107     l117.fvalue(id, l3);
12108     l117.fvalue(id, l2);
12109     l117.fvalue(id, l1);
12110     ((l216).value = l302);
12111     ((l176).value = l334);
12112     ((l177).value = 799);
12113     ((l14).value = 208);
12114     return ((l233).value = 278);
12115 })();
12116 ((l217).value = 334);