ecmalisp.js

   1 var l1 = {name: "DEFMACRO"};
   2 l1;
   3 var l2 = {name: "DECLAIM"};
   4 l2;
   5 var l3 = {name: "NIL"};
   6 (l3).value = l3;
   7 var l4 = {name: "T"};
   8 (l4).value = l4;
   9 var l5 = {name: "WHEN"};
  10 l5;
  11 var l6 = {name: "UNLESS"};
  12 l6;
  13 var l7 = {name: "DEFVAR"};
  14 l7;
  15 var l8 = {name: "DEFPARAMETER"};
  16 l8;
  17 var l9 = {name: "NAMED-LAMBDA"};
  18 l9;
  19 var l10 = {name: "DEFUN"};
  20 l10;
  21 var l11 = {name: "NULL"};
  22 (function(){
  23     (l11).function = (function(v2){
  24         ((v2)["fname"] = "NULL");
  25         return v2;
  26     })((function (v1){
  27         if (arguments.length < 1) throw 'too few arguments';
  28         if (arguments.length > 1) throw 'too many arguments';
  29         return (function(){
  30             try {
  31                 return (function(){
  32                     return ((v1 === l3.value)?l4.value: l3.value);
  33                 })();
  34             }
  35             catch (cf){
  36                 if (cf.type == 'block' && cf.id == 1)
  37                     return cf.value;
  38                 else
  39                     throw cf;
  40             }
  41         })();
  42
  43     }));
  44     return l11;
  45 })();
  46 var l12 = {name: "RETURN"};
  47 l12;
  48 var l13 = {name: "WHILE"};
  49 l13;
  50 var l14 = {name: "*GENSYM-COUNTER*"};
  51 (function(){
  52     (((l14.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
  53         return (l14).value = 0;
  54     })());
  55     return l14;
  56 })();
  57 var l15 = {name: "GENSYM"};
  58 var l16 = {name: "INTEGER-TO-STRING"};
  59 (function(){
  60     (l15).function = (function(v4){
  61         ((v4)["fname"] = "GENSYM");
  62         return v4;
  63     })((function (v3){
  64         if (arguments.length > 1) throw 'too many arguments';
  65         switch(arguments.length){
  66         case 0:
  67         v3="G";
  68         default: break;
  69         }
  70         return (function(){
  71             try {
  72                 return (function(){
  73                     (l14).value = (function(){
  74                         var x = (function(){
  75                             var symbol = l14;
  76                             var value = symbol.value;
  77                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
  78                             return value;
  79                         })();
  80                         var y = 1;
  81                         if (typeof x != 'number')
  82                             throw 'The value ' + x + ' is not a type number.';
  83                         if (typeof y != 'number')
  84                             throw 'The value ' + y + ' is not a type number.';
  85                         return x+y;
  86                     })();
  87                     return (function(){
  88                         var name = (function(){
  89                             var string1 = v3;
  90                             var string2 = (function(){
  91                                 var symbol = l16;
  92                                 var func = symbol.function;
  93                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
  94                                 return func;
  95                             })()((function(){
  96                                 var symbol = l14;
  97                                 var value = symbol.value;
  98                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
  99                                 return value;
 100                             })());
 101                             if (typeof string1 != 'string')
 102                                 throw 'The value ' + string1 + ' is not a type string.';
 103                             if (typeof string2 != 'string')
 104                                 throw 'The value ' + string2 + ' is not a type string.';
 105                             return string1.concat(string2);
 106                         })();
 107                         if (typeof name != 'string')
 108                             throw 'The value ' + name + ' is not a type string.';
 109                         return ({name: name});
 110                     })();
 111                 })();
 112             }
 113             catch (cf){
 114                 if (cf.type == 'block' && cf.id == 2)
 115                     return cf.value;
 116                 else
 117                     throw cf;
 118             }
 119         })();
 120
 121     }));
 122     return l15;
 123 })();
 124 var l17 = {name: "BOUNDP"};
 125 (function(){
 126     (l17).function = (function(v6){
 127         ((v6)["fname"] = "BOUNDP");
 128         return v6;
 129     })((function (v5){
 130         if (arguments.length < 1) throw 'too few arguments';
 131         if (arguments.length > 1) throw 'too many arguments';
 132         return (function(){
 133             try {
 134                 return (function(){
 135                     return ((v5.value !== undefined)?l4.value: l3.value);
 136                 })();
 137             }
 138             catch (cf){
 139                 if (cf.type == 'block' && cf.id == 3)
 140                     return cf.value;
 141                 else
 142                     throw cf;
 143             }
 144         })();
 145
 146     }));
 147     return l17;
 148 })();
 149 var l18 = {name: "="};
 150 (function(){
 151     (l18).function = (function(v9){
 152         ((v9)["fname"] = "=");
 153         return v9;
 154     })((function (v7,v8){
 155         if (arguments.length < 2) throw 'too few arguments';
 156         if (arguments.length > 2) throw 'too many arguments';
 157         return (function(){
 158             try {
 159                 return (function(){
 160                     return ((function(){
 161                         var x = v7;
 162                         var y = v8;
 163                         if (typeof x != 'number')
 164                             throw 'The value ' + x + ' is not a type number.';
 165                         if (typeof y != 'number')
 166                             throw 'The value ' + y + ' is not a type number.';
 167                         return x==y;
 168                     })()?l4.value: l3.value);
 169                 })();
 170             }
 171             catch (cf){
 172                 if (cf.type == 'block' && cf.id == 4)
 173                     return cf.value;
 174                 else
 175                     throw cf;
 176             }
 177         })();
 178
 179     }));
 180     return l18;
 181 })();
 182 var l19 = {name: "+"};
 183 (function(){
 184     (l19).function = (function(v12){
 185         ((v12)["fname"] = "+");
 186         return v12;
 187     })((function (v10,v11){
 188         if (arguments.length < 2) throw 'too few arguments';
 189         if (arguments.length > 2) throw 'too many arguments';
 190         return (function(){
 191             try {
 192                 return (function(){
 193                     return (function(){
 194                         var x = v10;
 195                         var y = v11;
 196                         if (typeof x != 'number')
 197                             throw 'The value ' + x + ' is not a type number.';
 198                         if (typeof y != 'number')
 199                             throw 'The value ' + y + ' is not a type number.';
 200                         return x+y;
 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).function = (function(v15){
 218         ((v15)["fname"] = "-");
 219         return v15;
 220     })((function (v13,v14){
 221         if (arguments.length < 2) throw 'too few arguments';
 222         if (arguments.length > 2) throw 'too many arguments';
 223         return (function(){
 224             try {
 225                 return (function(){
 226                     return (function(){
 227                         var x = v13;
 228                         var y = v14;
 229                         if (typeof x != 'number')
 230                             throw 'The value ' + x + ' is not a type number.';
 231                         if (typeof y != 'number')
 232                             throw 'The value ' + y + ' is not a type number.';
 233                         return x-y;
 234                     })();
 235                 })();
 236             }
 237             catch (cf){
 238                 if (cf.type == 'block' && cf.id == 6)
 239                     return cf.value;
 240                 else
 241                     throw cf;
 242             }
 243         })();
 244
 245     }));
 246     return l20;
 247 })();
 248 var l21 = {name: "*"};
 249 (function(){
 250     (l21).function = (function(v18){
 251         ((v18)["fname"] = "*");
 252         return v18;
 253     })((function (v16,v17){
 254         if (arguments.length < 2) throw 'too few arguments';
 255         if (arguments.length > 2) throw 'too many arguments';
 256         return (function(){
 257             try {
 258                 return (function(){
 259                     return (function(){
 260                         var x = v16;
 261                         var y = v17;
 262                         if (typeof x != 'number')
 263                             throw 'The value ' + x + ' is not a type number.';
 264                         if (typeof y != 'number')
 265                             throw 'The value ' + y + ' is not a type number.';
 266                         return x*y;
 267                     })();
 268                 })();
 269             }
 270             catch (cf){
 271                 if (cf.type == 'block' && cf.id == 7)
 272                     return cf.value;
 273                 else
 274                     throw cf;
 275             }
 276         })();
 277
 278     }));
 279     return l21;
 280 })();
 281 var l22 = {name: "/"};
 282 (function(){
 283     (l22).function = (function(v21){
 284         ((v21)["fname"] = "/");
 285         return v21;
 286     })((function (v19,v20){
 287         if (arguments.length < 2) throw 'too few arguments';
 288         if (arguments.length > 2) throw 'too many arguments';
 289         return (function(){
 290             try {
 291                 return (function(){
 292                     return (function(){
 293                         var x = v19;
 294                         var y = v20;
 295                         if (typeof x != 'number')
 296                             throw 'The value ' + x + ' is not a type number.';
 297                         if (typeof y != 'number')
 298                             throw 'The value ' + y + ' is not a type number.';
 299                         return x/y;
 300                     })();
 301                 })();
 302             }
 303             catch (cf){
 304                 if (cf.type == 'block' && cf.id == 8)
 305                     return cf.value;
 306                 else
 307                     throw cf;
 308             }
 309         })();
 310
 311     }));
 312     return l22;
 313 })();
 314 var l23 = {name: "1+"};
 315 (function(){
 316     (l23).function = (function(v23){
 317         ((v23)["fname"] = "1+");
 318         return v23;
 319     })((function (v22){
 320         if (arguments.length < 1) throw 'too few arguments';
 321         if (arguments.length > 1) throw 'too many arguments';
 322         return (function(){
 323             try {
 324                 return (function(){
 325                     return (function(){
 326                         var x = v22;
 327                         var y = 1;
 328                         if (typeof x != 'number')
 329                             throw 'The value ' + x + ' is not a type number.';
 330                         if (typeof y != 'number')
 331                             throw 'The value ' + y + ' is not a type number.';
 332                         return x+y;
 333                     })();
 334                 })();
 335             }
 336             catch (cf){
 337                 if (cf.type == 'block' && cf.id == 9)
 338                     return cf.value;
 339                 else
 340                     throw cf;
 341             }
 342         })();
 343
 344     }));
 345     return l23;
 346 })();
 347 var l24 = {name: "1-"};
 348 (function(){
 349     (l24).function = (function(v25){
 350         ((v25)["fname"] = "1-");
 351         return v25;
 352     })((function (v24){
 353         if (arguments.length < 1) throw 'too few arguments';
 354         if (arguments.length > 1) throw 'too many arguments';
 355         return (function(){
 356             try {
 357                 return (function(){
 358                     return (function(){
 359                         var x = v24;
 360                         var y = 1;
 361                         if (typeof x != 'number')
 362                             throw 'The value ' + x + ' is not a type number.';
 363                         if (typeof y != 'number')
 364                             throw 'The value ' + y + ' is not a type number.';
 365                         return x-y;
 366                     })();
 367                 })();
 368             }
 369             catch (cf){
 370                 if (cf.type == 'block' && cf.id == 10)
 371                     return cf.value;
 372                 else
 373                     throw cf;
 374             }
 375         })();
 376
 377     }));
 378     return l24;
 379 })();
 380 var l25 = {name: "ZEROP"};
 381 (function(){
 382     (l25).function = (function(v27){
 383         ((v27)["fname"] = "ZEROP");
 384         return v27;
 385     })((function (v26){
 386         if (arguments.length < 1) throw 'too few arguments';
 387         if (arguments.length > 1) throw 'too many arguments';
 388         return (function(){
 389             try {
 390                 return (function(){
 391                     return ((function(){
 392                         var x = v26;
 393                         var y = 0;
 394                         if (typeof x != 'number')
 395                             throw 'The value ' + x + ' is not a type number.';
 396                         if (typeof y != 'number')
 397                             throw 'The value ' + y + ' is not a type number.';
 398                         return x==y;
 399                     })()?l4.value: l3.value);
 400                 })();
 401             }
 402             catch (cf){
 403                 if (cf.type == 'block' && cf.id == 11)
 404                     return cf.value;
 405                 else
 406                     throw cf;
 407             }
 408         })();
 409
 410     }));
 411     return l25;
 412 })();
 413 var l26 = {name: "TRUNCATE"};
 414 (function(){
 415     (l26).function = (function(v30){
 416         ((v30)["fname"] = "TRUNCATE");
 417         return v30;
 418     })((function (v28,v29){
 419         if (arguments.length < 2) throw 'too few arguments';
 420         if (arguments.length > 2) throw 'too many arguments';
 421         return (function(){
 422             try {
 423                 return (function(){
 424                     return (function(){
 425                         var x = (function(){
 426                             var x = v28;
 427                             var y = v29;
 428                             if (typeof x != 'number')
 429                                 throw 'The value ' + x + ' is not a type number.';
 430                             if (typeof y != 'number')
 431                                 throw 'The value ' + y + ' is not a type number.';
 432                             return x/y;
 433                         })();
 434                         if (typeof x != 'number')
 435                             throw 'The value ' + x + ' is not a type number.';
 436                         return Math.floor(x);
 437                     })();
 438                 })();
 439             }
 440             catch (cf){
 441                 if (cf.type == 'block' && cf.id == 12)
 442                     return cf.value;
 443                 else
 444                     throw cf;
 445             }
 446         })();
 447
 448     }));
 449     return l26;
 450 })();
 451 var l27 = {name: "EQL"};
 452 (function(){
 453     (l27).function = (function(v33){
 454         ((v33)["fname"] = "EQL");
 455         return v33;
 456     })((function (v31,v32){
 457         if (arguments.length < 2) throw 'too few arguments';
 458         if (arguments.length > 2) throw 'too many arguments';
 459         return (function(){
 460             try {
 461                 return (function(){
 462                     return ((v31 === v32)?l4.value: l3.value);
 463                 })();
 464             }
 465             catch (cf){
 466                 if (cf.type == 'block' && cf.id == 13)
 467                     return cf.value;
 468                 else
 469                     throw cf;
 470             }
 471         })();
 472
 473     }));
 474     return l27;
 475 })();
 476 var l28 = {name: "NOT"};
 477 (function(){
 478     (l28).function = (function(v35){
 479         ((v35)["fname"] = "NOT");
 480         return v35;
 481     })((function (v34){
 482         if (arguments.length < 1) throw 'too few arguments';
 483         if (arguments.length > 1) throw 'too many arguments';
 484         return (function(){
 485             try {
 486                 return (function(){
 487                     return (v34 !== l3.value ? l3.value : l4.value);
 488                 })();
 489             }
 490             catch (cf){
 491                 if (cf.type == 'block' && cf.id == 14)
 492                     return cf.value;
 493                 else
 494                     throw cf;
 495             }
 496         })();
 497
 498     }));
 499     return l28;
 500 })();
 501 var l29 = {name: "CONS"};
 502 (function(){
 503     (l29).function = (function(v38){
 504         ((v38)["fname"] = "CONS");
 505         return v38;
 506     })((function (v36,v37){
 507         if (arguments.length < 2) throw 'too few arguments';
 508         if (arguments.length > 2) throw 'too many arguments';
 509         return (function(){
 510             try {
 511                 return (function(){
 512                     return ({car: v36, cdr: v37});
 513                 })();
 514             }
 515             catch (cf){
 516                 if (cf.type == 'block' && cf.id == 15)
 517                     return cf.value;
 518                 else
 519                     throw cf;
 520             }
 521         })();
 522
 523     }));
 524     return l29;
 525 })();
 526 var l30 = {name: "CONSP"};
 527 (function(){
 528     (l30).function = (function(v40){
 529         ((v40)["fname"] = "CONSP");
 530         return v40;
 531     })((function (v39){
 532         if (arguments.length < 1) throw 'too few arguments';
 533         if (arguments.length > 1) throw 'too many arguments';
 534         return (function(){
 535             try {
 536                 return (function(){
 537                     return ((function(){
 538                         var tmp = v39;
 539                         return (typeof tmp == 'object' && 'car' in tmp);
 540                     })()?l4.value: l3.value);
 541                 })();
 542             }
 543             catch (cf){
 544                 if (cf.type == 'block' && cf.id == 16)
 545                     return cf.value;
 546                 else
 547                     throw cf;
 548             }
 549         })();
 550
 551     }));
 552     return l30;
 553 })();
 554 var l31 = {name: "CAR"};
 555 (function(){
 556     (l31).function = (function(v42){
 557         ((v42)["fname"] = "CAR");
 558         return v42;
 559     })((function(){
 560         var func = (function (v41){
 561             if (arguments.length < 1) throw 'too few arguments';
 562             if (arguments.length > 1) throw 'too many arguments';
 563             return (function(){
 564                 try {
 565                     return (function(){
 566                         return (function(){
 567                             var tmp = v41;
 568                             return tmp === l3.value? l3.value: tmp.car;
 569                         })();
 570                     })();
 571                 }
 572                 catch (cf){
 573                     if (cf.type == 'block' && cf.id == 17)
 574                         return cf.value;
 575                     else
 576                         throw cf;
 577                 }
 578             })();
 579
 580         });
 581         func.docstring = 'Return the CAR part of a cons, or NIL if X is null.';
 582         return func;
 583     })());
 584     return l31;
 585 })();
 586 var l32 = {name: "CDR"};
 587 (function(){
 588     (l32).function = (function(v44){
 589         ((v44)["fname"] = "CDR");
 590         return v44;
 591     })((function (v43){
 592         if (arguments.length < 1) throw 'too few arguments';
 593         if (arguments.length > 1) throw 'too many arguments';
 594         return (function(){
 595             try {
 596                 return (function(){
 597                     return (function(){
 598                         var tmp = v43;
 599                         return tmp === l3.value? l3.value: tmp.cdr;
 600                     })();
 601                 })();
 602             }
 603             catch (cf){
 604                 if (cf.type == 'block' && cf.id == 18)
 605                     return cf.value;
 606                 else
 607                     throw cf;
 608             }
 609         })();
 610
 611     }));
 612     return l32;
 613 })();
 614 var l33 = {name: "CAAR"};
 615 (function(){
 616     (l33).function = (function(v46){
 617         ((v46)["fname"] = "CAAR");
 618         return v46;
 619     })((function (v45){
 620         if (arguments.length < 1) throw 'too few arguments';
 621         if (arguments.length > 1) throw 'too many arguments';
 622         return (function(){
 623             try {
 624                 return (function(){
 625                     return (function(){
 626                         var tmp = (function(){
 627                             var tmp = v45;
 628                             return tmp === l3.value? l3.value: tmp.car;
 629                         })();
 630                         return tmp === l3.value? l3.value: tmp.car;
 631                     })();
 632                 })();
 633             }
 634             catch (cf){
 635                 if (cf.type == 'block' && cf.id == 19)
 636                     return cf.value;
 637                 else
 638                     throw cf;
 639             }
 640         })();
 641
 642     }));
 643     return l33;
 644 })();
 645 var l34 = {name: "CADR"};
 646 (function(){
 647     (l34).function = (function(v48){
 648         ((v48)["fname"] = "CADR");
 649         return v48;
 650     })((function (v47){
 651         if (arguments.length < 1) throw 'too few arguments';
 652         if (arguments.length > 1) throw 'too many arguments';
 653         return (function(){
 654             try {
 655                 return (function(){
 656                     return (function(){
 657                         var tmp = (function(){
 658                             var tmp = v47;
 659                             return tmp === l3.value? l3.value: tmp.cdr;
 660                         })();
 661                         return tmp === l3.value? l3.value: tmp.car;
 662                     })();
 663                 })();
 664             }
 665             catch (cf){
 666                 if (cf.type == 'block' && cf.id == 20)
 667                     return cf.value;
 668                 else
 669                     throw cf;
 670             }
 671         })();
 672
 673     }));
 674     return l34;
 675 })();
 676 var l35 = {name: "CDAR"};
 677 (function(){
 678     (l35).function = (function(v50){
 679         ((v50)["fname"] = "CDAR");
 680         return v50;
 681     })((function (v49){
 682         if (arguments.length < 1) throw 'too few arguments';
 683         if (arguments.length > 1) throw 'too many arguments';
 684         return (function(){
 685             try {
 686                 return (function(){
 687                     return (function(){
 688                         var tmp = (function(){
 689                             var tmp = v49;
 690                             return tmp === l3.value? l3.value: tmp.car;
 691                         })();
 692                         return tmp === l3.value? l3.value: tmp.cdr;
 693                     })();
 694                 })();
 695             }
 696             catch (cf){
 697                 if (cf.type == 'block' && cf.id == 21)
 698                     return cf.value;
 699                 else
 700                     throw cf;
 701             }
 702         })();
 703
 704     }));
 705     return l35;
 706 })();
 707 var l36 = {name: "CDDR"};
 708 (function(){
 709     (l36).function = (function(v52){
 710         ((v52)["fname"] = "CDDR");
 711         return v52;
 712     })((function (v51){
 713         if (arguments.length < 1) throw 'too few arguments';
 714         if (arguments.length > 1) throw 'too many arguments';
 715         return (function(){
 716             try {
 717                 return (function(){
 718                     return (function(){
 719                         var tmp = (function(){
 720                             var tmp = v51;
 721                             return tmp === l3.value? l3.value: tmp.cdr;
 722                         })();
 723                         return tmp === l3.value? l3.value: tmp.cdr;
 724                     })();
 725                 })();
 726             }
 727             catch (cf){
 728                 if (cf.type == 'block' && cf.id == 22)
 729                     return cf.value;
 730                 else
 731                     throw cf;
 732             }
 733         })();
 734
 735     }));
 736     return l36;
 737 })();
 738 var l37 = {name: "CADDR"};
 739 (function(){
 740     (l37).function = (function(v54){
 741         ((v54)["fname"] = "CADDR");
 742         return v54;
 743     })((function (v53){
 744         if (arguments.length < 1) throw 'too few arguments';
 745         if (arguments.length > 1) throw 'too many arguments';
 746         return (function(){
 747             try {
 748                 return (function(){
 749                     return (function(){
 750                         var tmp = (function(){
 751                             var tmp = (function(){
 752                                 var tmp = v53;
 753                                 return tmp === l3.value? l3.value: tmp.cdr;
 754                             })();
 755                             return tmp === l3.value? l3.value: tmp.cdr;
 756                         })();
 757                         return tmp === l3.value? l3.value: tmp.car;
 758                     })();
 759                 })();
 760             }
 761             catch (cf){
 762                 if (cf.type == 'block' && cf.id == 23)
 763                     return cf.value;
 764                 else
 765                     throw cf;
 766             }
 767         })();
 768
 769     }));
 770     return l37;
 771 })();
 772 var l38 = {name: "CDDDR"};
 773 (function(){
 774     (l38).function = (function(v56){
 775         ((v56)["fname"] = "CDDDR");
 776         return v56;
 777     })((function (v55){
 778         if (arguments.length < 1) throw 'too few arguments';
 779         if (arguments.length > 1) throw 'too many arguments';
 780         return (function(){
 781             try {
 782                 return (function(){
 783                     return (function(){
 784                         var tmp = (function(){
 785                             var tmp = (function(){
 786                                 var tmp = v55;
 787                                 return tmp === l3.value? l3.value: tmp.cdr;
 788                             })();
 789                             return tmp === l3.value? l3.value: tmp.cdr;
 790                         })();
 791                         return tmp === l3.value? l3.value: tmp.cdr;
 792                     })();
 793                 })();
 794             }
 795             catch (cf){
 796                 if (cf.type == 'block' && cf.id == 24)
 797                     return cf.value;
 798                 else
 799                     throw cf;
 800             }
 801         })();
 802
 803     }));
 804     return l38;
 805 })();
 806 var l39 = {name: "CADDDR"};
 807 (function(){
 808     (l39).function = (function(v58){
 809         ((v58)["fname"] = "CADDDR");
 810         return v58;
 811     })((function (v57){
 812         if (arguments.length < 1) throw 'too few arguments';
 813         if (arguments.length > 1) throw 'too many arguments';
 814         return (function(){
 815             try {
 816                 return (function(){
 817                     return (function(){
 818                         var tmp = (function(){
 819                             var tmp = (function(){
 820                                 var tmp = (function(){
 821                                     var tmp = v57;
 822                                     return tmp === l3.value? l3.value: tmp.cdr;
 823                                 })();
 824                                 return tmp === l3.value? l3.value: tmp.cdr;
 825                             })();
 826                             return tmp === l3.value? l3.value: tmp.cdr;
 827                         })();
 828                         return tmp === l3.value? l3.value: tmp.car;
 829                     })();
 830                 })();
 831             }
 832             catch (cf){
 833                 if (cf.type == 'block' && cf.id == 25)
 834                     return cf.value;
 835                 else
 836                     throw cf;
 837             }
 838         })();
 839
 840     }));
 841     return l39;
 842 })();
 843 var l40 = {name: "FIRST"};
 844 (function(){
 845     (l40).function = (function(v60){
 846         ((v60)["fname"] = "FIRST");
 847         return v60;
 848     })((function (v59){
 849         if (arguments.length < 1) throw 'too few arguments';
 850         if (arguments.length > 1) throw 'too many arguments';
 851         return (function(){
 852             try {
 853                 return (function(){
 854                     return (function(){
 855                         var tmp = v59;
 856                         return tmp === l3.value? l3.value: tmp.car;
 857                     })();
 858                 })();
 859             }
 860             catch (cf){
 861                 if (cf.type == 'block' && cf.id == 26)
 862                     return cf.value;
 863                 else
 864                     throw cf;
 865             }
 866         })();
 867
 868     }));
 869     return l40;
 870 })();
 871 var l41 = {name: "SECOND"};
 872 (function(){
 873     (l41).function = (function(v62){
 874         ((v62)["fname"] = "SECOND");
 875         return v62;
 876     })((function (v61){
 877         if (arguments.length < 1) throw 'too few arguments';
 878         if (arguments.length > 1) throw 'too many arguments';
 879         return (function(){
 880             try {
 881                 return (function(){
 882                     return l34.function(v61);
 883                 })();
 884             }
 885             catch (cf){
 886                 if (cf.type == 'block' && cf.id == 27)
 887                     return cf.value;
 888                 else
 889                     throw cf;
 890             }
 891         })();
 892
 893     }));
 894     return l41;
 895 })();
 896 var l42 = {name: "THIRD"};
 897 (function(){
 898     (l42).function = (function(v64){
 899         ((v64)["fname"] = "THIRD");
 900         return v64;
 901     })((function (v63){
 902         if (arguments.length < 1) throw 'too few arguments';
 903         if (arguments.length > 1) throw 'too many arguments';
 904         return (function(){
 905             try {
 906                 return (function(){
 907                     return l37.function(v63);
 908                 })();
 909             }
 910             catch (cf){
 911                 if (cf.type == 'block' && cf.id == 28)
 912                     return cf.value;
 913                 else
 914                     throw cf;
 915             }
 916         })();
 917
 918     }));
 919     return l42;
 920 })();
 921 var l43 = {name: "FOURTH"};
 922 (function(){
 923     (l43).function = (function(v66){
 924         ((v66)["fname"] = "FOURTH");
 925         return v66;
 926     })((function (v65){
 927         if (arguments.length < 1) throw 'too few arguments';
 928         if (arguments.length > 1) throw 'too many arguments';
 929         return (function(){
 930             try {
 931                 return (function(){
 932                     return l39.function(v65);
 933                 })();
 934             }
 935             catch (cf){
 936                 if (cf.type == 'block' && cf.id == 29)
 937                     return cf.value;
 938                 else
 939                     throw cf;
 940             }
 941         })();
 942
 943     }));
 944     return l43;
 945 })();
 946 var l44 = {name: "LIST"};
 947 (function(){
 948     (l44).function = (function(v68){
 949         ((v68)["fname"] = "LIST");
 950         return v68;
 951     })((function (){
 952         var v67= l3.value;
 953         for (var i = arguments.length-1; i>=0; i--)
 954             v67 = {car: arguments[i], cdr:
 955         v67};
 956         return (function(){
 957             try {
 958                 return (function(){
 959                     return v67;
 960                 })();
 961             }
 962             catch (cf){
 963                 if (cf.type == 'block' && cf.id == 30)
 964                     return cf.value;
 965                 else
 966                     throw cf;
 967             }
 968         })();
 969
 970     }));
 971     return l44;
 972 })();
 973 var l45 = {name: "ATOM"};
 974 (function(){
 975     (l45).function = (function(v70){
 976         ((v70)["fname"] = "ATOM");
 977         return v70;
 978     })((function (v69){
 979         if (arguments.length < 1) throw 'too few arguments';
 980         if (arguments.length > 1) throw 'too many arguments';
 981         return (function(){
 982             try {
 983                 return (function(){
 984                     return l28.function(((function(){
 985                         var tmp = v69;
 986                         return (typeof tmp == 'object' && 'car' in tmp);
 987                     })()?l4.value: l3.value));
 988                 })();
 989             }
 990             catch (cf){
 991                 if (cf.type == 'block' && cf.id == 31)
 992                     return cf.value;
 993                 else
 994                     throw cf;
 995             }
 996         })();
 997
 998     }));
 999     return l45;
1000 })();
1001 var l46 = {name: "INCF"};
1002 l46;
1003 var l47 = {name: "DECF"};
1004 l47;
1005 var l48 = {name: "PUSH"};
1006 l48;
1007 var l49 = {name: "DOLIST"};
1008 l49;
1009 var l50 = {name: "DOTIMES"};
1010 l50;
1011 var l51 = {name: "COND"};
1012 l51;
1013 var l52 = {name: "CASE"};
1014 l52;
1015 var l53 = {name: "ECASE"};
1016 l53;
1017 var l54 = {name: "AND"};
1018 l54;
1019 var l55 = {name: "OR"};
1020 l55;
1021 var l56 = {name: "PROG1"};
1022 l56;
1023 var l57 = {name: "PROG2"};
1024 l57;
1025 var l58 = {name: "ENSURE-LIST"};
1026 var l59 = {name: "LISTP"};
1027 (function(){
1028     (l58).function = (function(v72){
1029         ((v72)["fname"] = "ENSURE-LIST");
1030         return v72;
1031     })((function (v71){
1032         if (arguments.length < 1) throw 'too few arguments';
1033         if (arguments.length > 1) throw 'too many arguments';
1034         return (function(){
1035             try {
1036                 return (function(){
1037                     return ((function(){
1038                         var symbol = l59;
1039                         var func = symbol.function;
1040                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1041                         return func;
1042                     })()(v71) !== l3.value ? v71 : l44.function(v71));
1043                 })();
1044             }
1045             catch (cf){
1046                 if (cf.type == 'block' && cf.id == 32)
1047                     return cf.value;
1048                 else
1049                     throw cf;
1050             }
1051         })();
1052
1053     }));
1054     return l58;
1055 })();
1056 var l60 = {name: "!REDUCE"};
1057 (function(){
1058     (l60).function = (function(v76){
1059         ((v76)["fname"] = "!REDUCE");
1060         return v76;
1061     })((function (v73,v74,v75){
1062         if (arguments.length < 3) throw 'too few arguments';
1063         if (arguments.length > 3) throw 'too many arguments';
1064         return (function(){
1065             try {
1066                 return (function(){
1067                     return (l11.function(v74) !== l3.value ? v75 : l60.function(v73, (function(){
1068                         var tmp = v74;
1069                         return tmp === l3.value? l3.value: tmp.cdr;
1070                     })(), (v73)(v75, (function(){
1071                         var tmp = v74;
1072                         return tmp === l3.value? l3.value: tmp.car;
1073                     })())));
1074                 })();
1075             }
1076             catch (cf){
1077                 if (cf.type == 'block' && cf.id == 33)
1078                     return cf.value;
1079                 else
1080                     throw cf;
1081             }
1082         })();
1083
1084     }));
1085     return l60;
1086 })();
1087 var l61 = {name: "APPEND-TWO"};
1088 var l62 = {name: "APPEND"};
1089 (function(){
1090     (l61).function = (function(v79){
1091         ((v79)["fname"] = "APPEND-TWO");
1092         return v79;
1093     })((function (v77,v78){
1094         if (arguments.length < 2) throw 'too few arguments';
1095         if (arguments.length > 2) throw 'too many arguments';
1096         return (function(){
1097             try {
1098                 return (function(){
1099                     return (l11.function(v77) !== l3.value ? v78 : ({car: (function(){
1100                         var tmp = v77;
1101                         return tmp === l3.value? l3.value: tmp.car;
1102                     })(), cdr: (function(){
1103                         var symbol = l62;
1104                         var func = symbol.function;
1105                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1106                         return func;
1107                     })()((function(){
1108                         var tmp = v77;
1109                         return tmp === l3.value? l3.value: tmp.cdr;
1110                     })(), v78)}));
1111                 })();
1112             }
1113             catch (cf){
1114                 if (cf.type == 'block' && cf.id == 34)
1115                     return cf.value;
1116                 else
1117                     throw cf;
1118             }
1119         })();
1120
1121     }));
1122     return l61;
1123 })();
1124 (function(){
1125     (l62).function = (function(v81){
1126         ((v81)["fname"] = "APPEND");
1127         return v81;
1128     })((function (){
1129         var v80= l3.value;
1130         for (var i = arguments.length-1; i>=0; i--)
1131             v80 = {car: arguments[i], cdr:
1132         v80};
1133         return (function(){
1134             try {
1135                 return (function(){
1136                     return l60.function((function(){
1137                         var symbol = l61;
1138                         var func = symbol.function;
1139                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1140                         return func;
1141                     })(), v80, l3);
1142                 })();
1143             }
1144             catch (cf){
1145                 if (cf.type == 'block' && cf.id == 35)
1146                     return cf.value;
1147                 else
1148                     throw cf;
1149             }
1150         })();
1151
1152     }));
1153     return l62;
1154 })();
1155 var l63 = {name: "REVAPPEND"};
1156 (function(){
1157     (l63).function = (function(v84){
1158         ((v84)["fname"] = "REVAPPEND");
1159         return v84;
1160     })((function (v82,v83){
1161         if (arguments.length < 2) throw 'too few arguments';
1162         if (arguments.length > 2) throw 'too many arguments';
1163         return (function(){
1164             try {
1165                 return (function(){
1166                     (function(){
1167                         try {
1168                             return (function(){
1169                                 return (function(){
1170                                     while(v82 !== l3.value){
1171                                         v83 = ({car: (function(){
1172                                             var tmp = v82;
1173                                             return tmp === l3.value? l3.value: tmp.car;
1174                                         })(), cdr: v83});
1175                                         v82 = (function(){
1176                                             var tmp = v82;
1177                                             return tmp === l3.value? l3.value: tmp.cdr;
1178                                         })();
1179                                     }return l3.value;
1180                                 })();
1181                             })();
1182                         }
1183                         catch (cf){
1184                             if (cf.type == 'block' && cf.id == 37)
1185                                 return cf.value;
1186                             else
1187                                 throw cf;
1188                         }
1189                     })();
1190                     return v83;
1191                 })();
1192             }
1193             catch (cf){
1194                 if (cf.type == 'block' && cf.id == 36)
1195                     return cf.value;
1196                 else
1197                     throw cf;
1198             }
1199         })();
1200
1201     }));
1202     return l63;
1203 })();
1204 var l64 = {name: "REVERSE"};
1205 (function(){
1206     (l64).function = (function(v86){
1207         ((v86)["fname"] = "REVERSE");
1208         return v86;
1209     })((function (v85){
1210         if (arguments.length < 1) throw 'too few arguments';
1211         if (arguments.length > 1) throw 'too many arguments';
1212         return (function(){
1213             try {
1214                 return (function(){
1215                     return l63.function(v85, l3);
1216                 })();
1217             }
1218             catch (cf){
1219                 if (cf.type == 'block' && cf.id == 38)
1220                     return cf.value;
1221                 else
1222                     throw cf;
1223             }
1224         })();
1225
1226     }));
1227     return l64;
1228 })();
1229 var l65 = {name: "LIST-LENGTH"};
1230 (function(){
1231     (l65).function = (function(v89){
1232         ((v89)["fname"] = "LIST-LENGTH");
1233         return v89;
1234     })((function (v87){
1235         if (arguments.length < 1) throw 'too few arguments';
1236         if (arguments.length > 1) throw 'too many arguments';
1237         return (function(){
1238             try {
1239                 return (function(){
1240                     return (function(v88){
1241                         (function(){
1242                             try {
1243                                 return (function(){
1244                                     return (function(){
1245                                         while(l28.function(l11.function(v87)) !== l3.value){
1246                                             v88 = (function(){
1247                                                 var x = v88;
1248                                                 var y = 1;
1249                                                 if (typeof x != 'number')
1250                                                     throw 'The value ' + x + ' is not a type number.';
1251                                                 if (typeof y != 'number')
1252                                                     throw 'The value ' + y + ' is not a type number.';
1253                                                 return x+y;
1254                                             })();
1255                                             v87 = (function(){
1256                                                 var tmp = v87;
1257                                                 return tmp === l3.value? l3.value: tmp.cdr;
1258                                             })();
1259                                         }return l3.value;
1260                                     })();
1261                                 })();
1262                             }
1263                             catch (cf){
1264                                 if (cf.type == 'block' && cf.id == 40)
1265                                     return cf.value;
1266                                 else
1267                                     throw cf;
1268                             }
1269                         })();
1270                         return v88;
1271                     })(0);
1272                 })();
1273             }
1274             catch (cf){
1275                 if (cf.type == 'block' && cf.id == 39)
1276                     return cf.value;
1277                 else
1278                     throw cf;
1279             }
1280         })();
1281
1282     }));
1283     return l65;
1284 })();
1285 var l66 = {name: "LENGTH"};
1286 (function(){
1287     (l66).function = (function(v91){
1288         ((v91)["fname"] = "LENGTH");
1289         return v91;
1290     })((function (v90){
1291         if (arguments.length < 1) throw 'too few arguments';
1292         if (arguments.length > 1) throw 'too many arguments';
1293         return (function(){
1294             try {
1295                 return (function(){
1296                     return (((typeof(v90) == "string")?l4.value: l3.value) !== l3.value ? (function(){
1297                         var x = v90;
1298                         if (typeof x != 'string')
1299                             throw 'The value ' + x + ' is not a type string.';
1300                         return x.length;
1301                     })() : l65.function(v90));
1302                 })();
1303             }
1304             catch (cf){
1305                 if (cf.type == 'block' && cf.id == 41)
1306                     return cf.value;
1307                 else
1308                     throw cf;
1309             }
1310         })();
1311
1312     }));
1313     return l66;
1314 })();
1315 var l67 = {name: "CONCAT-TWO"};
1316 (function(){
1317     (l67).function = (function(v94){
1318         ((v94)["fname"] = "CONCAT-TWO");
1319         return v94;
1320     })((function (v92,v93){
1321         if (arguments.length < 2) throw 'too few arguments';
1322         if (arguments.length > 2) throw 'too many arguments';
1323         return (function(){
1324             try {
1325                 return (function(){
1326                     return (function(){
1327                         var string1 = v92;
1328                         var string2 = v93;
1329                         if (typeof string1 != 'string')
1330                             throw 'The value ' + string1 + ' is not a type string.';
1331                         if (typeof string2 != 'string')
1332                             throw 'The value ' + string2 + ' is not a type string.';
1333                         return string1.concat(string2);
1334                     })();
1335                 })();
1336             }
1337             catch (cf){
1338                 if (cf.type == 'block' && cf.id == 42)
1339                     return cf.value;
1340                 else
1341                     throw cf;
1342             }
1343         })();
1344
1345     }));
1346     return l67;
1347 })();
1348 var l68 = {name: "MAPCAR"};
1349 (function(){
1350     (l68).function = (function(v97){
1351         ((v97)["fname"] = "MAPCAR");
1352         return v97;
1353     })((function (v95,v96){
1354         if (arguments.length < 2) throw 'too few arguments';
1355         if (arguments.length > 2) throw 'too many arguments';
1356         return (function(){
1357             try {
1358                 return (function(){
1359                     return (l11.function(v96) !== l3.value ? l3 : ({car: (v95)((function(){
1360                         var tmp = v96;
1361                         return tmp === l3.value? l3.value: tmp.car;
1362                     })()), cdr: l68.function(v95, (function(){
1363                         var tmp = v96;
1364                         return tmp === l3.value? l3.value: tmp.cdr;
1365                     })())}));
1366                 })();
1367             }
1368             catch (cf){
1369                 if (cf.type == 'block' && cf.id == 43)
1370                     return cf.value;
1371                 else
1372                     throw cf;
1373             }
1374         })();
1375
1376     }));
1377     return l68;
1378 })();
1379 var l69 = {name: "IDENTITY"};
1380 (function(){
1381     (l69).function = (function(v99){
1382         ((v99)["fname"] = "IDENTITY");
1383         return v99;
1384     })((function (v98){
1385         if (arguments.length < 1) throw 'too few arguments';
1386         if (arguments.length > 1) throw 'too many arguments';
1387         return (function(){
1388             try {
1389                 return (function(){
1390                     return v98;
1391                 })();
1392             }
1393             catch (cf){
1394                 if (cf.type == 'block' && cf.id == 44)
1395                     return cf.value;
1396                 else
1397                     throw cf;
1398             }
1399         })();
1400
1401     }));
1402     return l69;
1403 })();
1404 var l70 = {name: "COPY-LIST"};
1405 (function(){
1406     (l70).function = (function(v101){
1407         ((v101)["fname"] = "COPY-LIST");
1408         return v101;
1409     })((function (v100){
1410         if (arguments.length < 1) throw 'too few arguments';
1411         if (arguments.length > 1) throw 'too many arguments';
1412         return (function(){
1413             try {
1414                 return (function(){
1415                     return l68.function((function(){
1416                         var symbol = l69;
1417                         var func = symbol.function;
1418                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1419                         return func;
1420                     })(), v100);
1421                 })();
1422             }
1423             catch (cf){
1424                 if (cf.type == 'block' && cf.id == 45)
1425                     return cf.value;
1426                 else
1427                     throw cf;
1428             }
1429         })();
1430
1431     }));
1432     return l70;
1433 })();
1434 var l71 = {name: "CODE-CHAR"};
1435 (function(){
1436     (l71).function = (function(v103){
1437         ((v103)["fname"] = "CODE-CHAR");
1438         return v103;
1439     })((function (v102){
1440         if (arguments.length < 1) throw 'too few arguments';
1441         if (arguments.length > 1) throw 'too many arguments';
1442         return (function(){
1443             try {
1444                 return (function(){
1445                     return v102;
1446                 })();
1447             }
1448             catch (cf){
1449                 if (cf.type == 'block' && cf.id == 46)
1450                     return cf.value;
1451                 else
1452                     throw cf;
1453             }
1454         })();
1455
1456     }));
1457     return l71;
1458 })();
1459 var l72 = {name: "CHAR-CODE"};
1460 (function(){
1461     (l72).function = (function(v105){
1462         ((v105)["fname"] = "CHAR-CODE");
1463         return v105;
1464     })((function (v104){
1465         if (arguments.length < 1) throw 'too few arguments';
1466         if (arguments.length > 1) throw 'too many arguments';
1467         return (function(){
1468             try {
1469                 return (function(){
1470                     return v104;
1471                 })();
1472             }
1473             catch (cf){
1474                 if (cf.type == 'block' && cf.id == 47)
1475                     return cf.value;
1476                 else
1477                     throw cf;
1478             }
1479         })();
1480
1481     }));
1482     return l72;
1483 })();
1484 var l73 = {name: "CHAR="};
1485 (function(){
1486     (l73).function = (function(v108){
1487         ((v108)["fname"] = "CHAR=");
1488         return v108;
1489     })((function (v106,v107){
1490         if (arguments.length < 2) throw 'too few arguments';
1491         if (arguments.length > 2) throw 'too many arguments';
1492         return (function(){
1493             try {
1494                 return (function(){
1495                     return ((function(){
1496                         var x = v106;
1497                         var y = v107;
1498                         if (typeof x != 'number')
1499                             throw 'The value ' + x + ' is not a type number.';
1500                         if (typeof y != 'number')
1501                             throw 'The value ' + y + ' is not a type number.';
1502                         return x==y;
1503                     })()?l4.value: l3.value);
1504                 })();
1505             }
1506             catch (cf){
1507                 if (cf.type == 'block' && cf.id == 48)
1508                     return cf.value;
1509                 else
1510                     throw cf;
1511             }
1512         })();
1513
1514     }));
1515     return l73;
1516 })();
1517 var l74 = {name: "INTEGERP"};
1518 (function(){
1519     (l74).function = (function(v110){
1520         ((v110)["fname"] = "INTEGERP");
1521         return v110;
1522     })((function (v109){
1523         if (arguments.length < 1) throw 'too few arguments';
1524         if (arguments.length > 1) throw 'too many arguments';
1525         return (function(){
1526             try {
1527                 return (function(){
1528                     return (((typeof (v109) == "number")?l4.value: l3.value) !== l3.value ? ((function(){
1529                         var x = (function(){
1530                             var x = v109;
1531                             if (typeof x != 'number')
1532                                 throw 'The value ' + x + ' is not a type number.';
1533                             return Math.floor(x);
1534                         })();
1535                         var y = v109;
1536                         if (typeof x != 'number')
1537                             throw 'The value ' + x + ' is not a type number.';
1538                         if (typeof y != 'number')
1539                             throw 'The value ' + y + ' is not a type number.';
1540                         return x==y;
1541                     })()?l4.value: l3.value) : l3.value);
1542                 })();
1543             }
1544             catch (cf){
1545                 if (cf.type == 'block' && cf.id == 49)
1546                     return cf.value;
1547                 else
1548                     throw cf;
1549             }
1550         })();
1551
1552     }));
1553     return l74;
1554 })();
1555 var l75 = {name: "PLUSP"};
1556 (function(){
1557     (l75).function = (function(v112){
1558         ((v112)["fname"] = "PLUSP");
1559         return v112;
1560     })((function (v111){
1561         if (arguments.length < 1) throw 'too few arguments';
1562         if (arguments.length > 1) throw 'too many arguments';
1563         return (function(){
1564             try {
1565                 return (function(){
1566                     return ((function(){
1567                         var x = 0;
1568                         var y = v111;
1569                         if (typeof x != 'number')
1570                             throw 'The value ' + x + ' is not a type number.';
1571                         if (typeof y != 'number')
1572                             throw 'The value ' + y + ' is not a type number.';
1573                         return x<y;
1574                     })()?l4.value: l3.value);
1575                 })();
1576             }
1577             catch (cf){
1578                 if (cf.type == 'block' && cf.id == 50)
1579                     return cf.value;
1580                 else
1581                     throw cf;
1582             }
1583         })();
1584
1585     }));
1586     return l75;
1587 })();
1588 var l76 = {name: "MINUSP"};
1589 (function(){
1590     (l76).function = (function(v114){
1591         ((v114)["fname"] = "MINUSP");
1592         return v114;
1593     })((function (v113){
1594         if (arguments.length < 1) throw 'too few arguments';
1595         if (arguments.length > 1) throw 'too many arguments';
1596         return (function(){
1597             try {
1598                 return (function(){
1599                     return ((function(){
1600                         var x = v113;
1601                         var y = 0;
1602                         if (typeof x != 'number')
1603                             throw 'The value ' + x + ' is not a type number.';
1604                         if (typeof y != 'number')
1605                             throw 'The value ' + y + ' is not a type number.';
1606                         return x<y;
1607                     })()?l4.value: l3.value);
1608                 })();
1609             }
1610             catch (cf){
1611                 if (cf.type == 'block' && cf.id == 51)
1612                     return cf.value;
1613                 else
1614                     throw cf;
1615             }
1616         })();
1617
1618     }));
1619     return l76;
1620 })();
1621 (function(){
1622     (l59).function = (function(v117){
1623         ((v117)["fname"] = "LISTP");
1624         return v117;
1625     })((function (v115){
1626         if (arguments.length < 1) throw 'too few arguments';
1627         if (arguments.length > 1) throw 'too many arguments';
1628         return (function(){
1629             try {
1630                 return (function(){
1631                     return (function(v116){
1632                         return (v116 !== l3.value ? v116 : l11.function(v115));
1633                     })(((function(){
1634                         var tmp = v115;
1635                         return (typeof tmp == 'object' && 'car' in tmp);
1636                     })()?l4.value: l3.value));
1637                 })();
1638             }
1639             catch (cf){
1640                 if (cf.type == 'block' && cf.id == 52)
1641                     return cf.value;
1642                 else
1643                     throw cf;
1644             }
1645         })();
1646
1647     }));
1648     return l59;
1649 })();
1650 var l77 = {name: "NTHCDR"};
1651 (function(){
1652     (l77).function = (function(v120){
1653         ((v120)["fname"] = "NTHCDR");
1654         return v120;
1655     })((function (v118,v119){
1656         if (arguments.length < 2) throw 'too few arguments';
1657         if (arguments.length > 2) throw 'too many arguments';
1658         return (function(){
1659             try {
1660                 return (function(){
1661                     (function(){
1662                         try {
1663                             return (function(){
1664                                 return (function(){
1665                                     while((l75.function(v118) !== l3.value ? v119 : l3.value) !== l3.value){
1666                                         v118 = l24.function(v118);
1667                                         v119 = (function(){
1668                                             var tmp = v119;
1669                                             return tmp === l3.value? l3.value: tmp.cdr;
1670                                         })();
1671                                     }return l3.value;
1672                                 })();
1673                             })();
1674                         }
1675                         catch (cf){
1676                             if (cf.type == 'block' && cf.id == 54)
1677                                 return cf.value;
1678                             else
1679                                 throw cf;
1680                         }
1681                     })();
1682                     return v119;
1683                 })();
1684             }
1685             catch (cf){
1686                 if (cf.type == 'block' && cf.id == 53)
1687                     return cf.value;
1688                 else
1689                     throw cf;
1690             }
1691         })();
1692
1693     }));
1694     return l77;
1695 })();
1696 var l78 = {name: "NTH"};
1697 (function(){
1698     (l78).function = (function(v123){
1699         ((v123)["fname"] = "NTH");
1700         return v123;
1701     })((function (v121,v122){
1702         if (arguments.length < 2) throw 'too few arguments';
1703         if (arguments.length > 2) throw 'too many arguments';
1704         return (function(){
1705             try {
1706                 return (function(){
1707                     return (function(){
1708                         var tmp = l77.function(v121, v122);
1709                         return tmp === l3.value? l3.value: tmp.car;
1710                     })();
1711                 })();
1712             }
1713             catch (cf){
1714                 if (cf.type == 'block' && cf.id == 55)
1715                     return cf.value;
1716                 else
1717                     throw cf;
1718             }
1719         })();
1720
1721     }));
1722     return l78;
1723 })();
1724 var l79 = {name: "LAST"};
1725 (function(){
1726     (l79).function = (function(v125){
1727         ((v125)["fname"] = "LAST");
1728         return v125;
1729     })((function (v124){
1730         if (arguments.length < 1) throw 'too few arguments';
1731         if (arguments.length > 1) throw 'too many arguments';
1732         return (function(){
1733             try {
1734                 return (function(){
1735                     (function(){
1736                         try {
1737                             return (function(){
1738                                 return (function(){
1739                                     while(((function(){
1740                                         var tmp = (function(){
1741                                             var tmp = v124;
1742                                             return tmp === l3.value? l3.value: tmp.cdr;
1743                                         })();
1744                                         return (typeof tmp == 'object' && 'car' in tmp);
1745                                     })()?l4.value: l3.value) !== l3.value){
1746                                         v124 = (function(){
1747                                             var tmp = v124;
1748                                             return tmp === l3.value? l3.value: tmp.cdr;
1749                                         })();
1750                                     }return l3.value;
1751                                 })();
1752                             })();
1753                         }
1754                         catch (cf){
1755                             if (cf.type == 'block' && cf.id == 57)
1756                                 return cf.value;
1757                             else
1758                                 throw cf;
1759                         }
1760                     })();
1761                     return v124;
1762                 })();
1763             }
1764             catch (cf){
1765                 if (cf.type == 'block' && cf.id == 56)
1766                     return cf.value;
1767                 else
1768                     throw cf;
1769             }
1770         })();
1771
1772     }));
1773     return l79;
1774 })();
1775 var l80 = {name: "BUTLAST"};
1776 (function(){
1777     (l80).function = (function(v127){
1778         ((v127)["fname"] = "BUTLAST");
1779         return v127;
1780     })((function (v126){
1781         if (arguments.length < 1) throw 'too few arguments';
1782         if (arguments.length > 1) throw 'too many arguments';
1783         return (function(){
1784             try {
1785                 return (function(){
1786                     return (((function(){
1787                         var tmp = (function(){
1788                             var tmp = v126;
1789                             return tmp === l3.value? l3.value: tmp.cdr;
1790                         })();
1791                         return (typeof tmp == 'object' && 'car' in tmp);
1792                     })()?l4.value: l3.value) !== l3.value ? ({car: (function(){
1793                         var tmp = v126;
1794                         return tmp === l3.value? l3.value: tmp.car;
1795                     })(), cdr: l80.function((function(){
1796                         var tmp = v126;
1797                         return tmp === l3.value? l3.value: tmp.cdr;
1798                     })())}) : l3.value);
1799                 })();
1800             }
1801             catch (cf){
1802                 if (cf.type == 'block' && cf.id == 58)
1803                     return cf.value;
1804                 else
1805                     throw cf;
1806             }
1807         })();
1808
1809     }));
1810     return l80;
1811 })();
1812 var l81 = {name: "MEMBER"};
1813 (function(){
1814     (l81).function = (function(v130){
1815         ((v130)["fname"] = "MEMBER");
1816         return v130;
1817     })((function (v128,v129){
1818         if (arguments.length < 2) throw 'too few arguments';
1819         if (arguments.length > 2) throw 'too many arguments';
1820         return (function(){
1821             try {
1822                 return (function(){
1823                     return (function(){
1824                         try {
1825                             return (function(){
1826                                 return (function(){
1827                                     while(v129 !== l3.value){
1828                                         (l27.function(v128, (function(){
1829                                             var tmp = v129;
1830                                             return tmp === l3.value? l3.value: tmp.car;
1831                                         })()) !== l3.value ? (function(){
1832                                             return (function(){
1833                                                 throw ({type: 'block', id: 60, value: v129, message: 'Return from unknown block NIL.'})
1834                                             })();
1835                                         })() : l3.value);
1836                                         v129 = (function(){
1837                                             var tmp = v129;
1838                                             return tmp === l3.value? l3.value: tmp.cdr;
1839                                         })();
1840                                     }return l3.value;
1841                                 })();
1842                             })();
1843                         }
1844                         catch (cf){
1845                             if (cf.type == 'block' && cf.id == 60)
1846                                 return cf.value;
1847                             else
1848                                 throw cf;
1849                         }
1850                     })();
1851                 })();
1852             }
1853             catch (cf){
1854                 if (cf.type == 'block' && cf.id == 59)
1855                     return cf.value;
1856                 else
1857                     throw cf;
1858             }
1859         })();
1860
1861     }));
1862     return l81;
1863 })();
1864 var l82 = {name: "REMOVE"};
1865 (function(){
1866     (l82).function = (function(v133){
1867         ((v133)["fname"] = "REMOVE");
1868         return v133;
1869     })((function (v131,v132){
1870         if (arguments.length < 2) throw 'too few arguments';
1871         if (arguments.length > 2) throw 'too many arguments';
1872         return (function(){
1873             try {
1874                 return (function(){
1875                     return (l11.function(v132) !== l3.value ? (function(){
1876                         return l3.value;
1877                     })() : (l27.function(v131, (function(){
1878                         var tmp = v132;
1879                         return tmp === l3.value? l3.value: tmp.car;
1880                     })()) !== l3.value ? (function(){
1881                         return l82.function(v131, (function(){
1882                             var tmp = v132;
1883                             return tmp === l3.value? l3.value: tmp.cdr;
1884                         })());
1885                     })() : (function(){
1886                         return ({car: (function(){
1887                             var tmp = v132;
1888                             return tmp === l3.value? l3.value: tmp.car;
1889                         })(), cdr: l82.function(v131, (function(){
1890                             var tmp = v132;
1891                             return tmp === l3.value? l3.value: tmp.cdr;
1892                         })())});
1893                     })()));
1894                 })();
1895             }
1896             catch (cf){
1897                 if (cf.type == 'block' && cf.id == 61)
1898                     return cf.value;
1899                 else
1900                     throw cf;
1901             }
1902         })();
1903
1904     }));
1905     return l82;
1906 })();
1907 var l83 = {name: "REMOVE-IF"};
1908 (function(){
1909     (l83).function = (function(v136){
1910         ((v136)["fname"] = "REMOVE-IF");
1911         return v136;
1912     })((function (v134,v135){
1913         if (arguments.length < 2) throw 'too few arguments';
1914         if (arguments.length > 2) throw 'too many arguments';
1915         return (function(){
1916             try {
1917                 return (function(){
1918                     return (l11.function(v135) !== l3.value ? (function(){
1919                         return l3.value;
1920                     })() : ((v134)((function(){
1921                         var tmp = v135;
1922                         return tmp === l3.value? l3.value: tmp.car;
1923                     })()) !== l3.value ? (function(){
1924                         return l83.function(v134, (function(){
1925                             var tmp = v135;
1926                             return tmp === l3.value? l3.value: tmp.cdr;
1927                         })());
1928                     })() : (function(){
1929                         return ({car: (function(){
1930                             var tmp = v135;
1931                             return tmp === l3.value? l3.value: tmp.car;
1932                         })(), cdr: l83.function(v134, (function(){
1933                             var tmp = v135;
1934                             return tmp === l3.value? l3.value: tmp.cdr;
1935                         })())});
1936                     })()));
1937                 })();
1938             }
1939             catch (cf){
1940                 if (cf.type == 'block' && cf.id == 62)
1941                     return cf.value;
1942                 else
1943                     throw cf;
1944             }
1945         })();
1946
1947     }));
1948     return l83;
1949 })();
1950 var l84 = {name: "REMOVE-IF-NOT"};
1951 (function(){
1952     (l84).function = (function(v139){
1953         ((v139)["fname"] = "REMOVE-IF-NOT");
1954         return v139;
1955     })((function (v137,v138){
1956         if (arguments.length < 2) throw 'too few arguments';
1957         if (arguments.length > 2) throw 'too many arguments';
1958         return (function(){
1959             try {
1960                 return (function(){
1961                     return (l11.function(v138) !== l3.value ? (function(){
1962                         return l3.value;
1963                     })() : ((v137)((function(){
1964                         var tmp = v138;
1965                         return tmp === l3.value? l3.value: tmp.car;
1966                     })()) !== l3.value ? (function(){
1967                         return ({car: (function(){
1968                             var tmp = v138;
1969                             return tmp === l3.value? l3.value: tmp.car;
1970                         })(), cdr: l84.function(v137, (function(){
1971                             var tmp = v138;
1972                             return tmp === l3.value? l3.value: tmp.cdr;
1973                         })())});
1974                     })() : (function(){
1975                         return l84.function(v137, (function(){
1976                             var tmp = v138;
1977                             return tmp === l3.value? l3.value: tmp.cdr;
1978                         })());
1979                     })()));
1980                 })();
1981             }
1982             catch (cf){
1983                 if (cf.type == 'block' && cf.id == 63)
1984                     return cf.value;
1985                 else
1986                     throw cf;
1987             }
1988         })();
1989
1990     }));
1991     return l84;
1992 })();
1993 var l85 = {name: "DIGIT-CHAR-P"};
1994 (function(){
1995     (l85).function = (function(v141){
1996         ((v141)["fname"] = "DIGIT-CHAR-P");
1997         return v141;
1998     })((function (v140){
1999         if (arguments.length < 1) throw 'too few arguments';
2000         if (arguments.length > 1) throw 'too many arguments';
2001         return (function(){
2002             try {
2003                 return (function(){
2004                     return ((((function(){
2005                         var x = 48;
2006                         var y = v140;
2007                         if (typeof x != 'number')
2008                             throw 'The value ' + x + ' is not a type number.';
2009                         if (typeof y != 'number')
2010                             throw 'The value ' + y + ' is not a type number.';
2011                         return x<=y;
2012                     })()?l4.value: l3.value) !== l3.value ? ((function(){
2013                         var x = v140;
2014                         var y = 57;
2015                         if (typeof x != 'number')
2016                             throw 'The value ' + x + ' is not a type number.';
2017                         if (typeof y != 'number')
2018                             throw 'The value ' + y + ' is not a type number.';
2019                         return x<=y;
2020                     })()?l4.value: l3.value) : l3.value) !== l3.value ? (function(){
2021                         var x = v140;
2022                         var y = 48;
2023                         if (typeof x != 'number')
2024                             throw 'The value ' + x + ' is not a type number.';
2025                         if (typeof y != 'number')
2026                             throw 'The value ' + y + ' is not a type number.';
2027                         return x-y;
2028                     })() : l3.value);
2029                 })();
2030             }
2031             catch (cf){
2032                 if (cf.type == 'block' && cf.id == 64)
2033                     return cf.value;
2034                 else
2035                     throw cf;
2036             }
2037         })();
2038
2039     }));
2040     return l85;
2041 })();
2042 var l86 = {name: "SUBSEQ"};
2043 (function(){
2044     (l86).function = (function(v145){
2045         ((v145)["fname"] = "SUBSEQ");
2046         return v145;
2047     })((function (v142,v143,v144){
2048         if (arguments.length < 2) throw 'too few arguments';
2049         if (arguments.length > 3) throw 'too many arguments';
2050         switch(arguments.length){
2051         case 2:
2052         v144=l3.value;
2053         default: break;
2054         }
2055         return (function(){
2056             try {
2057                 return (function(){
2058                     return (((typeof(v142) == "string")?l4.value: l3.value) !== l3.value ? (function(){
2059                         return (v144 !== l3.value ? (function(){
2060                             var str = v142;
2061                             var a = v143;
2062                             var b;
2063                             b = v144;
2064                             return str.slice(a,b);
2065                         })() : (function(){
2066                             var str = v142;
2067                             var a = v143;
2068                             var b;
2069                             return str.slice(a,b);
2070                         })());
2071                     })() : (function(){
2072                         return (function(){
2073                             throw "Unsupported argument.";
2074                         })();
2075                     })());
2076                 })();
2077             }
2078             catch (cf){
2079                 if (cf.type == 'block' && cf.id == 65)
2080                     return cf.value;
2081                 else
2082                     throw cf;
2083             }
2084         })();
2085
2086     }));
2087     return l86;
2088 })();
2089 var l87 = {name: "PARSE-INTEGER"};
2090 (function(){
2091     (l87).function = (function(v150){
2092         ((v150)["fname"] = "PARSE-INTEGER");
2093         return v150;
2094     })((function (v146){
2095         if (arguments.length < 1) throw 'too few arguments';
2096         if (arguments.length > 1) throw 'too many arguments';
2097         return (function(){
2098             try {
2099                 return (function(){
2100                     return (function(v147,v148,v149){
2101                         (function(){
2102                             try {
2103                                 return (function(){
2104                                     return (function(){
2105                                         while(((function(){
2106                                             var x = v148;
2107                                             var y = v149;
2108                                             if (typeof x != 'number')
2109                                                 throw 'The value ' + x + ' is not a type number.';
2110                                             if (typeof y != 'number')
2111                                                 throw 'The value ' + y + ' is not a type number.';
2112                                             return x<y;
2113                                         })()?l4.value: l3.value) !== l3.value){
2114                                             v147 = (function(){
2115                                                 var x = (function(){
2116                                                     var x = v147;
2117                                                     var y = 10;
2118                                                     if (typeof x != 'number')
2119                                                         throw 'The value ' + x + ' is not a type number.';
2120                                                     if (typeof y != 'number')
2121                                                         throw 'The value ' + y + ' is not a type number.';
2122                                                     return x*y;
2123                                                 })();
2124                                                 var y = l85.function((function(){
2125                                                     var string = v146;
2126                                                     var index = v148;
2127                                                     if (typeof string != 'string')
2128                                                         throw 'The value ' + string + ' is not a type string.';
2129                                                     if (typeof index != 'number')
2130                                                         throw 'The value ' + index + ' is not a type number.';
2131                                                     return string.charCodeAt(index);
2132                                                 })());
2133                                                 if (typeof x != 'number')
2134                                                     throw 'The value ' + x + ' is not a type number.';
2135                                                 if (typeof y != 'number')
2136                                                     throw 'The value ' + y + ' is not a type number.';
2137                                                 return x+y;
2138                                             })();
2139                                             v148 = (function(){
2140                                                 var x = v148;
2141                                                 var y = 1;
2142                                                 if (typeof x != 'number')
2143                                                     throw 'The value ' + x + ' is not a type number.';
2144                                                 if (typeof y != 'number')
2145                                                     throw 'The value ' + y + ' is not a type number.';
2146                                                 return x+y;
2147                                             })();
2148                                         }return l3.value;
2149                                     })();
2150                                 })();
2151                             }
2152                             catch (cf){
2153                                 if (cf.type == 'block' && cf.id == 67)
2154                                     return cf.value;
2155                                 else
2156                                     throw cf;
2157                             }
2158                         })();
2159                         return v147;
2160                     })(0,0,l66.function(v146));
2161                 })();
2162             }
2163             catch (cf){
2164                 if (cf.type == 'block' && cf.id == 66)
2165                     return cf.value;
2166                 else
2167                     throw cf;
2168             }
2169         })();
2170
2171     }));
2172     return l87;
2173 })();
2174 var l88 = {name: "SOME"};
2175 (function(){
2176     (l88).function = (function(v157){
2177         ((v157)["fname"] = "SOME");
2178         return v157;
2179     })((function (v151,v152){
2180         if (arguments.length < 2) throw 'too few arguments';
2181         if (arguments.length > 2) throw 'too many arguments';
2182         return (function(){
2183             try {
2184                 return (function(){
2185                     return (((typeof(v152) == "string")?l4.value: l3.value) !== l3.value ? (function(){
2186                         return (function(v153,v154){
2187                             (function(){
2188                                 try {
2189                                     return (function(){
2190                                         return (function(){
2191                                             while(((function(){
2192                                                 var x = v153;
2193                                                 var y = v154;
2194                                                 if (typeof x != 'number')
2195                                                     throw 'The value ' + x + ' is not a type number.';
2196                                                 if (typeof y != 'number')
2197                                                     throw 'The value ' + y + ' is not a type number.';
2198                                                 return x<y;
2199                                             })()?l4.value: l3.value) !== l3.value){
2200                                                 ((v151)((function(){
2201                                                     var string = v152;
2202                                                     var index = v153;
2203                                                     if (typeof string != 'string')
2204                                                         throw 'The value ' + string + ' is not a type string.';
2205                                                     if (typeof index != 'number')
2206                                                         throw 'The value ' + index + ' is not a type number.';
2207                                                     return string.charCodeAt(index);
2208                                                 })()) !== l3.value ? (function(){
2209                                                     return (function(){
2210                                                         throw ({type: 'block', id: 68, value: l4.value, message: 'Return from unknown block SOME.'})
2211                                                     })();
2212                                                 })() : l3.value);
2213                                                 v153 = (function(){
2214                                                     var x = v153;
2215                                                     var y = 1;
2216                                                     if (typeof x != 'number')
2217                                                         throw 'The value ' + x + ' is not a type number.';
2218                                                     if (typeof y != 'number')
2219                                                         throw 'The value ' + y + ' is not a type number.';
2220                                                     return x+y;
2221                                                 })();
2222                                             }return l3.value;
2223                                         })();
2224                                     })();
2225                                 }
2226                                 catch (cf){
2227                                     if (cf.type == 'block' && cf.id == 69)
2228                                         return cf.value;
2229                                     else
2230                                         throw cf;
2231                                 }
2232                             })();
2233                             return l3.value;
2234                         })(0,l66.function(v152));
2235                     })() : (l59.function(v152) !== l3.value ? (function(){
2236                         return (function(){
2237                             try {
2238                                 return (function(){
2239                                     return (function(v155,v156){
2240                                         (function(){
2241                                             while(v155 !== l3.value){
2242                                                 v156 = (function(){
2243                                                     var tmp = v155;
2244                                                     return tmp === l3.value? l3.value: tmp.car;
2245                                                 })();
2246                                                 (function(){
2247                                                     ((v151)(v156) !== l3.value ? (function(){
2248                                                         return (function(){
2249                                                             throw ({type: 'block', id: 70, value: l4.value, message: 'Return from unknown block NIL.'})
2250                                                         })();
2251                                                     })() : l3.value);
2252                                                     return l3.value;
2253                                                 })();
2254                                                 v155 = (function(){
2255                                                     var tmp = v155;
2256                                                     return tmp === l3.value? l3.value: tmp.cdr;
2257                                                 })();
2258                                             }return l3.value;
2259                                         })();
2260                                         return l3.value;
2261                                     })(v152,l3.value);
2262                                 })();
2263                             }
2264                             catch (cf){
2265                                 if (cf.type == 'block' && cf.id == 70)
2266                                     return cf.value;
2267                                 else
2268                                     throw cf;
2269                             }
2270                         })();
2271                     })() : (function(){
2272                         return (function(){
2273                             throw "Unknown sequence.";
2274                         })();
2275                     })()));
2276                 })();
2277             }
2278             catch (cf){
2279                 if (cf.type == 'block' && cf.id == 68)
2280                     return cf.value;
2281                 else
2282                     throw cf;
2283             }
2284         })();
2285
2286     }));
2287     return l88;
2288 })();
2289 var l89 = {name: "EVERY"};
2290 (function(){
2291     (l89).function = (function(v164){
2292         ((v164)["fname"] = "EVERY");
2293         return v164;
2294     })((function (v158,v159){
2295         if (arguments.length < 2) throw 'too few arguments';
2296         if (arguments.length > 2) throw 'too many arguments';
2297         return (function(){
2298             try {
2299                 return (function(){
2300                     return (((typeof(v159) == "string")?l4.value: l3.value) !== l3.value ? (function(){
2301                         return (function(v160,v161){
2302                             (function(){
2303                                 try {
2304                                     return (function(){
2305                                         return (function(){
2306                                             while(((function(){
2307                                                 var x = v160;
2308                                                 var y = v161;
2309                                                 if (typeof x != 'number')
2310                                                     throw 'The value ' + x + ' is not a type number.';
2311                                                 if (typeof y != 'number')
2312                                                     throw 'The value ' + y + ' is not a type number.';
2313                                                 return x<y;
2314                                             })()?l4.value: l3.value) !== l3.value){
2315                                                 ((v158)((function(){
2316                                                     var string = v159;
2317                                                     var index = v160;
2318                                                     if (typeof string != 'string')
2319                                                         throw 'The value ' + string + ' is not a type string.';
2320                                                     if (typeof index != 'number')
2321                                                         throw 'The value ' + index + ' is not a type number.';
2322                                                     return string.charCodeAt(index);
2323                                                 })()) !== l3.value ? l3.value : (function(){
2324                                                     return (function(){
2325                                                         throw ({type: 'block', id: 71, value: l3.value, message: 'Return from unknown block EVERY.'})
2326                                                     })();
2327                                                 })());
2328                                                 v160 = (function(){
2329                                                     var x = v160;
2330                                                     var y = 1;
2331                                                     if (typeof x != 'number')
2332                                                         throw 'The value ' + x + ' is not a type number.';
2333                                                     if (typeof y != 'number')
2334                                                         throw 'The value ' + y + ' is not a type number.';
2335                                                     return x+y;
2336                                                 })();
2337                                             }return l3.value;
2338                                         })();
2339                                     })();
2340                                 }
2341                                 catch (cf){
2342                                     if (cf.type == 'block' && cf.id == 72)
2343                                         return cf.value;
2344                                     else
2345                                         throw cf;
2346                                 }
2347                             })();
2348                             return l4.value;
2349                         })(0,l66.function(v159));
2350                     })() : (l59.function(v159) !== l3.value ? (function(){
2351                         return (function(){
2352                             try {
2353                                 return (function(){
2354                                     return (function(v162,v163){
2355                                         (function(){
2356                                             while(v162 !== l3.value){
2357                                                 v163 = (function(){
2358                                                     var tmp = v162;
2359                                                     return tmp === l3.value? l3.value: tmp.car;
2360                                                 })();
2361                                                 (function(){
2362                                                     ((v158)(v163) !== l3.value ? l3.value : (function(){
2363                                                         return (function(){
2364                                                             throw ({type: 'block', id: 73, value: l3.value, message: 'Return from unknown block NIL.'})
2365                                                         })();
2366                                                     })());
2367                                                     return l3.value;
2368                                                 })();
2369                                                 v162 = (function(){
2370                                                     var tmp = v162;
2371                                                     return tmp === l3.value? l3.value: tmp.cdr;
2372                                                 })();
2373                                             }return l3.value;
2374                                         })();
2375                                         return l4.value;
2376                                     })(v159,l3.value);
2377                                 })();
2378                             }
2379                             catch (cf){
2380                                 if (cf.type == 'block' && cf.id == 73)
2381                                     return cf.value;
2382                                 else
2383                                     throw cf;
2384                             }
2385                         })();
2386                     })() : (function(){
2387                         return (function(){
2388                             throw "Unknown sequence.";
2389                         })();
2390                     })()));
2391                 })();
2392             }
2393             catch (cf){
2394                 if (cf.type == 'block' && cf.id == 71)
2395                     return cf.value;
2396                 else
2397                     throw cf;
2398             }
2399         })();
2400
2401     }));
2402     return l89;
2403 })();
2404 var l90 = {name: "ASSOC"};
2405 (function(){
2406     (l90).function = (function(v167){
2407         ((v167)["fname"] = "ASSOC");
2408         return v167;
2409     })((function (v165,v166){
2410         if (arguments.length < 2) throw 'too few arguments';
2411         if (arguments.length > 2) throw 'too many arguments';
2412         return (function(){
2413             try {
2414                 return (function(){
2415                     (function(){
2416                         try {
2417                             return (function(){
2418                                 return (function(){
2419                                     while(v166 !== l3.value){
2420                                         (l27.function(v165, l33.function(v166)) !== l3.value ? (function(){
2421                                             throw ({type: 'block', id: 75, value: l3.value, message: 'Return from unknown block NIL.'})
2422                                         })() : v166 = (function(){
2423                                             var tmp = v166;
2424                                             return tmp === l3.value? l3.value: tmp.cdr;
2425                                         })());
2426                                     }return l3.value;
2427                                 })();
2428                             })();
2429                         }
2430                         catch (cf){
2431                             if (cf.type == 'block' && cf.id == 75)
2432                                 return cf.value;
2433                             else
2434                                 throw cf;
2435                         }
2436                     })();
2437                     return (function(){
2438                         var tmp = v166;
2439                         return tmp === l3.value? l3.value: tmp.car;
2440                     })();
2441                 })();
2442             }
2443             catch (cf){
2444                 if (cf.type == 'block' && cf.id == 74)
2445                     return cf.value;
2446                 else
2447                     throw cf;
2448             }
2449         })();
2450
2451     }));
2452     return l90;
2453 })();
2454 var l91 = {name: "STRING"};
2455 (function(){
2456     (l91).function = (function(v169){
2457         ((v169)["fname"] = "STRING");
2458         return v169;
2459     })((function (v168){
2460         if (arguments.length < 1) throw 'too few arguments';
2461         if (arguments.length > 1) throw 'too many arguments';
2462         return (function(){
2463             try {
2464                 return (function(){
2465                     return (((typeof(v168) == "string")?l4.value: l3.value) !== l3.value ? (function(){
2466                         return v168;
2467                     })() : (((function(){
2468                         var tmp = v168;
2469                         return (typeof tmp == 'object' && 'name' in tmp);
2470                     })()?l4.value: l3.value) !== l3.value ? (function(){
2471                         return (v168).name;
2472                     })() : (function(){
2473                         return (function(){
2474                             var x = v168;
2475                             if (typeof x != 'number')
2476                                 throw 'The value ' + x + ' is not a type number.';
2477                             return String.fromCharCode(x);
2478                         })();
2479                     })()));
2480                 })();
2481             }
2482             catch (cf){
2483                 if (cf.type == 'block' && cf.id == 76)
2484                     return cf.value;
2485                 else
2486                     throw cf;
2487             }
2488         })();
2489
2490     }));
2491     return l91;
2492 })();
2493 var l92 = {name: "STRING="};
2494 (function(){
2495     (l92).function = (function(v172){
2496         ((v172)["fname"] = "STRING=");
2497         return v172;
2498     })((function (v170,v171){
2499         if (arguments.length < 2) throw 'too few arguments';
2500         if (arguments.length > 2) throw 'too many arguments';
2501         return (function(){
2502             try {
2503                 return (function(){
2504                     return ((v170 == v171)?l4.value: l3.value);
2505                 })();
2506             }
2507             catch (cf){
2508                 if (cf.type == 'block' && cf.id == 77)
2509                     return cf.value;
2510                 else
2511                     throw cf;
2512             }
2513         })();
2514
2515     }));
2516     return l92;
2517 })();
2518 var l93 = {name: "FDEFINITION"};
2519 (function(){
2520     (l93).function = (function(v174){
2521         ((v174)["fname"] = "FDEFINITION");
2522         return v174;
2523     })((function (v173){
2524         if (arguments.length < 1) throw 'too few arguments';
2525         if (arguments.length > 1) throw 'too many arguments';
2526         return (function(){
2527             try {
2528                 return (function(){
2529                     return (((typeof v173 == 'function')?l4.value: l3.value) !== l3.value ? (function(){
2530                         return v173;
2531                     })() : (((function(){
2532                         var tmp = v173;
2533                         return (typeof tmp == 'object' && 'name' in tmp);
2534                     })()?l4.value: l3.value) !== l3.value ? (function(){
2535                         return (function(){
2536                             var symbol = v173;
2537                             var func = symbol.function;
2538                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2539                             return func;
2540                         })();
2541                     })() : (function(){
2542                         return (function(){
2543                             throw "Invalid function";
2544                         })();
2545                     })()));
2546                 })();
2547             }
2548             catch (cf){
2549                 if (cf.type == 'block' && cf.id == 78)
2550                     return cf.value;
2551                 else
2552                     throw cf;
2553             }
2554         })();
2555
2556     }));
2557     return l93;
2558 })();
2559 var l94 = {name: "DISASSEMBLE"};
2560 var l95 = {name: "WRITE-LINE"};
2561 (function(){
2562     (l94).function = (function(v176){
2563         ((v176)["fname"] = "DISASSEMBLE");
2564         return v176;
2565     })((function (v175){
2566         if (arguments.length < 1) throw 'too few arguments';
2567         if (arguments.length > 1) throw 'too many arguments';
2568         return (function(){
2569             try {
2570                 return (function(){
2571                     (function(){
2572                         var symbol = l95;
2573                         var func = symbol.function;
2574                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2575                         return func;
2576                     })()((l93.function(v175)).toString());
2577                     return l3.value;
2578                 })();
2579             }
2580             catch (cf){
2581                 if (cf.type == 'block' && cf.id == 79)
2582                     return cf.value;
2583                 else
2584                     throw cf;
2585             }
2586         })();
2587
2588     }));
2589     return l94;
2590 })();
2591 var l96 = {name: "DOCUMENTATION"};
2592 var l97 = {name: "FUNCTION"};
2593 var l98 = {name: "VARIABLE"};
2594 (function(){
2595     (l96).function = (function(v181){
2596         ((v181)["fname"] = "DOCUMENTATION");
2597         return v181;
2598     })((function(){
2599         var func = (function (v177,v178){
2600             if (arguments.length < 2) throw 'too few arguments';
2601             if (arguments.length > 2) throw 'too many arguments';
2602             return (function(){
2603                 try {
2604                     return (function(){
2605                         return (function(v179){
2606                             return (l27.function(v179, l97) !== l3.value ? (function(){
2607                                 return (function(v180){
2608                                     return (function(){
2609                                         var tmp = (v180)["docstring"];
2610                                         return tmp == undefined? l3.value: tmp ;
2611                                     })();
2612                                 })(l93.function(v177));
2613                             })() : (l27.function(v179, l98) !== l3.value ? (function(){
2614                                 (((function(){
2615                                     var tmp = v177;
2616                                     return (typeof tmp == 'object' && 'name' in tmp);
2617                                 })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
2618                                     return (function(){
2619                                         throw "Wrong argument type! it should be a symbol";
2620                                     })();
2621                                 })());
2622                                 return (function(){
2623                                     var tmp = (v177)["vardoc"];
2624                                     return tmp == undefined? l3.value: tmp ;
2625                                 })();
2626                             })() : (function(){
2627                                 return (function(){
2628                                     throw "ECASE expression failed.";
2629                                 })();
2630                             })()));
2631                         })(v178);
2632                     })();
2633                 }
2634                 catch (cf){
2635                     if (cf.type == 'block' && cf.id == 80)
2636                         return cf.value;
2637                     else
2638                         throw cf;
2639                 }
2640             })();
2641
2642         });
2643         func.docstring = 'Return the documentation of X. TYPE must be the symbol VARIABLE or FUNCTION.';
2644         return func;
2645     })());
2646     return l96;
2647 })();
2648 var l99 = {name: "*PACKAGE-LIST*"};
2649 (function(){
2650     (((l99.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
2651         return (l99).value = l3.value;
2652     })());
2653     return l99;
2654 })();
2655 var l100 = {name: "LIST-ALL-PACKAGES"};
2656 (function(){
2657     (l100).function = (function(v182){
2658         ((v182)["fname"] = "LIST-ALL-PACKAGES");
2659         return v182;
2660     })((function (){
2661         if (arguments.length > 0) throw 'too many arguments';
2662         return (function(){
2663             try {
2664                 return (function(){
2665                     return (function(){
2666                         var symbol = l99;
2667                         var value = symbol.value;
2668                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2669                         return value;
2670                     })();
2671                 })();
2672             }
2673             catch (cf){
2674                 if (cf.type == 'block' && cf.id == 81)
2675                     return cf.value;
2676                 else
2677                     throw cf;
2678             }
2679         })();
2680
2681     }));
2682     return l100;
2683 })();
2684 var l101 = {name: "MAKE-PACKAGE"};
2685 var l102 = {name: "FIND-PACKAGE-OR-FAIL"};
2686 (function(){
2687     (l101).function = (function(v187){
2688         ((v187)["fname"] = "MAKE-PACKAGE");
2689         return v187;
2690     })((function (v183,v184){
2691         if (arguments.length < 1) throw 'too few arguments';
2692         if (arguments.length > 2) throw 'too many arguments';
2693         switch(arguments.length){
2694         case 1:
2695         v184=l3.value;
2696         default: break;
2697         }
2698         return (function(){
2699             try {
2700                 return (function(){
2701                     return (function(v185,v186){
2702                         ((v185)["packageName"] = v183);
2703                         ((v185)["symbols"] = {});
2704                         ((v185)["exports"] = {});
2705                         ((v185)["use"] = v186);
2706                         (l99).value = ({car: v185, cdr: (function(){
2707                             var symbol = l99;
2708                             var value = symbol.value;
2709                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2710                             return value;
2711                         })()});
2712                         return v185;
2713                     })({},l68.function((function(){
2714                         var symbol = l102;
2715                         var func = symbol.function;
2716                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2717                         return func;
2718                     })(), v184));
2719                 })();
2720             }
2721             catch (cf){
2722                 if (cf.type == 'block' && cf.id == 82)
2723                     return cf.value;
2724                 else
2725                     throw cf;
2726             }
2727         })();
2728
2729     }));
2730     return l101;
2731 })();
2732 var l103 = {name: "PACKAGEP"};
2733 (function(){
2734     (l103).function = (function(v189){
2735         ((v189)["fname"] = "PACKAGEP");
2736         return v189;
2737     })((function (v188){
2738         if (arguments.length < 1) throw 'too few arguments';
2739         if (arguments.length > 1) throw 'too many arguments';
2740         return (function(){
2741             try {
2742                 return (function(){
2743                     return (((typeof (v188) === 'object')?l4.value: l3.value) !== l3.value ? ((("symbols") in (v188))?l4.value: l3.value) : l3.value);
2744                 })();
2745             }
2746             catch (cf){
2747                 if (cf.type == 'block' && cf.id == 83)
2748                     return cf.value;
2749                 else
2750                     throw cf;
2751             }
2752         })();
2753
2754     }));
2755     return l103;
2756 })();
2757 var l104 = {name: "FIND-PACKAGE"};
2758 var l105 = {name: "PACKAGE-NAME"};
2759 (function(){
2760     (l104).function = (function(v194){
2761         ((v194)["fname"] = "FIND-PACKAGE");
2762         return v194;
2763     })((function (v190){
2764         if (arguments.length < 1) throw 'too few arguments';
2765         if (arguments.length > 1) throw 'too many arguments';
2766         return (function(){
2767             try {
2768                 return (function(){
2769                     (l103.function(v190) !== l3.value ? (function(){
2770                         return (function(){
2771                             throw ({type: 'block', id: 84, value: v190, message: 'Return from unknown block FIND-PACKAGE.'})
2772                         })();
2773                     })() : l3.value);
2774                     return (function(v191){
2775                         return (function(){
2776                             try {
2777                                 return (function(){
2778                                     return (function(v192,v193){
2779                                         (function(){
2780                                             while(v192 !== l3.value){
2781                                                 v193 = (function(){
2782                                                     var tmp = v192;
2783                                                     return tmp === l3.value? l3.value: tmp.car;
2784                                                 })();
2785                                                 (function(){
2786                                                     (l92.function((function(){
2787                                                         var symbol = l105;
2788                                                         var func = symbol.function;
2789                                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2790                                                         return func;
2791                                                     })()(v193), v191) !== l3.value ? (function(){
2792                                                         return (function(){
2793                                                             throw ({type: 'block', id: 85, value: v193, message: 'Return from unknown block NIL.'})
2794                                                         })();
2795                                                     })() : l3.value);
2796                                                     return l3.value;
2797                                                 })();
2798                                                 v192 = (function(){
2799                                                     var tmp = v192;
2800                                                     return tmp === l3.value? l3.value: tmp.cdr;
2801                                                 })();
2802                                             }return l3.value;
2803                                         })();
2804                                         return l3.value;
2805                                     })((function(){
2806                                         var symbol = l99;
2807                                         var value = symbol.value;
2808                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2809                                         return value;
2810                                     })(),l3.value);
2811                                 })();
2812                             }
2813                             catch (cf){
2814                                 if (cf.type == 'block' && cf.id == 85)
2815                                     return cf.value;
2816                                 else
2817                                     throw cf;
2818                             }
2819                         })();
2820                     })(l91.function(v190));
2821                 })();
2822             }
2823             catch (cf){
2824                 if (cf.type == 'block' && cf.id == 84)
2825                     return cf.value;
2826                 else
2827                     throw cf;
2828             }
2829         })();
2830
2831     }));
2832     return l104;
2833 })();
2834 (function(){
2835     (l102).function = (function(v197){
2836         ((v197)["fname"] = "FIND-PACKAGE-OR-FAIL");
2837         return v197;
2838     })((function (v195){
2839         if (arguments.length < 1) throw 'too few arguments';
2840         if (arguments.length > 1) throw 'too many arguments';
2841         return (function(){
2842             try {
2843                 return (function(){
2844                     return (function(v196){
2845                         return (v196 !== l3.value ? v196 : (function(){
2846                             throw "Package unknown.";
2847                         })());
2848                     })(l104.function(v195));
2849                 })();
2850             }
2851             catch (cf){
2852                 if (cf.type == 'block' && cf.id == 86)
2853                     return cf.value;
2854                 else
2855                     throw cf;
2856             }
2857         })();
2858
2859     }));
2860     return l102;
2861 })();
2862 (function(){
2863     (l105).function = (function(v200){
2864         ((v200)["fname"] = "PACKAGE-NAME");
2865         return v200;
2866     })((function (v198){
2867         if (arguments.length < 1) throw 'too few arguments';
2868         if (arguments.length > 1) throw 'too many arguments';
2869         return (function(){
2870             try {
2871                 return (function(){
2872                     return (function(v199){
2873                         return (function(){
2874                             var tmp = (v199)["packageName"];
2875                             return tmp == undefined? l3.value: tmp ;
2876                         })();
2877                     })(l102.function(v198));
2878                 })();
2879             }
2880             catch (cf){
2881                 if (cf.type == 'block' && cf.id == 87)
2882                     return cf.value;
2883                 else
2884                     throw cf;
2885             }
2886         })();
2887
2888     }));
2889     return l105;
2890 })();
2891 var l106 = {name: "%PACKAGE-SYMBOLS"};
2892 (function(){
2893     (l106).function = (function(v203){
2894         ((v203)["fname"] = "%PACKAGE-SYMBOLS");
2895         return v203;
2896     })((function (v201){
2897         if (arguments.length < 1) throw 'too few arguments';
2898         if (arguments.length > 1) throw 'too many arguments';
2899         return (function(){
2900             try {
2901                 return (function(){
2902                     return (function(v202){
2903                         return (function(){
2904                             var tmp = (v202)["symbols"];
2905                             return tmp == undefined? l3.value: tmp ;
2906                         })();
2907                     })(l102.function(v201));
2908                 })();
2909             }
2910             catch (cf){
2911                 if (cf.type == 'block' && cf.id == 88)
2912                     return cf.value;
2913                 else
2914                     throw cf;
2915             }
2916         })();
2917
2918     }));
2919     return l106;
2920 })();
2921 var l107 = {name: "PACKAGE-USE-LIST"};
2922 (function(){
2923     (l107).function = (function(v206){
2924         ((v206)["fname"] = "PACKAGE-USE-LIST");
2925         return v206;
2926     })((function (v204){
2927         if (arguments.length < 1) throw 'too few arguments';
2928         if (arguments.length > 1) throw 'too many arguments';
2929         return (function(){
2930             try {
2931                 return (function(){
2932                     return (function(v205){
2933                         return (function(){
2934                             var tmp = (v205)["use"];
2935                             return tmp == undefined? l3.value: tmp ;
2936                         })();
2937                     })(l102.function(v204));
2938                 })();
2939             }
2940             catch (cf){
2941                 if (cf.type == 'block' && cf.id == 89)
2942                     return cf.value;
2943                 else
2944                     throw cf;
2945             }
2946         })();
2947
2948     }));
2949     return l107;
2950 })();
2951 var l108 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
2952 (function(){
2953     (l108).function = (function(v209){
2954         ((v209)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
2955         return v209;
2956     })((function (v207){
2957         if (arguments.length < 1) throw 'too few arguments';
2958         if (arguments.length > 1) throw 'too many arguments';
2959         return (function(){
2960             try {
2961                 return (function(){
2962                     return (function(v208){
2963                         return (function(){
2964                             var tmp = (v208)["exports"];
2965                             return tmp == undefined? l3.value: tmp ;
2966                         })();
2967                     })(l102.function(v207));
2968                 })();
2969             }
2970             catch (cf){
2971                 if (cf.type == 'block' && cf.id == 90)
2972                     return cf.value;
2973                 else
2974                     throw cf;
2975             }
2976         })();
2977
2978     }));
2979     return l108;
2980 })();
2981 var l109 = {name: "*COMMON-LISP-PACKAGE*"};
2982 (function(){
2983     (((l109.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
2984         return (l109).value = l101.function("CL");
2985     })());
2986     return l109;
2987 })();
2988 var l110 = {name: "*USER-PACKAGE*"};
2989 (function(){
2990     (((l110.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
2991         return (l110).value = l101.function("CL-USER", l44.function((function(){
2992             var symbol = l109;
2993             var value = symbol.value;
2994             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2995             return value;
2996         })()));
2997     })());
2998     return l110;
2999 })();
3000 var l111 = {name: "*KEYWORD-PACKAGE*"};
3001 (function(){
3002     (((l111.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
3003         return (l111).value = l101.function("KEYWORD");
3004     })());
3005     return l111;
3006 })();
3007 var l112 = {name: "KEYWORDP"};
3008 var l113 = {name: "SYMBOL-PACKAGE"};
3009 (function(){
3010     (l112).function = (function(v211){
3011         ((v211)["fname"] = "KEYWORDP");
3012         return v211;
3013     })((function (v210){
3014         if (arguments.length < 1) throw 'too few arguments';
3015         if (arguments.length > 1) throw 'too many arguments';
3016         return (function(){
3017             try {
3018                 return (function(){
3019                     return (((function(){
3020                         var tmp = v210;
3021                         return (typeof tmp == 'object' && 'name' in tmp);
3022                     })()?l4.value: l3.value) !== l3.value ? (((function(){
3023                         var symbol = l113;
3024                         var func = symbol.function;
3025                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3026                         return func;
3027                     })()(v210) === (function(){
3028                         var symbol = l111;
3029                         var value = symbol.value;
3030                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3031                         return value;
3032                     })())?l4.value: l3.value) : l3.value);
3033                 })();
3034             }
3035             catch (cf){
3036                 if (cf.type == 'block' && cf.id == 91)
3037                     return cf.value;
3038                 else
3039                     throw cf;
3040             }
3041         })();
3042
3043     }));
3044     return l112;
3045 })();
3046 var l114 = {name: "*PACKAGE*"};
3047 (function(){
3048     (((l114.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
3049         return (l114).value = (function(){
3050             var symbol = l109;
3051             var value = symbol.value;
3052             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3053             return value;
3054         })();
3055     })());
3056     return l114;
3057 })();
3058 var l115 = {name: "IN-PACKAGE"};
3059 l115;
3060 var l116 = {name: "%INTERN-SYMBOL"};
3061 (function(){
3062     (l116).function = (function(v214){
3063         ((v214)["fname"] = "%INTERN-SYMBOL");
3064         return v214;
3065     })((function (v212){
3066         if (arguments.length < 1) throw 'too few arguments';
3067         if (arguments.length > 1) throw 'too many arguments';
3068         return (function(){
3069             try {
3070                 return (function(){
3071                     return (function(v213){
3072                         ((v212)["package"] = (function(){
3073                             var symbol = l109;
3074                             var value = symbol.value;
3075                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3076                             return value;
3077                         })());
3078                         return ((v213)[(v212).name] = v212);
3079                     })(l106.function((function(){
3080                         var symbol = l109;
3081                         var value = symbol.value;
3082                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3083                         return value;
3084                     })()));
3085                 })();
3086             }
3087             catch (cf){
3088                 if (cf.type == 'block' && cf.id == 92)
3089                     return cf.value;
3090                 else
3091                     throw cf;
3092             }
3093         })();
3094
3095     }));
3096     return l116;
3097 })();
3098 var l117 = {name: "%FIND-SYMBOL"};
3099 (function(){
3100     (l117).function = (function(v222){
3101         ((v222)["fname"] = "%FIND-SYMBOL");
3102         return v222;
3103     })((function (v215,v216){
3104         if (arguments.length < 2) throw 'too few arguments';
3105         if (arguments.length > 2) throw 'too many arguments';
3106         return (function(){
3107             try {
3108                 return (function(){
3109                     return (function(v217){
3110                         return (function(v218){
3111                             return ((((v215) in (v218))?l4.value: l3.value) !== l3.value ? ({car: (function(){
3112                                 var tmp = (v218)[v215];
3113                                 return tmp == undefined? l3.value: tmp ;
3114                             })(), cdr: l4.value}) : (function(){
3115                                 try {
3116                                     return (function(){
3117                                         return (function(v219,v220){
3118                                             (function(){
3119                                                 while(v219 !== l3.value){
3120                                                     v220 = (function(){
3121                                                         var tmp = v219;
3122                                                         return tmp === l3.value? l3.value: tmp.car;
3123                                                     })();
3124                                                     (function(){
3125                                                         (function(v221){
3126                                                             return ((((v215) in (v221))?l4.value: l3.value) !== l3.value ? (function(){
3127                                                                 return (function(){
3128                                                                     throw ({type: 'block', id: 93, value: ({car: (function(){
3129                                                                         var tmp = (v221)[v215];
3130                                                                         return tmp == undefined? l3.value: tmp ;
3131                                                                     })(), cdr: l4.value}), message: 'Return from unknown block %FIND-SYMBOL.'})
3132                                                                 })();
3133                                                             })() : l3.value);
3134                                                         })(l108.function(v220));
3135                                                         return l3.value;
3136                                                     })();
3137                                                     v219 = (function(){
3138                                                         var tmp = v219;
3139                                                         return tmp === l3.value? l3.value: tmp.cdr;
3140                                                     })();
3141                                                 }return l3.value;
3142                                             })();
3143                                             return ({car: l3.value, cdr: l3.value});
3144                                         })(l107.function(v217),l3.value);
3145                                     })();
3146                                 }
3147                                 catch (cf){
3148                                     if (cf.type == 'block' && cf.id == 94)
3149                                         return cf.value;
3150                                     else
3151                                         throw cf;
3152                                 }
3153                             })());
3154                         })(l106.function(v217));
3155                     })(l102.function(v216));
3156                 })();
3157             }
3158             catch (cf){
3159                 if (cf.type == 'block' && cf.id == 93)
3160                     return cf.value;
3161                 else
3162                     throw cf;
3163             }
3164         })();
3165
3166     }));
3167     return l117;
3168 })();
3169 var l118 = {name: "FIND-SYMBOL"};
3170 (function(){
3171     (l118).function = (function(v225){
3172         ((v225)["fname"] = "FIND-SYMBOL");
3173         return v225;
3174     })((function (v223,v224){
3175         if (arguments.length < 1) throw 'too few arguments';
3176         if (arguments.length > 2) throw 'too many arguments';
3177         switch(arguments.length){
3178         case 1:
3179         v224=(function(){
3180             var symbol = l114;
3181             var value = symbol.value;
3182             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3183             return value;
3184         })();
3185         default: break;
3186         }
3187         return (function(){
3188             try {
3189                 return (function(){
3190                     return (function(){
3191                         var tmp = l117.function(v223, v224);
3192                         return tmp === l3.value? l3.value: tmp.car;
3193                     })();
3194                 })();
3195             }
3196             catch (cf){
3197                 if (cf.type == 'block' && cf.id == 95)
3198                     return cf.value;
3199                 else
3200                     throw cf;
3201             }
3202         })();
3203
3204     }));
3205     return l118;
3206 })();
3207 var l119 = {name: "INTERN"};
3208 var l120 = {name: "EXPORT"};
3209 (function(){
3210     (l119).function = (function(v232){
3211         ((v232)["fname"] = "INTERN");
3212         return v232;
3213     })((function (v226,v227){
3214         if (arguments.length < 1) throw 'too few arguments';
3215         if (arguments.length > 2) throw 'too many arguments';
3216         switch(arguments.length){
3217         case 1:
3218         v227=(function(){
3219             var symbol = l114;
3220             var value = symbol.value;
3221             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3222             return value;
3223         })();
3224         default: break;
3225         }
3226         return (function(){
3227             try {
3228                 return (function(){
3229                     return (function(v228){
3230                         return (function(v229){
3231                             return ((function(){
3232                                 var tmp = v229;
3233                                 return tmp === l3.value? l3.value: tmp.cdr;
3234                             })() !== l3.value ? (function(){
3235                                 var tmp = v229;
3236                                 return tmp === l3.value? l3.value: tmp.car;
3237                             })() : (function(v230){
3238                                 (function(){
3239                                     var tmp = (v230)[v226];
3240                                     return tmp == undefined? l3.value: tmp ;
3241                                 })();
3242                                 return (function(v231){
3243                                     ((v231)["package"] = v228);
3244                                     (((v228 === (function(){
3245                                         var symbol = l111;
3246                                         var value = symbol.value;
3247                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3248                                         return value;
3249                                     })())?l4.value: l3.value) !== l3.value ? (function(){
3250                                         ((v231)["value"] = v231);
3251                                         return (function(){
3252                                             var symbol = l120;
3253                                             var func = symbol.function;
3254                                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3255                                             return func;
3256                                         })()(l44.function(v231), v228);
3257                                     })() : l3.value);
3258                                     return ((v230)[v226] = v231);
3259                                 })((function(){
3260                                     var name = v226;
3261                                     if (typeof name != 'string')
3262                                         throw 'The value ' + name + ' is not a type string.';
3263                                     return ({name: name});
3264                                 })());
3265                             })(l106.function(v228)));
3266                         })(l117.function(v226, v228));
3267                     })(l102.function(v227));
3268                 })();
3269             }
3270             catch (cf){
3271                 if (cf.type == 'block' && cf.id == 96)
3272                     return cf.value;
3273                 else
3274                     throw cf;
3275             }
3276         })();
3277
3278     }));
3279     return l119;
3280 })();
3281 (function(){
3282     (l113).function = (function(v234){
3283         ((v234)["fname"] = "SYMBOL-PACKAGE");
3284         return v234;
3285     })((function (v233){
3286         if (arguments.length < 1) throw 'too few arguments';
3287         if (arguments.length > 1) throw 'too many arguments';
3288         return (function(){
3289             try {
3290                 return (function(){
3291                     (((function(){
3292                         var tmp = v233;
3293                         return (typeof tmp == 'object' && 'name' in tmp);
3294                     })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
3295                         return (function(){
3296                             throw "it is not a symbol";
3297                         })();
3298                     })());
3299                     return (function(){
3300                         var tmp = (v233)["package"];
3301                         return tmp == undefined? l3.value: tmp ;
3302                     })();
3303                 })();
3304             }
3305             catch (cf){
3306                 if (cf.type == 'block' && cf.id == 97)
3307                     return cf.value;
3308                 else
3309                     throw cf;
3310             }
3311         })();
3312
3313     }));
3314     return l113;
3315 })();
3316 (function(){
3317     (l120).function = (function(v240){
3318         ((v240)["fname"] = "EXPORT");
3319         return v240;
3320     })((function (v235,v236){
3321         if (arguments.length < 1) throw 'too few arguments';
3322         if (arguments.length > 2) throw 'too many arguments';
3323         switch(arguments.length){
3324         case 1:
3325         v236=(function(){
3326             var symbol = l114;
3327             var value = symbol.value;
3328             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3329             return value;
3330         })();
3331         default: break;
3332         }
3333         return (function(){
3334             try {
3335                 return (function(){
3336                     return (function(v237){
3337                         return (function(){
3338                             try {
3339                                 return (function(){
3340                                     return (function(v238,v239){
3341                                         (function(){
3342                                             while(v238 !== l3.value){
3343                                                 v239 = (function(){
3344                                                     var tmp = v238;
3345                                                     return tmp === l3.value? l3.value: tmp.car;
3346                                                 })();
3347                                                 (function(){
3348                                                     ((v237)[(v239).name] = v239);
3349                                                     return l3.value;
3350                                                 })();
3351                                                 v238 = (function(){
3352                                                     var tmp = v238;
3353                                                     return tmp === l3.value? l3.value: tmp.cdr;
3354                                                 })();
3355                                             }return l3.value;
3356                                         })();
3357                                         return l4.value;
3358                                     })(v235,l3.value);
3359                                 })();
3360                             }
3361                             catch (cf){
3362                                 if (cf.type == 'block' && cf.id == 99)
3363                                     return cf.value;
3364                                 else
3365                                     throw cf;
3366                             }
3367                         })();
3368                     })(l108.function(v236));
3369                 })();
3370             }
3371             catch (cf){
3372                 if (cf.type == 'block' && cf.id == 98)
3373                     return cf.value;
3374                 else
3375                     throw cf;
3376             }
3377         })();
3378
3379     }));
3380     return l120;
3381 })();
3382 var l121 = {name: "*NEWLINE*"};
3383 (function(){
3384     (((l121.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
3385         return (l121).value = l91.function(l71.function(10));
3386     })());
3387     return l121;
3388 })();
3389 var l122 = {name: "CONCAT"};
3390 (function(){
3391     (l122).function = (function(v242){
3392         ((v242)["fname"] = "CONCAT");
3393         return v242;
3394     })((function (){
3395         var v241= l3.value;
3396         for (var i = arguments.length-1; i>=0; i--)
3397             v241 = {car: arguments[i], cdr:
3398         v241};
3399         return (function(){
3400             try {
3401                 return (function(){
3402                     return l60.function((function(){
3403                         var symbol = l67;
3404                         var func = symbol.function;
3405                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3406                         return func;
3407                     })(), v241, "");
3408                 })();
3409             }
3410             catch (cf){
3411                 if (cf.type == 'block' && cf.id == 100)
3412                     return cf.value;
3413                 else
3414                     throw cf;
3415             }
3416         })();
3417
3418     }));
3419     return l122;
3420 })();
3421 var l123 = {name: "CONCATF"};
3422 l123;
3423 var l124 = {name: "JOIN"};
3424 (function(){
3425     (l124).function = (function(v245){
3426         ((v245)["fname"] = "JOIN");
3427         return v245;
3428     })((function (v243,v244){
3429         if (arguments.length < 1) throw 'too few arguments';
3430         if (arguments.length > 2) throw 'too many arguments';
3431         switch(arguments.length){
3432         case 1:
3433         v244="";
3434         default: break;
3435         }
3436         return (function(){
3437             try {
3438                 return (function(){
3439                     return (l11.function(v243) !== l3.value ? (function(){
3440                         return "";
3441                     })() : (l11.function((function(){
3442                         var tmp = v243;
3443                         return tmp === l3.value? l3.value: tmp.cdr;
3444                     })()) !== l3.value ? (function(){
3445                         return (function(){
3446                             var tmp = v243;
3447                             return tmp === l3.value? l3.value: tmp.car;
3448                         })();
3449                     })() : (function(){
3450                         return l122.function((function(){
3451                             var tmp = v243;
3452                             return tmp === l3.value? l3.value: tmp.car;
3453                         })(), v244, l124.function((function(){
3454                             var tmp = v243;
3455                             return tmp === l3.value? l3.value: tmp.cdr;
3456                         })(), v244));
3457                     })()));
3458                 })();
3459             }
3460             catch (cf){
3461                 if (cf.type == 'block' && cf.id == 101)
3462                     return cf.value;
3463                 else
3464                     throw cf;
3465             }
3466         })();
3467
3468     }));
3469     return l124;
3470 })();
3471 var l125 = {name: "JOIN-TRAILING"};
3472 (function(){
3473     (l125).function = (function(v248){
3474         ((v248)["fname"] = "JOIN-TRAILING");
3475         return v248;
3476     })((function (v246,v247){
3477         if (arguments.length < 1) throw 'too few arguments';
3478         if (arguments.length > 2) throw 'too many arguments';
3479         switch(arguments.length){
3480         case 1:
3481         v247="";
3482         default: break;
3483         }
3484         return (function(){
3485             try {
3486                 return (function(){
3487                     return (l11.function(v246) !== l3.value ? "" : l122.function((function(){
3488                         var tmp = v246;
3489                         return tmp === l3.value? l3.value: tmp.car;
3490                     })(), v247, l125.function((function(){
3491                         var tmp = v246;
3492                         return tmp === l3.value? l3.value: tmp.cdr;
3493                     })(), v247)));
3494                 })();
3495             }
3496             catch (cf){
3497                 if (cf.type == 'block' && cf.id == 102)
3498                     return cf.value;
3499                 else
3500                     throw cf;
3501             }
3502         })();
3503
3504     }));
3505     return l125;
3506 })();
3507 var l126 = {name: "MAPCONCAT"};
3508 (function(){
3509     (l126).function = (function(v251){
3510         ((v251)["fname"] = "MAPCONCAT");
3511         return v251;
3512     })((function (v249,v250){
3513         if (arguments.length < 2) throw 'too few arguments';
3514         if (arguments.length > 2) throw 'too many arguments';
3515         return (function(){
3516             try {
3517                 return (function(){
3518                     return l124.function(l68.function(v249, v250));
3519                 })();
3520             }
3521             catch (cf){
3522                 if (cf.type == 'block' && cf.id == 103)
3523                     return cf.value;
3524                 else
3525                     throw cf;
3526             }
3527         })();
3528
3529     }));
3530     return l126;
3531 })();
3532 var l127 = {name: "INDENT"};
3533 (function(){
3534     (l127).function = (function(v258){
3535         ((v258)["fname"] = "INDENT");
3536         return v258;
3537     })((function (){
3538         var v252= l3.value;
3539         for (var i = arguments.length-1; i>=0; i--)
3540             v252 = {car: arguments[i], cdr:
3541         v252};
3542         return (function(){
3543             try {
3544                 return (function(){
3545                     return (function(v253){
3546                         return (function(v254,v255,v256){
3547                             (l75.function(l66.function(v253)) !== l3.value ? (function(){
3548                                 return v254 = l122.function(v254, (function(){
3549                                     return "    ";
3550                                 })());
3551                             })() : l3.value);
3552                             (function(){
3553                                 try {
3554                                     return (function(){
3555                                         return (function(){
3556                                             while(((function(){
3557                                                 var x = v255;
3558                                                 var y = v256;
3559                                                 if (typeof x != 'number')
3560                                                     throw 'The value ' + x + ' is not a type number.';
3561                                                 if (typeof y != 'number')
3562                                                     throw 'The value ' + y + ' is not a type number.';
3563                                                 return x<y;
3564                                             })()?l4.value: l3.value) !== l3.value){
3565                                                 (function(v257){
3566                                                     return v254 = l122.function(v254, (function(){
3567                                                         return v257;
3568                                                     })());
3569                                                 })(((l73.function((function(){
3570                                                     var string = v253;
3571                                                     var index = v255;
3572                                                     if (typeof string != 'string')
3573                                                         throw 'The value ' + string + ' is not a type string.';
3574                                                     if (typeof index != 'number')
3575                                                         throw 'The value ' + index + ' is not a type number.';
3576                                                     return string.charCodeAt(index);
3577                                                 })(), 10) !== l3.value ? (((function(){
3578                                                     var x = v255;
3579                                                     var y = l24.function(v256);
3580                                                     if (typeof x != 'number')
3581                                                         throw 'The value ' + x + ' is not a type number.';
3582                                                     if (typeof y != 'number')
3583                                                         throw 'The value ' + y + ' is not a type number.';
3584                                                     return x<y;
3585                                                 })()?l4.value: l3.value) !== l3.value ? l28.function(l73.function((function(){
3586                                                     var string = v253;
3587                                                     var index = l23.function(v255);
3588                                                     if (typeof string != 'string')
3589                                                         throw 'The value ' + string + ' is not a type string.';
3590                                                     if (typeof index != 'number')
3591                                                         throw 'The value ' + index + ' is not a type number.';
3592                                                     return string.charCodeAt(index);
3593                                                 })(), 10)) : l3.value) : l3.value) !== l3.value ? l122.function(l91.function(10), "    ") : l91.function((function(){
3594                                                     var string = v253;
3595                                                     var index = v255;
3596                                                     if (typeof string != 'string')
3597                                                         throw 'The value ' + string + ' is not a type string.';
3598                                                     if (typeof index != 'number')
3599                                                         throw 'The value ' + index + ' is not a type number.';
3600                                                     return string.charCodeAt(index);
3601                                                 })())));
3602                                                 v255 = (function(){
3603                                                     var x = v255;
3604                                                     var y = 1;
3605                                                     if (typeof x != 'number')
3606                                                         throw 'The value ' + x + ' is not a type number.';
3607                                                     if (typeof y != 'number')
3608                                                         throw 'The value ' + y + ' is not a type number.';
3609                                                     return x+y;
3610                                                 })();
3611                                             }return l3.value;
3612                                         })();
3613                                     })();
3614                                 }
3615                                 catch (cf){
3616                                     if (cf.type == 'block' && cf.id == 105)
3617                                         return cf.value;
3618                                     else
3619                                         throw cf;
3620                                 }
3621                             })();
3622                             return v254;
3623                         })("",0,l66.function(v253));
3624                     })(l124.function(v252));
3625                 })();
3626             }
3627             catch (cf){
3628                 if (cf.type == 'block' && cf.id == 104)
3629                     return cf.value;
3630                 else
3631                     throw cf;
3632             }
3633         })();
3634
3635     }));
3636     return l127;
3637 })();
3638 (function(){
3639     (l16).function = (function(v262){
3640         ((v262)["fname"] = "INTEGER-TO-STRING");
3641         return v262;
3642     })((function (v259){
3643         if (arguments.length < 1) throw 'too few arguments';
3644         if (arguments.length > 1) throw 'too many arguments';
3645         return (function(){
3646             try {
3647                 return (function(){
3648                     return (l25.function(v259) !== l3.value ? (function(){
3649                         return "0";
3650                     })() : (l76.function(v259) !== l3.value ? (function(){
3651                         return l122.function("-", l16.function((function(){
3652                             var x = 0;
3653                             var y = v259;
3654                             if (typeof x != 'number')
3655                                 throw 'The value ' + x + ' is not a type number.';
3656                             if (typeof y != 'number')
3657                                 throw 'The value ' + y + ' is not a type number.';
3658                             return x-y;
3659                         })()));
3660                     })() : (function(){
3661                         return (function(v260){
3662                             (function(){
3663                                 try {
3664                                     return (function(){
3665                                         return (function(){
3666                                             while(l28.function(l25.function(v259)) !== l3.value){
3667                                                 v260 = ({car: (function(){
3668                                                     var x = v259;
3669                                                     var y = 10;
3670                                                     if (typeof x != 'number')
3671                                                         throw 'The value ' + x + ' is not a type number.';
3672                                                     if (typeof y != 'number')
3673                                                         throw 'The value ' + y + ' is not a type number.';
3674                                                     return x%y;
3675                                                 })(), cdr: v260});
3676                                                 v259 = l26.function(v259, 10);
3677                                             }return l3.value;
3678                                         })();
3679                                     })();
3680                                 }
3681                                 catch (cf){
3682                                     if (cf.type == 'block' && cf.id == 107)
3683                                         return cf.value;
3684                                     else
3685                                         throw cf;
3686                                 }
3687                             })();
3688                             return l124.function(l68.function((function (v261){
3689                                 if (arguments.length < 1) throw 'too few arguments';
3690                                 if (arguments.length > 1) throw 'too many arguments';
3691                                 return l91.function((function(){
3692                                     var string = "0123456789";
3693                                     var index = v261;
3694                                     if (typeof string != 'string')
3695                                         throw 'The value ' + string + ' is not a type string.';
3696                                     if (typeof index != 'number')
3697                                         throw 'The value ' + index + ' is not a type number.';
3698                                     return string.charCodeAt(index);
3699                                 })());
3700
3701                             }), v260));
3702                         })(l3.value);
3703                     })()));
3704                 })();
3705             }
3706             catch (cf){
3707                 if (cf.type == 'block' && cf.id == 106)
3708                     return cf.value;
3709                 else
3710                     throw cf;
3711             }
3712         })();
3713
3714     }));
3715     return l16;
3716 })();
3717 var l128 = {name: "JS!BOOL"};
3718 var l129 = {name: "LS-COMPILE"};
3719 (function(){
3720     (l128).function = (function(v264){
3721         ((v264)["fname"] = "JS!BOOL");
3722         return v264;
3723     })((function (v263){
3724         if (arguments.length < 1) throw 'too few arguments';
3725         if (arguments.length > 1) throw 'too many arguments';
3726         return (function(){
3727             try {
3728                 return (function(){
3729                     return l122.function("(", v263, "?", (function(){
3730                         var symbol = l129;
3731                         var func = symbol.function;
3732                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3733                         return func;
3734                     })()(l4.value), ": ", (function(){
3735                         var symbol = l129;
3736                         var func = symbol.function;
3737                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3738                         return func;
3739                     })()(l3.value), ")");
3740                 })();
3741             }
3742             catch (cf){
3743                 if (cf.type == 'block' && cf.id == 108)
3744                     return cf.value;
3745                 else
3746                     throw cf;
3747             }
3748         })();
3749
3750     }));
3751     return l128;
3752 })();
3753 var l130 = {name: "JS!SELFCALL"};
3754 l130;
3755 var l131 = {name: "PRIN1-TO-STRING"};
3756 var l132 = {name: "ESCAPE-STRING"};
3757 (function(){
3758     (l131).function = (function(v270){
3759         ((v270)["fname"] = "PRIN1-TO-STRING");
3760         return v270;
3761     })((function (v265){
3762         if (arguments.length < 1) throw 'too few arguments';
3763         if (arguments.length > 1) throw 'too many arguments';
3764         return (function(){
3765             try {
3766                 return (function(){
3767                     return (((function(){
3768                         var tmp = v265;
3769                         return (typeof tmp == 'object' && 'name' in tmp);
3770                     })()?l4.value: l3.value) !== l3.value ? (function(){
3771                         return ((function(){
3772                             var tmp = l117.function((v265).name, (function(){
3773                                 var symbol = l114;
3774                                 var value = symbol.value;
3775                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3776                                 return value;
3777                             })());
3778                             return tmp === l3.value? l3.value: tmp.cdr;
3779                         })() !== l3.value ? (v265).name : (function(v266,v267){
3780                             return l122.function((((v266 === l104.function("KEYWORD"))?l4.value: l3.value) !== l3.value ? "" : l105.function(v266)), ":", v267);
3781                         })(l113.function(v265),(v265).name));
3782                     })() : (l74.function(v265) !== l3.value ? (function(){
3783                         return l16.function(v265);
3784                     })() : (((typeof(v265) == "string")?l4.value: l3.value) !== l3.value ? (function(){
3785                         return l122.function("\"", (function(){
3786                             var symbol = l132;
3787                             var func = symbol.function;
3788                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3789                             return func;
3790                         })()(v265), "\"");
3791                     })() : (((typeof v265 == 'function')?l4.value: l3.value) !== l3.value ? (function(){
3792                         return (function(v268){
3793                             return (v268 !== l3.value ? l122.function("#<FUNCTION ", v268, ">") : l122.function("#<FUNCTION>"));
3794                         })((function(){
3795                             var tmp = (v265)["fname"];
3796                             return tmp == undefined? l3.value: tmp ;
3797                         })());
3798                     })() : (l59.function(v265) !== l3.value ? (function(){
3799                         return l122.function("(", l125.function(l68.function((function(){
3800                             var symbol = l131;
3801                             var func = symbol.function;
3802                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3803                             return func;
3804                         })(), l80.function(v265)), " "), (function(v269){
3805                             return (l11.function((function(){
3806                                 var tmp = v269;
3807                                 return tmp === l3.value? l3.value: tmp.cdr;
3808                             })()) !== l3.value ? l131.function((function(){
3809                                 var tmp = v269;
3810                                 return tmp === l3.value? l3.value: tmp.car;
3811                             })()) : l122.function(l131.function((function(){
3812                                 var tmp = v269;
3813                                 return tmp === l3.value? l3.value: tmp.car;
3814                             })()), " . ", l131.function((function(){
3815                                 var tmp = v269;
3816                                 return tmp === l3.value? l3.value: tmp.cdr;
3817                             })())));
3818                         })(l79.function(v265)), ")");
3819                     })() : (l103.function(v265) !== l3.value ? (function(){
3820                         return l122.function("#<PACKAGE ", l105.function(v265), ">");
3821                     })() : l3.value))))));
3822                 })();
3823             }
3824             catch (cf){
3825                 if (cf.type == 'block' && cf.id == 109)
3826                     return cf.value;
3827                 else
3828                     throw cf;
3829             }
3830         })();
3831
3832     }));
3833     return l131;
3834 })();
3835 (function(){
3836     (l95).function = (function(v272){
3837         ((v272)["fname"] = "WRITE-LINE");
3838         return v272;
3839     })((function (v271){
3840         if (arguments.length < 1) throw 'too few arguments';
3841         if (arguments.length > 1) throw 'too many arguments';
3842         return (function(){
3843             try {
3844                 return (function(){
3845                     (function(){
3846                         var x = v271;
3847                         if (typeof x != 'string')
3848                             throw 'The value ' + x + ' is not a type string.';
3849                         return lisp.write(x);
3850                     })();
3851                     (function(){
3852                         var x = (function(){
3853                             var symbol = l121;
3854                             var value = symbol.value;
3855                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3856                             return value;
3857                         })();
3858                         if (typeof x != 'string')
3859                             throw 'The value ' + x + ' is not a type string.';
3860                         return lisp.write(x);
3861                     })();
3862                     return v271;
3863                 })();
3864             }
3865             catch (cf){
3866                 if (cf.type == 'block' && cf.id == 110)
3867                     return cf.value;
3868                 else
3869                     throw cf;
3870             }
3871         })();
3872
3873     }));
3874     return l95;
3875 })();
3876 var l133 = {name: "WARN"};
3877 (function(){
3878     (l133).function = (function(v274){
3879         ((v274)["fname"] = "WARN");
3880         return v274;
3881     })((function (v273){
3882         if (arguments.length < 1) throw 'too few arguments';
3883         if (arguments.length > 1) throw 'too many arguments';
3884         return (function(){
3885             try {
3886                 return (function(){
3887                     (function(){
3888                         var x = "WARNING: ";
3889                         if (typeof x != 'string')
3890                             throw 'The value ' + x + ' is not a type string.';
3891                         return lisp.write(x);
3892                     })();
3893                     return l95.function(v273);
3894                 })();
3895             }
3896             catch (cf){
3897                 if (cf.type == 'block' && cf.id == 111)
3898                     return cf.value;
3899                 else
3900                     throw cf;
3901             }
3902         })();
3903
3904     }));
3905     return l133;
3906 })();
3907 var l134 = {name: "PRINT"};
3908 (function(){
3909     (l134).function = (function(v276){
3910         ((v276)["fname"] = "PRINT");
3911         return v276;
3912     })((function (v275){
3913         if (arguments.length < 1) throw 'too few arguments';
3914         if (arguments.length > 1) throw 'too many arguments';
3915         return (function(){
3916             try {
3917                 return (function(){
3918                     l95.function(l131.function(v275));
3919                     return v275;
3920                 })();
3921             }
3922             catch (cf){
3923                 if (cf.type == 'block' && cf.id == 112)
3924                     return cf.value;
3925                 else
3926                     throw cf;
3927             }
3928         })();
3929
3930     }));
3931     return l134;
3932 })();
3933 var l135 = {name: "MAKE-STRING-STREAM"};
3934 (function(){
3935     (l135).function = (function(v278){
3936         ((v278)["fname"] = "MAKE-STRING-STREAM");
3937         return v278;
3938     })((function (v277){
3939         if (arguments.length < 1) throw 'too few arguments';
3940         if (arguments.length > 1) throw 'too many arguments';
3941         return (function(){
3942             try {
3943                 return (function(){
3944                     return ({car: v277, cdr: 0});
3945                 })();
3946             }
3947             catch (cf){
3948                 if (cf.type == 'block' && cf.id == 113)
3949                     return cf.value;
3950                 else
3951                     throw cf;
3952             }
3953         })();
3954
3955     }));
3956     return l135;
3957 })();
3958 var l136 = {name: "%PEEK-CHAR"};
3959 (function(){
3960     (l136).function = (function(v280){
3961         ((v280)["fname"] = "%PEEK-CHAR");
3962         return v280;
3963     })((function (v279){
3964         if (arguments.length < 1) throw 'too few arguments';
3965         if (arguments.length > 1) throw 'too many arguments';
3966         return (function(){
3967             try {
3968                 return (function(){
3969                     return (((function(){
3970                         var x = (function(){
3971                             var tmp = v279;
3972                             return tmp === l3.value? l3.value: tmp.cdr;
3973                         })();
3974                         var y = l66.function((function(){
3975                             var tmp = v279;
3976                             return tmp === l3.value? l3.value: tmp.car;
3977                         })());
3978                         if (typeof x != 'number')
3979                             throw 'The value ' + x + ' is not a type number.';
3980                         if (typeof y != 'number')
3981                             throw 'The value ' + y + ' is not a type number.';
3982                         return x<y;
3983                     })()?l4.value: l3.value) !== l3.value ? (function(){
3984                         var string = (function(){
3985                             var tmp = v279;
3986                             return tmp === l3.value? l3.value: tmp.car;
3987                         })();
3988                         var index = (function(){
3989                             var tmp = v279;
3990                             return tmp === l3.value? l3.value: tmp.cdr;
3991                         })();
3992                         if (typeof string != 'string')
3993                             throw 'The value ' + string + ' is not a type string.';
3994                         if (typeof index != 'number')
3995                             throw 'The value ' + index + ' is not a type number.';
3996                         return string.charCodeAt(index);
3997                     })() : l3.value);
3998                 })();
3999             }
4000             catch (cf){
4001                 if (cf.type == 'block' && cf.id == 114)
4002                     return cf.value;
4003                 else
4004                     throw cf;
4005             }
4006         })();
4007
4008     }));
4009     return l136;
4010 })();
4011 var l137 = {name: "%READ-CHAR"};
4012 (function(){
4013     (l137).function = (function(v283){
4014         ((v283)["fname"] = "%READ-CHAR");
4015         return v283;
4016     })((function (v281){
4017         if (arguments.length < 1) throw 'too few arguments';
4018         if (arguments.length > 1) throw 'too many arguments';
4019         return (function(){
4020             try {
4021                 return (function(){
4022                     return (((function(){
4023                         var x = (function(){
4024                             var tmp = v281;
4025                             return tmp === l3.value? l3.value: tmp.cdr;
4026                         })();
4027                         var y = l66.function((function(){
4028                             var tmp = v281;
4029                             return tmp === l3.value? l3.value: tmp.car;
4030                         })());
4031                         if (typeof x != 'number')
4032                             throw 'The value ' + x + ' is not a type number.';
4033                         if (typeof y != 'number')
4034                             throw 'The value ' + y + ' is not a type number.';
4035                         return x<y;
4036                     })()?l4.value: l3.value) !== l3.value ? (function(v282){
4037                         (function(){
4038                             var x = v281;
4039                             if (typeof x != 'object')
4040                                 throw 'The value ' + x + ' is not a type object.';
4041                             return (x.cdr = l23.function((function(){
4042                                 var tmp = v281;
4043                                 return tmp === l3.value? l3.value: tmp.cdr;
4044                             })()));
4045                         })();
4046                         return v282;
4047                     })((function(){
4048                         var string = (function(){
4049                             var tmp = v281;
4050                             return tmp === l3.value? l3.value: tmp.car;
4051                         })();
4052                         var index = (function(){
4053                             var tmp = v281;
4054                             return tmp === l3.value? l3.value: tmp.cdr;
4055                         })();
4056                         if (typeof string != 'string')
4057                             throw 'The value ' + string + ' is not a type string.';
4058                         if (typeof index != 'number')
4059                             throw 'The value ' + index + ' is not a type number.';
4060                         return string.charCodeAt(index);
4061                     })()) : l3.value);
4062                 })();
4063             }
4064             catch (cf){
4065                 if (cf.type == 'block' && cf.id == 115)
4066                     return cf.value;
4067                 else
4068                     throw cf;
4069             }
4070         })();
4071
4072     }));
4073     return l137;
4074 })();
4075 var l138 = {name: "WHITESPACEP"};
4076 (function(){
4077     (l138).function = (function(v287){
4078         ((v287)["fname"] = "WHITESPACEP");
4079         return v287;
4080     })((function (v284){
4081         if (arguments.length < 1) throw 'too few arguments';
4082         if (arguments.length > 1) throw 'too many arguments';
4083         return (function(){
4084             try {
4085                 return (function(){
4086                     return (function(v285){
4087                         return (v285 !== l3.value ? v285 : (function(v286){
4088                             return (v286 !== l3.value ? v286 : l73.function(v284, 9));
4089                         })(l73.function(v284, 10)));
4090                     })(l73.function(v284, 32));
4091                 })();
4092             }
4093             catch (cf){
4094                 if (cf.type == 'block' && cf.id == 116)
4095                     return cf.value;
4096                 else
4097                     throw cf;
4098             }
4099         })();
4100
4101     }));
4102     return l138;
4103 })();
4104 var l139 = {name: "SKIP-WHITESPACES"};
4105 (function(){
4106     (l139).function = (function(v290){
4107         ((v290)["fname"] = "SKIP-WHITESPACES");
4108         return v290;
4109     })((function (v288){
4110         if (arguments.length < 1) throw 'too few arguments';
4111         if (arguments.length > 1) throw 'too many arguments';
4112         return (function(){
4113             try {
4114                 return (function(){
4115                     return (function(v289){
4116                         v289 = l136.function(v288);
4117                         return (function(){
4118                             try {
4119                                 return (function(){
4120                                     return (function(){
4121                                         while((v289 !== l3.value ? l138.function(v289) : l3.value) !== l3.value){
4122                                             l137.function(v288);
4123                                             v289 = l136.function(v288);
4124                                         }return l3.value;
4125                                     })();
4126                                 })();
4127                             }
4128                             catch (cf){
4129                                 if (cf.type == 'block' && cf.id == 118)
4130                                     return cf.value;
4131                                 else
4132                                     throw cf;
4133                             }
4134                         })();
4135                     })(l3.value);
4136                 })();
4137             }
4138             catch (cf){
4139                 if (cf.type == 'block' && cf.id == 117)
4140                     return cf.value;
4141                 else
4142                     throw cf;
4143             }
4144         })();
4145
4146     }));
4147     return l139;
4148 })();
4149 var l140 = {name: "TERMINALP"};
4150 (function(){
4151     (l140).function = (function(v295){
4152         ((v295)["fname"] = "TERMINALP");
4153         return v295;
4154     })((function (v291){
4155         if (arguments.length < 1) throw 'too few arguments';
4156         if (arguments.length > 1) throw 'too many arguments';
4157         return (function(){
4158             try {
4159                 return (function(){
4160                     return (function(v292){
4161                         return (v292 !== l3.value ? v292 : (function(v293){
4162                             return (v293 !== l3.value ? v293 : (function(v294){
4163                                 return (v294 !== l3.value ? v294 : l73.function(40, v291));
4164                             })(l73.function(41, v291)));
4165                         })(l138.function(v291)));
4166                     })(l11.function(v291));
4167                 })();
4168             }
4169             catch (cf){
4170                 if (cf.type == 'block' && cf.id == 119)
4171                     return cf.value;
4172                 else
4173                     throw cf;
4174             }
4175         })();
4176
4177     }));
4178     return l140;
4179 })();
4180 var l141 = {name: "READ-UNTIL"};
4181 (function(){
4182     (l141).function = (function(v300){
4183         ((v300)["fname"] = "READ-UNTIL");
4184         return v300;
4185     })((function (v296,v297){
4186         if (arguments.length < 2) throw 'too few arguments';
4187         if (arguments.length > 2) throw 'too many arguments';
4188         return (function(){
4189             try {
4190                 return (function(){
4191                     return (function(v298,v299){
4192                         v299 = l136.function(v296);
4193                         (function(){
4194                             try {
4195                                 return (function(){
4196                                     return (function(){
4197                                         while((v299 !== l3.value ? l28.function((v297)(v299)) : l3.value) !== l3.value){
4198                                             v298 = l122.function(v298, l91.function(v299));
4199                                             l137.function(v296);
4200                                             v299 = l136.function(v296);
4201                                         }return l3.value;
4202                                     })();
4203                                 })();
4204                             }
4205                             catch (cf){
4206                                 if (cf.type == 'block' && cf.id == 121)
4207                                     return cf.value;
4208                                 else
4209                                     throw cf;
4210                             }
4211                         })();
4212                         return v298;
4213                     })("",l3.value);
4214                 })();
4215             }
4216             catch (cf){
4217                 if (cf.type == 'block' && cf.id == 120)
4218                     return cf.value;
4219                 else
4220                     throw cf;
4221             }
4222         })();
4223
4224     }));
4225     return l141;
4226 })();
4227 var l142 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
4228 (function(){
4229     (l142).function = (function(v304){
4230         ((v304)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
4231         return v304;
4232     })((function (v301){
4233         if (arguments.length < 1) throw 'too few arguments';
4234         if (arguments.length > 1) throw 'too many arguments';
4235         return (function(){
4236             try {
4237                 return (function(){
4238                     return (function(v302){
4239                         l139.function(v301);
4240                         v302 = l136.function(v301);
4241                         return (function(){
4242                             try {
4243                                 return (function(){
4244                                     return (function(){
4245                                         while((v302 !== l3.value ? l73.function(v302, 59) : l3.value) !== l3.value){
4246                                             l141.function(v301, (function (v303){
4247                                                 if (arguments.length < 1) throw 'too few arguments';
4248                                                 if (arguments.length > 1) throw 'too many arguments';
4249                                                 return l73.function(v303, 10);
4250
4251                                             }));
4252                                             l139.function(v301);
4253                                             v302 = l136.function(v301);
4254                                         }return l3.value;
4255                                     })();
4256                                 })();
4257                             }
4258                             catch (cf){
4259                                 if (cf.type == 'block' && cf.id == 123)
4260                                     return cf.value;
4261                                 else
4262                                     throw cf;
4263                             }
4264                         })();
4265                     })(l3.value);
4266                 })();
4267             }
4268             catch (cf){
4269                 if (cf.type == 'block' && cf.id == 122)
4270                     return cf.value;
4271                 else
4272                     throw cf;
4273             }
4274         })();
4275
4276     }));
4277     return l142;
4278 })();
4279 var l143 = {name: "%READ-LIST"};
4280 var l144 = {name: "LS-READ"};
4281 (function(){
4282     (l143).function = (function(v308){
4283         ((v308)["fname"] = "%READ-LIST");
4284         return v308;
4285     })((function (v305){
4286         if (arguments.length < 1) throw 'too few arguments';
4287         if (arguments.length > 1) throw 'too many arguments';
4288         return (function(){
4289             try {
4290                 return (function(){
4291                     l142.function(v305);
4292                     return (function(v306){
4293                         return (l11.function(v306) !== l3.value ? (function(){
4294                             return (function(){
4295                                 throw "Unspected EOF";
4296                             })();
4297                         })() : (l73.function(v306, 41) !== l3.value ? (function(){
4298                             l137.function(v305);
4299                             return l3.value;
4300                         })() : (l73.function(v306, 46) !== l3.value ? (function(){
4301                             l137.function(v305);
4302                             return (function(v307){
4303                                 l142.function(v305);
4304                                 (l73.function(l137.function(v305), 41) !== l3.value ? l3.value : (function(){
4305                                     return (function(){
4306                                         throw "')' was expected.";
4307                                     })();
4308                                 })());
4309                                 return v307;
4310                             })((function(){
4311                                 var symbol = l144;
4312                                 var func = symbol.function;
4313                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4314                                 return func;
4315                             })()(v305));
4316                         })() : (function(){
4317                             return ({car: (function(){
4318                                 var symbol = l144;
4319                                 var func = symbol.function;
4320                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4321                                 return func;
4322                             })()(v305), cdr: l143.function(v305)});
4323                         })())));
4324                     })(l136.function(v305));
4325                 })();
4326             }
4327             catch (cf){
4328                 if (cf.type == 'block' && cf.id == 124)
4329                     return cf.value;
4330                 else
4331                     throw cf;
4332             }
4333         })();
4334
4335     }));
4336     return l143;
4337 })();
4338 var l145 = {name: "READ-STRING"};
4339 (function(){
4340     (l145).function = (function(v312){
4341         ((v312)["fname"] = "READ-STRING");
4342         return v312;
4343     })((function (v309){
4344         if (arguments.length < 1) throw 'too few arguments';
4345         if (arguments.length > 1) throw 'too many arguments';
4346         return (function(){
4347             try {
4348                 return (function(){
4349                     return (function(v310,v311){
4350                         v311 = l137.function(v309);
4351                         (function(){
4352                             try {
4353                                 return (function(){
4354                                     return (function(){
4355                                         while(l28.function(l27.function(v311, 34)) !== l3.value){
4356                                             (l11.function(v311) !== l3.value ? (function(){
4357                                                 return (function(){
4358                                                     throw "Unexpected EOF";
4359                                                 })();
4360                                             })() : l3.value);
4361                                             (l27.function(v311, 92) !== l3.value ? (function(){
4362                                                 return v311 = l137.function(v309);
4363                                             })() : l3.value);
4364                                             v310 = l122.function(v310, l91.function(v311));
4365                                             v311 = l137.function(v309);
4366                                         }return l3.value;
4367                                     })();
4368                                 })();
4369                             }
4370                             catch (cf){
4371                                 if (cf.type == 'block' && cf.id == 126)
4372                                     return cf.value;
4373                                 else
4374                                     throw cf;
4375                             }
4376                         })();
4377                         return v310;
4378                     })("",l3.value);
4379                 })();
4380             }
4381             catch (cf){
4382                 if (cf.type == 'block' && cf.id == 125)
4383                     return cf.value;
4384                 else
4385                     throw cf;
4386             }
4387         })();
4388
4389     }));
4390     return l145;
4391 })();
4392 var l146 = {name: "READ-SHARP"};
4393 (function(){
4394     (l146).function = (function(v317){
4395         ((v317)["fname"] = "READ-SHARP");
4396         return v317;
4397     })((function (v313){
4398         if (arguments.length < 1) throw 'too few arguments';
4399         if (arguments.length > 1) throw 'too many arguments';
4400         return (function(){
4401             try {
4402                 return (function(){
4403                     l137.function(v313);
4404                     return (function(v314){
4405                         return (l27.function(v314, 39) !== l3.value ? (function(){
4406                             return l44.function(l97, (function(){
4407                                 var symbol = l144;
4408                                 var func = symbol.function;
4409                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4410                                 return func;
4411                             })()(v313));
4412                         })() : (l27.function(v314, 92) !== l3.value ? (function(){
4413                             return (function(v315){
4414                                 return (l92.function(v315, "space") !== l3.value ? (function(){
4415                                     return l72.function(32);
4416                                 })() : (l92.function(v315, "tab") !== l3.value ? (function(){
4417                                     return l72.function(9);
4418                                 })() : (l92.function(v315, "newline") !== l3.value ? (function(){
4419                                     return l72.function(10);
4420                                 })() : (function(){
4421                                     return l72.function((function(){
4422                                         var string = v315;
4423                                         var index = 0;
4424                                         if (typeof string != 'string')
4425                                             throw 'The value ' + string + ' is not a type string.';
4426                                         if (typeof index != 'number')
4427                                             throw 'The value ' + index + ' is not a type number.';
4428                                         return string.charCodeAt(index);
4429                                     })());
4430                                 })())));
4431                             })(l122.function(l91.function(l137.function(v313)), l141.function(v313, (function(){
4432                                 var symbol = l140;
4433                                 var func = symbol.function;
4434                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4435                                 return func;
4436                             })())));
4437                         })() : (l27.function(v314, 43) !== l3.value ? (function(){
4438                             return (function(v316){
4439                                 return (l92.function(v316, "common-lisp") !== l3.value ? (function(){
4440                                     (function(){
4441                                         var symbol = l144;
4442                                         var func = symbol.function;
4443                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4444                                         return func;
4445                                     })()(v313);
4446                                     return (function(){
4447                                         var symbol = l144;
4448                                         var func = symbol.function;
4449                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4450                                         return func;
4451                                     })()(v313);
4452                                 })() : (l92.function(v316, "ecmalisp") !== l3.value ? (function(){
4453                                     return (function(){
4454                                         var symbol = l144;
4455                                         var func = symbol.function;
4456                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4457                                         return func;
4458                                     })()(v313);
4459                                 })() : (function(){
4460                                     return (function(){
4461                                         throw "Unknown reader form.";
4462                                     })();
4463                                 })()));
4464                             })(l141.function(v313, (function(){
4465                                 var symbol = l140;
4466                                 var func = symbol.function;
4467                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4468                                 return func;
4469                             })()));
4470                         })() : (function(){
4471                             return (function(){
4472                                 throw "ECASE expression failed.";
4473                             })();
4474                         })())));
4475                     })(l137.function(v313));
4476                 })();
4477             }
4478             catch (cf){
4479                 if (cf.type == 'block' && cf.id == 127)
4480                     return cf.value;
4481                 else
4482                     throw cf;
4483             }
4484         })();
4485
4486     }));
4487     return l146;
4488 })();
4489 var l147 = {name: "READ-SYMBOL"};
4490 (function(){
4491     (l147).function = (function(v325){
4492         ((v325)["fname"] = "READ-SYMBOL");
4493         return v325;
4494     })((function (v318){
4495         if (arguments.length < 1) throw 'too few arguments';
4496         if (arguments.length > 1) throw 'too many arguments';
4497         return (function(){
4498             try {
4499                 return (function(){
4500                     return (function(v319,v320,v321,v322,v323){
4501                         v323 = 0;
4502                         (function(){
4503                             try {
4504                                 return (function(){
4505                                     return (function(){
4506                                         while((((function(){
4507                                             var x = v323;
4508                                             var y = v319;
4509                                             if (typeof x != 'number')
4510                                                 throw 'The value ' + x + ' is not a type number.';
4511                                             if (typeof y != 'number')
4512                                                 throw 'The value ' + y + ' is not a type number.';
4513                                             return x<y;
4514                                         })()?l4.value: l3.value) !== l3.value ? l28.function(l73.function((function(){
4515                                             var string = v318;
4516                                             var index = v323;
4517                                             if (typeof string != 'string')
4518                                                 throw 'The value ' + string + ' is not a type string.';
4519                                             if (typeof index != 'number')
4520                                                 throw 'The value ' + index + ' is not a type number.';
4521                                             return string.charCodeAt(index);
4522                                         })(), 58)) : l3.value) !== l3.value){
4523                                             v323 = (function(){
4524                                                 var x = v323;
4525                                                 var y = 1;
4526                                                 if (typeof x != 'number')
4527                                                     throw 'The value ' + x + ' is not a type number.';
4528                                                 if (typeof y != 'number')
4529                                                     throw 'The value ' + y + ' is not a type number.';
4530                                                 return x+y;
4531                                             })();
4532                                         }return l3.value;
4533                                     })();
4534                                 })();
4535                             }
4536                             catch (cf){
4537                                 if (cf.type == 'block' && cf.id == 129)
4538                                     return cf.value;
4539                                 else
4540                                     throw cf;
4541                             }
4542                         })();
4543                         (((function(){
4544                             var x = v323;
4545                             var y = v319;
4546                             if (typeof x != 'number')
4547                                 throw 'The value ' + x + ' is not a type number.';
4548                             if (typeof y != 'number')
4549                                 throw 'The value ' + y + ' is not a type number.';
4550                             return x==y;
4551                         })()?l4.value: l3.value) !== l3.value ? (function(){
4552                             v321 = v318;
4553                             v320 = (function(){
4554                                 var symbol = l114;
4555                                 var value = symbol.value;
4556                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4557                                 return value;
4558                             })();
4559                             return v322 = l4.value;
4560                         })() : (function(){
4561                             (l25.function(v323) !== l3.value ? v320 = "KEYWORD" : v320 = (function(){
4562                                 var x = l86.function(v318, 0, v323);
4563                                 if (typeof x != 'string')
4564                                     throw 'The value ' + x + ' is not a type string.';
4565                                 return x.toUpperCase();
4566                             })());
4567                             v323 = (function(){
4568                                 var x = v323;
4569                                 var y = 1;
4570                                 if (typeof x != 'number')
4571                                     throw 'The value ' + x + ' is not a type number.';
4572                                 if (typeof y != 'number')
4573                                     throw 'The value ' + y + ' is not a type number.';
4574                                 return x+y;
4575                             })();
4576                             (l73.function((function(){
4577                                 var string = v318;
4578                                 var index = v323;
4579                                 if (typeof string != 'string')
4580                                     throw 'The value ' + string + ' is not a type string.';
4581                                 if (typeof index != 'number')
4582                                     throw 'The value ' + index + ' is not a type number.';
4583                                 return string.charCodeAt(index);
4584                             })(), 58) !== l3.value ? (function(){
4585                                 v322 = l4.value;
4586                                 return v323 = (function(){
4587                                     var x = v323;
4588                                     var y = 1;
4589                                     if (typeof x != 'number')
4590                                         throw 'The value ' + x + ' is not a type number.';
4591                                     if (typeof y != 'number')
4592                                         throw 'The value ' + y + ' is not a type number.';
4593                                     return x+y;
4594                                 })();
4595                             })() : l3.value);
4596                             return v321 = l86.function(v318, v323);
4597                         })());
4598                         v321 = (function(){
4599                             var x = v321;
4600                             if (typeof x != 'string')
4601                                 throw 'The value ' + x + ' is not a type string.';
4602                             return x.toUpperCase();
4603                         })();
4604                         v320 = l104.function(v320);
4605                         return ((function(v324){
4606                             return (v324 !== l3.value ? v324 : ((v320 === l104.function("KEYWORD"))?l4.value: l3.value));
4607                         })(v322) !== l3.value ? l119.function(v321, v320) : l118.function(v321, v320));
4608                     })(l66.function(v318),l3.value,l3.value,l3.value,l3.value);
4609                 })();
4610             }
4611             catch (cf){
4612                 if (cf.type == 'block' && cf.id == 128)
4613                     return cf.value;
4614                 else
4615                     throw cf;
4616             }
4617         })();
4618
4619     }));
4620     return l147;
4621 })();
4622 var l148 = {name: "*EOF*"};
4623 (function(){
4624     (((l148.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
4625         return (l148).value = l15.function();
4626     })());
4627     return l148;
4628 })();
4629 var l149 = {name: "QUOTE"};
4630 var l150 = {name: "BACKQUOTE"};
4631 var l151 = {name: "UNQUOTE-SPLICING"};
4632 var l152 = {name: "UNQUOTE"};
4633 (function(){
4634     (l144).function = (function(v330){
4635         ((v330)["fname"] = "LS-READ");
4636         return v330;
4637     })((function (v326){
4638         if (arguments.length < 1) throw 'too few arguments';
4639         if (arguments.length > 1) throw 'too many arguments';
4640         return (function(){
4641             try {
4642                 return (function(){
4643                     l142.function(v326);
4644                     return (function(v327){
4645                         return ((function(v328){
4646                             return (v328 !== l3.value ? v328 : l73.function(v327, 41));
4647                         })(l11.function(v327)) !== l3.value ? (function(){
4648                             return (function(){
4649                                 var symbol = l148;
4650                                 var value = symbol.value;
4651                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4652                                 return value;
4653                             })();
4654                         })() : (l73.function(v327, 40) !== l3.value ? (function(){
4655                             l137.function(v326);
4656                             return l143.function(v326);
4657                         })() : (l73.function(v327, 39) !== l3.value ? (function(){
4658                             l137.function(v326);
4659                             return l44.function(l149, l144.function(v326));
4660                         })() : (l73.function(v327, 96) !== l3.value ? (function(){
4661                             l137.function(v326);
4662                             return l44.function(l150, l144.function(v326));
4663                         })() : (l73.function(v327, 34) !== l3.value ? (function(){
4664                             l137.function(v326);
4665                             return l145.function(v326);
4666                         })() : (l73.function(v327, 44) !== l3.value ? (function(){
4667                             l137.function(v326);
4668                             return (l27.function(l136.function(v326), 64) !== l3.value ? (function(){
4669                                 l137.function(v326);
4670                                 return l44.function(l151, l144.function(v326));
4671                             })() : l44.function(l152, l144.function(v326)));
4672                         })() : (l73.function(v327, 35) !== l3.value ? (function(){
4673                             return l146.function(v326);
4674                         })() : (function(){
4675                             return (function(v329){
4676                                 return (l89.function((function(){
4677                                     var symbol = l85;
4678                                     var func = symbol.function;
4679                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4680                                     return func;
4681                                 })(), v329) !== l3.value ? l87.function(v329) : l147.function(v329));
4682                             })(l141.function(v326, (function(){
4683                                 var symbol = l140;
4684                                 var func = symbol.function;
4685                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4686                                 return func;
4687                             })()));
4688                         })())))))));
4689                     })(l136.function(v326));
4690                 })();
4691             }
4692             catch (cf){
4693                 if (cf.type == 'block' && cf.id == 130)
4694                     return cf.value;
4695                 else
4696                     throw cf;
4697             }
4698         })();
4699
4700     }));
4701     return l144;
4702 })();
4703 var l153 = {name: "LS-READ-FROM-STRING"};
4704 (function(){
4705     (l153).function = (function(v332){
4706         ((v332)["fname"] = "LS-READ-FROM-STRING");
4707         return v332;
4708     })((function (v331){
4709         if (arguments.length < 1) throw 'too few arguments';
4710         if (arguments.length > 1) throw 'too many arguments';
4711         return (function(){
4712             try {
4713                 return (function(){
4714                     return l144.function(l135.function(v331));
4715                 })();
4716             }
4717             catch (cf){
4718                 if (cf.type == 'block' && cf.id == 131)
4719                     return cf.value;
4720                 else
4721                     throw cf;
4722             }
4723         })();
4724
4725     }));
4726     return l153;
4727 })();
4728 var l154 = {name: "*COMPILATION-UNIT-CHECKS*"};
4729 (function(){
4730     (((l154.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
4731         return (l154).value = l3;
4732     })());
4733     return l154;
4734 })();
4735 var l155 = {name: "MAKE-BINDING"};
4736 (function(){
4737     (l155).function = (function(v337){
4738         ((v337)["fname"] = "MAKE-BINDING");
4739         return v337;
4740     })((function (v333,v334,v335,v336){
4741         if (arguments.length < 3) throw 'too few arguments';
4742         if (arguments.length > 4) throw 'too many arguments';
4743         switch(arguments.length){
4744         case 3:
4745         v336=l3.value;
4746         default: break;
4747         }
4748         return (function(){
4749             try {
4750                 return (function(){
4751                     return l44.function(v333, v334, v335, v336);
4752                 })();
4753             }
4754             catch (cf){
4755                 if (cf.type == 'block' && cf.id == 132)
4756                     return cf.value;
4757                 else
4758                     throw cf;
4759             }
4760         })();
4761
4762     }));
4763     return l155;
4764 })();
4765 var l156 = {name: "BINDING-NAME"};
4766 (function(){
4767     (l156).function = (function(v339){
4768         ((v339)["fname"] = "BINDING-NAME");
4769         return v339;
4770     })((function (v338){
4771         if (arguments.length < 1) throw 'too few arguments';
4772         if (arguments.length > 1) throw 'too many arguments';
4773         return (function(){
4774             try {
4775                 return (function(){
4776                     return l40.function(v338);
4777                 })();
4778             }
4779             catch (cf){
4780                 if (cf.type == 'block' && cf.id == 133)
4781                     return cf.value;
4782                 else
4783                     throw cf;
4784             }
4785         })();
4786
4787     }));
4788     return l156;
4789 })();
4790 var l157 = {name: "BINDING-TYPE"};
4791 (function(){
4792     (l157).function = (function(v341){
4793         ((v341)["fname"] = "BINDING-TYPE");
4794         return v341;
4795     })((function (v340){
4796         if (arguments.length < 1) throw 'too few arguments';
4797         if (arguments.length > 1) throw 'too many arguments';
4798         return (function(){
4799             try {
4800                 return (function(){
4801                     return l41.function(v340);
4802                 })();
4803             }
4804             catch (cf){
4805                 if (cf.type == 'block' && cf.id == 134)
4806                     return cf.value;
4807                 else
4808                     throw cf;
4809             }
4810         })();
4811
4812     }));
4813     return l157;
4814 })();
4815 var l158 = {name: "BINDING-VALUE"};
4816 (function(){
4817     (l158).function = (function(v343){
4818         ((v343)["fname"] = "BINDING-VALUE");
4819         return v343;
4820     })((function (v342){
4821         if (arguments.length < 1) throw 'too few arguments';
4822         if (arguments.length > 1) throw 'too many arguments';
4823         return (function(){
4824             try {
4825                 return (function(){
4826                     return l42.function(v342);
4827                 })();
4828             }
4829             catch (cf){
4830                 if (cf.type == 'block' && cf.id == 135)
4831                     return cf.value;
4832                 else
4833                     throw cf;
4834             }
4835         })();
4836
4837     }));
4838     return l158;
4839 })();
4840 var l159 = {name: "BINDING-DECLARATIONS"};
4841 (function(){
4842     (l159).function = (function(v345){
4843         ((v345)["fname"] = "BINDING-DECLARATIONS");
4844         return v345;
4845     })((function (v344){
4846         if (arguments.length < 1) throw 'too few arguments';
4847         if (arguments.length > 1) throw 'too many arguments';
4848         return (function(){
4849             try {
4850                 return (function(){
4851                     return l43.function(v344);
4852                 })();
4853             }
4854             catch (cf){
4855                 if (cf.type == 'block' && cf.id == 136)
4856                     return cf.value;
4857                 else
4858                     throw cf;
4859             }
4860         })();
4861
4862     }));
4863     return l159;
4864 })();
4865 var l160 = {name: "SET-BINDING-VALUE"};
4866 (function(){
4867     (l160).function = (function(v348){
4868         ((v348)["fname"] = "SET-BINDING-VALUE");
4869         return v348;
4870     })((function (v346,v347){
4871         if (arguments.length < 2) throw 'too few arguments';
4872         if (arguments.length > 2) throw 'too many arguments';
4873         return (function(){
4874             try {
4875                 return (function(){
4876                     return (function(){
4877                         var x = l36.function(v346);
4878                         if (typeof x != 'object')
4879                             throw 'The value ' + x + ' is not a type object.';
4880                         return (x.car = v347);
4881                     })();
4882                 })();
4883             }
4884             catch (cf){
4885                 if (cf.type == 'block' && cf.id == 137)
4886                     return cf.value;
4887                 else
4888                     throw cf;
4889             }
4890         })();
4891
4892     }));
4893     return l160;
4894 })();
4895 var l161 = {name: "SET-BINDING-DECLARATIONS"};
4896 (function(){
4897     (l161).function = (function(v351){
4898         ((v351)["fname"] = "SET-BINDING-DECLARATIONS");
4899         return v351;
4900     })((function (v349,v350){
4901         if (arguments.length < 2) throw 'too few arguments';
4902         if (arguments.length > 2) throw 'too many arguments';
4903         return (function(){
4904             try {
4905                 return (function(){
4906                     return (function(){
4907                         var x = l38.function(v349);
4908                         if (typeof x != 'object')
4909                             throw 'The value ' + x + ' is not a type object.';
4910                         return (x.car = v350);
4911                     })();
4912                 })();
4913             }
4914             catch (cf){
4915                 if (cf.type == 'block' && cf.id == 138)
4916                     return cf.value;
4917                 else
4918                     throw cf;
4919             }
4920         })();
4921
4922     }));
4923     return l161;
4924 })();
4925 var l162 = {name: "PUSH-BINDING-DECLARATION"};
4926 (function(){
4927     (l162).function = (function(v354){
4928         ((v354)["fname"] = "PUSH-BINDING-DECLARATION");
4929         return v354;
4930     })((function (v352,v353){
4931         if (arguments.length < 2) throw 'too few arguments';
4932         if (arguments.length > 2) throw 'too many arguments';
4933         return (function(){
4934             try {
4935                 return (function(){
4936                     return l161.function(v353, ({car: v352, cdr: l159.function(v353)}));
4937                 })();
4938             }
4939             catch (cf){
4940                 if (cf.type == 'block' && cf.id == 139)
4941                     return cf.value;
4942                 else
4943                     throw cf;
4944             }
4945         })();
4946
4947     }));
4948     return l162;
4949 })();
4950 var l163 = {name: "MAKE-LEXENV"};
4951 (function(){
4952     (l163).function = (function(v355){
4953         ((v355)["fname"] = "MAKE-LEXENV");
4954         return v355;
4955     })((function (){
4956         if (arguments.length > 0) throw 'too many arguments';
4957         return (function(){
4958             try {
4959                 return (function(){
4960                     return l44.function(l3.value, l3.value, l3.value, l3.value);
4961                 })();
4962             }
4963             catch (cf){
4964                 if (cf.type == 'block' && cf.id == 140)
4965                     return cf.value;
4966                 else
4967                     throw cf;
4968             }
4969         })();
4970
4971     }));
4972     return l163;
4973 })();
4974 var l164 = {name: "COPY-LEXENV"};
4975 (function(){
4976     (l164).function = (function(v357){
4977         ((v357)["fname"] = "COPY-LEXENV");
4978         return v357;
4979     })((function (v356){
4980         if (arguments.length < 1) throw 'too few arguments';
4981         if (arguments.length > 1) throw 'too many arguments';
4982         return (function(){
4983             try {
4984                 return (function(){
4985                     return l70.function(v356);
4986                 })();
4987             }
4988             catch (cf){
4989                 if (cf.type == 'block' && cf.id == 141)
4990                     return cf.value;
4991                 else
4992                     throw cf;
4993             }
4994         })();
4995
4996     }));
4997     return l164;
4998 })();
4999 var l165 = {name: "PUSH-TO-LEXENV"};
5000 var l166 = {name: "BLOCK"};
5001 var l167 = {name: "GOTAG"};
5002 (function(){
5003     (l165).function = (function(v362){
5004         ((v362)["fname"] = "PUSH-TO-LEXENV");
5005         return v362;
5006     })((function (v358,v359,v360){
5007         if (arguments.length < 3) throw 'too few arguments';
5008         if (arguments.length > 3) throw 'too many arguments';
5009         return (function(){
5010             try {
5011                 return (function(){
5012                     return (function(v361){
5013                         return (l27.function(v361, l98) !== l3.value ? (function(){
5014                             return (function(){
5015                                 var x = v359;
5016                                 if (typeof x != 'object')
5017                                     throw 'The value ' + x + ' is not a type object.';
5018                                 return (x.car = ({car: v358, cdr: (function(){
5019                                     var tmp = v359;
5020                                     return tmp === l3.value? l3.value: tmp.car;
5021                                 })()}));
5022                             })();
5023                         })() : (l27.function(v361, l97) !== l3.value ? (function(){
5024                             return (function(){
5025                                 var x = (function(){
5026                                     var tmp = v359;
5027                                     return tmp === l3.value? l3.value: tmp.cdr;
5028                                 })();
5029                                 if (typeof x != 'object')
5030                                     throw 'The value ' + x + ' is not a type object.';
5031                                 return (x.car = ({car: v358, cdr: l34.function(v359)}));
5032                             })();
5033                         })() : (l27.function(v361, l166) !== l3.value ? (function(){
5034                             return (function(){
5035                                 var x = l36.function(v359);
5036                                 if (typeof x != 'object')
5037                                     throw 'The value ' + x + ' is not a type object.';
5038                                 return (x.car = ({car: v358, cdr: l37.function(v359)}));
5039                             })();
5040                         })() : (l27.function(v361, l167) !== l3.value ? (function(){
5041                             return (function(){
5042                                 var x = l38.function(v359);
5043                                 if (typeof x != 'object')
5044                                     throw 'The value ' + x + ' is not a type object.';
5045                                 return (x.car = ({car: v358, cdr: l39.function(v359)}));
5046                             })();
5047                         })() : (function(){
5048                             return (function(){
5049                                 throw "ECASE expression failed.";
5050                             })();
5051                         })()))));
5052                     })(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 l165;
5065 })();
5066 var l168 = {name: "EXTEND-LEXENV"};
5067 (function(){
5068     (l168).function = (function(v369){
5069         ((v369)["fname"] = "EXTEND-LEXENV");
5070         return v369;
5071     })((function (v363,v364,v365){
5072         if (arguments.length < 3) throw 'too few arguments';
5073         if (arguments.length > 3) throw 'too many arguments';
5074         return (function(){
5075             try {
5076                 return (function(){
5077                     return (function(v366){
5078                         return (function(){
5079                             try {
5080                                 return (function(){
5081                                     return (function(v367,v368){
5082                                         (function(){
5083                                             while(v367 !== l3.value){
5084                                                 v368 = (function(){
5085                                                     var tmp = v367;
5086                                                     return tmp === l3.value? l3.value: tmp.car;
5087                                                 })();
5088                                                 (function(){
5089                                                     l165.function(v368, v366, v365);
5090                                                     return l3.value;
5091                                                 })();
5092                                                 v367 = (function(){
5093                                                     var tmp = v367;
5094                                                     return tmp === l3.value? l3.value: tmp.cdr;
5095                                                 })();
5096                                             }return l3.value;
5097                                         })();
5098                                         return v366;
5099                                     })(l64.function(v363),l3.value);
5100                                 })();
5101                             }
5102                             catch (cf){
5103                                 if (cf.type == 'block' && cf.id == 144)
5104                                     return cf.value;
5105                                 else
5106                                     throw cf;
5107                             }
5108                         })();
5109                     })(l164.function(v364));
5110                 })();
5111             }
5112             catch (cf){
5113                 if (cf.type == 'block' && cf.id == 143)
5114                     return cf.value;
5115                 else
5116                     throw cf;
5117             }
5118         })();
5119
5120     }));
5121     return l168;
5122 })();
5123 var l169 = {name: "LOOKUP-IN-LEXENV"};
5124 (function(){
5125     (l169).function = (function(v374){
5126         ((v374)["fname"] = "LOOKUP-IN-LEXENV");
5127         return v374;
5128     })((function (v370,v371,v372){
5129         if (arguments.length < 3) throw 'too few arguments';
5130         if (arguments.length > 3) throw 'too many arguments';
5131         return (function(){
5132             try {
5133                 return (function(){
5134                     return l90.function(v370, (function(v373){
5135                         return (l27.function(v373, l98) !== l3.value ? (function(){
5136                             return l40.function(v371);
5137                         })() : (l27.function(v373, l97) !== l3.value ? (function(){
5138                             return l41.function(v371);
5139                         })() : (l27.function(v373, l166) !== l3.value ? (function(){
5140                             return l42.function(v371);
5141                         })() : (l27.function(v373, l167) !== l3.value ? (function(){
5142                             return l43.function(v371);
5143                         })() : (function(){
5144                             return (function(){
5145                                 throw "ECASE expression failed.";
5146                             })();
5147                         })()))));
5148                     })(v372));
5149                 })();
5150             }
5151             catch (cf){
5152                 if (cf.type == 'block' && cf.id == 145)
5153                     return cf.value;
5154                 else
5155                     throw cf;
5156             }
5157         })();
5158
5159     }));
5160     return l169;
5161 })();
5162 var l170 = {name: "*ENVIRONMENT*"};
5163 (function(){
5164     (((l170.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
5165         return (l170).value = l163.function();
5166     })());
5167     return l170;
5168 })();
5169 var l171 = {name: "*VARIABLE-COUNTER*"};
5170 (function(){
5171     (((l171.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
5172         return (l171).value = 0;
5173     })());
5174     return l171;
5175 })();
5176 var l172 = {name: "GVARNAME"};
5177 (function(){
5178     (l172).function = (function(v376){
5179         ((v376)["fname"] = "GVARNAME");
5180         return v376;
5181     })((function (v375){
5182         if (arguments.length < 1) throw 'too few arguments';
5183         if (arguments.length > 1) throw 'too many arguments';
5184         return (function(){
5185             try {
5186                 return (function(){
5187                     return l122.function("v", l16.function((l171).value = (function(){
5188                         var x = (function(){
5189                             var symbol = l171;
5190                             var value = symbol.value;
5191                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5192                             return value;
5193                         })();
5194                         var y = 1;
5195                         if (typeof x != 'number')
5196                             throw 'The value ' + x + ' is not a type number.';
5197                         if (typeof y != 'number')
5198                             throw 'The value ' + y + ' is not a type number.';
5199                         return x+y;
5200                     })()));
5201                 })();
5202             }
5203             catch (cf){
5204                 if (cf.type == 'block' && cf.id == 146)
5205                     return cf.value;
5206                 else
5207                     throw cf;
5208             }
5209         })();
5210
5211     }));
5212     return l172;
5213 })();
5214 var l173 = {name: "TRANSLATE-VARIABLE"};
5215 (function(){
5216     (l173).function = (function(v378){
5217         ((v378)["fname"] = "TRANSLATE-VARIABLE");
5218         return v378;
5219     })((function (v377){
5220         if (arguments.length < 1) throw 'too few arguments';
5221         if (arguments.length > 1) throw 'too many arguments';
5222         return (function(){
5223             try {
5224                 return (function(){
5225                     return l158.function(l169.function(v377, (function(){
5226                         var symbol = l170;
5227                         var value = symbol.value;
5228                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5229                         return value;
5230                     })(), l98));
5231                 })();
5232             }
5233             catch (cf){
5234                 if (cf.type == 'block' && cf.id == 147)
5235                     return cf.value;
5236                 else
5237                     throw cf;
5238             }
5239         })();
5240
5241     }));
5242     return l173;
5243 })();
5244 var l174 = {name: "EXTEND-LOCAL-ENV"};
5245 var l175 = {name: "LEXICAL-VARIABLE"};
5246 (function(){
5247     (l174).function = (function(v384){
5248         ((v384)["fname"] = "EXTEND-LOCAL-ENV");
5249         return v384;
5250     })((function (v379){
5251         if (arguments.length < 1) throw 'too few arguments';
5252         if (arguments.length > 1) throw 'too many arguments';
5253         return (function(){
5254             try {
5255                 return (function(){
5256                     return (function(v380){
5257                         return (function(){
5258                             try {
5259                                 return (function(){
5260                                     return (function(v381,v382){
5261                                         (function(){
5262                                             while(v381 !== l3.value){
5263                                                 v382 = (function(){
5264                                                     var tmp = v381;
5265                                                     return tmp === l3.value? l3.value: tmp.car;
5266                                                 })();
5267                                                 (function(){
5268                                                     (function(v383){
5269                                                         return l165.function(v383, v380, l98);
5270                                                     })(l155.function(v382, l175, l172.function(v382)));
5271                                                     return l3.value;
5272                                                 })();
5273                                                 v381 = (function(){
5274                                                     var tmp = v381;
5275                                                     return tmp === l3.value? l3.value: tmp.cdr;
5276                                                 })();
5277                                             }return l3.value;
5278                                         })();
5279                                         return v380;
5280                                     })(v379,l3.value);
5281                                 })();
5282                             }
5283                             catch (cf){
5284                                 if (cf.type == 'block' && cf.id == 149)
5285                                     return cf.value;
5286                                 else
5287                                     throw cf;
5288                             }
5289                         })();
5290                     })(l164.function((function(){
5291                         var symbol = l170;
5292                         var value = symbol.value;
5293                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5294                         return value;
5295                     })()));
5296                 })();
5297             }
5298             catch (cf){
5299                 if (cf.type == 'block' && cf.id == 148)
5300                     return cf.value;
5301                 else
5302                     throw cf;
5303             }
5304         })();
5305
5306     }));
5307     return l174;
5308 })();
5309 var l176 = {name: "*TOPLEVEL-COMPILATIONS*"};
5310 (function(){
5311     (((l176.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
5312         return (l176).value = l3.value;
5313     })());
5314     return l176;
5315 })();
5316 var l177 = {name: "TOPLEVEL-COMPILATION"};
5317 (function(){
5318     (l177).function = (function(v386){
5319         ((v386)["fname"] = "TOPLEVEL-COMPILATION");
5320         return v386;
5321     })((function (v385){
5322         if (arguments.length < 1) throw 'too few arguments';
5323         if (arguments.length > 1) throw 'too many arguments';
5324         return (function(){
5325             try {
5326                 return (function(){
5327                     return (l176).value = ({car: v385, cdr: (function(){
5328                         var symbol = l176;
5329                         var value = symbol.value;
5330                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5331                         return value;
5332                     })()});
5333                 })();
5334             }
5335             catch (cf){
5336                 if (cf.type == 'block' && cf.id == 150)
5337                     return cf.value;
5338                 else
5339                     throw cf;
5340             }
5341         })();
5342
5343     }));
5344     return l177;
5345 })();
5346 var l178 = {name: "NULL-OR-EMPTY-P"};
5347 (function(){
5348     (l178).function = (function(v388){
5349         ((v388)["fname"] = "NULL-OR-EMPTY-P");
5350         return v388;
5351     })((function (v387){
5352         if (arguments.length < 1) throw 'too few arguments';
5353         if (arguments.length > 1) throw 'too many arguments';
5354         return (function(){
5355             try {
5356                 return (function(){
5357                     return l25.function(l66.function(v387));
5358                 })();
5359             }
5360             catch (cf){
5361                 if (cf.type == 'block' && cf.id == 151)
5362                     return cf.value;
5363                 else
5364                     throw cf;
5365             }
5366         })();
5367
5368     }));
5369     return l178;
5370 })();
5371 var l179 = {name: "GET-TOPLEVEL-COMPILATIONS"};
5372 (function(){
5373     (l179).function = (function(v389){
5374         ((v389)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
5375         return v389;
5376     })((function (){
5377         if (arguments.length > 0) throw 'too many arguments';
5378         return (function(){
5379             try {
5380                 return (function(){
5381                     return l64.function(l83.function((function(){
5382                         var symbol = l178;
5383                         var func = symbol.function;
5384                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5385                         return func;
5386                     })(), (function(){
5387                         var symbol = l176;
5388                         var value = symbol.value;
5389                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5390                         return value;
5391                     })()));
5392                 })();
5393             }
5394             catch (cf){
5395                 if (cf.type == 'block' && cf.id == 152)
5396                     return cf.value;
5397                 else
5398                     throw cf;
5399             }
5400         })();
5401
5402     }));
5403     return l179;
5404 })();
5405 var l180 = {name: "%COMPILE-DEFMACRO"};
5406 var l181 = {name: "MACRO"};
5407 (function(){
5408     (l180).function = (function(v392){
5409         ((v392)["fname"] = "%COMPILE-DEFMACRO");
5410         return v392;
5411     })((function (v390,v391){
5412         if (arguments.length < 2) throw 'too few arguments';
5413         if (arguments.length > 2) throw 'too many arguments';
5414         return (function(){
5415             try {
5416                 return (function(){
5417                     l177.function((function(){
5418                         var symbol = l129;
5419                         var func = symbol.function;
5420                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5421                         return func;
5422                     })()(l62.function(l44.function(l149), l44.function(v390))));
5423                     return l165.function(l155.function(v390, l181, v391), (function(){
5424                         var symbol = l170;
5425                         var value = symbol.value;
5426                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5427                         return value;
5428                     })(), l97);
5429                 })();
5430             }
5431             catch (cf){
5432                 if (cf.type == 'block' && cf.id == 153)
5433                     return cf.value;
5434                 else
5435                     throw cf;
5436             }
5437         })();
5438
5439     }));
5440     return l180;
5441 })();
5442 var l182 = {name: "GLOBAL-BINDING"};
5443 (function(){
5444     (l182).function = (function(v398){
5445         ((v398)["fname"] = "GLOBAL-BINDING");
5446         return v398;
5447     })((function (v393,v394,v395){
5448         if (arguments.length < 3) throw 'too few arguments';
5449         if (arguments.length > 3) throw 'too many arguments';
5450         return (function(){
5451             try {
5452                 return (function(){
5453                     return (function(v396){
5454                         return (v396 !== l3.value ? v396 : (function(v397){
5455                             l165.function(v397, (function(){
5456                                 var symbol = l170;
5457                                 var value = symbol.value;
5458                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5459                                 return value;
5460                             })(), v395);
5461                             return v397;
5462                         })(l155.function(v393, v394, l3.value)));
5463                     })(l169.function(v393, (function(){
5464                         var symbol = l170;
5465                         var value = symbol.value;
5466                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5467                         return value;
5468                     })(), v395));
5469                 })();
5470             }
5471             catch (cf){
5472                 if (cf.type == 'block' && cf.id == 154)
5473                     return cf.value;
5474                 else
5475                     throw cf;
5476             }
5477         })();
5478
5479     }));
5480     return l182;
5481 })();
5482 var l183 = {name: "CLAIMP"};
5483 (function(){
5484     (l183).function = (function(v403){
5485         ((v403)["fname"] = "CLAIMP");
5486         return v403;
5487     })((function (v399,v400,v401){
5488         if (arguments.length < 3) throw 'too few arguments';
5489         if (arguments.length > 3) throw 'too many arguments';
5490         return (function(){
5491             try {
5492                 return (function(){
5493                     return (function(v402){
5494                         return (v402 !== l3.value ? l81.function(v401, l159.function(v402)) : l3.value);
5495                     })(l169.function(v399, (function(){
5496                         var symbol = l170;
5497                         var value = symbol.value;
5498                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5499                         return value;
5500                     })(), v400));
5501                 })();
5502             }
5503             catch (cf){
5504                 if (cf.type == 'block' && cf.id == 155)
5505                     return cf.value;
5506                 else
5507                     throw cf;
5508             }
5509         })();
5510
5511     }));
5512     return l183;
5513 })();
5514 var l184 = {name: "!PROCLAIM"};
5515 var l185 = {name: "NOTINLINE"};
5516 var l186 = {name: "CONSTANT"};
5517 var l187 = {name: "NON-OVERRIDABLE"};
5518 (function(){
5519     (l184).function = (function(v415){
5520         ((v415)["fname"] = "!PROCLAIM");
5521         return v415;
5522     })((function (v404){
5523         if (arguments.length < 1) throw 'too few arguments';
5524         if (arguments.length > 1) throw 'too many arguments';
5525         return (function(){
5526             try {
5527                 return (function(){
5528                     return (function(v405){
5529                         return (l27.function(v405, l185) !== l3.value ? (function(){
5530                             return (function(){
5531                                 try {
5532                                     return (function(){
5533                                         return (function(v406,v407){
5534                                             (function(){
5535                                                 while(v406 !== l3.value){
5536                                                     v407 = (function(){
5537                                                         var tmp = v406;
5538                                                         return tmp === l3.value? l3.value: tmp.car;
5539                                                     })();
5540                                                     (function(){
5541                                                         (function(v408){
5542                                                             return l162.function(l185, v408);
5543                                                         })(l182.function(v407, l97, l97));
5544                                                         return l3.value;
5545                                                     })();
5546                                                     v406 = (function(){
5547                                                         var tmp = v406;
5548                                                         return tmp === l3.value? l3.value: tmp.cdr;
5549                                                     })();
5550                                                 }return l3.value;
5551                                             })();
5552                                             return l3.value;
5553                                         })((function(){
5554                                             var tmp = v404;
5555                                             return tmp === l3.value? l3.value: tmp.cdr;
5556                                         })(),l3.value);
5557                                     })();
5558                                 }
5559                                 catch (cf){
5560                                     if (cf.type == 'block' && cf.id == 157)
5561                                         return cf.value;
5562                                     else
5563                                         throw cf;
5564                                 }
5565                             })();
5566                         })() : (l27.function(v405, l186) !== l3.value ? (function(){
5567                             return (function(){
5568                                 try {
5569                                     return (function(){
5570                                         return (function(v409,v410){
5571                                             (function(){
5572                                                 while(v409 !== l3.value){
5573                                                     v410 = (function(){
5574                                                         var tmp = v409;
5575                                                         return tmp === l3.value? l3.value: tmp.car;
5576                                                     })();
5577                                                     (function(){
5578                                                         (function(v411){
5579                                                             return l162.function(l186, v411);
5580                                                         })(l182.function(v410, l98, l98));
5581                                                         return l3.value;
5582                                                     })();
5583                                                     v409 = (function(){
5584                                                         var tmp = v409;
5585                                                         return tmp === l3.value? l3.value: tmp.cdr;
5586                                                     })();
5587                                                 }return l3.value;
5588                                             })();
5589                                             return l3.value;
5590                                         })((function(){
5591                                             var tmp = v404;
5592                                             return tmp === l3.value? l3.value: tmp.cdr;
5593                                         })(),l3.value);
5594                                     })();
5595                                 }
5596                                 catch (cf){
5597                                     if (cf.type == 'block' && cf.id == 158)
5598                                         return cf.value;
5599                                     else
5600                                         throw cf;
5601                                 }
5602                             })();
5603                         })() : (l27.function(v405, l187) !== l3.value ? (function(){
5604                             return (function(){
5605                                 try {
5606                                     return (function(){
5607                                         return (function(v412,v413){
5608                                             (function(){
5609                                                 while(v412 !== l3.value){
5610                                                     v413 = (function(){
5611                                                         var tmp = v412;
5612                                                         return tmp === l3.value? l3.value: tmp.car;
5613                                                     })();
5614                                                     (function(){
5615                                                         (function(v414){
5616                                                             return l162.function(l187, v414);
5617                                                         })(l182.function(v413, l97, l97));
5618                                                         return l3.value;
5619                                                     })();
5620                                                     v412 = (function(){
5621                                                         var tmp = v412;
5622                                                         return tmp === l3.value? l3.value: tmp.cdr;
5623                                                     })();
5624                                                 }return l3.value;
5625                                             })();
5626                                             return l3.value;
5627                                         })((function(){
5628                                             var tmp = v404;
5629                                             return tmp === l3.value? l3.value: tmp.cdr;
5630                                         })(),l3.value);
5631                                     })();
5632                                 }
5633                                 catch (cf){
5634                                     if (cf.type == 'block' && cf.id == 159)
5635                                         return cf.value;
5636                                     else
5637                                         throw cf;
5638                                 }
5639                             })();
5640                         })() : l3.value)));
5641                     })((function(){
5642                         var tmp = v404;
5643                         return tmp === l3.value? l3.value: tmp.car;
5644                     })());
5645                 })();
5646             }
5647             catch (cf){
5648                 if (cf.type == 'block' && cf.id == 156)
5649                     return cf.value;
5650                 else
5651                     throw cf;
5652             }
5653         })();
5654
5655     }));
5656     return l184;
5657 })();
5658 var l188 = {name: "PROCLAIM"};
5659 (l188).function = (function(){
5660     var symbol = l184;
5661     var func = symbol.function;
5662     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5663     return func;
5664 })();
5665 var l189 = {name: "*COMPILATIONS*"};
5666 (function(){
5667     (((l189.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
5668         return (l189).value = l3.value;
5669     })());
5670     return l189;
5671 })();
5672 var l190 = {name: "DEFINE-COMPILATION"};
5673 l190;
5674 var l191 = {name: "IF"};
5675 (l189).value = ({car: l44.function(l191, (function (v416,v417,v418){
5676     if (arguments.length < 3) throw 'too few arguments';
5677     if (arguments.length > 3) throw 'too many arguments';
5678     return (function(){
5679         try {
5680             return (function(){
5681                 return l122.function("(", (function(){
5682                     var symbol = l129;
5683                     var func = symbol.function;
5684                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5685                     return func;
5686                 })()(v416), " !== ", (function(){
5687                     var symbol = l129;
5688                     var func = symbol.function;
5689                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5690                     return func;
5691                 })()(l3.value), " ? ", (function(){
5692                     var symbol = l129;
5693                     var func = symbol.function;
5694                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5695                     return func;
5696                 })()(v417), " : ", (function(){
5697                     var symbol = l129;
5698                     var func = symbol.function;
5699                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5700                     return func;
5701                 })()(v418), ")");
5702             })();
5703         }
5704         catch (cf){
5705             if (cf.type == 'block' && cf.id == 160)
5706                 return cf.value;
5707             else
5708                 throw cf;
5709         }
5710     })();
5711
5712 })), cdr: (function(){
5713     var symbol = l189;
5714     var value = symbol.value;
5715     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5716     return value;
5717 })()});
5718 var l192 = {name: "*LAMBDA-LIST-KEYWORDS*"};
5719 var l193 = {name: "&OPTIONAL"};
5720 var l194 = {name: "&REST"};
5721 var l195 = {car: l193, cdr: {car: l194, cdr: l3}};
5722 (function(){
5723     (((l192.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
5724         return (l192).value = l195;
5725     })());
5726     return l192;
5727 })();
5728 var l196 = {name: "LIST-UNTIL-KEYWORD"};
5729 (function(){
5730     (l196).function = (function(v421){
5731         ((v421)["fname"] = "LIST-UNTIL-KEYWORD");
5732         return v421;
5733     })((function (v419){
5734         if (arguments.length < 1) throw 'too few arguments';
5735         if (arguments.length > 1) throw 'too many arguments';
5736         return (function(){
5737             try {
5738                 return (function(){
5739                     return ((function(v420){
5740                         return (v420 !== l3.value ? v420 : l81.function((function(){
5741                             var tmp = v419;
5742                             return tmp === l3.value? l3.value: tmp.car;
5743                         })(), (function(){
5744                             var symbol = l192;
5745                             var value = symbol.value;
5746                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5747                             return value;
5748                         })()));
5749                     })(l11.function(v419)) !== l3.value ? l3.value : ({car: (function(){
5750                         var tmp = v419;
5751                         return tmp === l3.value? l3.value: tmp.car;
5752                     })(), cdr: l196.function((function(){
5753                         var tmp = v419;
5754                         return tmp === l3.value? l3.value: tmp.cdr;
5755                     })())}));
5756                 })();
5757             }
5758             catch (cf){
5759                 if (cf.type == 'block' && cf.id == 161)
5760                     return cf.value;
5761                 else
5762                     throw cf;
5763             }
5764         })();
5765
5766     }));
5767     return l196;
5768 })();
5769 var l197 = {name: "LAMBDA-LIST-REQUIRED-ARGUMENTS"};
5770 (function(){
5771     (l197).function = (function(v423){
5772         ((v423)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
5773         return v423;
5774     })((function (v422){
5775         if (arguments.length < 1) throw 'too few arguments';
5776         if (arguments.length > 1) throw 'too many arguments';
5777         return (function(){
5778             try {
5779                 return (function(){
5780                     return l196.function(v422);
5781                 })();
5782             }
5783             catch (cf){
5784                 if (cf.type == 'block' && cf.id == 162)
5785                     return cf.value;
5786                 else
5787                     throw cf;
5788             }
5789         })();
5790
5791     }));
5792     return l197;
5793 })();
5794 var l198 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"};
5795 (function(){
5796     (l198).function = (function(v425){
5797         ((v425)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
5798         return v425;
5799     })((function (v424){
5800         if (arguments.length < 1) throw 'too few arguments';
5801         if (arguments.length > 1) throw 'too many arguments';
5802         return (function(){
5803             try {
5804                 return (function(){
5805                     return l68.function((function(){
5806                         var symbol = l58;
5807                         var func = symbol.function;
5808                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5809                         return func;
5810                     })(), l196.function((function(){
5811                         var tmp = l81.function(l193, v424);
5812                         return tmp === l3.value? l3.value: tmp.cdr;
5813                     })()));
5814                 })();
5815             }
5816             catch (cf){
5817                 if (cf.type == 'block' && cf.id == 163)
5818                     return cf.value;
5819                 else
5820                     throw cf;
5821             }
5822         })();
5823
5824     }));
5825     return l198;
5826 })();
5827 var l199 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS"};
5828 (function(){
5829     (l199).function = (function(v427){
5830         ((v427)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
5831         return v427;
5832     })((function (v426){
5833         if (arguments.length < 1) throw 'too few arguments';
5834         if (arguments.length > 1) throw 'too many arguments';
5835         return (function(){
5836             try {
5837                 return (function(){
5838                     return l68.function((function(){
5839                         var symbol = l31;
5840                         var func = symbol.function;
5841                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5842                         return func;
5843                     })(), l198.function(v426));
5844                 })();
5845             }
5846             catch (cf){
5847                 if (cf.type == 'block' && cf.id == 164)
5848                     return cf.value;
5849                 else
5850                     throw cf;
5851             }
5852         })();
5853
5854     }));
5855     return l199;
5856 })();
5857 var l200 = {name: "LAMBDA-LIST-REST-ARGUMENT"};
5858 (function(){
5859     (l200).function = (function(v430){
5860         ((v430)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
5861         return v430;
5862     })((function (v428){
5863         if (arguments.length < 1) throw 'too few arguments';
5864         if (arguments.length > 1) throw 'too many arguments';
5865         return (function(){
5866             try {
5867                 return (function(){
5868                     return (function(v429){
5869                         ((function(){
5870                             var tmp = v429;
5871                             return tmp === l3.value? l3.value: tmp.cdr;
5872                         })() !== l3.value ? (function(){
5873                             return (function(){
5874                                 throw "Bad lambda-list";
5875                             })();
5876                         })() : l3.value);
5877                         return (function(){
5878                             var tmp = v429;
5879                             return tmp === l3.value? l3.value: tmp.car;
5880                         })();
5881                     })(l196.function((function(){
5882                         var tmp = l81.function(l194, v428);
5883                         return tmp === l3.value? l3.value: tmp.cdr;
5884                     })()));
5885                 })();
5886             }
5887             catch (cf){
5888                 if (cf.type == 'block' && cf.id == 165)
5889                     return cf.value;
5890                 else
5891                     throw cf;
5892             }
5893         })();
5894
5895     }));
5896     return l200;
5897 })();
5898 var l201 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
5899 (function(){
5900     (l201).function = (function(v433){
5901         ((v433)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
5902         return v433;
5903     })((function (v432){
5904         if (arguments.length < 1) throw 'too few arguments';
5905         var v431= l3.value;
5906         for (var i = arguments.length-1; i>=1; i--)
5907             v431 = {car: arguments[i], cdr:
5908         v431};
5909         return (function(){
5910             try {
5911                 return (function(){
5912                     return (v432 !== l3.value ? l122.function("(function(){", (function(){
5913                         var symbol = l121;
5914                         var value = symbol.value;
5915                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5916                         return value;
5917                     })(), l127.function("var func = ", l124.function(v431), ";", (function(){
5918                         var symbol = l121;
5919                         var value = symbol.value;
5920                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5921                         return value;
5922                     })(), "func.docstring = '", v432, "';", (function(){
5923                         var symbol = l121;
5924                         var value = symbol.value;
5925                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5926                         return value;
5927                     })(), "return func;", (function(){
5928                         var symbol = l121;
5929                         var value = symbol.value;
5930                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5931                         return value;
5932                     })()), "})()") : l124.function(v431));
5933                 })();
5934             }
5935             catch (cf){
5936                 if (cf.type == 'block' && cf.id == 166)
5937                     return cf.value;
5938                 else
5939                     throw cf;
5940             }
5941         })();
5942
5943     }));
5944     return l201;
5945 })();
5946 var l202 = {name: "LAMBDA"};
5947 var l203 = {name: "LS-COMPILE-BLOCK"};
5948 (l189).value = ({car: l44.function(l202, (function (v435){
5949     if (arguments.length < 1) throw 'too few arguments';
5950     var v434= l3.value;
5951     for (var i = arguments.length-1; i>=1; i--)
5952         v434 = {car: arguments[i], cdr:
5953     v434};
5954     return (function(){
5955         try {
5956             return (function(){
5957                 return (function(v436,v437,v438,v439){
5958                     ((((typeof((function(){
5959                         var tmp = v434;
5960                         return tmp === l3.value? l3.value: tmp.car;
5961                     })()) == "string")?l4.value: l3.value) !== l3.value ? l28.function(l11.function((function(){
5962                         var tmp = v434;
5963                         return tmp === l3.value? l3.value: tmp.cdr;
5964                     })())) : l3.value) !== l3.value ? (function(){
5965                         v439 = (function(){
5966                             var tmp = v434;
5967                             return tmp === l3.value? l3.value: tmp.car;
5968                         })();
5969                         return v434 = (function(){
5970                             var tmp = v434;
5971                             return tmp === l3.value? l3.value: tmp.cdr;
5972                         })();
5973                     })() : l3.value);
5974                     return (function(v440,v441,v442){
5975                         try {
5976                             var tmp;
5977                             tmp = l170.value;
5978                             l170.value = v442;
5979                             v442 = tmp;
5980                             return l201.function(v439, "(function (", l124.function(l68.function((function(){
5981                                 var symbol = l173;
5982                                 var func = symbol.function;
5983                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5984                                 return func;
5985                             })(), l62.function(v436, v437)), ","), "){", (function(){
5986                                 var symbol = l121;
5987                                 var value = symbol.value;
5988                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5989                                 return value;
5990                             })(), l127.function((v436 !== l3.value ? l122.function("if (arguments.length < ", l16.function(v440), ") throw 'too few arguments';", (function(){
5991                                 var symbol = l121;
5992                                 var value = symbol.value;
5993                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5994                                 return value;
5995                             })()) : ""), (l28.function(v438) !== l3.value ? l122.function("if (arguments.length > ", l16.function((function(){
5996                                 var x = v440;
5997                                 var y = v441;
5998                                 if (typeof x != 'number')
5999                                     throw 'The value ' + x + ' is not a type number.';
6000                                 if (typeof y != 'number')
6001                                     throw 'The value ' + y + ' is not a type number.';
6002                                 return x+y;
6003                             })()), ") throw 'too many arguments';", (function(){
6004                                 var symbol = l121;
6005                                 var value = symbol.value;
6006                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6007                                 return value;
6008                             })()) : ""), (v437 !== l3.value ? l122.function("switch(arguments.length){", (function(){
6009                                 var symbol = l121;
6010                                 var value = symbol.value;
6011                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6012                                 return value;
6013                             })(), (function(v443,v444,v445){
6014                                 return (function(){
6015                                     (function(){
6016                                         try {
6017                                             return (function(){
6018                                                 return (function(){
6019                                                     while(((function(){
6020                                                         var x = v445;
6021                                                         var y = v441;
6022                                                         if (typeof x != 'number')
6023                                                             throw 'The value ' + x + ' is not a type number.';
6024                                                         if (typeof y != 'number')
6025                                                             throw 'The value ' + y + ' is not a type number.';
6026                                                         return x<y;
6027                                                     })()?l4.value: l3.value) !== l3.value){
6028                                                         (function(v446){
6029                                                             v444 = ({car: l122.function("case ", l16.function((function(){
6030                                                                 var x = v445;
6031                                                                 var y = v440;
6032                                                                 if (typeof x != 'number')
6033                                                                     throw 'The value ' + x + ' is not a type number.';
6034                                                                 if (typeof y != 'number')
6035                                                                     throw 'The value ' + y + ' is not a type number.';
6036                                                                 return x+y;
6037                                                             })()), ":", (function(){
6038                                                                 var symbol = l121;
6039                                                                 var value = symbol.value;
6040                                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6041                                                                 return value;
6042                                                             })(), l173.function((function(){
6043                                                                 var tmp = v446;
6044                                                                 return tmp === l3.value? l3.value: tmp.car;
6045                                                             })()), "=", (function(){
6046                                                                 var symbol = l129;
6047                                                                 var func = symbol.function;
6048                                                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6049                                                                 return func;
6050                                                             })()(l34.function(v446)), ";", (function(){
6051                                                                 var symbol = l121;
6052                                                                 var value = symbol.value;
6053                                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6054                                                                 return value;
6055                                                             })()), cdr: v444});
6056                                                             return v445 = (function(){
6057                                                                 var x = v445;
6058                                                                 var y = 1;
6059                                                                 if (typeof x != 'number')
6060                                                                     throw 'The value ' + x + ' is not a type number.';
6061                                                                 if (typeof y != 'number')
6062                                                                     throw 'The value ' + y + ' is not a type number.';
6063                                                                 return x+y;
6064                                                             })();
6065                                                         })(l78.function(v445, v443));
6066                                                     }return l3.value;
6067                                                 })();
6068                                             })();
6069                                         }
6070                                         catch (cf){
6071                                             if (cf.type == 'block' && cf.id == 168)
6072                                                 return cf.value;
6073                                             else
6074                                                 throw cf;
6075                                         }
6076                                     })();
6077                                     v444 = ({car: l122.function("default: break;", (function(){
6078                                         var symbol = l121;
6079                                         var value = symbol.value;
6080                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6081                                         return value;
6082                                     })()), cdr: v444});
6083                                     return l124.function(l64.function(v444));
6084                                 })();
6085                             })(l198.function(v435),l3.value,0), "}", (function(){
6086                                 var symbol = l121;
6087                                 var value = symbol.value;
6088                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6089                                 return value;
6090                             })()) : ""), (v438 !== l3.value ? (function(v447){
6091                                 return l122.function("var ", v447, "= ", (function(){
6092                                     var symbol = l129;
6093                                     var func = symbol.function;
6094                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6095                                     return func;
6096                                 })()(l3.value), ";", (function(){
6097                                     var symbol = l121;
6098                                     var value = symbol.value;
6099                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6100                                     return value;
6101                                 })(), "for (var i = arguments.length-1; i>=", l16.function((function(){
6102                                     var x = v440;
6103                                     var y = v441;
6104                                     if (typeof x != 'number')
6105                                         throw 'The value ' + x + ' is not a type number.';
6106                                     if (typeof y != 'number')
6107                                         throw 'The value ' + y + ' is not a type number.';
6108                                     return x+y;
6109                                 })()), "; i--)", (function(){
6110                                     var symbol = l121;
6111                                     var value = symbol.value;
6112                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6113                                     return value;
6114                                 })(), l127.function(v447, " = ", "{car: arguments[i], cdr: "), v447, "};", (function(){
6115                                     var symbol = l121;
6116                                     var value = symbol.value;
6117                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6118                                     return value;
6119                                 })());
6120                             })(l173.function(v438)) : ""), (function(){
6121                                 var symbol = l203;
6122                                 var func = symbol.function;
6123                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6124                                 return func;
6125                             })()(v434, l4.value)), (function(){
6126                                 var symbol = l121;
6127                                 var value = symbol.value;
6128                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6129                                 return value;
6130                             })(), "})");
6131                         }
6132                         finally {
6133                             l170.value = v442;
6134                         }
6135                     })(l66.function(v436),l66.function(v437),l174.function(l62.function(l58.function(v438), v436, v437)));
6136                 })(l197.function(v435),l199.function(v435),l200.function(v435),l3.value);
6137             })();
6138         }
6139         catch (cf){
6140             if (cf.type == 'block' && cf.id == 167)
6141                 return cf.value;
6142             else
6143                 throw cf;
6144         }
6145     })();
6146
6147 })), cdr: (function(){
6148     var symbol = l189;
6149     var value = symbol.value;
6150     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6151     return value;
6152 })()});
6153 var l204 = {name: "SETQ"};
6154 var l205 = {name: "SET"};
6155 (l189).value = ({car: l44.function(l204, (function (v448,v449){
6156     if (arguments.length < 2) throw 'too few arguments';
6157     if (arguments.length > 2) throw 'too many arguments';
6158     return (function(){
6159         try {
6160             return (function(){
6161                 return (function(v450){
6162                     return (((l157.function(v450) === l175)?l4.value: l3.value) !== l3.value ? l122.function(l158.function(v450), " = ", (function(){
6163                         var symbol = l129;
6164                         var func = symbol.function;
6165                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6166                         return func;
6167                     })()(v449)) : (function(){
6168                         var symbol = l129;
6169                         var func = symbol.function;
6170                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6171                         return func;
6172                     })()(l62.function(l44.function(l205), l44.function(l62.function(l44.function(l149), l44.function(v448))), l44.function(v449))));
6173                 })(l169.function(v448, (function(){
6174                     var symbol = l170;
6175                     var value = symbol.value;
6176                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6177                     return value;
6178                 })(), l98));
6179             })();
6180         }
6181         catch (cf){
6182             if (cf.type == 'block' && cf.id == 169)
6183                 return cf.value;
6184             else
6185                 throw cf;
6186         }
6187     })();
6188
6189 })), cdr: (function(){
6190     var symbol = l189;
6191     var value = symbol.value;
6192     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6193     return value;
6194 })()});
6195 var l206 = {name: "JS-VREF"};
6196 (l189).value = ({car: l44.function(l206, (function (v451){
6197     if (arguments.length < 1) throw 'too few arguments';
6198     if (arguments.length > 1) throw 'too many arguments';
6199     return (function(){
6200         try {
6201             return (function(){
6202                 return v451;
6203             })();
6204         }
6205         catch (cf){
6206             if (cf.type == 'block' && cf.id == 170)
6207                 return cf.value;
6208             else
6209                 throw cf;
6210         }
6211     })();
6212
6213 })), cdr: (function(){
6214     var symbol = l189;
6215     var value = symbol.value;
6216     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6217     return value;
6218 })()});
6219 var l207 = {name: "JS-VSET"};
6220 (l189).value = ({car: l44.function(l207, (function (v452,v453){
6221     if (arguments.length < 2) throw 'too few arguments';
6222     if (arguments.length > 2) throw 'too many arguments';
6223     return (function(){
6224         try {
6225             return (function(){
6226                 return l122.function("(", v452, " = ", (function(){
6227                     var symbol = l129;
6228                     var func = symbol.function;
6229                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6230                     return func;
6231                 })()(v453), ")");
6232             })();
6233         }
6234         catch (cf){
6235             if (cf.type == 'block' && cf.id == 171)
6236                 return cf.value;
6237             else
6238                 throw cf;
6239         }
6240     })();
6241
6242 })), cdr: (function(){
6243     var symbol = l189;
6244     var value = symbol.value;
6245     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6246     return value;
6247 })()});
6248 (function(){
6249     (l132).function = (function(v460){
6250         ((v460)["fname"] = "ESCAPE-STRING");
6251         return v460;
6252     })((function (v454){
6253         if (arguments.length < 1) throw 'too few arguments';
6254         if (arguments.length > 1) throw 'too many arguments';
6255         return (function(){
6256             try {
6257                 return (function(){
6258                     return (function(v455,v456,v457){
6259                         (function(){
6260                             try {
6261                                 return (function(){
6262                                     return (function(){
6263                                         while(((function(){
6264                                             var x = v456;
6265                                             var y = v457;
6266                                             if (typeof x != 'number')
6267                                                 throw 'The value ' + x + ' is not a type number.';
6268                                             if (typeof y != 'number')
6269                                                 throw 'The value ' + y + ' is not a type number.';
6270                                             return x<y;
6271                                         })()?l4.value: l3.value) !== l3.value){
6272                                             (function(v458){
6273                                                 ((function(v459){
6274                                                     return (v459 !== l3.value ? v459 : l73.function(v458, 92));
6275                                                 })(l73.function(v458, 34)) !== l3.value ? (function(){
6276                                                     return v455 = l122.function(v455, "\\");
6277                                                 })() : l3.value);
6278                                                 (l73.function(v458, 10) !== l3.value ? (function(){
6279                                                     v455 = l122.function(v455, "\\");
6280                                                     return v458 = 110;
6281                                                 })() : l3.value);
6282                                                 return v455 = l122.function(v455, l91.function(v458));
6283                                             })((function(){
6284                                                 var string = v454;
6285                                                 var index = v456;
6286                                                 if (typeof string != 'string')
6287                                                     throw 'The value ' + string + ' is not a type string.';
6288                                                 if (typeof index != 'number')
6289                                                     throw 'The value ' + index + ' is not a type number.';
6290                                                 return string.charCodeAt(index);
6291                                             })());
6292                                             v456 = (function(){
6293                                                 var x = v456;
6294                                                 var y = 1;
6295                                                 if (typeof x != 'number')
6296                                                     throw 'The value ' + x + ' is not a type number.';
6297                                                 if (typeof y != 'number')
6298                                                     throw 'The value ' + y + ' is not a type number.';
6299                                                 return x+y;
6300                                             })();
6301                                         }return l3.value;
6302                                     })();
6303                                 })();
6304                             }
6305                             catch (cf){
6306                                 if (cf.type == 'block' && cf.id == 173)
6307                                     return cf.value;
6308                                 else
6309                                     throw cf;
6310                             }
6311                         })();
6312                         return v455;
6313                     })("",0,l66.function(v454));
6314                 })();
6315             }
6316             catch (cf){
6317                 if (cf.type == 'block' && cf.id == 172)
6318                     return cf.value;
6319                 else
6320                     throw cf;
6321             }
6322         })();
6323
6324     }));
6325     return l132;
6326 })();
6327 var l208 = {name: "*LITERAL-SYMBOLS*"};
6328 (function(){
6329     (((l208.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
6330         return (l208).value = l3.value;
6331     })());
6332     return l208;
6333 })();
6334 var l209 = {name: "*LITERAL-COUNTER*"};
6335 (function(){
6336     (((l209.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
6337         return (l209).value = 0;
6338     })());
6339     return l209;
6340 })();
6341 var l210 = {name: "GENLIT"};
6342 (function(){
6343     (l210).function = (function(v461){
6344         ((v461)["fname"] = "GENLIT");
6345         return v461;
6346     })((function (){
6347         if (arguments.length > 0) throw 'too many arguments';
6348         return (function(){
6349             try {
6350                 return (function(){
6351                     return l122.function("l", l16.function((l209).value = (function(){
6352                         var x = (function(){
6353                             var symbol = l209;
6354                             var value = symbol.value;
6355                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6356                             return value;
6357                         })();
6358                         var y = 1;
6359                         if (typeof x != 'number')
6360                             throw 'The value ' + x + ' is not a type number.';
6361                         if (typeof y != 'number')
6362                             throw 'The value ' + y + ' is not a type number.';
6363                         return x+y;
6364                     })()));
6365                 })();
6366             }
6367             catch (cf){
6368                 if (cf.type == 'block' && cf.id == 174)
6369                     return cf.value;
6370                 else
6371                     throw cf;
6372             }
6373         })();
6374
6375     }));
6376     return l210;
6377 })();
6378 var l211 = {name: "LITERAL"};
6379 (function(){
6380     (l211).function = (function(v469){
6381         ((v469)["fname"] = "LITERAL");
6382         return v469;
6383     })((function (v462,v463){
6384         if (arguments.length < 1) throw 'too few arguments';
6385         if (arguments.length > 2) throw 'too many arguments';
6386         switch(arguments.length){
6387         case 1:
6388         v463=l3.value;
6389         default: break;
6390         }
6391         return (function(){
6392             try {
6393                 return (function(){
6394                     return (l74.function(v462) !== l3.value ? (function(){
6395                         return l16.function(v462);
6396                     })() : (((typeof(v462) == "string")?l4.value: l3.value) !== l3.value ? (function(){
6397                         return l122.function("\"", l132.function(v462), "\"");
6398                     })() : (((function(){
6399                         var tmp = v462;
6400                         return (typeof tmp == 'object' && 'name' in tmp);
6401                     })()?l4.value: l3.value) !== l3.value ? (function(){
6402                         return (function(v464){
6403                             return (v464 !== l3.value ? v464 : (function(v465,v466){
6404                                 (l208).value = ({car: ({car: v462, cdr: v465}), cdr: (function(){
6405                                     var symbol = l208;
6406                                     var value = symbol.value;
6407                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6408                                     return value;
6409                                 })()});
6410                                 l177.function(l122.function("var ", v465, " = ", v466));
6411                                 return v465;
6412                             })(l210.function(),(function(){
6413                                 var symbol = l129;
6414                                 var func = symbol.function;
6415                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6416                                 return func;
6417                             })()(l62.function(l44.function(l119), l44.function((v462).name), l44.function(l105.function(l113.function(v462)))))));
6418                         })((function(){
6419                             var tmp = l90.function(v462, (function(){
6420                                 var symbol = l208;
6421                                 var value = symbol.value;
6422                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6423                                 return value;
6424                             })());
6425                             return tmp === l3.value? l3.value: tmp.cdr;
6426                         })());
6427                     })() : (((function(){
6428                         var tmp = v462;
6429                         return (typeof tmp == 'object' && 'car' in tmp);
6430                     })()?l4.value: l3.value) !== l3.value ? (function(){
6431                         return (function(v467){
6432                             return (v463 !== l3.value ? v467 : (function(v468){
6433                                 l177.function(l122.function("var ", v468, " = ", v467));
6434                                 return v468;
6435                             })(l210.function()));
6436                         })(l122.function("{car: ", l211.function((function(){
6437                             var tmp = v462;
6438                             return tmp === l3.value? l3.value: tmp.car;
6439                         })(), l4.value), ", ", "cdr: ", l211.function((function(){
6440                             var tmp = v462;
6441                             return tmp === l3.value? l3.value: tmp.cdr;
6442                         })(), l4.value), "}"));
6443                     })() : l3.value))));
6444                 })();
6445             }
6446             catch (cf){
6447                 if (cf.type == 'block' && cf.id == 175)
6448                     return cf.value;
6449                 else
6450                     throw cf;
6451             }
6452         })();
6453
6454     }));
6455     return l211;
6456 })();
6457 (l189).value = ({car: l44.function(l149, (function (v470){
6458     if (arguments.length < 1) throw 'too few arguments';
6459     if (arguments.length > 1) throw 'too many arguments';
6460     return (function(){
6461         try {
6462             return (function(){
6463                 return l211.function(v470);
6464             })();
6465         }
6466         catch (cf){
6467             if (cf.type == 'block' && cf.id == 176)
6468                 return cf.value;
6469             else
6470                 throw cf;
6471         }
6472     })();
6473
6474 })), cdr: (function(){
6475     var symbol = l189;
6476     var value = symbol.value;
6477     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6478     return value;
6479 })()});
6480 var l212 = {name: "%WHILE"};
6481 (l189).value = ({car: l44.function(l212, (function (v472){
6482     if (arguments.length < 1) throw 'too few arguments';
6483     var v471= l3.value;
6484     for (var i = arguments.length-1; i>=1; i--)
6485         v471 = {car: arguments[i], cdr:
6486     v471};
6487     return (function(){
6488         try {
6489             return (function(){
6490                 return l122.function("(function(){", (function(){
6491                     var symbol = l121;
6492                     var value = symbol.value;
6493                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6494                     return value;
6495                 })(), l127.function("while(", (function(){
6496                     var symbol = l129;
6497                     var func = symbol.function;
6498                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6499                     return func;
6500                 })()(v472), " !== ", (function(){
6501                     var symbol = l129;
6502                     var func = symbol.function;
6503                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6504                     return func;
6505                 })()(l3.value), "){", (function(){
6506                     var symbol = l121;
6507                     var value = symbol.value;
6508                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6509                     return value;
6510                 })(), l127.function((function(){
6511                     var symbol = l203;
6512                     var func = symbol.function;
6513                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6514                     return func;
6515                 })()(v471)), "}", "return ", (function(){
6516                     var symbol = l129;
6517                     var func = symbol.function;
6518                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6519                     return func;
6520                 })()(l3.value), ";", (function(){
6521                     var symbol = l121;
6522                     var value = symbol.value;
6523                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6524                     return value;
6525                 })()), "})()");
6526             })();
6527         }
6528         catch (cf){
6529             if (cf.type == 'block' && cf.id == 177)
6530                 return cf.value;
6531             else
6532                 throw cf;
6533         }
6534     })();
6535
6536 })), cdr: (function(){
6537     var symbol = l189;
6538     var value = symbol.value;
6539     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6540     return value;
6541 })()});
6542 var l213 = {name: "SYMBOL-FUNCTION"};
6543 (l189).value = ({car: l44.function(l97, (function (v473){
6544     if (arguments.length < 1) throw 'too few arguments';
6545     if (arguments.length > 1) throw 'too many arguments';
6546     return (function(){
6547         try {
6548             return (function(){
6549                 return ((l59.function(v473) !== l3.value ? (((function(){
6550                     var tmp = v473;
6551                     return tmp === l3.value? l3.value: tmp.car;
6552                 })() === l202)?l4.value: l3.value) : l3.value) !== l3.value ? (function(){
6553                     return (function(){
6554                         var symbol = l129;
6555                         var func = symbol.function;
6556                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6557                         return func;
6558                     })()(v473);
6559                 })() : (((function(){
6560                     var tmp = v473;
6561                     return (typeof tmp == 'object' && 'name' in tmp);
6562                 })()?l4.value: l3.value) !== l3.value ? (function(){
6563                     return (function(){
6564                         var symbol = l129;
6565                         var func = symbol.function;
6566                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6567                         return func;
6568                     })()(l62.function(l44.function(l213), l44.function(l62.function(l44.function(l149), l44.function(v473)))));
6569                 })() : l3.value));
6570             })();
6571         }
6572         catch (cf){
6573             if (cf.type == 'block' && cf.id == 178)
6574                 return cf.value;
6575             else
6576                 throw cf;
6577         }
6578     })();
6579
6580 })), cdr: (function(){
6581     var symbol = l189;
6582     var value = symbol.value;
6583     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6584     return value;
6585 })()});
6586 var l214 = {name: "EVAL-WHEN-COMPILE"};
6587 var l215 = {name: "EVAL"};
6588 var l216 = {name: "PROGN"};
6589 (l189).value = ({car: l44.function(l214, (function (){
6590     var v474= l3.value;
6591     for (var i = arguments.length-1; i>=0; i--)
6592         v474 = {car: arguments[i], cdr:
6593     v474};
6594     return (function(){
6595         try {
6596             return (function(){
6597                 (function(){
6598                     var symbol = l215;
6599                     var func = symbol.function;
6600                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6601                     return func;
6602                 })()(({car: l216, cdr: v474}));
6603                 return l3.value;
6604             })();
6605         }
6606         catch (cf){
6607             if (cf.type == 'block' && cf.id == 179)
6608                 return cf.value;
6609             else
6610                 throw cf;
6611         }
6612     })();
6613
6614 })), cdr: (function(){
6615     var symbol = l189;
6616     var value = symbol.value;
6617     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6618     return value;
6619 })()});
6620 var l217 = {name: "DEFINE-TRANSFORMATION"};
6621 l217;
6622 (l189).value = ({car: l44.function(l216, (function (){
6623     var v475= l3.value;
6624     for (var i = arguments.length-1; i>=0; i--)
6625         v475 = {car: arguments[i], cdr:
6626     v475};
6627     return (function(){
6628         try {
6629             return (function(){
6630                 return l122.function("(function(){", (function(){
6631                     var symbol = l121;
6632                     var value = symbol.value;
6633                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6634                     return value;
6635                 })(), l127.function((function(){
6636                     var symbol = l203;
6637                     var func = symbol.function;
6638                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6639                     return func;
6640                 })()(v475, l4.value)), "})()");
6641             })();
6642         }
6643         catch (cf){
6644             if (cf.type == 'block' && cf.id == 180)
6645                 return cf.value;
6646             else
6647                 throw cf;
6648         }
6649     })();
6650
6651 })), cdr: (function(){
6652     var symbol = l189;
6653     var value = symbol.value;
6654     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6655     return value;
6656 })()});
6657 var l218 = {name: "DYNAMIC-BINDING-WRAPPER"};
6658 (function(){
6659     (l218).function = (function(v482){
6660         ((v482)["fname"] = "DYNAMIC-BINDING-WRAPPER");
6661         return v482;
6662     })((function (v476,v477){
6663         if (arguments.length < 2) throw 'too few arguments';
6664         if (arguments.length > 2) throw 'too many arguments';
6665         return (function(){
6666             try {
6667                 return (function(){
6668                     return (l11.function(v476) !== l3.value ? v477 : l122.function("try {", (function(){
6669                         var symbol = l121;
6670                         var value = symbol.value;
6671                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6672                         return value;
6673                     })(), l127.function("var tmp;", (function(){
6674                         var symbol = l121;
6675                         var value = symbol.value;
6676                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6677                         return value;
6678                     })(), l124.function(l68.function((function (v478){
6679                         if (arguments.length < 1) throw 'too few arguments';
6680                         if (arguments.length > 1) throw 'too many arguments';
6681                         return (function(v479){
6682                             return l122.function("tmp = ", v479, ".value;", (function(){
6683                                 var symbol = l121;
6684                                 var value = symbol.value;
6685                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6686                                 return value;
6687                             })(), v479, ".value = ", (function(){
6688                                 var tmp = v478;
6689                                 return tmp === l3.value? l3.value: tmp.cdr;
6690                             })(), ";", (function(){
6691                                 var symbol = l121;
6692                                 var value = symbol.value;
6693                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6694                                 return value;
6695                             })(), (function(){
6696                                 var tmp = v478;
6697                                 return tmp === l3.value? l3.value: tmp.cdr;
6698                             })(), " = tmp;", (function(){
6699                                 var symbol = l121;
6700                                 var value = symbol.value;
6701                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6702                                 return value;
6703                             })());
6704                         })((function(){
6705                             var symbol = l129;
6706                             var func = symbol.function;
6707                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6708                             return func;
6709                         })()(l62.function(l44.function(l149), l44.function((function(){
6710                             var tmp = v478;
6711                             return tmp === l3.value? l3.value: tmp.car;
6712                         })()))));
6713
6714                     }), v476)), v477), "}", (function(){
6715                         var symbol = l121;
6716                         var value = symbol.value;
6717                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6718                         return value;
6719                     })(), "finally {", (function(){
6720                         var symbol = l121;
6721                         var value = symbol.value;
6722                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6723                         return value;
6724                     })(), l127.function(l125.function(l68.function((function (v480){
6725                         if (arguments.length < 1) throw 'too few arguments';
6726                         if (arguments.length > 1) throw 'too many arguments';
6727                         return (function(v481){
6728                             return l122.function(v481, ".value", " = ", (function(){
6729                                 var tmp = v480;
6730                                 return tmp === l3.value? l3.value: tmp.cdr;
6731                             })());
6732                         })((function(){
6733                             var symbol = l129;
6734                             var func = symbol.function;
6735                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6736                             return func;
6737                         })()(l62.function(l44.function(l149), l44.function((function(){
6738                             var tmp = v480;
6739                             return tmp === l3.value? l3.value: tmp.car;
6740                         })()))));
6741
6742                     }), v476), l122.function(";", (function(){
6743                         var symbol = l121;
6744                         var value = symbol.value;
6745                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6746                         return value;
6747                     })()))), "}", (function(){
6748                         var symbol = l121;
6749                         var value = symbol.value;
6750                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6751                         return value;
6752                     })()));
6753                 })();
6754             }
6755             catch (cf){
6756                 if (cf.type == 'block' && cf.id == 181)
6757                     return cf.value;
6758                 else
6759                     throw cf;
6760             }
6761         })();
6762
6763     }));
6764     return l218;
6765 })();
6766 var l219 = {name: "LET"};
6767 (l189).value = ({car: l44.function(l219, (function (v484){
6768     if (arguments.length < 1) throw 'too few arguments';
6769     var v483= l3.value;
6770     for (var i = arguments.length-1; i>=1; i--)
6771         v483 = {car: arguments[i], cdr:
6772     v483};
6773     return (function(){
6774         try {
6775             return (function(){
6776                 return (function(v485){
6777                     return (function(v486,v487){
6778                         return (function(v488,v490,v489){
6779                             try {
6780                                 var tmp;
6781                                 tmp = l170.value;
6782                                 l170.value = v490;
6783                                 v490 = tmp;
6784                                 return l122.function("(function(", l124.function(l68.function((function (v491){
6785                                     if (arguments.length < 1) throw 'too few arguments';
6786                                     if (arguments.length > 1) throw 'too many arguments';
6787                                     return (((v491.value !== undefined)?l4.value: l3.value) !== l3.value ? (function(v492){
6788                                         v489 = ({car: ({car: v491, cdr: v492}), cdr: v489});
6789                                         return v492;
6790                                     })(l172.function(v491)) : l173.function(v491));
6791
6792                                 }), v486), ","), "){", (function(){
6793                                     var symbol = l121;
6794                                     var value = symbol.value;
6795                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6796                                     return value;
6797                                 })(), (function(v493){
6798                                     return l127.function(l218.function(v489, v493));
6799                                 })((function(){
6800                                     var symbol = l203;
6801                                     var func = symbol.function;
6802                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6803                                     return func;
6804                                 })()(v483, l4.value)), "})(", l124.function(v488, ","), ")");
6805                             }
6806                             finally {
6807                                 l170.value = v490;
6808                             }
6809                         })(l68.function((function(){
6810                             var symbol = l129;
6811                             var func = symbol.function;
6812                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6813                             return func;
6814                         })(), v487),l174.function(l83.function((function(){
6815                             var symbol = l17;
6816                             var func = symbol.function;
6817                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6818                             return func;
6819                         })(), v486)),l3.value);
6820                     })(l68.function((function(){
6821                         var symbol = l40;
6822                         var func = symbol.function;
6823                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6824                         return func;
6825                     })(), v485),l68.function((function(){
6826                         var symbol = l41;
6827                         var func = symbol.function;
6828                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6829                         return func;
6830                     })(), v485));
6831                 })(l68.function((function(){
6832                     var symbol = l58;
6833                     var func = symbol.function;
6834                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6835                     return func;
6836                 })(), v484));
6837             })();
6838         }
6839         catch (cf){
6840             if (cf.type == 'block' && cf.id == 182)
6841                 return cf.value;
6842             else
6843                 throw cf;
6844         }
6845     })();
6846
6847 })), cdr: (function(){
6848     var symbol = l189;
6849     var value = symbol.value;
6850     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6851     return value;
6852 })()});
6853 var l220 = {name: "*BLOCK-COUNTER*"};
6854 (function(){
6855     (((l220.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
6856         return (l220).value = 0;
6857     })());
6858     return l220;
6859 })();
6860 (l189).value = ({car: l44.function(l166, (function (v495){
6861     if (arguments.length < 1) throw 'too few arguments';
6862     var v494= l3.value;
6863     for (var i = arguments.length-1; i>=1; i--)
6864         v494 = {car: arguments[i], cdr:
6865     v494};
6866     return (function(){
6867         try {
6868             return (function(){
6869                 return (function(v496){
6870                     return (function(v497){
6871                         return l122.function("(function(){", (function(){
6872                             var symbol = l121;
6873                             var value = symbol.value;
6874                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6875                             return value;
6876                         })(), l127.function("try {", (function(){
6877                             var symbol = l121;
6878                             var value = symbol.value;
6879                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6880                             return value;
6881                         })(), (function(v498){
6882                             try {
6883                                 var tmp;
6884                                 tmp = l170.value;
6885                                 l170.value = v498;
6886                                 v498 = tmp;
6887                                 return l127.function("return ", (function(){
6888                                     var symbol = l129;
6889                                     var func = symbol.function;
6890                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6891                                     return func;
6892                                 })()(l62.function(l44.function(l216), v494)), ";", (function(){
6893                                     var symbol = l121;
6894                                     var value = symbol.value;
6895                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6896                                     return value;
6897                                 })());
6898                             }
6899                             finally {
6900                                 l170.value = v498;
6901                             }
6902                         })(l168.function(l44.function(v497), (function(){
6903                             var symbol = l170;
6904                             var value = symbol.value;
6905                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6906                             return value;
6907                         })(), l166)), "}", (function(){
6908                             var symbol = l121;
6909                             var value = symbol.value;
6910                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6911                             return value;
6912                         })(), "catch (cf){", (function(){
6913                             var symbol = l121;
6914                             var value = symbol.value;
6915                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6916                             return value;
6917                         })(), "    if (cf.type == 'block' && cf.id == ", v496, ")", (function(){
6918                             var symbol = l121;
6919                             var value = symbol.value;
6920                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6921                             return value;
6922                         })(), "        return cf.value;", (function(){
6923                             var symbol = l121;
6924                             var value = symbol.value;
6925                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6926                             return value;
6927                         })(), "    else", (function(){
6928                             var symbol = l121;
6929                             var value = symbol.value;
6930                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6931                             return value;
6932                         })(), "        throw cf;", (function(){
6933                             var symbol = l121;
6934                             var value = symbol.value;
6935                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6936                             return value;
6937                         })(), "}", (function(){
6938                             var symbol = l121;
6939                             var value = symbol.value;
6940                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6941                             return value;
6942                         })()), "})()");
6943                     })(l155.function(v495, l166, v496));
6944                 })(l16.function((l220).value = (function(){
6945                     var x = (function(){
6946                         var symbol = l220;
6947                         var value = symbol.value;
6948                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6949                         return value;
6950                     })();
6951                     var y = 1;
6952                     if (typeof x != 'number')
6953                         throw 'The value ' + x + ' is not a type number.';
6954                     if (typeof y != 'number')
6955                         throw 'The value ' + y + ' is not a type number.';
6956                     return x+y;
6957                 })()));
6958             })();
6959         }
6960         catch (cf){
6961             if (cf.type == 'block' && cf.id == 183)
6962                 return cf.value;
6963             else
6964                 throw cf;
6965         }
6966     })();
6967
6968 })), cdr: (function(){
6969     var symbol = l189;
6970     var value = symbol.value;
6971     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6972     return value;
6973 })()});
6974 var l221 = {name: "RETURN-FROM"};
6975 (l189).value = ({car: l44.function(l221, (function (v499,v500){
6976     if (arguments.length < 1) throw 'too few arguments';
6977     if (arguments.length > 2) throw 'too many arguments';
6978     switch(arguments.length){
6979     case 1:
6980     v500=l3.value;
6981     default: break;
6982     }
6983     return (function(){
6984         try {
6985             return (function(){
6986                 return (function(v501){
6987                     return (v501 !== l3.value ? l122.function("(function(){", (function(){
6988                         var symbol = l121;
6989                         var value = symbol.value;
6990                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6991                         return value;
6992                     })(), l127.function("throw ({", "type: 'block', ", "id: ", l158.function(v501), ", ", "value: ", (function(){
6993                         var symbol = l129;
6994                         var func = symbol.function;
6995                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6996                         return func;
6997                     })()(v500), ", ", "message: 'Return from unknown block ", (v499).name, ".'", "})"), "})()") : (function(){
6998                         throw l122.function("Unknown block `", (v499).name, "'.");
6999                     })());
7000                 })(l169.function(v499, (function(){
7001                     var symbol = l170;
7002                     var value = symbol.value;
7003                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7004                     return value;
7005                 })(), l166));
7006             })();
7007         }
7008         catch (cf){
7009             if (cf.type == 'block' && cf.id == 184)
7010                 return cf.value;
7011             else
7012                 throw cf;
7013         }
7014     })();
7015
7016 })), cdr: (function(){
7017     var symbol = l189;
7018     var value = symbol.value;
7019     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7020     return value;
7021 })()});
7022 var l222 = {name: "CATCH"};
7023 (l189).value = ({car: l44.function(l222, (function (v503){
7024     if (arguments.length < 1) throw 'too few arguments';
7025     var v502= l3.value;
7026     for (var i = arguments.length-1; i>=1; i--)
7027         v502 = {car: arguments[i], cdr:
7028     v502};
7029     return (function(){
7030         try {
7031             return (function(){
7032                 return l122.function("(function(){", (function(){
7033                     var symbol = l121;
7034                     var value = symbol.value;
7035                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7036                     return value;
7037                 })(), l127.function("var id = ", (function(){
7038                     var symbol = l129;
7039                     var func = symbol.function;
7040                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7041                     return func;
7042                 })()(v503), ";", (function(){
7043                     var symbol = l121;
7044                     var value = symbol.value;
7045                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7046                     return value;
7047                 })(), "try {", (function(){
7048                     var symbol = l121;
7049                     var value = symbol.value;
7050                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7051                     return value;
7052                 })(), l127.function("return ", (function(){
7053                     var symbol = l129;
7054                     var func = symbol.function;
7055                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7056                     return func;
7057                 })()(l62.function(l44.function(l216), v502)), ";", (function(){
7058                     var symbol = l121;
7059                     var value = symbol.value;
7060                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7061                     return value;
7062                 })()), "}", (function(){
7063                     var symbol = l121;
7064                     var value = symbol.value;
7065                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7066                     return value;
7067                 })(), "catch (cf){", (function(){
7068                     var symbol = l121;
7069                     var value = symbol.value;
7070                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7071                     return value;
7072                 })(), "    if (cf.type == 'catch' && cf.id == id)", (function(){
7073                     var symbol = l121;
7074                     var value = symbol.value;
7075                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7076                     return value;
7077                 })(), "        return cf.value;", (function(){
7078                     var symbol = l121;
7079                     var value = symbol.value;
7080                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7081                     return value;
7082                 })(), "    else", (function(){
7083                     var symbol = l121;
7084                     var value = symbol.value;
7085                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7086                     return value;
7087                 })(), "        throw cf;", (function(){
7088                     var symbol = l121;
7089                     var value = symbol.value;
7090                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7091                     return value;
7092                 })(), "}", (function(){
7093                     var symbol = l121;
7094                     var value = symbol.value;
7095                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7096                     return value;
7097                 })()), "})()");
7098             })();
7099         }
7100         catch (cf){
7101             if (cf.type == 'block' && cf.id == 185)
7102                 return cf.value;
7103             else
7104                 throw cf;
7105         }
7106     })();
7107
7108 })), cdr: (function(){
7109     var symbol = l189;
7110     var value = symbol.value;
7111     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7112     return value;
7113 })()});
7114 var l223 = {name: "THROW"};
7115 (l189).value = ({car: l44.function(l223, (function (v504,v505){
7116     if (arguments.length < 2) throw 'too few arguments';
7117     if (arguments.length > 2) throw 'too many arguments';
7118     return (function(){
7119         try {
7120             return (function(){
7121                 return l122.function("(function(){", (function(){
7122                     var symbol = l121;
7123                     var value = symbol.value;
7124                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7125                     return value;
7126                 })(), l127.function("throw ({", "type: 'catch', ", "id: ", (function(){
7127                     var symbol = l129;
7128                     var func = symbol.function;
7129                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7130                     return func;
7131                 })()(v504), ", ", "value: ", (function(){
7132                     var symbol = l129;
7133                     var func = symbol.function;
7134                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7135                     return func;
7136                 })()(v505), ", ", "message: 'Throw uncatched.'", "})"), "})()");
7137             })();
7138         }
7139         catch (cf){
7140             if (cf.type == 'block' && cf.id == 186)
7141                 return cf.value;
7142             else
7143                 throw cf;
7144         }
7145     })();
7146
7147 })), cdr: (function(){
7148     var symbol = l189;
7149     var value = symbol.value;
7150     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7151     return value;
7152 })()});
7153 var l224 = {name: "*TAGBODY-COUNTER*"};
7154 (function(){
7155     (((l224.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
7156         return (l224).value = 0;
7157     })());
7158     return l224;
7159 })();
7160 var l225 = {name: "*GO-TAG-COUNTER*"};
7161 (function(){
7162     (((l225.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
7163         return (l225).value = 0;
7164     })());
7165     return l225;
7166 })();
7167 var l226 = {name: "GO-TAG-P"};
7168 (function(){
7169     (l226).function = (function(v508){
7170         ((v508)["fname"] = "GO-TAG-P");
7171         return v508;
7172     })((function (v506){
7173         if (arguments.length < 1) throw 'too few arguments';
7174         if (arguments.length > 1) throw 'too many arguments';
7175         return (function(){
7176             try {
7177                 return (function(){
7178                     return (function(v507){
7179                         return (v507 !== l3.value ? v507 : ((function(){
7180                             var tmp = v506;
7181                             return (typeof tmp == 'object' && 'name' in tmp);
7182                         })()?l4.value: l3.value));
7183                     })(l74.function(v506));
7184                 })();
7185             }
7186             catch (cf){
7187                 if (cf.type == 'block' && cf.id == 187)
7188                     return cf.value;
7189                 else
7190                     throw cf;
7191             }
7192         })();
7193
7194     }));
7195     return l226;
7196 })();
7197 var l227 = {name: "DECLARE-TAGBODY-TAGS"};
7198 (function(){
7199     (l227).function = (function(v514){
7200         ((v514)["fname"] = "DECLARE-TAGBODY-TAGS");
7201         return v514;
7202     })((function (v509,v510){
7203         if (arguments.length < 2) throw 'too few arguments';
7204         if (arguments.length > 2) throw 'too many arguments';
7205         return (function(){
7206             try {
7207                 return (function(){
7208                     return (function(v513){
7209                         return l168.function(v513, (function(){
7210                             var symbol = l170;
7211                             var value = symbol.value;
7212                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7213                             return value;
7214                         })(), l167);
7215                     })(l68.function((function (v511){
7216                         if (arguments.length < 1) throw 'too few arguments';
7217                         if (arguments.length > 1) throw 'too many arguments';
7218                         return (function(v512){
7219                             return l155.function(v511, l167, l44.function(v509, v512));
7220                         })(l16.function((l225).value = (function(){
7221                             var x = (function(){
7222                                 var symbol = l225;
7223                                 var value = symbol.value;
7224                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7225                                 return value;
7226                             })();
7227                             var y = 1;
7228                             if (typeof x != 'number')
7229                                 throw 'The value ' + x + ' is not a type number.';
7230                             if (typeof y != 'number')
7231                                 throw 'The value ' + y + ' is not a type number.';
7232                             return x+y;
7233                         })()));
7234
7235                     }), l84.function((function(){
7236                         var symbol = l226;
7237                         var func = symbol.function;
7238                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7239                         return func;
7240                     })(), v510)));
7241                 })();
7242             }
7243             catch (cf){
7244                 if (cf.type == 'block' && cf.id == 188)
7245                     return cf.value;
7246                 else
7247                     throw cf;
7248             }
7249         })();
7250
7251     }));
7252     return l227;
7253 })();
7254 var l228 = {name: "TAGBODY"};
7255 (l189).value = ({car: l44.function(l228, (function (){
7256     var v515= l3.value;
7257     for (var i = arguments.length-1; i>=0; i--)
7258         v515 = {car: arguments[i], cdr:
7259     v515};
7260     return (function(){
7261         try {
7262             return (function(){
7263                 (l88.function((function(){
7264                     var symbol = l226;
7265                     var func = symbol.function;
7266                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7267                     return func;
7268                 })(), v515) !== l3.value ? l3.value : (function(){
7269                     return (function(){
7270                         throw ({type: 'block', id: 189, value: (function(){
7271                             var symbol = l129;
7272                             var func = symbol.function;
7273                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7274                             return func;
7275                         })()(l62.function(l44.function(l216), v515, l44.function(l3))), message: 'Return from unknown block TAGBODY.'})
7276                     })();
7277                 })());
7278                 (l226.function((function(){
7279                     var tmp = v515;
7280                     return tmp === l3.value? l3.value: tmp.car;
7281                 })()) !== l3.value ? l3.value : (function(){
7282                     return v515 = ({car: l15.function("START"), cdr: v515});
7283                 })());
7284                 return (function(v516){
7285                     return (function(v518,v517){
7286                         try {
7287                             var tmp;
7288                             tmp = l170.value;
7289                             l170.value = v518;
7290                             v518 = tmp;
7291                             (function(v519){
7292                                 return v517 = l41.function(l158.function(v519));
7293                             })(l169.function(l40.function(v515), (function(){
7294                                 var symbol = l170;
7295                                 var value = symbol.value;
7296                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7297                                 return value;
7298                             })(), l167));
7299                             return l122.function("(function(){", (function(){
7300                                 var symbol = l121;
7301                                 var value = symbol.value;
7302                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7303                                 return value;
7304                             })(), l127.function("var tagbody_", v516, " = ", v517, ";", (function(){
7305                                 var symbol = l121;
7306                                 var value = symbol.value;
7307                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7308                                 return value;
7309                             })(), "tbloop:", (function(){
7310                                 var symbol = l121;
7311                                 var value = symbol.value;
7312                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7313                                 return value;
7314                             })(), "while (true) {", (function(){
7315                                 var symbol = l121;
7316                                 var value = symbol.value;
7317                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7318                                 return value;
7319                             })(), l127.function("try {", (function(){
7320                                 var symbol = l121;
7321                                 var value = symbol.value;
7322                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7323                                 return value;
7324                             })(), l127.function((function(v520){
7325                                 return l122.function("switch(tagbody_", v516, "){", (function(){
7326                                     var symbol = l121;
7327                                     var value = symbol.value;
7328                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7329                                     return value;
7330                                 })(), "case ", v517, ":", (function(){
7331                                     var symbol = l121;
7332                                     var value = symbol.value;
7333                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7334                                     return value;
7335                                 })(), (function(){
7336                                     try {
7337                                         return (function(){
7338                                             return (function(v521,v522){
7339                                                 (function(){
7340                                                     while(v521 !== l3.value){
7341                                                         v522 = (function(){
7342                                                             var tmp = v521;
7343                                                             return tmp === l3.value? l3.value: tmp.car;
7344                                                         })();
7345                                                         (function(){
7346                                                             v520 = l122.function(v520, (function(){
7347                                                                 return (l28.function(l226.function(v522)) !== l3.value ? l127.function((function(){
7348                                                                     var symbol = l129;
7349                                                                     var func = symbol.function;
7350                                                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7351                                                                     return func;
7352                                                                 })()(v522), ";", (function(){
7353                                                                     var symbol = l121;
7354                                                                     var value = symbol.value;
7355                                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7356                                                                     return value;
7357                                                                 })()) : (function(v523){
7358                                                                     return l122.function("case ", l41.function(l158.function(v523)), ":", (function(){
7359                                                                         var symbol = l121;
7360                                                                         var value = symbol.value;
7361                                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7362                                                                         return value;
7363                                                                     })());
7364                                                                 })(l169.function(v522, (function(){
7365                                                                     var symbol = l170;
7366                                                                     var value = symbol.value;
7367                                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7368                                                                     return value;
7369                                                                 })(), l167)));
7370                                                             })());
7371                                                             return l3.value;
7372                                                         })();
7373                                                         v521 = (function(){
7374                                                             var tmp = v521;
7375                                                             return tmp === l3.value? l3.value: tmp.cdr;
7376                                                         })();
7377                                                     }return l3.value;
7378                                                 })();
7379                                                 return v520;
7380                                             })((function(){
7381                                                 var tmp = v515;
7382                                                 return tmp === l3.value? l3.value: tmp.cdr;
7383                                             })(),l3.value);
7384                                         })();
7385                                     }
7386                                     catch (cf){
7387                                         if (cf.type == 'block' && cf.id == 190)
7388                                             return cf.value;
7389                                         else
7390                                             throw cf;
7391                                     }
7392                                 })(), "default:", (function(){
7393                                     var symbol = l121;
7394                                     var value = symbol.value;
7395                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7396                                     return value;
7397                                 })(), "    break tbloop;", (function(){
7398                                     var symbol = l121;
7399                                     var value = symbol.value;
7400                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7401                                     return value;
7402                                 })(), "}", (function(){
7403                                     var symbol = l121;
7404                                     var value = symbol.value;
7405                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7406                                     return value;
7407                                 })());
7408                             })("")), "}", (function(){
7409                                 var symbol = l121;
7410                                 var value = symbol.value;
7411                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7412                                 return value;
7413                             })(), "catch (jump) {", (function(){
7414                                 var symbol = l121;
7415                                 var value = symbol.value;
7416                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7417                                 return value;
7418                             })(), "    if (jump.type == 'tagbody' && jump.id == ", v516, ")", (function(){
7419                                 var symbol = l121;
7420                                 var value = symbol.value;
7421                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7422                                 return value;
7423                             })(), "        tagbody_", v516, " = jump.label;", (function(){
7424                                 var symbol = l121;
7425                                 var value = symbol.value;
7426                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7427                                 return value;
7428                             })(), "    else", (function(){
7429                                 var symbol = l121;
7430                                 var value = symbol.value;
7431                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7432                                 return value;
7433                             })(), "        throw(jump);", (function(){
7434                                 var symbol = l121;
7435                                 var value = symbol.value;
7436                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7437                                 return value;
7438                             })(), "}", (function(){
7439                                 var symbol = l121;
7440                                 var value = symbol.value;
7441                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7442                                 return value;
7443                             })()), "}", (function(){
7444                                 var symbol = l121;
7445                                 var value = symbol.value;
7446                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7447                                 return value;
7448                             })(), "return ", (function(){
7449                                 var symbol = l129;
7450                                 var func = symbol.function;
7451                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7452                                 return func;
7453                             })()(l3.value), ";", (function(){
7454                                 var symbol = l121;
7455                                 var value = symbol.value;
7456                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7457                                 return value;
7458                             })()), "})()");
7459                         }
7460                         finally {
7461                             l170.value = v518;
7462                         }
7463                     })(l227.function(v516, v515),l3.value);
7464                 })(l16.function((function(){
7465                     var symbol = l224;
7466                     var value = symbol.value;
7467                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7468                     return value;
7469                 })()));
7470             })();
7471         }
7472         catch (cf){
7473             if (cf.type == 'block' && cf.id == 189)
7474                 return cf.value;
7475             else
7476                 throw cf;
7477         }
7478     })();
7479
7480 })), cdr: (function(){
7481     var symbol = l189;
7482     var value = symbol.value;
7483     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7484     return value;
7485 })()});
7486 var l229 = {name: "GO"};
7487 (l189).value = ({car: l44.function(l229, (function (v524){
7488     if (arguments.length < 1) throw 'too few arguments';
7489     if (arguments.length > 1) throw 'too many arguments';
7490     return (function(){
7491         try {
7492             return (function(){
7493                 return (function(v525,v526){
7494                     return (v525 !== l3.value ? l122.function("(function(){", (function(){
7495                         var symbol = l121;
7496                         var value = symbol.value;
7497                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7498                         return value;
7499                     })(), l127.function("throw ({", "type: 'tagbody', ", "id: ", l40.function(l158.function(v525)), ", ", "label: ", l41.function(l158.function(v525)), ", ", "message: 'Attempt to GO to non-existing tag ", v526, "'", "})", (function(){
7500                         var symbol = l121;
7501                         var value = symbol.value;
7502                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7503                         return value;
7504                     })()), "})()") : (function(){
7505                         throw l122.function("Unknown tag `", v526, "'.");
7506                     })());
7507                 })(l169.function(v524, (function(){
7508                     var symbol = l170;
7509                     var value = symbol.value;
7510                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7511                     return value;
7512                 })(), l167),(((function(){
7513                     var tmp = v524;
7514                     return (typeof tmp == 'object' && 'name' in tmp);
7515                 })()?l4.value: l3.value) !== l3.value ? (function(){
7516                     return (v524).name;
7517                 })() : (l74.function(v524) !== l3.value ? (function(){
7518                     return l16.function(v524);
7519                 })() : l3.value)));
7520             })();
7521         }
7522         catch (cf){
7523             if (cf.type == 'block' && cf.id == 191)
7524                 return cf.value;
7525             else
7526                 throw cf;
7527         }
7528     })();
7529
7530 })), cdr: (function(){
7531     var symbol = l189;
7532     var value = symbol.value;
7533     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7534     return value;
7535 })()});
7536 var l230 = {name: "UNWIND-PROTECT"};
7537 (l189).value = ({car: l44.function(l230, (function (v528){
7538     if (arguments.length < 1) throw 'too few arguments';
7539     var v527= l3.value;
7540     for (var i = arguments.length-1; i>=1; i--)
7541         v527 = {car: arguments[i], cdr:
7542     v527};
7543     return (function(){
7544         try {
7545             return (function(){
7546                 return l122.function("(function(){", (function(){
7547                     var symbol = l121;
7548                     var value = symbol.value;
7549                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7550                     return value;
7551                 })(), l127.function("var ret = ", (function(){
7552                     var symbol = l129;
7553                     var func = symbol.function;
7554                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7555                     return func;
7556                 })()(l3.value), ";", (function(){
7557                     var symbol = l121;
7558                     var value = symbol.value;
7559                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7560                     return value;
7561                 })(), "try {", (function(){
7562                     var symbol = l121;
7563                     var value = symbol.value;
7564                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7565                     return value;
7566                 })(), l127.function("ret = ", (function(){
7567                     var symbol = l129;
7568                     var func = symbol.function;
7569                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7570                     return func;
7571                 })()(v528), ";", (function(){
7572                     var symbol = l121;
7573                     var value = symbol.value;
7574                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7575                     return value;
7576                 })()), "} finally {", (function(){
7577                     var symbol = l121;
7578                     var value = symbol.value;
7579                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7580                     return value;
7581                 })(), l127.function((function(){
7582                     var symbol = l203;
7583                     var func = symbol.function;
7584                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7585                     return func;
7586                 })()(v527)), "}", (function(){
7587                     var symbol = l121;
7588                     var value = symbol.value;
7589                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7590                     return value;
7591                 })(), "return ret;", (function(){
7592                     var symbol = l121;
7593                     var value = symbol.value;
7594                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7595                     return value;
7596                 })()), "})()");
7597             })();
7598         }
7599         catch (cf){
7600             if (cf.type == 'block' && cf.id == 192)
7601                 return cf.value;
7602             else
7603                 throw cf;
7604         }
7605     })();
7606
7607 })), cdr: (function(){
7608     var symbol = l189;
7609     var value = symbol.value;
7610     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7611     return value;
7612 })()});
7613 var l231 = {name: "BACKQUOTE-EXPAND-1"};
7614 (function(){
7615     (l231).function = (function(v531){
7616         ((v531)["fname"] = "BACKQUOTE-EXPAND-1");
7617         return v531;
7618     })((function (v529){
7619         if (arguments.length < 1) throw 'too few arguments';
7620         if (arguments.length > 1) throw 'too many arguments';
7621         return (function(){
7622             try {
7623                 return (function(){
7624                     return (((function(){
7625                         var tmp = v529;
7626                         return (typeof tmp == 'object' && 'name' in tmp);
7627                     })()?l4.value: l3.value) !== l3.value ? (function(){
7628                         return l44.function(l149, v529);
7629                     })() : (l45.function(v529) !== l3.value ? (function(){
7630                         return v529;
7631                     })() : ((((function(){
7632                         var tmp = v529;
7633                         return tmp === l3.value? l3.value: tmp.car;
7634                     })() === l152)?l4.value: l3.value) !== l3.value ? (function(){
7635                         return (function(){
7636                             var tmp = v529;
7637                             return tmp === l3.value? l3.value: tmp.car;
7638                         })();
7639                     })() : ((((function(){
7640                         var tmp = v529;
7641                         return tmp === l3.value? l3.value: tmp.car;
7642                     })() === l150)?l4.value: l3.value) !== l3.value ? (function(){
7643                         return l231.function(l231.function(l34.function(v529)));
7644                     })() : (function(){
7645                         return ({car: l62, cdr: l68.function((function (v530){
7646                             if (arguments.length < 1) throw 'too few arguments';
7647                             if (arguments.length > 1) throw 'too many arguments';
7648                             return ((l59.function(v530) !== l3.value ? (((function(){
7649                                 var tmp = v530;
7650                                 return tmp === l3.value? l3.value: tmp.car;
7651                             })() === l152)?l4.value: l3.value) : l3.value) !== l3.value ? (function(){
7652                                 return l44.function(l44, l34.function(v530));
7653                             })() : ((l59.function(v530) !== l3.value ? (((function(){
7654                                 var tmp = v530;
7655                                 return tmp === l3.value? l3.value: tmp.car;
7656                             })() === l151)?l4.value: l3.value) : l3.value) !== l3.value ? (function(){
7657                                 return l34.function(v530);
7658                             })() : (function(){
7659                                 return l44.function(l44, l231.function(v530));
7660                             })()));
7661
7662                         }), v529)});
7663                     })()))));
7664                 })();
7665             }
7666             catch (cf){
7667                 if (cf.type == 'block' && cf.id == 193)
7668                     return cf.value;
7669                 else
7670                     throw cf;
7671             }
7672         })();
7673
7674     }));
7675     return l231;
7676 })();
7677 var l232 = {name: "BACKQUOTE-EXPAND"};
7678 (function(){
7679     (l232).function = (function(v533){
7680         ((v533)["fname"] = "BACKQUOTE-EXPAND");
7681         return v533;
7682     })((function (v532){
7683         if (arguments.length < 1) throw 'too few arguments';
7684         if (arguments.length > 1) throw 'too many arguments';
7685         return (function(){
7686             try {
7687                 return (function(){
7688                     return ((l59.function(v532) !== l3.value ? (((function(){
7689                         var tmp = v532;
7690                         return tmp === l3.value? l3.value: tmp.car;
7691                     })() === l150)?l4.value: l3.value) : l3.value) !== l3.value ? l231.function(l34.function(v532)) : v532);
7692                 })();
7693             }
7694             catch (cf){
7695                 if (cf.type == 'block' && cf.id == 194)
7696                     return cf.value;
7697                 else
7698                     throw cf;
7699             }
7700         })();
7701
7702     }));
7703     return l232;
7704 })();
7705 l150;
7706 (l189).value = ({car: l44.function(l150, (function (v534){
7707     if (arguments.length < 1) throw 'too few arguments';
7708     if (arguments.length > 1) throw 'too many arguments';
7709     return (function(){
7710         try {
7711             return (function(){
7712                 return (function(){
7713                     var symbol = l129;
7714                     var func = symbol.function;
7715                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7716                     return func;
7717                 })()(l231.function(v534));
7718             })();
7719         }
7720         catch (cf){
7721             if (cf.type == 'block' && cf.id == 195)
7722                 return cf.value;
7723             else
7724                 throw cf;
7725         }
7726     })();
7727
7728 })), cdr: (function(){
7729     var symbol = l189;
7730     var value = symbol.value;
7731     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7732     return value;
7733 })()});
7734 var l233 = {name: "*BUILTINS*"};
7735 (function(){
7736     (((l233.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
7737         return (l233).value = l3.value;
7738     })());
7739     return l233;
7740 })();
7741 var l234 = {name: "DEFINE-RAW-BUILTIN"};
7742 l234;
7743 var l235 = {name: "DEFINE-BUILTIN"};
7744 l235;
7745 var l236 = {name: "TYPE-CHECK"};
7746 l236;
7747 var l237 = {name: "NUM-OP-NUM"};
7748 (function(){
7749     (l237).function = (function(v538){
7750         ((v538)["fname"] = "NUM-OP-NUM");
7751         return v538;
7752     })((function (v535,v536,v537){
7753         if (arguments.length < 3) throw 'too few arguments';
7754         if (arguments.length > 3) throw 'too many arguments';
7755         return (function(){
7756             try {
7757                 return (function(){
7758                     return l122.function("(function(){", (function(){
7759                         var symbol = l121;
7760                         var value = symbol.value;
7761                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7762                         return value;
7763                     })(), l127.function(l122.function("var ", "x", " = ", v535, ";", (function(){
7764                         var symbol = l121;
7765                         var value = symbol.value;
7766                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7767                         return value;
7768                     })()), l122.function("var ", "y", " = ", v537, ";", (function(){
7769                         var symbol = l121;
7770                         var value = symbol.value;
7771                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7772                         return value;
7773                     })()), l122.function("if (typeof ", "x", " != '", "number", "')", (function(){
7774                         var symbol = l121;
7775                         var value = symbol.value;
7776                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7777                         return value;
7778                     })(), l127.function("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7779                         var symbol = l121;
7780                         var value = symbol.value;
7781                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7782                         return value;
7783                     })())), l122.function("if (typeof ", "y", " != '", "number", "')", (function(){
7784                         var symbol = l121;
7785                         var value = symbol.value;
7786                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7787                         return value;
7788                     })(), l127.function("throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
7789                         var symbol = l121;
7790                         var value = symbol.value;
7791                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7792                         return value;
7793                     })())), l122.function("return ", (function(){
7794                         return l122.function("x", v536, "y");
7795                     })(), ";", (function(){
7796                         var symbol = l121;
7797                         var value = symbol.value;
7798                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7799                         return value;
7800                     })())), "})()");
7801                 })();
7802             }
7803             catch (cf){
7804                 if (cf.type == 'block' && cf.id == 196)
7805                     return cf.value;
7806                 else
7807                     throw cf;
7808             }
7809         })();
7810
7811     }));
7812     return l237;
7813 })();
7814 (function(){
7815     return (l233).value = ({car: l44.function(l19, (function (v539,v540){
7816         if (arguments.length < 2) throw 'too few arguments';
7817         if (arguments.length > 2) throw 'too many arguments';
7818         return (function(){
7819             try {
7820                 return (function(){
7821                     return (function(v541,v542){
7822                         return l237.function(v541, "+", v542);
7823                     })((function(){
7824                         var symbol = l129;
7825                         var func = symbol.function;
7826                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7827                         return func;
7828                     })()(v539),(function(){
7829                         var symbol = l129;
7830                         var func = symbol.function;
7831                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7832                         return func;
7833                     })()(v540));
7834                 })();
7835             }
7836             catch (cf){
7837                 if (cf.type == 'block' && cf.id == 197)
7838                     return cf.value;
7839                 else
7840                     throw cf;
7841             }
7842         })();
7843
7844     })), cdr: (function(){
7845         var symbol = l233;
7846         var value = symbol.value;
7847         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7848         return value;
7849     })()});
7850 })();
7851 (function(){
7852     return (l233).value = ({car: l44.function(l20, (function (v543,v544){
7853         if (arguments.length < 2) throw 'too few arguments';
7854         if (arguments.length > 2) throw 'too many arguments';
7855         return (function(){
7856             try {
7857                 return (function(){
7858                     return (function(v545,v546){
7859                         return l237.function(v545, "-", v546);
7860                     })((function(){
7861                         var symbol = l129;
7862                         var func = symbol.function;
7863                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7864                         return func;
7865                     })()(v543),(function(){
7866                         var symbol = l129;
7867                         var func = symbol.function;
7868                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7869                         return func;
7870                     })()(v544));
7871                 })();
7872             }
7873             catch (cf){
7874                 if (cf.type == 'block' && cf.id == 198)
7875                     return cf.value;
7876                 else
7877                     throw cf;
7878             }
7879         })();
7880
7881     })), cdr: (function(){
7882         var symbol = l233;
7883         var value = symbol.value;
7884         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7885         return value;
7886     })()});
7887 })();
7888 (function(){
7889     return (l233).value = ({car: l44.function(l21, (function (v547,v548){
7890         if (arguments.length < 2) throw 'too few arguments';
7891         if (arguments.length > 2) throw 'too many arguments';
7892         return (function(){
7893             try {
7894                 return (function(){
7895                     return (function(v549,v550){
7896                         return l237.function(v549, "*", v550);
7897                     })((function(){
7898                         var symbol = l129;
7899                         var func = symbol.function;
7900                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7901                         return func;
7902                     })()(v547),(function(){
7903                         var symbol = l129;
7904                         var func = symbol.function;
7905                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7906                         return func;
7907                     })()(v548));
7908                 })();
7909             }
7910             catch (cf){
7911                 if (cf.type == 'block' && cf.id == 199)
7912                     return cf.value;
7913                 else
7914                     throw cf;
7915             }
7916         })();
7917
7918     })), cdr: (function(){
7919         var symbol = l233;
7920         var value = symbol.value;
7921         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7922         return value;
7923     })()});
7924 })();
7925 (function(){
7926     return (l233).value = ({car: l44.function(l22, (function (v551,v552){
7927         if (arguments.length < 2) throw 'too few arguments';
7928         if (arguments.length > 2) throw 'too many arguments';
7929         return (function(){
7930             try {
7931                 return (function(){
7932                     return (function(v553,v554){
7933                         return l237.function(v553, "/", v554);
7934                     })((function(){
7935                         var symbol = l129;
7936                         var func = symbol.function;
7937                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7938                         return func;
7939                     })()(v551),(function(){
7940                         var symbol = l129;
7941                         var func = symbol.function;
7942                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7943                         return func;
7944                     })()(v552));
7945                 })();
7946             }
7947             catch (cf){
7948                 if (cf.type == 'block' && cf.id == 200)
7949                     return cf.value;
7950                 else
7951                     throw cf;
7952             }
7953         })();
7954
7955     })), cdr: (function(){
7956         var symbol = l233;
7957         var value = symbol.value;
7958         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7959         return value;
7960     })()});
7961 })();
7962 var l238 = {name: "MOD"};
7963 (function(){
7964     return (l233).value = ({car: l44.function(l238, (function (v555,v556){
7965         if (arguments.length < 2) throw 'too few arguments';
7966         if (arguments.length > 2) throw 'too many arguments';
7967         return (function(){
7968             try {
7969                 return (function(){
7970                     return (function(v557,v558){
7971                         return l237.function(v557, "%", v558);
7972                     })((function(){
7973                         var symbol = l129;
7974                         var func = symbol.function;
7975                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7976                         return func;
7977                     })()(v555),(function(){
7978                         var symbol = l129;
7979                         var func = symbol.function;
7980                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7981                         return func;
7982                     })()(v556));
7983                 })();
7984             }
7985             catch (cf){
7986                 if (cf.type == 'block' && cf.id == 201)
7987                     return cf.value;
7988                 else
7989                     throw cf;
7990             }
7991         })();
7992
7993     })), cdr: (function(){
7994         var symbol = l233;
7995         var value = symbol.value;
7996         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7997         return value;
7998     })()});
7999 })();
8000 var l239 = {name: "<"};
8001 (function(){
8002     return (l233).value = ({car: l44.function(l239, (function (v559,v560){
8003         if (arguments.length < 2) throw 'too few arguments';
8004         if (arguments.length > 2) throw 'too many arguments';
8005         return (function(){
8006             try {
8007                 return (function(){
8008                     return (function(v561,v562){
8009                         return l128.function(l237.function(v561, "<", v562));
8010                     })((function(){
8011                         var symbol = l129;
8012                         var func = symbol.function;
8013                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8014                         return func;
8015                     })()(v559),(function(){
8016                         var symbol = l129;
8017                         var func = symbol.function;
8018                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8019                         return func;
8020                     })()(v560));
8021                 })();
8022             }
8023             catch (cf){
8024                 if (cf.type == 'block' && cf.id == 202)
8025                     return cf.value;
8026                 else
8027                     throw cf;
8028             }
8029         })();
8030
8031     })), cdr: (function(){
8032         var symbol = l233;
8033         var value = symbol.value;
8034         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8035         return value;
8036     })()});
8037 })();
8038 var l240 = {name: ">"};
8039 (function(){
8040     return (l233).value = ({car: l44.function(l240, (function (v563,v564){
8041         if (arguments.length < 2) throw 'too few arguments';
8042         if (arguments.length > 2) throw 'too many arguments';
8043         return (function(){
8044             try {
8045                 return (function(){
8046                     return (function(v565,v566){
8047                         return l128.function(l237.function(v565, ">", v566));
8048                     })((function(){
8049                         var symbol = l129;
8050                         var func = symbol.function;
8051                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8052                         return func;
8053                     })()(v563),(function(){
8054                         var symbol = l129;
8055                         var func = symbol.function;
8056                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8057                         return func;
8058                     })()(v564));
8059                 })();
8060             }
8061             catch (cf){
8062                 if (cf.type == 'block' && cf.id == 203)
8063                     return cf.value;
8064                 else
8065                     throw cf;
8066             }
8067         })();
8068
8069     })), cdr: (function(){
8070         var symbol = l233;
8071         var value = symbol.value;
8072         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8073         return value;
8074     })()});
8075 })();
8076 (function(){
8077     return (l233).value = ({car: l44.function(l18, (function (v567,v568){
8078         if (arguments.length < 2) throw 'too few arguments';
8079         if (arguments.length > 2) throw 'too many arguments';
8080         return (function(){
8081             try {
8082                 return (function(){
8083                     return (function(v569,v570){
8084                         return l128.function(l237.function(v569, "==", v570));
8085                     })((function(){
8086                         var symbol = l129;
8087                         var func = symbol.function;
8088                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8089                         return func;
8090                     })()(v567),(function(){
8091                         var symbol = l129;
8092                         var func = symbol.function;
8093                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8094                         return func;
8095                     })()(v568));
8096                 })();
8097             }
8098             catch (cf){
8099                 if (cf.type == 'block' && cf.id == 204)
8100                     return cf.value;
8101                 else
8102                     throw cf;
8103             }
8104         })();
8105
8106     })), cdr: (function(){
8107         var symbol = l233;
8108         var value = symbol.value;
8109         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8110         return value;
8111     })()});
8112 })();
8113 var l241 = {name: "<="};
8114 (function(){
8115     return (l233).value = ({car: l44.function(l241, (function (v571,v572){
8116         if (arguments.length < 2) throw 'too few arguments';
8117         if (arguments.length > 2) throw 'too many arguments';
8118         return (function(){
8119             try {
8120                 return (function(){
8121                     return (function(v573,v574){
8122                         return l128.function(l237.function(v573, "<=", v574));
8123                     })((function(){
8124                         var symbol = l129;
8125                         var func = symbol.function;
8126                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8127                         return func;
8128                     })()(v571),(function(){
8129                         var symbol = l129;
8130                         var func = symbol.function;
8131                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8132                         return func;
8133                     })()(v572));
8134                 })();
8135             }
8136             catch (cf){
8137                 if (cf.type == 'block' && cf.id == 205)
8138                     return cf.value;
8139                 else
8140                     throw cf;
8141             }
8142         })();
8143
8144     })), cdr: (function(){
8145         var symbol = l233;
8146         var value = symbol.value;
8147         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8148         return value;
8149     })()});
8150 })();
8151 var l242 = {name: ">="};
8152 (function(){
8153     return (l233).value = ({car: l44.function(l242, (function (v575,v576){
8154         if (arguments.length < 2) throw 'too few arguments';
8155         if (arguments.length > 2) throw 'too many arguments';
8156         return (function(){
8157             try {
8158                 return (function(){
8159                     return (function(v577,v578){
8160                         return l128.function(l237.function(v577, ">=", v578));
8161                     })((function(){
8162                         var symbol = l129;
8163                         var func = symbol.function;
8164                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8165                         return func;
8166                     })()(v575),(function(){
8167                         var symbol = l129;
8168                         var func = symbol.function;
8169                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8170                         return func;
8171                     })()(v576));
8172                 })();
8173             }
8174             catch (cf){
8175                 if (cf.type == 'block' && cf.id == 206)
8176                     return cf.value;
8177                 else
8178                     throw cf;
8179             }
8180         })();
8181
8182     })), cdr: (function(){
8183         var symbol = l233;
8184         var value = symbol.value;
8185         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8186         return value;
8187     })()});
8188 })();
8189 var l243 = {name: "NUMBERP"};
8190 (function(){
8191     return (l233).value = ({car: l44.function(l243, (function (v579){
8192         if (arguments.length < 1) throw 'too few arguments';
8193         if (arguments.length > 1) throw 'too many arguments';
8194         return (function(){
8195             try {
8196                 return (function(){
8197                     return (function(v580){
8198                         return l128.function(l122.function("(typeof (", v580, ") == \"number\")"));
8199                     })((function(){
8200                         var symbol = l129;
8201                         var func = symbol.function;
8202                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8203                         return func;
8204                     })()(v579));
8205                 })();
8206             }
8207             catch (cf){
8208                 if (cf.type == 'block' && cf.id == 207)
8209                     return cf.value;
8210                 else
8211                     throw cf;
8212             }
8213         })();
8214
8215     })), cdr: (function(){
8216         var symbol = l233;
8217         var value = symbol.value;
8218         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8219         return value;
8220     })()});
8221 })();
8222 var l244 = {name: "FLOOR"};
8223 (function(){
8224     return (l233).value = ({car: l44.function(l244, (function (v581){
8225         if (arguments.length < 1) throw 'too few arguments';
8226         if (arguments.length > 1) throw 'too many arguments';
8227         return (function(){
8228             try {
8229                 return (function(){
8230                     return (function(v582){
8231                         return l122.function("(function(){", (function(){
8232                             var symbol = l121;
8233                             var value = symbol.value;
8234                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8235                             return value;
8236                         })(), l127.function(l122.function("var ", "x", " = ", v582, ";", (function(){
8237                             var symbol = l121;
8238                             var value = symbol.value;
8239                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8240                             return value;
8241                         })()), l122.function("if (typeof ", "x", " != '", "number", "')", (function(){
8242                             var symbol = l121;
8243                             var value = symbol.value;
8244                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8245                             return value;
8246                         })(), l127.function("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
8247                             var symbol = l121;
8248                             var value = symbol.value;
8249                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8250                             return value;
8251                         })())), l122.function("return ", (function(){
8252                             return "Math.floor(x)";
8253                         })(), ";", (function(){
8254                             var symbol = l121;
8255                             var value = symbol.value;
8256                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8257                             return value;
8258                         })())), "})()");
8259                     })((function(){
8260                         var symbol = l129;
8261                         var func = symbol.function;
8262                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8263                         return func;
8264                     })()(v581));
8265                 })();
8266             }
8267             catch (cf){
8268                 if (cf.type == 'block' && cf.id == 208)
8269                     return cf.value;
8270                 else
8271                     throw cf;
8272             }
8273         })();
8274
8275     })), cdr: (function(){
8276         var symbol = l233;
8277         var value = symbol.value;
8278         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8279         return value;
8280     })()});
8281 })();
8282 (function(){
8283     return (l233).value = ({car: l44.function(l29, (function (v583,v584){
8284         if (arguments.length < 2) throw 'too few arguments';
8285         if (arguments.length > 2) throw 'too many arguments';
8286         return (function(){
8287             try {
8288                 return (function(){
8289                     return (function(v585,v586){
8290                         return l122.function("({car: ", v585, ", cdr: ", v586, "})");
8291                     })((function(){
8292                         var symbol = l129;
8293                         var func = symbol.function;
8294                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8295                         return func;
8296                     })()(v583),(function(){
8297                         var symbol = l129;
8298                         var func = symbol.function;
8299                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8300                         return func;
8301                     })()(v584));
8302                 })();
8303             }
8304             catch (cf){
8305                 if (cf.type == 'block' && cf.id == 209)
8306                     return cf.value;
8307                 else
8308                     throw cf;
8309             }
8310         })();
8311
8312     })), cdr: (function(){
8313         var symbol = l233;
8314         var value = symbol.value;
8315         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8316         return value;
8317     })()});
8318 })();
8319 (function(){
8320     return (l233).value = ({car: l44.function(l30, (function (v587){
8321         if (arguments.length < 1) throw 'too few arguments';
8322         if (arguments.length > 1) throw 'too many arguments';
8323         return (function(){
8324             try {
8325                 return (function(){
8326                     return (function(v588){
8327                         return l128.function(l122.function("(function(){", (function(){
8328                             var symbol = l121;
8329                             var value = symbol.value;
8330                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8331                             return value;
8332                         })(), l127.function("var tmp = ", v588, ";", (function(){
8333                             var symbol = l121;
8334                             var value = symbol.value;
8335                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8336                             return value;
8337                         })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
8338                             var symbol = l121;
8339                             var value = symbol.value;
8340                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8341                             return value;
8342                         })()), "})()"));
8343                     })((function(){
8344                         var symbol = l129;
8345                         var func = symbol.function;
8346                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8347                         return func;
8348                     })()(v587));
8349                 })();
8350             }
8351             catch (cf){
8352                 if (cf.type == 'block' && cf.id == 210)
8353                     return cf.value;
8354                 else
8355                     throw cf;
8356             }
8357         })();
8358
8359     })), cdr: (function(){
8360         var symbol = l233;
8361         var value = symbol.value;
8362         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8363         return value;
8364     })()});
8365 })();
8366 (function(){
8367     return (l233).value = ({car: l44.function(l31, (function (v589){
8368         if (arguments.length < 1) throw 'too few arguments';
8369         if (arguments.length > 1) throw 'too many arguments';
8370         return (function(){
8371             try {
8372                 return (function(){
8373                     return (function(v590){
8374                         return l122.function("(function(){", (function(){
8375                             var symbol = l121;
8376                             var value = symbol.value;
8377                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8378                             return value;
8379                         })(), l127.function("var tmp = ", v590, ";", (function(){
8380                             var symbol = l121;
8381                             var value = symbol.value;
8382                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8383                             return value;
8384                         })(), "return tmp === ", (function(){
8385                             var symbol = l129;
8386                             var func = symbol.function;
8387                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8388                             return func;
8389                         })()(l3.value), "? ", (function(){
8390                             var symbol = l129;
8391                             var func = symbol.function;
8392                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8393                             return func;
8394                         })()(l3.value), ": tmp.car;", (function(){
8395                             var symbol = l121;
8396                             var value = symbol.value;
8397                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8398                             return value;
8399                         })()), "})()");
8400                     })((function(){
8401                         var symbol = l129;
8402                         var func = symbol.function;
8403                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8404                         return func;
8405                     })()(v589));
8406                 })();
8407             }
8408             catch (cf){
8409                 if (cf.type == 'block' && cf.id == 211)
8410                     return cf.value;
8411                 else
8412                     throw cf;
8413             }
8414         })();
8415
8416     })), cdr: (function(){
8417         var symbol = l233;
8418         var value = symbol.value;
8419         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8420         return value;
8421     })()});
8422 })();
8423 (function(){
8424     return (l233).value = ({car: l44.function(l32, (function (v591){
8425         if (arguments.length < 1) throw 'too few arguments';
8426         if (arguments.length > 1) throw 'too many arguments';
8427         return (function(){
8428             try {
8429                 return (function(){
8430                     return (function(v592){
8431                         return l122.function("(function(){", (function(){
8432                             var symbol = l121;
8433                             var value = symbol.value;
8434                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8435                             return value;
8436                         })(), l127.function("var tmp = ", v592, ";", (function(){
8437                             var symbol = l121;
8438                             var value = symbol.value;
8439                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8440                             return value;
8441                         })(), "return tmp === ", (function(){
8442                             var symbol = l129;
8443                             var func = symbol.function;
8444                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8445                             return func;
8446                         })()(l3.value), "? ", (function(){
8447                             var symbol = l129;
8448                             var func = symbol.function;
8449                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8450                             return func;
8451                         })()(l3.value), ": tmp.cdr;", (function(){
8452                             var symbol = l121;
8453                             var value = symbol.value;
8454                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8455                             return value;
8456                         })()), "})()");
8457                     })((function(){
8458                         var symbol = l129;
8459                         var func = symbol.function;
8460                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8461                         return func;
8462                     })()(v591));
8463                 })();
8464             }
8465             catch (cf){
8466                 if (cf.type == 'block' && cf.id == 212)
8467                     return cf.value;
8468                 else
8469                     throw cf;
8470             }
8471         })();
8472
8473     })), cdr: (function(){
8474         var symbol = l233;
8475         var value = symbol.value;
8476         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8477         return value;
8478     })()});
8479 })();
8480 var l245 = {name: "SETCAR"};
8481 (function(){
8482     return (l233).value = ({car: l44.function(l245, (function (v593,v594){
8483         if (arguments.length < 2) throw 'too few arguments';
8484         if (arguments.length > 2) throw 'too many arguments';
8485         return (function(){
8486             try {
8487                 return (function(){
8488                     return (function(v595,v596){
8489                         return l122.function("(function(){", (function(){
8490                             var symbol = l121;
8491                             var value = symbol.value;
8492                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8493                             return value;
8494                         })(), l127.function(l122.function("var ", "x", " = ", v595, ";", (function(){
8495                             var symbol = l121;
8496                             var value = symbol.value;
8497                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8498                             return value;
8499                         })()), l122.function("if (typeof ", "x", " != '", "object", "')", (function(){
8500                             var symbol = l121;
8501                             var value = symbol.value;
8502                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8503                             return value;
8504                         })(), l127.function("throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
8505                             var symbol = l121;
8506                             var value = symbol.value;
8507                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8508                             return value;
8509                         })())), l122.function("return ", (function(){
8510                             return l122.function("(x.car = ", v596, ")");
8511                         })(), ";", (function(){
8512                             var symbol = l121;
8513                             var value = symbol.value;
8514                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8515                             return value;
8516                         })())), "})()");
8517                     })((function(){
8518                         var symbol = l129;
8519                         var func = symbol.function;
8520                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8521                         return func;
8522                     })()(v593),(function(){
8523                         var symbol = l129;
8524                         var func = symbol.function;
8525                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8526                         return func;
8527                     })()(v594));
8528                 })();
8529             }
8530             catch (cf){
8531                 if (cf.type == 'block' && cf.id == 213)
8532                     return cf.value;
8533                 else
8534                     throw cf;
8535             }
8536         })();
8537
8538     })), cdr: (function(){
8539         var symbol = l233;
8540         var value = symbol.value;
8541         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8542         return value;
8543     })()});
8544 })();
8545 var l246 = {name: "SETCDR"};
8546 (function(){
8547     return (l233).value = ({car: l44.function(l246, (function (v597,v598){
8548         if (arguments.length < 2) throw 'too few arguments';
8549         if (arguments.length > 2) throw 'too many arguments';
8550         return (function(){
8551             try {
8552                 return (function(){
8553                     return (function(v599,v600){
8554                         return l122.function("(function(){", (function(){
8555                             var symbol = l121;
8556                             var value = symbol.value;
8557                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8558                             return value;
8559                         })(), l127.function(l122.function("var ", "x", " = ", v599, ";", (function(){
8560                             var symbol = l121;
8561                             var value = symbol.value;
8562                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8563                             return value;
8564                         })()), l122.function("if (typeof ", "x", " != '", "object", "')", (function(){
8565                             var symbol = l121;
8566                             var value = symbol.value;
8567                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8568                             return value;
8569                         })(), l127.function("throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
8570                             var symbol = l121;
8571                             var value = symbol.value;
8572                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8573                             return value;
8574                         })())), l122.function("return ", (function(){
8575                             return l122.function("(x.cdr = ", v600, ")");
8576                         })(), ";", (function(){
8577                             var symbol = l121;
8578                             var value = symbol.value;
8579                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8580                             return value;
8581                         })())), "})()");
8582                     })((function(){
8583                         var symbol = l129;
8584                         var func = symbol.function;
8585                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8586                         return func;
8587                     })()(v597),(function(){
8588                         var symbol = l129;
8589                         var func = symbol.function;
8590                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8591                         return func;
8592                     })()(v598));
8593                 })();
8594             }
8595             catch (cf){
8596                 if (cf.type == 'block' && cf.id == 214)
8597                     return cf.value;
8598                 else
8599                     throw cf;
8600             }
8601         })();
8602
8603     })), cdr: (function(){
8604         var symbol = l233;
8605         var value = symbol.value;
8606         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8607         return value;
8608     })()});
8609 })();
8610 var l247 = {name: "SYMBOLP"};
8611 (function(){
8612     return (l233).value = ({car: l44.function(l247, (function (v601){
8613         if (arguments.length < 1) throw 'too few arguments';
8614         if (arguments.length > 1) throw 'too many arguments';
8615         return (function(){
8616             try {
8617                 return (function(){
8618                     return (function(v602){
8619                         return l128.function(l122.function("(function(){", (function(){
8620                             var symbol = l121;
8621                             var value = symbol.value;
8622                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8623                             return value;
8624                         })(), l127.function("var tmp = ", v602, ";", (function(){
8625                             var symbol = l121;
8626                             var value = symbol.value;
8627                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8628                             return value;
8629                         })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
8630                             var symbol = l121;
8631                             var value = symbol.value;
8632                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8633                             return value;
8634                         })()), "})()"));
8635                     })((function(){
8636                         var symbol = l129;
8637                         var func = symbol.function;
8638                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8639                         return func;
8640                     })()(v601));
8641                 })();
8642             }
8643             catch (cf){
8644                 if (cf.type == 'block' && cf.id == 215)
8645                     return cf.value;
8646                 else
8647                     throw cf;
8648             }
8649         })();
8650
8651     })), cdr: (function(){
8652         var symbol = l233;
8653         var value = symbol.value;
8654         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8655         return value;
8656     })()});
8657 })();
8658 var l248 = {name: "MAKE-SYMBOL"};
8659 (function(){
8660     return (l233).value = ({car: l44.function(l248, (function (v603){
8661         if (arguments.length < 1) throw 'too few arguments';
8662         if (arguments.length > 1) throw 'too many arguments';
8663         return (function(){
8664             try {
8665                 return (function(){
8666                     return (function(v604){
8667                         return l122.function("(function(){", (function(){
8668                             var symbol = l121;
8669                             var value = symbol.value;
8670                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8671                             return value;
8672                         })(), l127.function(l122.function("var ", "name", " = ", v604, ";", (function(){
8673                             var symbol = l121;
8674                             var value = symbol.value;
8675                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8676                             return value;
8677                         })()), l122.function("if (typeof ", "name", " != '", "string", "')", (function(){
8678                             var symbol = l121;
8679                             var value = symbol.value;
8680                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8681                             return value;
8682                         })(), l127.function("throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
8683                             var symbol = l121;
8684                             var value = symbol.value;
8685                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8686                             return value;
8687                         })())), l122.function("return ", (function(){
8688                             return "({name: name})";
8689                         })(), ";", (function(){
8690                             var symbol = l121;
8691                             var value = symbol.value;
8692                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8693                             return value;
8694                         })())), "})()");
8695                     })((function(){
8696                         var symbol = l129;
8697                         var func = symbol.function;
8698                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8699                         return func;
8700                     })()(v603));
8701                 })();
8702             }
8703             catch (cf){
8704                 if (cf.type == 'block' && cf.id == 216)
8705                     return cf.value;
8706                 else
8707                     throw cf;
8708             }
8709         })();
8710
8711     })), cdr: (function(){
8712         var symbol = l233;
8713         var value = symbol.value;
8714         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8715         return value;
8716     })()});
8717 })();
8718 var l249 = {name: "SYMBOL-NAME"};
8719 (function(){
8720     return (l233).value = ({car: l44.function(l249, (function (v605){
8721         if (arguments.length < 1) throw 'too few arguments';
8722         if (arguments.length > 1) throw 'too many arguments';
8723         return (function(){
8724             try {
8725                 return (function(){
8726                     return (function(v606){
8727                         return l122.function("(", v606, ").name");
8728                     })((function(){
8729                         var symbol = l129;
8730                         var func = symbol.function;
8731                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8732                         return func;
8733                     })()(v605));
8734                 })();
8735             }
8736             catch (cf){
8737                 if (cf.type == 'block' && cf.id == 217)
8738                     return cf.value;
8739                 else
8740                     throw cf;
8741             }
8742         })();
8743
8744     })), cdr: (function(){
8745         var symbol = l233;
8746         var value = symbol.value;
8747         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8748         return value;
8749     })()});
8750 })();
8751 (function(){
8752     return (l233).value = ({car: l44.function(l205, (function (v607,v608){
8753         if (arguments.length < 2) throw 'too few arguments';
8754         if (arguments.length > 2) throw 'too many arguments';
8755         return (function(){
8756             try {
8757                 return (function(){
8758                     return (function(v609,v610){
8759                         return l122.function("(", v609, ").value = ", v610);
8760                     })((function(){
8761                         var symbol = l129;
8762                         var func = symbol.function;
8763                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8764                         return func;
8765                     })()(v607),(function(){
8766                         var symbol = l129;
8767                         var func = symbol.function;
8768                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8769                         return func;
8770                     })()(v608));
8771                 })();
8772             }
8773             catch (cf){
8774                 if (cf.type == 'block' && cf.id == 218)
8775                     return cf.value;
8776                 else
8777                     throw cf;
8778             }
8779         })();
8780
8781     })), cdr: (function(){
8782         var symbol = l233;
8783         var value = symbol.value;
8784         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8785         return value;
8786     })()});
8787 })();
8788 var l250 = {name: "FSET"};
8789 (function(){
8790     return (l233).value = ({car: l44.function(l250, (function (v611,v612){
8791         if (arguments.length < 2) throw 'too few arguments';
8792         if (arguments.length > 2) throw 'too many arguments';
8793         return (function(){
8794             try {
8795                 return (function(){
8796                     return (function(v613,v614){
8797                         return l122.function("(", v613, ").function = ", v614);
8798                     })((function(){
8799                         var symbol = l129;
8800                         var func = symbol.function;
8801                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8802                         return func;
8803                     })()(v611),(function(){
8804                         var symbol = l129;
8805                         var func = symbol.function;
8806                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8807                         return func;
8808                     })()(v612));
8809                 })();
8810             }
8811             catch (cf){
8812                 if (cf.type == 'block' && cf.id == 219)
8813                     return cf.value;
8814                 else
8815                     throw cf;
8816             }
8817         })();
8818
8819     })), cdr: (function(){
8820         var symbol = l233;
8821         var value = symbol.value;
8822         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8823         return value;
8824     })()});
8825 })();
8826 (function(){
8827     return (l233).value = ({car: l44.function(l17, (function (v615){
8828         if (arguments.length < 1) throw 'too few arguments';
8829         if (arguments.length > 1) throw 'too many arguments';
8830         return (function(){
8831             try {
8832                 return (function(){
8833                     return (function(v616){
8834                         return l128.function(l122.function("(", v616, ".value !== undefined)"));
8835                     })((function(){
8836                         var symbol = l129;
8837                         var func = symbol.function;
8838                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8839                         return func;
8840                     })()(v615));
8841                 })();
8842             }
8843             catch (cf){
8844                 if (cf.type == 'block' && cf.id == 220)
8845                     return cf.value;
8846                 else
8847                     throw cf;
8848             }
8849         })();
8850
8851     })), cdr: (function(){
8852         var symbol = l233;
8853         var value = symbol.value;
8854         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8855         return value;
8856     })()});
8857 })();
8858 var l251 = {name: "SYMBOL-VALUE"};
8859 (function(){
8860     return (l233).value = ({car: l44.function(l251, (function (v617){
8861         if (arguments.length < 1) throw 'too few arguments';
8862         if (arguments.length > 1) throw 'too many arguments';
8863         return (function(){
8864             try {
8865                 return (function(){
8866                     return (function(v618){
8867                         return l122.function("(function(){", (function(){
8868                             var symbol = l121;
8869                             var value = symbol.value;
8870                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8871                             return value;
8872                         })(), l127.function("var symbol = ", v618, ";", (function(){
8873                             var symbol = l121;
8874                             var value = symbol.value;
8875                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8876                             return value;
8877                         })(), "var value = symbol.value;", (function(){
8878                             var symbol = l121;
8879                             var value = symbol.value;
8880                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8881                             return value;
8882                         })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
8883                             var symbol = l121;
8884                             var value = symbol.value;
8885                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8886                             return value;
8887                         })(), "return value;", (function(){
8888                             var symbol = l121;
8889                             var value = symbol.value;
8890                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8891                             return value;
8892                         })()), "})()");
8893                     })((function(){
8894                         var symbol = l129;
8895                         var func = symbol.function;
8896                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8897                         return func;
8898                     })()(v617));
8899                 })();
8900             }
8901             catch (cf){
8902                 if (cf.type == 'block' && cf.id == 221)
8903                     return cf.value;
8904                 else
8905                     throw cf;
8906             }
8907         })();
8908
8909     })), cdr: (function(){
8910         var symbol = l233;
8911         var value = symbol.value;
8912         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8913         return value;
8914     })()});
8915 })();
8916 (function(){
8917     return (l233).value = ({car: l44.function(l213, (function (v619){
8918         if (arguments.length < 1) throw 'too few arguments';
8919         if (arguments.length > 1) throw 'too many arguments';
8920         return (function(){
8921             try {
8922                 return (function(){
8923                     return (function(v620){
8924                         return l122.function("(function(){", (function(){
8925                             var symbol = l121;
8926                             var value = symbol.value;
8927                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8928                             return value;
8929                         })(), l127.function("var symbol = ", v620, ";", (function(){
8930                             var symbol = l121;
8931                             var value = symbol.value;
8932                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8933                             return value;
8934                         })(), "var func = symbol.function;", (function(){
8935                             var symbol = l121;
8936                             var value = symbol.value;
8937                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8938                             return value;
8939                         })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
8940                             var symbol = l121;
8941                             var value = symbol.value;
8942                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8943                             return value;
8944                         })(), "return func;", (function(){
8945                             var symbol = l121;
8946                             var value = symbol.value;
8947                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8948                             return value;
8949                         })()), "})()");
8950                     })((function(){
8951                         var symbol = l129;
8952                         var func = symbol.function;
8953                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8954                         return func;
8955                     })()(v619));
8956                 })();
8957             }
8958             catch (cf){
8959                 if (cf.type == 'block' && cf.id == 222)
8960                     return cf.value;
8961                 else
8962                     throw cf;
8963             }
8964         })();
8965
8966     })), cdr: (function(){
8967         var symbol = l233;
8968         var value = symbol.value;
8969         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8970         return value;
8971     })()});
8972 })();
8973 var l252 = {name: "SYMBOL-PLIST"};
8974 (function(){
8975     return (l233).value = ({car: l44.function(l252, (function (v621){
8976         if (arguments.length < 1) throw 'too few arguments';
8977         if (arguments.length > 1) throw 'too many arguments';
8978         return (function(){
8979             try {
8980                 return (function(){
8981                     return (function(v622){
8982                         return l122.function("((", v622, ").plist || ", (function(){
8983                             var symbol = l129;
8984                             var func = symbol.function;
8985                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8986                             return func;
8987                         })()(l3.value), ")");
8988                     })((function(){
8989                         var symbol = l129;
8990                         var func = symbol.function;
8991                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8992                         return func;
8993                     })()(v621));
8994                 })();
8995             }
8996             catch (cf){
8997                 if (cf.type == 'block' && cf.id == 223)
8998                     return cf.value;
8999                 else
9000                     throw cf;
9001             }
9002         })();
9003
9004     })), cdr: (function(){
9005         var symbol = l233;
9006         var value = symbol.value;
9007         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9008         return value;
9009     })()});
9010 })();
9011 var l253 = {name: "LAMBDA-CODE"};
9012 (function(){
9013     return (l233).value = ({car: l44.function(l253, (function (v623){
9014         if (arguments.length < 1) throw 'too few arguments';
9015         if (arguments.length > 1) throw 'too many arguments';
9016         return (function(){
9017             try {
9018                 return (function(){
9019                     return (function(v624){
9020                         return l122.function("(", v624, ").toString()");
9021                     })((function(){
9022                         var symbol = l129;
9023                         var func = symbol.function;
9024                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9025                         return func;
9026                     })()(v623));
9027                 })();
9028             }
9029             catch (cf){
9030                 if (cf.type == 'block' && cf.id == 224)
9031                     return cf.value;
9032                 else
9033                     throw cf;
9034             }
9035         })();
9036
9037     })), cdr: (function(){
9038         var symbol = l233;
9039         var value = symbol.value;
9040         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9041         return value;
9042     })()});
9043 })();
9044 var l254 = {name: "EQ"};
9045 (function(){
9046     return (l233).value = ({car: l44.function(l254, (function (v625,v626){
9047         if (arguments.length < 2) throw 'too few arguments';
9048         if (arguments.length > 2) throw 'too many arguments';
9049         return (function(){
9050             try {
9051                 return (function(){
9052                     return (function(v627,v628){
9053                         return l128.function(l122.function("(", v627, " === ", v628, ")"));
9054                     })((function(){
9055                         var symbol = l129;
9056                         var func = symbol.function;
9057                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9058                         return func;
9059                     })()(v625),(function(){
9060                         var symbol = l129;
9061                         var func = symbol.function;
9062                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9063                         return func;
9064                     })()(v626));
9065                 })();
9066             }
9067             catch (cf){
9068                 if (cf.type == 'block' && cf.id == 225)
9069                     return cf.value;
9070                 else
9071                     throw cf;
9072             }
9073         })();
9074
9075     })), cdr: (function(){
9076         var symbol = l233;
9077         var value = symbol.value;
9078         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9079         return value;
9080     })()});
9081 })();
9082 var l255 = {name: "EQUAL"};
9083 (function(){
9084     return (l233).value = ({car: l44.function(l255, (function (v629,v630){
9085         if (arguments.length < 2) throw 'too few arguments';
9086         if (arguments.length > 2) throw 'too many arguments';
9087         return (function(){
9088             try {
9089                 return (function(){
9090                     return (function(v631,v632){
9091                         return l128.function(l122.function("(", v631, " == ", v632, ")"));
9092                     })((function(){
9093                         var symbol = l129;
9094                         var func = symbol.function;
9095                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9096                         return func;
9097                     })()(v629),(function(){
9098                         var symbol = l129;
9099                         var func = symbol.function;
9100                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9101                         return func;
9102                     })()(v630));
9103                 })();
9104             }
9105             catch (cf){
9106                 if (cf.type == 'block' && cf.id == 226)
9107                     return cf.value;
9108                 else
9109                     throw cf;
9110             }
9111         })();
9112
9113     })), cdr: (function(){
9114         var symbol = l233;
9115         var value = symbol.value;
9116         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9117         return value;
9118     })()});
9119 })();
9120 var l256 = {name: "CHAR-TO-STRING"};
9121 (function(){
9122     return (l233).value = ({car: l44.function(l256, (function (v633){
9123         if (arguments.length < 1) throw 'too few arguments';
9124         if (arguments.length > 1) throw 'too many arguments';
9125         return (function(){
9126             try {
9127                 return (function(){
9128                     return (function(v634){
9129                         return l122.function("(function(){", (function(){
9130                             var symbol = l121;
9131                             var value = symbol.value;
9132                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9133                             return value;
9134                         })(), l127.function(l122.function("var ", "x", " = ", v634, ";", (function(){
9135                             var symbol = l121;
9136                             var value = symbol.value;
9137                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9138                             return value;
9139                         })()), l122.function("if (typeof ", "x", " != '", "number", "')", (function(){
9140                             var symbol = l121;
9141                             var value = symbol.value;
9142                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9143                             return value;
9144                         })(), l127.function("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
9145                             var symbol = l121;
9146                             var value = symbol.value;
9147                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9148                             return value;
9149                         })())), l122.function("return ", (function(){
9150                             return "String.fromCharCode(x)";
9151                         })(), ";", (function(){
9152                             var symbol = l121;
9153                             var value = symbol.value;
9154                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9155                             return value;
9156                         })())), "})()");
9157                     })((function(){
9158                         var symbol = l129;
9159                         var func = symbol.function;
9160                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9161                         return func;
9162                     })()(v633));
9163                 })();
9164             }
9165             catch (cf){
9166                 if (cf.type == 'block' && cf.id == 227)
9167                     return cf.value;
9168                 else
9169                     throw cf;
9170             }
9171         })();
9172
9173     })), cdr: (function(){
9174         var symbol = l233;
9175         var value = symbol.value;
9176         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9177         return value;
9178     })()});
9179 })();
9180 var l257 = {name: "STRINGP"};
9181 (function(){
9182     return (l233).value = ({car: l44.function(l257, (function (v635){
9183         if (arguments.length < 1) throw 'too few arguments';
9184         if (arguments.length > 1) throw 'too many arguments';
9185         return (function(){
9186             try {
9187                 return (function(){
9188                     return (function(v636){
9189                         return l128.function(l122.function("(typeof(", v636, ") == \"string\")"));
9190                     })((function(){
9191                         var symbol = l129;
9192                         var func = symbol.function;
9193                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9194                         return func;
9195                     })()(v635));
9196                 })();
9197             }
9198             catch (cf){
9199                 if (cf.type == 'block' && cf.id == 228)
9200                     return cf.value;
9201                 else
9202                     throw cf;
9203             }
9204         })();
9205
9206     })), cdr: (function(){
9207         var symbol = l233;
9208         var value = symbol.value;
9209         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9210         return value;
9211     })()});
9212 })();
9213 var l258 = {name: "STRING-UPCASE"};
9214 (function(){
9215     return (l233).value = ({car: l44.function(l258, (function (v637){
9216         if (arguments.length < 1) throw 'too few arguments';
9217         if (arguments.length > 1) throw 'too many arguments';
9218         return (function(){
9219             try {
9220                 return (function(){
9221                     return (function(v638){
9222                         return l122.function("(function(){", (function(){
9223                             var symbol = l121;
9224                             var value = symbol.value;
9225                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9226                             return value;
9227                         })(), l127.function(l122.function("var ", "x", " = ", v638, ";", (function(){
9228                             var symbol = l121;
9229                             var value = symbol.value;
9230                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9231                             return value;
9232                         })()), l122.function("if (typeof ", "x", " != '", "string", "')", (function(){
9233                             var symbol = l121;
9234                             var value = symbol.value;
9235                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9236                             return value;
9237                         })(), l127.function("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
9238                             var symbol = l121;
9239                             var value = symbol.value;
9240                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9241                             return value;
9242                         })())), l122.function("return ", (function(){
9243                             return "x.toUpperCase()";
9244                         })(), ";", (function(){
9245                             var symbol = l121;
9246                             var value = symbol.value;
9247                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9248                             return value;
9249                         })())), "})()");
9250                     })((function(){
9251                         var symbol = l129;
9252                         var func = symbol.function;
9253                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9254                         return func;
9255                     })()(v637));
9256                 })();
9257             }
9258             catch (cf){
9259                 if (cf.type == 'block' && cf.id == 229)
9260                     return cf.value;
9261                 else
9262                     throw cf;
9263             }
9264         })();
9265
9266     })), cdr: (function(){
9267         var symbol = l233;
9268         var value = symbol.value;
9269         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9270         return value;
9271     })()});
9272 })();
9273 var l259 = {name: "STRING-LENGTH"};
9274 (function(){
9275     return (l233).value = ({car: l44.function(l259, (function (v639){
9276         if (arguments.length < 1) throw 'too few arguments';
9277         if (arguments.length > 1) throw 'too many arguments';
9278         return (function(){
9279             try {
9280                 return (function(){
9281                     return (function(v640){
9282                         return l122.function("(function(){", (function(){
9283                             var symbol = l121;
9284                             var value = symbol.value;
9285                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9286                             return value;
9287                         })(), l127.function(l122.function("var ", "x", " = ", v640, ";", (function(){
9288                             var symbol = l121;
9289                             var value = symbol.value;
9290                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9291                             return value;
9292                         })()), l122.function("if (typeof ", "x", " != '", "string", "')", (function(){
9293                             var symbol = l121;
9294                             var value = symbol.value;
9295                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9296                             return value;
9297                         })(), l127.function("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
9298                             var symbol = l121;
9299                             var value = symbol.value;
9300                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9301                             return value;
9302                         })())), l122.function("return ", (function(){
9303                             return "x.length";
9304                         })(), ";", (function(){
9305                             var symbol = l121;
9306                             var value = symbol.value;
9307                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9308                             return value;
9309                         })())), "})()");
9310                     })((function(){
9311                         var symbol = l129;
9312                         var func = symbol.function;
9313                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9314                         return func;
9315                     })()(v639));
9316                 })();
9317             }
9318             catch (cf){
9319                 if (cf.type == 'block' && cf.id == 230)
9320                     return cf.value;
9321                 else
9322                     throw cf;
9323             }
9324         })();
9325
9326     })), cdr: (function(){
9327         var symbol = l233;
9328         var value = symbol.value;
9329         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9330         return value;
9331     })()});
9332 })();
9333 var l260 = {name: "SLICE"};
9334 (l233).value = ({car: l44.function(l260, (function (v641,v642,v643){
9335     if (arguments.length < 2) throw 'too few arguments';
9336     if (arguments.length > 3) throw 'too many arguments';
9337     switch(arguments.length){
9338     case 2:
9339     v643=l3.value;
9340     default: break;
9341     }
9342     return (function(){
9343         try {
9344             return (function(){
9345                 return l122.function("(function(){", (function(){
9346                     var symbol = l121;
9347                     var value = symbol.value;
9348                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9349                     return value;
9350                 })(), l127.function("var str = ", (function(){
9351                     var symbol = l129;
9352                     var func = symbol.function;
9353                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9354                     return func;
9355                 })()(v641), ";", (function(){
9356                     var symbol = l121;
9357                     var value = symbol.value;
9358                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9359                     return value;
9360                 })(), "var a = ", (function(){
9361                     var symbol = l129;
9362                     var func = symbol.function;
9363                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9364                     return func;
9365                 })()(v642), ";", (function(){
9366                     var symbol = l121;
9367                     var value = symbol.value;
9368                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9369                     return value;
9370                 })(), "var b;", (function(){
9371                     var symbol = l121;
9372                     var value = symbol.value;
9373                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9374                     return value;
9375                 })(), (v643 !== l3.value ? l122.function("b = ", (function(){
9376                     var symbol = l129;
9377                     var func = symbol.function;
9378                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9379                     return func;
9380                 })()(v643), ";", (function(){
9381                     var symbol = l121;
9382                     var value = symbol.value;
9383                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9384                     return value;
9385                 })()) : ""), "return str.slice(a,b);", (function(){
9386                     var symbol = l121;
9387                     var value = symbol.value;
9388                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9389                     return value;
9390                 })()), "})()");
9391             })();
9392         }
9393         catch (cf){
9394             if (cf.type == 'block' && cf.id == 231)
9395                 return cf.value;
9396             else
9397                 throw cf;
9398         }
9399     })();
9400
9401 })), cdr: (function(){
9402     var symbol = l233;
9403     var value = symbol.value;
9404     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9405     return value;
9406 })()});
9407 var l261 = {name: "CHAR"};
9408 (function(){
9409     return (l233).value = ({car: l44.function(l261, (function (v644,v645){
9410         if (arguments.length < 2) throw 'too few arguments';
9411         if (arguments.length > 2) throw 'too many arguments';
9412         return (function(){
9413             try {
9414                 return (function(){
9415                     return (function(v646,v647){
9416                         return l122.function("(function(){", (function(){
9417                             var symbol = l121;
9418                             var value = symbol.value;
9419                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9420                             return value;
9421                         })(), l127.function(l122.function("var ", "string", " = ", v646, ";", (function(){
9422                             var symbol = l121;
9423                             var value = symbol.value;
9424                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9425                             return value;
9426                         })()), l122.function("var ", "index", " = ", v647, ";", (function(){
9427                             var symbol = l121;
9428                             var value = symbol.value;
9429                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9430                             return value;
9431                         })()), l122.function("if (typeof ", "string", " != '", "string", "')", (function(){
9432                             var symbol = l121;
9433                             var value = symbol.value;
9434                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9435                             return value;
9436                         })(), l127.function("throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
9437                             var symbol = l121;
9438                             var value = symbol.value;
9439                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9440                             return value;
9441                         })())), l122.function("if (typeof ", "index", " != '", "number", "')", (function(){
9442                             var symbol = l121;
9443                             var value = symbol.value;
9444                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9445                             return value;
9446                         })(), l127.function("throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
9447                             var symbol = l121;
9448                             var value = symbol.value;
9449                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9450                             return value;
9451                         })())), l122.function("return ", (function(){
9452                             return "string.charCodeAt(index)";
9453                         })(), ";", (function(){
9454                             var symbol = l121;
9455                             var value = symbol.value;
9456                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9457                             return value;
9458                         })())), "})()");
9459                     })((function(){
9460                         var symbol = l129;
9461                         var func = symbol.function;
9462                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9463                         return func;
9464                     })()(v644),(function(){
9465                         var symbol = l129;
9466                         var func = symbol.function;
9467                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9468                         return func;
9469                     })()(v645));
9470                 })();
9471             }
9472             catch (cf){
9473                 if (cf.type == 'block' && cf.id == 232)
9474                     return cf.value;
9475                 else
9476                     throw cf;
9477             }
9478         })();
9479
9480     })), cdr: (function(){
9481         var symbol = l233;
9482         var value = symbol.value;
9483         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9484         return value;
9485     })()});
9486 })();
9487 (function(){
9488     return (l233).value = ({car: l44.function(l67, (function (v648,v649){
9489         if (arguments.length < 2) throw 'too few arguments';
9490         if (arguments.length > 2) throw 'too many arguments';
9491         return (function(){
9492             try {
9493                 return (function(){
9494                     return (function(v650,v651){
9495                         return l122.function("(function(){", (function(){
9496                             var symbol = l121;
9497                             var value = symbol.value;
9498                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9499                             return value;
9500                         })(), l127.function(l122.function("var ", "string1", " = ", v650, ";", (function(){
9501                             var symbol = l121;
9502                             var value = symbol.value;
9503                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9504                             return value;
9505                         })()), l122.function("var ", "string2", " = ", v651, ";", (function(){
9506                             var symbol = l121;
9507                             var value = symbol.value;
9508                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9509                             return value;
9510                         })()), l122.function("if (typeof ", "string1", " != '", "string", "')", (function(){
9511                             var symbol = l121;
9512                             var value = symbol.value;
9513                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9514                             return value;
9515                         })(), l127.function("throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
9516                             var symbol = l121;
9517                             var value = symbol.value;
9518                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9519                             return value;
9520                         })())), l122.function("if (typeof ", "string2", " != '", "string", "')", (function(){
9521                             var symbol = l121;
9522                             var value = symbol.value;
9523                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9524                             return value;
9525                         })(), l127.function("throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
9526                             var symbol = l121;
9527                             var value = symbol.value;
9528                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9529                             return value;
9530                         })())), l122.function("return ", (function(){
9531                             return "string1.concat(string2)";
9532                         })(), ";", (function(){
9533                             var symbol = l121;
9534                             var value = symbol.value;
9535                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9536                             return value;
9537                         })())), "})()");
9538                     })((function(){
9539                         var symbol = l129;
9540                         var func = symbol.function;
9541                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9542                         return func;
9543                     })()(v648),(function(){
9544                         var symbol = l129;
9545                         var func = symbol.function;
9546                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9547                         return func;
9548                     })()(v649));
9549                 })();
9550             }
9551             catch (cf){
9552                 if (cf.type == 'block' && cf.id == 233)
9553                     return cf.value;
9554                 else
9555                     throw cf;
9556             }
9557         })();
9558
9559     })), cdr: (function(){
9560         var symbol = l233;
9561         var value = symbol.value;
9562         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9563         return value;
9564     })()});
9565 })();
9566 var l262 = {name: "FUNCALL"};
9567 (l233).value = ({car: l44.function(l262, (function (v653){
9568     if (arguments.length < 1) throw 'too few arguments';
9569     var v652= l3.value;
9570     for (var i = arguments.length-1; i>=1; i--)
9571         v652 = {car: arguments[i], cdr:
9572     v652};
9573     return (function(){
9574         try {
9575             return (function(){
9576                 return l122.function("(", (function(){
9577                     var symbol = l129;
9578                     var func = symbol.function;
9579                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9580                     return func;
9581                 })()(v653), ")(", l124.function(l68.function((function(){
9582                     var symbol = l129;
9583                     var func = symbol.function;
9584                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9585                     return func;
9586                 })(), v652), ", "), ")");
9587             })();
9588         }
9589         catch (cf){
9590             if (cf.type == 'block' && cf.id == 234)
9591                 return cf.value;
9592             else
9593                 throw cf;
9594         }
9595     })();
9596
9597 })), cdr: (function(){
9598     var symbol = l233;
9599     var value = symbol.value;
9600     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9601     return value;
9602 })()});
9603 var l263 = {name: "APPLY"};
9604 (l233).value = ({car: l44.function(l263, (function (v655){
9605     if (arguments.length < 1) throw 'too few arguments';
9606     var v654= l3.value;
9607     for (var i = arguments.length-1; i>=1; i--)
9608         v654 = {car: arguments[i], cdr:
9609     v654};
9610     return (function(){
9611         try {
9612             return (function(){
9613                 return (l11.function(v654) !== l3.value ? l122.function("(", (function(){
9614                     var symbol = l129;
9615                     var func = symbol.function;
9616                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9617                     return func;
9618                 })()(v655), ")()") : (function(v656,v657){
9619                     return l122.function("(function(){", (function(){
9620                         var symbol = l121;
9621                         var value = symbol.value;
9622                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9623                         return value;
9624                     })(), l127.function("var f = ", (function(){
9625                         var symbol = l129;
9626                         var func = symbol.function;
9627                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9628                         return func;
9629                     })()(v655), ";", (function(){
9630                         var symbol = l121;
9631                         var value = symbol.value;
9632                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9633                         return value;
9634                     })(), "var args = [", l124.function(l68.function((function(){
9635                         var symbol = l129;
9636                         var func = symbol.function;
9637                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9638                         return func;
9639                     })(), v656), ", "), "];", (function(){
9640                         var symbol = l121;
9641                         var value = symbol.value;
9642                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9643                         return value;
9644                     })(), "var tail = (", (function(){
9645                         var symbol = l129;
9646                         var func = symbol.function;
9647                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9648                         return func;
9649                     })()(v657), ");", (function(){
9650                         var symbol = l121;
9651                         var value = symbol.value;
9652                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9653                         return value;
9654                     })(), "while (tail != ", (function(){
9655                         var symbol = l129;
9656                         var func = symbol.function;
9657                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9658                         return func;
9659                     })()(l3.value), "){", (function(){
9660                         var symbol = l121;
9661                         var value = symbol.value;
9662                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9663                         return value;
9664                     })(), "    args.push(tail.car);", (function(){
9665                         var symbol = l121;
9666                         var value = symbol.value;
9667                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9668                         return value;
9669                     })(), "    tail = tail.cdr;", (function(){
9670                         var symbol = l121;
9671                         var value = symbol.value;
9672                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9673                         return value;
9674                     })(), "}", (function(){
9675                         var symbol = l121;
9676                         var value = symbol.value;
9677                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9678                         return value;
9679                     })(), "return f.apply(this, args);", (function(){
9680                         var symbol = l121;
9681                         var value = symbol.value;
9682                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9683                         return value;
9684                     })()), "})()");
9685                 })(l80.function(v654),(function(){
9686                     var tmp = l79.function(v654);
9687                     return tmp === l3.value? l3.value: tmp.car;
9688                 })()));
9689             })();
9690         }
9691         catch (cf){
9692             if (cf.type == 'block' && cf.id == 235)
9693                 return cf.value;
9694             else
9695                 throw cf;
9696         }
9697     })();
9698
9699 })), cdr: (function(){
9700     var symbol = l233;
9701     var value = symbol.value;
9702     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9703     return value;
9704 })()});
9705 var l264 = {name: "JS-EVAL"};
9706 (function(){
9707     return (l233).value = ({car: l44.function(l264, (function (v658){
9708         if (arguments.length < 1) throw 'too few arguments';
9709         if (arguments.length > 1) throw 'too many arguments';
9710         return (function(){
9711             try {
9712                 return (function(){
9713                     return (function(v659){
9714                         return l122.function("(function(){", (function(){
9715                             var symbol = l121;
9716                             var value = symbol.value;
9717                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9718                             return value;
9719                         })(), l127.function(l122.function("var ", "string", " = ", v659, ";", (function(){
9720                             var symbol = l121;
9721                             var value = symbol.value;
9722                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9723                             return value;
9724                         })()), l122.function("if (typeof ", "string", " != '", "string", "')", (function(){
9725                             var symbol = l121;
9726                             var value = symbol.value;
9727                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9728                             return value;
9729                         })(), l127.function("throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
9730                             var symbol = l121;
9731                             var value = symbol.value;
9732                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9733                             return value;
9734                         })())), l122.function("return ", (function(){
9735                             return "eval.apply(window, [string])";
9736                         })(), ";", (function(){
9737                             var symbol = l121;
9738                             var value = symbol.value;
9739                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9740                             return value;
9741                         })())), "})()");
9742                     })((function(){
9743                         var symbol = l129;
9744                         var func = symbol.function;
9745                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9746                         return func;
9747                     })()(v658));
9748                 })();
9749             }
9750             catch (cf){
9751                 if (cf.type == 'block' && cf.id == 236)
9752                     return cf.value;
9753                 else
9754                     throw cf;
9755             }
9756         })();
9757
9758     })), cdr: (function(){
9759         var symbol = l233;
9760         var value = symbol.value;
9761         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9762         return value;
9763     })()});
9764 })();
9765 var l265 = {name: "ERROR"};
9766 (function(){
9767     return (l233).value = ({car: l44.function(l265, (function (v660){
9768         if (arguments.length < 1) throw 'too few arguments';
9769         if (arguments.length > 1) throw 'too many arguments';
9770         return (function(){
9771             try {
9772                 return (function(){
9773                     return (function(v661){
9774                         return l122.function("(function(){", (function(){
9775                             var symbol = l121;
9776                             var value = symbol.value;
9777                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9778                             return value;
9779                         })(), l127.function("throw ", v661, ";", (function(){
9780                             var symbol = l121;
9781                             var value = symbol.value;
9782                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9783                             return value;
9784                         })()), "})()");
9785                     })((function(){
9786                         var symbol = l129;
9787                         var func = symbol.function;
9788                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9789                         return func;
9790                     })()(v660));
9791                 })();
9792             }
9793             catch (cf){
9794                 if (cf.type == 'block' && cf.id == 237)
9795                     return cf.value;
9796                 else
9797                     throw cf;
9798             }
9799         })();
9800
9801     })), cdr: (function(){
9802         var symbol = l233;
9803         var value = symbol.value;
9804         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9805         return value;
9806     })()});
9807 })();
9808 var l266 = {name: "NEW"};
9809 (function(){
9810     return (l233).value = ({car: l44.function(l266, (function (){
9811         if (arguments.length > 0) throw 'too many arguments';
9812         return (function(){
9813             try {
9814                 return (function(){
9815                     return (function(){
9816                         return "{}";
9817                     })();
9818                 })();
9819             }
9820             catch (cf){
9821                 if (cf.type == 'block' && cf.id == 238)
9822                     return cf.value;
9823                 else
9824                     throw cf;
9825             }
9826         })();
9827
9828     })), cdr: (function(){
9829         var symbol = l233;
9830         var value = symbol.value;
9831         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9832         return value;
9833     })()});
9834 })();
9835 var l267 = {name: "OBJECTP"};
9836 (function(){
9837     return (l233).value = ({car: l44.function(l267, (function (v662){
9838         if (arguments.length < 1) throw 'too few arguments';
9839         if (arguments.length > 1) throw 'too many arguments';
9840         return (function(){
9841             try {
9842                 return (function(){
9843                     return (function(v663){
9844                         return l128.function(l122.function("(typeof (", v663, ") === 'object')"));
9845                     })((function(){
9846                         var symbol = l129;
9847                         var func = symbol.function;
9848                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9849                         return func;
9850                     })()(v662));
9851                 })();
9852             }
9853             catch (cf){
9854                 if (cf.type == 'block' && cf.id == 239)
9855                     return cf.value;
9856                 else
9857                     throw cf;
9858             }
9859         })();
9860
9861     })), cdr: (function(){
9862         var symbol = l233;
9863         var value = symbol.value;
9864         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9865         return value;
9866     })()});
9867 })();
9868 var l268 = {name: "OGET"};
9869 (function(){
9870     return (l233).value = ({car: l44.function(l268, (function (v664,v665){
9871         if (arguments.length < 2) throw 'too few arguments';
9872         if (arguments.length > 2) throw 'too many arguments';
9873         return (function(){
9874             try {
9875                 return (function(){
9876                     return (function(v666,v667){
9877                         return l122.function("(function(){", (function(){
9878                             var symbol = l121;
9879                             var value = symbol.value;
9880                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9881                             return value;
9882                         })(), l127.function("var tmp = ", "(", v666, ")[", v667, "];", (function(){
9883                             var symbol = l121;
9884                             var value = symbol.value;
9885                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9886                             return value;
9887                         })(), "return tmp == undefined? ", (function(){
9888                             var symbol = l129;
9889                             var func = symbol.function;
9890                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9891                             return func;
9892                         })()(l3.value), ": tmp ;", (function(){
9893                             var symbol = l121;
9894                             var value = symbol.value;
9895                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9896                             return value;
9897                         })()), "})()");
9898                     })((function(){
9899                         var symbol = l129;
9900                         var func = symbol.function;
9901                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9902                         return func;
9903                     })()(v664),(function(){
9904                         var symbol = l129;
9905                         var func = symbol.function;
9906                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9907                         return func;
9908                     })()(v665));
9909                 })();
9910             }
9911             catch (cf){
9912                 if (cf.type == 'block' && cf.id == 240)
9913                     return cf.value;
9914                 else
9915                     throw cf;
9916             }
9917         })();
9918
9919     })), cdr: (function(){
9920         var symbol = l233;
9921         var value = symbol.value;
9922         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9923         return value;
9924     })()});
9925 })();
9926 var l269 = {name: "OSET"};
9927 (function(){
9928     return (l233).value = ({car: l44.function(l269, (function (v668,v669,v670){
9929         if (arguments.length < 3) throw 'too few arguments';
9930         if (arguments.length > 3) throw 'too many arguments';
9931         return (function(){
9932             try {
9933                 return (function(){
9934                     return (function(v671,v672,v673){
9935                         return l122.function("((", v671, ")[", v672, "] = ", v673, ")");
9936                     })((function(){
9937                         var symbol = l129;
9938                         var func = symbol.function;
9939                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9940                         return func;
9941                     })()(v668),(function(){
9942                         var symbol = l129;
9943                         var func = symbol.function;
9944                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9945                         return func;
9946                     })()(v669),(function(){
9947                         var symbol = l129;
9948                         var func = symbol.function;
9949                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9950                         return func;
9951                     })()(v670));
9952                 })();
9953             }
9954             catch (cf){
9955                 if (cf.type == 'block' && cf.id == 241)
9956                     return cf.value;
9957                 else
9958                     throw cf;
9959             }
9960         })();
9961
9962     })), cdr: (function(){
9963         var symbol = l233;
9964         var value = symbol.value;
9965         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9966         return value;
9967     })()});
9968 })();
9969 var l270 = {name: "IN"};
9970 (function(){
9971     return (l233).value = ({car: l44.function(l270, (function (v674,v675){
9972         if (arguments.length < 2) throw 'too few arguments';
9973         if (arguments.length > 2) throw 'too many arguments';
9974         return (function(){
9975             try {
9976                 return (function(){
9977                     return (function(v676,v677){
9978                         return l128.function(l122.function("((", v676, ") in (", v677, "))"));
9979                     })((function(){
9980                         var symbol = l129;
9981                         var func = symbol.function;
9982                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9983                         return func;
9984                     })()(v674),(function(){
9985                         var symbol = l129;
9986                         var func = symbol.function;
9987                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9988                         return func;
9989                     })()(v675));
9990                 })();
9991             }
9992             catch (cf){
9993                 if (cf.type == 'block' && cf.id == 242)
9994                     return cf.value;
9995                 else
9996                     throw cf;
9997             }
9998         })();
9999
10000     })), cdr: (function(){
10001         var symbol = l233;
10002         var value = symbol.value;
10003         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10004         return value;
10005     })()});
10006 })();
10007 var l271 = {name: "FUNCTIONP"};
10008 (function(){
10009     return (l233).value = ({car: l44.function(l271, (function (v678){
10010         if (arguments.length < 1) throw 'too few arguments';
10011         if (arguments.length > 1) throw 'too many arguments';
10012         return (function(){
10013             try {
10014                 return (function(){
10015                     return (function(v679){
10016                         return l128.function(l122.function("(typeof ", v679, " == 'function')"));
10017                     })((function(){
10018                         var symbol = l129;
10019                         var func = symbol.function;
10020                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10021                         return func;
10022                     })()(v678));
10023                 })();
10024             }
10025             catch (cf){
10026                 if (cf.type == 'block' && cf.id == 243)
10027                     return cf.value;
10028                 else
10029                     throw cf;
10030             }
10031         })();
10032
10033     })), cdr: (function(){
10034         var symbol = l233;
10035         var value = symbol.value;
10036         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10037         return value;
10038     })()});
10039 })();
10040 var l272 = {name: "WRITE-STRING"};
10041 (function(){
10042     return (l233).value = ({car: l44.function(l272, (function (v680){
10043         if (arguments.length < 1) throw 'too few arguments';
10044         if (arguments.length > 1) throw 'too many arguments';
10045         return (function(){
10046             try {
10047                 return (function(){
10048                     return (function(v681){
10049                         return l122.function("(function(){", (function(){
10050                             var symbol = l121;
10051                             var value = symbol.value;
10052                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10053                             return value;
10054                         })(), l127.function(l122.function("var ", "x", " = ", v681, ";", (function(){
10055                             var symbol = l121;
10056                             var value = symbol.value;
10057                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10058                             return value;
10059                         })()), l122.function("if (typeof ", "x", " != '", "string", "')", (function(){
10060                             var symbol = l121;
10061                             var value = symbol.value;
10062                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10063                             return value;
10064                         })(), l127.function("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
10065                             var symbol = l121;
10066                             var value = symbol.value;
10067                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10068                             return value;
10069                         })())), l122.function("return ", (function(){
10070                             return "lisp.write(x)";
10071                         })(), ";", (function(){
10072                             var symbol = l121;
10073                             var value = symbol.value;
10074                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10075                             return value;
10076                         })())), "})()");
10077                     })((function(){
10078                         var symbol = l129;
10079                         var func = symbol.function;
10080                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10081                         return func;
10082                     })()(v680));
10083                 })();
10084             }
10085             catch (cf){
10086                 if (cf.type == 'block' && cf.id == 244)
10087                     return cf.value;
10088                 else
10089                     throw cf;
10090             }
10091         })();
10092
10093     })), cdr: (function(){
10094         var symbol = l233;
10095         var value = symbol.value;
10096         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10097         return value;
10098     })()});
10099 })();
10100 (function(){
10101     (l181).function = (function(v684){
10102         ((v684)["fname"] = "MACRO");
10103         return v684;
10104     })((function (v682){
10105         if (arguments.length < 1) throw 'too few arguments';
10106         if (arguments.length > 1) throw 'too many arguments';
10107         return (function(){
10108             try {
10109                 return (function(){
10110                     return (((function(){
10111                         var tmp = v682;
10112                         return (typeof tmp == 'object' && 'name' in tmp);
10113                     })()?l4.value: l3.value) !== l3.value ? (function(v683){
10114                         return (((l157.function(v683) === l181)?l4.value: l3.value) !== l3.value ? v683 : l3.value);
10115                     })(l169.function(v682, (function(){
10116                         var symbol = l170;
10117                         var value = symbol.value;
10118                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10119                         return value;
10120                     })(), l97)) : l3.value);
10121                 })();
10122             }
10123             catch (cf){
10124                 if (cf.type == 'block' && cf.id == 245)
10125                     return cf.value;
10126                 else
10127                     throw cf;
10128             }
10129         })();
10130
10131     }));
10132     return l181;
10133 })();
10134 var l273 = {name: "LS-MACROEXPAND-1"};
10135 (function(){
10136     (l273).function = (function(v689){
10137         ((v689)["fname"] = "LS-MACROEXPAND-1");
10138         return v689;
10139     })((function (v685){
10140         if (arguments.length < 1) throw 'too few arguments';
10141         if (arguments.length > 1) throw 'too many arguments';
10142         return (function(){
10143             try {
10144                 return (function(){
10145                     return (function(v686){
10146                         return (v686 !== l3.value ? (function(v687){
10147                             (l59.function(v687) !== l3.value ? (function(){
10148                                 return (function(v688){
10149                                     l160.function(v686, v688);
10150                                     return v687 = v688;
10151                                 })((function(){
10152                                     var symbol = l215;
10153                                     var func = symbol.function;
10154                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10155                                     return func;
10156                                 })()(v687));
10157                             })() : l3.value);
10158                             return (function(){
10159                                 var f = v687;
10160                                 var args = [];
10161                                 var tail = ((function(){
10162                                     var tmp = v685;
10163                                     return tmp === l3.value? l3.value: tmp.cdr;
10164                                 })());
10165                                 while (tail != l3.value){
10166                                     args.push(tail.car);
10167                                     tail = tail.cdr;
10168                                 }
10169                                 return f.apply(this, args);
10170                             })();
10171                         })(l158.function(v686)) : v685);
10172                     })(l181.function((function(){
10173                         var tmp = v685;
10174                         return tmp === l3.value? l3.value: tmp.car;
10175                     })()));
10176                 })();
10177             }
10178             catch (cf){
10179                 if (cf.type == 'block' && cf.id == 246)
10180                     return cf.value;
10181                 else
10182                     throw cf;
10183             }
10184         })();
10185
10186     }));
10187     return l273;
10188 })();
10189 var l274 = {name: "COMPILE-FUNCALL"};
10190 (function(){
10191     (l274).function = (function(v692){
10192         ((v692)["fname"] = "COMPILE-FUNCALL");
10193         return v692;
10194     })((function (v690,v691){
10195         if (arguments.length < 2) throw 'too few arguments';
10196         if (arguments.length > 2) throw 'too many arguments';
10197         return (function(){
10198             try {
10199                 return (function(){
10200                     return ((((function(){
10201                         var tmp = v690;
10202                         return (typeof tmp == 'object' && 'name' in tmp);
10203                     })()?l4.value: l3.value) !== l3.value ? l183.function(v690, l97, l187) : l3.value) !== l3.value ? l122.function((function(){
10204                         var symbol = l129;
10205                         var func = symbol.function;
10206                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10207                         return func;
10208                     })()(l62.function(l44.function(l149), l44.function(v690))), ".function(", l124.function(l68.function((function(){
10209                         var symbol = l129;
10210                         var func = symbol.function;
10211                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10212                         return func;
10213                     })(), v691), ", "), ")") : l122.function((function(){
10214                         var symbol = l129;
10215                         var func = symbol.function;
10216                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10217                         return func;
10218                     })()(l62.function(l44.function(l97), l44.function(v690))), "(", l124.function(l68.function((function(){
10219                         var symbol = l129;
10220                         var func = symbol.function;
10221                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10222                         return func;
10223                     })(), v691), ", "), ")"));
10224                 })();
10225             }
10226             catch (cf){
10227                 if (cf.type == 'block' && cf.id == 247)
10228                     return cf.value;
10229                 else
10230                     throw cf;
10231             }
10232         })();
10233
10234     }));
10235     return l274;
10236 })();
10237 (function(){
10238     (l203).function = (function(v695){
10239         ((v695)["fname"] = "LS-COMPILE-BLOCK");
10240         return v695;
10241     })((function (v693,v694){
10242         if (arguments.length < 1) throw 'too few arguments';
10243         if (arguments.length > 2) throw 'too many arguments';
10244         switch(arguments.length){
10245         case 1:
10246         v694=l3.value;
10247         default: break;
10248         }
10249         return (function(){
10250             try {
10251                 return (function(){
10252                     return (v694 !== l3.value ? l122.function(l203.function(l80.function(v693)), "return ", (function(){
10253                         var symbol = l129;
10254                         var func = symbol.function;
10255                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10256                         return func;
10257                     })()((function(){
10258                         var tmp = l79.function(v693);
10259                         return tmp === l3.value? l3.value: tmp.car;
10260                     })()), ";") : l125.function(l83.function((function(){
10261                         var symbol = l178;
10262                         var func = symbol.function;
10263                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10264                         return func;
10265                     })(), l68.function((function(){
10266                         var symbol = l129;
10267                         var func = symbol.function;
10268                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10269                         return func;
10270                     })(), v693)), l122.function(";", (function(){
10271                         var symbol = l121;
10272                         var value = symbol.value;
10273                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10274                         return value;
10275                     })())));
10276                 })();
10277             }
10278             catch (cf){
10279                 if (cf.type == 'block' && cf.id == 248)
10280                     return cf.value;
10281                 else
10282                     throw cf;
10283             }
10284         })();
10285
10286     }));
10287     return l203;
10288 })();
10289 (function(){
10290     (l129).function = (function(v703){
10291         ((v703)["fname"] = "LS-COMPILE");
10292         return v703;
10293     })((function (v696){
10294         if (arguments.length < 1) throw 'too few arguments';
10295         if (arguments.length > 1) throw 'too many arguments';
10296         return (function(){
10297             try {
10298                 return (function(){
10299                     return (((function(){
10300                         var tmp = v696;
10301                         return (typeof tmp == 'object' && 'name' in tmp);
10302                     })()?l4.value: l3.value) !== l3.value ? (function(){
10303                         return (function(v697){
10304                             return (((l157.function(v697) === l175)?l4.value: l3.value) !== l3.value ? (function(){
10305                                 return l158.function(v697);
10306                             })() : ((function(v698){
10307                                 return (v698 !== l3.value ? v698 : l183.function(v696, l98, l186));
10308                             })(l112.function(v696)) !== l3.value ? (function(){
10309                                 return l122.function(l129.function(l62.function(l44.function(l149), l44.function(v696))), ".value");
10310                             })() : (function(){
10311                                 return l129.function(l62.function(l44.function(l251), l44.function(l62.function(l44.function(l149), l44.function(v696)))));
10312                             })()));
10313                         })(l169.function(v696, (function(){
10314                             var symbol = l170;
10315                             var value = symbol.value;
10316                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10317                             return value;
10318                         })(), l98));
10319                     })() : (l74.function(v696) !== l3.value ? (function(){
10320                         return l16.function(v696);
10321                     })() : (((typeof(v696) == "string")?l4.value: l3.value) !== l3.value ? (function(){
10322                         return l122.function("\"", l132.function(v696), "\"");
10323                     })() : (l59.function(v696) !== l3.value ? (function(){
10324                         return (function(v699,v700){
10325                             return (l90.function(v699, (function(){
10326                                 var symbol = l189;
10327                                 var value = symbol.value;
10328                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10329                                 return value;
10330                             })()) !== l3.value ? (function(){
10331                                 return (function(v701){
10332                                     return (function(){
10333                                         var f = v701;
10334                                         var args = [];
10335                                         var tail = (v700);
10336                                         while (tail != l3.value){
10337                                             args.push(tail.car);
10338                                             tail = tail.cdr;
10339                                         }
10340                                         return f.apply(this, args);
10341                                     })();
10342                                 })(l41.function(l90.function(v699, (function(){
10343                                     var symbol = l189;
10344                                     var value = symbol.value;
10345                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10346                                     return value;
10347                                 })())));
10348                             })() : ((l90.function(v699, (function(){
10349                                 var symbol = l233;
10350                                 var value = symbol.value;
10351                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10352                                 return value;
10353                             })()) !== l3.value ? l28.function(l183.function(v699, l97, l185)) : l3.value) !== l3.value ? (function(){
10354                                 return (function(v702){
10355                                     return (function(){
10356                                         var f = v702;
10357                                         var args = [];
10358                                         var tail = (v700);
10359                                         while (tail != l3.value){
10360                                             args.push(tail.car);
10361                                             tail = tail.cdr;
10362                                         }
10363                                         return f.apply(this, args);
10364                                     })();
10365                                 })(l41.function(l90.function(v699, (function(){
10366                                     var symbol = l233;
10367                                     var value = symbol.value;
10368                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10369                                     return value;
10370                                 })())));
10371                             })() : (function(){
10372                                 return (l181.function(v699) !== l3.value ? l129.function(l273.function(v696)) : l274.function(v699, v700));
10373                             })()));
10374                         })((function(){
10375                             var tmp = v696;
10376                             return tmp === l3.value? l3.value: tmp.car;
10377                         })(),(function(){
10378                             var tmp = v696;
10379                             return tmp === l3.value? l3.value: tmp.cdr;
10380                         })());
10381                     })() : l3.value))));
10382                 })();
10383             }
10384             catch (cf){
10385                 if (cf.type == 'block' && cf.id == 249)
10386                     return cf.value;
10387                 else
10388                     throw cf;
10389             }
10390         })();
10391
10392     }));
10393     return l129;
10394 })();
10395 var l275 = {name: "LS-COMPILE-TOPLEVEL"};
10396 (function(){
10397     (l275).function = (function(v708){
10398         ((v708)["fname"] = "LS-COMPILE-TOPLEVEL");
10399         return v708;
10400     })((function (v704){
10401         if (arguments.length < 1) throw 'too few arguments';
10402         if (arguments.length > 1) throw 'too many arguments';
10403         return (function(){
10404             try {
10405                 return (function(){
10406                     return (function(v705){
10407                         try {
10408                             var tmp;
10409                             tmp = l176.value;
10410                             l176.value = v705;
10411                             v705 = tmp;
10412                             return ((((function(){
10413                                 var tmp = v704;
10414                                 return (typeof tmp == 'object' && 'car' in tmp);
10415                             })()?l4.value: l3.value) !== l3.value ? (((function(){
10416                                 var tmp = v704;
10417                                 return tmp === l3.value? l3.value: tmp.car;
10418                             })() === l216)?l4.value: l3.value) : l3.value) !== l3.value ? (function(){
10419                                 return (function(v706){
10420                                     return l124.function(l83.function((function(){
10421                                         var symbol = l178;
10422                                         var func = symbol.function;
10423                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10424                                         return func;
10425                                     })(), v706));
10426                                 })(l68.function((function(){
10427                                     var symbol = l275;
10428                                     var func = symbol.function;
10429                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10430                                     return func;
10431                                 })(), (function(){
10432                                     var tmp = v704;
10433                                     return tmp === l3.value? l3.value: tmp.cdr;
10434                                 })()));
10435                             })() : (function(){
10436                                 return (function(v707){
10437                                     return l122.function(l125.function(l179.function(), l122.function(";", (function(){
10438                                         var symbol = l121;
10439                                         var value = symbol.value;
10440                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10441                                         return value;
10442                                     })())), (v707 !== l3.value ? l122.function(v707, ";", (function(){
10443                                         var symbol = l121;
10444                                         var value = symbol.value;
10445                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10446                                         return value;
10447                                     })()) : ""));
10448                                 })(l129.function(v704));
10449                             })());
10450                         }
10451                         finally {
10452                             l176.value = v705;
10453                         }
10454                     })(l3.value);
10455                 })();
10456             }
10457             catch (cf){
10458                 if (cf.type == 'block' && cf.id == 250)
10459                     return cf.value;
10460                 else
10461                     throw cf;
10462             }
10463         })();
10464
10465     }));
10466     return l275;
10467 })();
10468 var l276 = {name: "WITH-COMPILATION-UNIT"};
10469 l276;
10470 (function(){
10471     (l215).function = (function(v714){
10472         ((v714)["fname"] = "EVAL");
10473         return v714;
10474     })((function (v709){
10475         if (arguments.length < 1) throw 'too few arguments';
10476         if (arguments.length > 1) throw 'too many arguments';
10477         return (function(){
10478             try {
10479                 return (function(){
10480                     return (function(v713){
10481                         return (function(){
10482                             var string = v713;
10483                             if (typeof string != 'string')
10484                                 throw 'The value ' + string + ' is not a type string.';
10485                             return eval.apply(window, [string]);
10486                         })();
10487                     })((function(v710){
10488                         (function(){
10489                             try {
10490                                 return (function(){
10491                                     return (function(v711,v712){
10492                                         (function(){
10493                                             while(v711 !== l3.value){
10494                                                 v712 = (function(){
10495                                                     var tmp = v711;
10496                                                     return tmp === l3.value? l3.value: tmp.car;
10497                                                 })();
10498                                                 (function(){
10499                                                     (v712)();
10500                                                     return l3.value;
10501                                                 })();
10502                                                 v711 = (function(){
10503                                                     var tmp = v711;
10504                                                     return tmp === l3.value? l3.value: tmp.cdr;
10505                                                 })();
10506                                             }return l3.value;
10507                                         })();
10508                                         return l3.value;
10509                                     })((function(){
10510                                         var symbol = l154;
10511                                         var value = symbol.value;
10512                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10513                                         return value;
10514                                     })(),l3.value);
10515                                 })();
10516                             }
10517                             catch (cf){
10518                                 if (cf.type == 'block' && cf.id == 252)
10519                                     return cf.value;
10520                                 else
10521                                     throw cf;
10522                             }
10523                         })();
10524                         return v710;
10525                     })((function(){
10526                         (l154).value = l3.value;
10527                         return l275.function(v709);
10528                     })()));
10529                 })();
10530             }
10531             catch (cf){
10532                 if (cf.type == 'block' && cf.id == 251)
10533                     return cf.value;
10534                 else
10535                     throw cf;
10536             }
10537         })();
10538
10539     }));
10540     return l215;
10541 })();
10542 var l277 = {name: "PRON"};
10543 var l278 = {car: l21, cdr: {car: l14, cdr: {car: l114, cdr: {car: l19, cdr: {car: l20, cdr: {car: l22, cdr: {car: l23, cdr: {car: l24, cdr: {car: l239, cdr: {car: l241, cdr: {car: l18, cdr: {car: l18, cdr: {car: l240, cdr: {car: l242, cdr: {car: l54, cdr: {car: l62, cdr: {car: l263, cdr: {car: l90, cdr: {car: l45, cdr: {car: l166, cdr: {car: l17, cdr: {car: l17, cdr: {car: l80, cdr: {car: l33, cdr: {car: l39, cdr: {car: l37, cdr: {car: l34, cdr: {car: l31, cdr: {car: l31, cdr: {car: l52, cdr: {car: l222, cdr: {car: l35, cdr: {car: l38, cdr: {car: l36, cdr: {car: l32, cdr: {car: l32, cdr: {car: l261, cdr: {car: l72, cdr: {car: l73, cdr: {car: l71, cdr: {car: l51, cdr: {car: l29, cdr: {car: l30, cdr: {car: l70, cdr: {car: l47, cdr: {car: l2, cdr: {car: l8, cdr: {car: l10, cdr: {car: l7, cdr: {car: l85, cdr: {car: l94, cdr: {car: l96, cdr: {car: l49, cdr: {car: l50, cdr: {car: l53, cdr: {car: l254, cdr: {car: l27, cdr: {car: l255, cdr: {car: l265, cdr: {car: l215, cdr: {car: l89, cdr: {car: l120, cdr: {car: l93, cdr: {car: l104, cdr: {car: l118, cdr: {car: l40, cdr: {car: l43, cdr: {car: l250, cdr: {car: l262, cdr: {car: l97, cdr: {car: l271, cdr: {car: l15, cdr: {car: l229, cdr: {car: l69, cdr: {car: l115, cdr: {car: l46, cdr: {car: l74, cdr: {car: l74, cdr: {car: l119, cdr: {car: l112, cdr: {car: l253, cdr: {car: l79, cdr: {car: l66, cdr: {car: l219, cdr: {car: l100, cdr: {car: l44, cdr: {car: l59, cdr: {car: l101, cdr: {car: l248, cdr: {car: l68, cdr: {car: l81, cdr: {car: l76, cdr: {car: l238, cdr: {car: l3, cdr: {car: l28, cdr: {car: l78, cdr: {car: l77, cdr: {car: l11, cdr: {car: l243, cdr: {car: l55, cdr: {car: l105, cdr: {car: l107, cdr: {car: l103, cdr: {car: l75, cdr: {car: l131, cdr: {car: l134, cdr: {car: l188, cdr: {car: l56, cdr: {car: l57, cdr: {car: l277, cdr: {car: l48, cdr: {car: l149, cdr: {car: l82, cdr: {car: l83, cdr: {car: l84, cdr: {car: l12, cdr: {car: l221, cdr: {car: l63, cdr: {car: l64, cdr: {car: l41, cdr: {car: l205, cdr: {car: l204, cdr: {car: l88, cdr: {car: l258, cdr: {car: l91, cdr: {car: l92, cdr: {car: l257, cdr: {car: l86, cdr: {car: l213, cdr: {car: l249, cdr: {car: l113, cdr: {car: l252, cdr: {car: l251, cdr: {car: l247, cdr: {car: l4, cdr: {car: l228, cdr: {car: l42, cdr: {car: l223, cdr: {car: l26, cdr: {car: l6, cdr: {car: l230, cdr: {car: l98, cdr: {car: l133, cdr: {car: l5, cdr: {car: l95, cdr: {car: l272, cdr: {car: l25, cdr: l3}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}};
10544 l120.function(l278);
10545 (l114).value = (function(){
10546     var symbol = l110;
10547     var value = symbol.value;
10548     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10549     return value;
10550 })();
10551 (function(){
10552     var string = "var lisp";
10553     if (typeof string != 'string')
10554         throw 'The value ' + string + ' is not a type string.';
10555     return eval.apply(window, [string]);
10556 })();
10557 (lisp = {});
10558 (lisp.read = (function(){
10559     var symbol = l153;
10560     var func = symbol.function;
10561     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10562     return func;
10563 })());
10564 (lisp.print = (function(){
10565     var symbol = l131;
10566     var func = symbol.function;
10567     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10568     return func;
10569 })());
10570 (lisp.eval = (function(){
10571     var symbol = l215;
10572     var func = symbol.function;
10573     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10574     return func;
10575 })());
10576 (lisp.compile = (function(){
10577     var symbol = l275;
10578     var func = symbol.function;
10579     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10580     return func;
10581 })());
10582 (lisp.evalString = (function (v715){
10583     if (arguments.length < 1) throw 'too few arguments';
10584     if (arguments.length > 1) throw 'too many arguments';
10585     return l215.function(l153.function(v715));
10586
10587 }));
10588 (lisp.compileString = (function (v716){
10589     if (arguments.length < 1) throw 'too few arguments';
10590     if (arguments.length > 1) throw 'too many arguments';
10591     return l275.function(l153.function(v716));
10592
10593 }));
10594 var l279 = {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: l202, cdr: "l202"}, 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: 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}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}};
10595 var l280 = {name: "BODY"};
10596 var l281 = {name: "CHECK"};
10597 var l282 = {name: "DECLS"};
10598 var l283 = {name: "DECL"};
10599 var l284 = {name: "NAME"};
10600 var l285 = {name: "ARGS"};
10601 var l286 = {name: "ARG"};
10602 var l287 = {name: "FORM"};
10603 var l288 = {name: "PACKAGE-DESIGNATOR"};
10604 var l289 = {name: "FORM1"};
10605 var l290 = {name: "RESULT"};
10606 var l291 = {name: "VALUE"};
10607 var l292 = {name: "FORMS"};
10608 var l293 = {name: "G"};
10609 var l294 = {name: "CLAUSULES"};
10610 var l295 = {name: "!FORM"};
10611 var l296 = {name: "CLAUSULE"};
10612 var l297 = {name: "ITER"};
10613 var l298 = {name: "G!TO"};
10614 var l299 = {name: "VAR"};
10615 var l300 = {name: "TO"};
10616 var l301 = {name: "G!LIST"};
10617 var l302 = {name: "X"};
10618 var l303 = {name: "PLACE"};
10619 var l304 = {name: "DELTA"};
10620 var l305 = {name: "CONDITION"};
10621 var l306 = {name: "DOCSTRING"};
10622 var l307 = {name: "&BODY"};
10623 var l308 = {car: {car: {car: l4, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l186, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l3, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l186, cdr: l3}, cdr: l3}}}}, cdr: l3}}, cdr: {car: {car: {car: l215, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l276, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l194, cdr: {car: l280, cdr: l3}}, cdr: {car: {car: l150, cdr: {car: {car: l56, cdr: {car: {car: l216, cdr: {car: {car: l204, cdr: {car: l154, cdr: {car: l3, cdr: l3}}}, cdr: {car: {car: l151, cdr: {car: l280, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l49, cdr: {car: {car: l281, cdr: {car: l154, cdr: l3}}, cdr: {car: {car: l262, cdr: {car: l281, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l275, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l129, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l203, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l274, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l273, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l181, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l237, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l236, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l282, cdr: {car: l194, cdr: {car: l280, cdr: l3}}}, cdr: {car: {car: l150, cdr: {car: {car: l130, cdr: {car: {car: l151, cdr: {car: {car: l68, cdr: {car: {car: l202, cdr: {car: {car: l283, cdr: l3}, cdr: {car: {car: l150, cdr: {car: {car: l122, cdr: {car: "var ", cdr: {car: {car: l152, cdr: {car: {car: l40, cdr: {car: l283, cdr: l3}}, cdr: l3}}, cdr: {car: " = ", cdr: {car: {car: l152, cdr: {car: {car: l42, cdr: {car: l283, cdr: l3}}, cdr: l3}}, cdr: {car: ";", cdr: {car: l121, cdr: l3}}}}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l282, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l151, cdr: {car: {car: l68, cdr: {car: {car: l202, cdr: {car: {car: l283, cdr: l3}, cdr: {car: {car: l150, cdr: {car: {car: l122, cdr: {car: "if (typeof ", cdr: {car: {car: l152, cdr: {car: {car: l40, cdr: {car: l283, cdr: l3}}, cdr: l3}}, cdr: {car: " != '", cdr: {car: {car: l152, cdr: {car: {car: l41, cdr: {car: l283, cdr: l3}}, cdr: l3}}, cdr: {car: "')", cdr: {car: l121, cdr: {car: {car: l127, cdr: {car: "throw 'The value ' + ", cdr: {car: {car: l152, cdr: {car: {car: l40, cdr: {car: l283, cdr: l3}}, cdr: l3}}, cdr: {car: " + ' is not a type ", cdr: {car: {car: l152, cdr: {car: {car: l41, cdr: {car: l283, cdr: l3}}, cdr: l3}}, cdr: {car: ".';", cdr: {car: l121, cdr: l3}}}}}}}, cdr: l3}}}}}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l282, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l122, cdr: {car: "return ", cdr: {car: {car: l216, cdr: {car: {car: l151, cdr: {car: l280, cdr: l3}}, cdr: l3}}, cdr: {car: ";", cdr: {car: l121, cdr: l3}}}}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l235, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l284, cdr: {car: l285, cdr: {car: l194, cdr: {car: l280, cdr: l3}}}}, cdr: {car: {car: l150, cdr: {car: {car: l216, cdr: {car: {car: l234, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: {car: {car: l152, cdr: {car: l285, cdr: l3}}, cdr: {car: {car: l219, cdr: {car: {car: l152, cdr: {car: {car: l68, cdr: {car: {car: l202, cdr: {car: {car: l286, cdr: l3}, cdr: {car: {car: l150, cdr: {car: {car: {car: l152, cdr: {car: l286, cdr: l3}}, cdr: {car: {car: l129, cdr: {car: {car: l152, cdr: {car: l286, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l285, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l151, cdr: {car: l280, cdr: l3}}, cdr: l3}}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l234, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l284, cdr: {car: l285, cdr: {car: l194, cdr: {car: l280, cdr: l3}}}}, cdr: {car: {car: l150, cdr: {car: {car: l48, cdr: {car: {car: l44, cdr: {car: {car: l149, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l202, cdr: {car: {car: l152, cdr: {car: l285, cdr: l3}}, cdr: {car: {car: l166, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: {car: {car: l151, cdr: {car: l280, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l233, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l150, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l287, cdr: l3}, cdr: {car: {car: l231, cdr: {car: l287, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l232, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l231, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l227, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l226, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l218, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l217, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l284, cdr: {car: l285, cdr: {car: l287, cdr: l3}}}, cdr: {car: {car: l150, cdr: {car: {car: l190, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: {car: {car: l152, cdr: {car: l285, cdr: l3}}, cdr: {car: {car: l129, cdr: {car: {car: l152, cdr: {car: l287, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l211, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l210, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l132, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l201, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l200, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l199, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l198, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l197, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l196, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l190, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l284, cdr: {car: l285, cdr: {car: l194, cdr: {car: l280, cdr: l3}}}}, cdr: {car: {car: l150, cdr: {car: {car: l48, cdr: {car: {car: l44, cdr: {car: {car: l149, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l202, cdr: {car: {car: l152, cdr: {car: l285, cdr: l3}}, cdr: {car: {car: l166, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: {car: {car: l151, cdr: {car: l280, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l189, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l184, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l183, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l182, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l180, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l179, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l178, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l177, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l174, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l173, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l172, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l169, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l168, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l165, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l164, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l163, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l162, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l161, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l160, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l159, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l158, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l157, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l156, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l155, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l153, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l144, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l147, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l146, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l145, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l143, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l142, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l141, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l140, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l139, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l138, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l137, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l136, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l135, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l134, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l133, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l95, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l131, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l130, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l194, cdr: {car: l280, cdr: l3}}, cdr: {car: {car: l150, cdr: {car: {car: l122, cdr: {car: "(function(){", cdr: {car: l121, cdr: {car: {car: l127, cdr: {car: {car: l151, cdr: {car: l280, cdr: l3}}, cdr: l3}}, cdr: {car: "})()", cdr: l3}}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l128, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l16, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l127, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l126, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l125, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l124, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l123, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l98, cdr: {car: l194, cdr: {car: l287, cdr: l3}}}, cdr: {car: {car: l150, cdr: {car: {car: l204, cdr: {car: {car: l152, cdr: {car: l98, cdr: l3}}, cdr: {car: {car: l122, cdr: {car: {car: l152, cdr: {car: l98, cdr: l3}}, cdr: {car: {car: l216, cdr: {car: {car: l151, cdr: {car: l287, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l122, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l120, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l113, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l119, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l118, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l117, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l116, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l115, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l288, cdr: l3}, cdr: {car: {car: l150, cdr: {car: {car: l214, cdr: {car: {car: l204, cdr: {car: l114, cdr: {car: {car: l102, cdr: {car: {car: l152, cdr: {car: l288, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l112, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l108, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l107, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l106, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l105, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l102, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l104, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l103, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l101, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l100, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l96, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l94, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l93, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l92, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l91, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l90, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l89, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l88, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l87, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l86, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l85, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l84, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l83, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l82, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l81, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l80, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l79, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l78, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l77, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l59, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l76, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l75, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l74, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l73, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l72, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l71, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l70, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l69, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l68, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l67, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l66, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l65, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l64, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l63, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l62, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l61, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l60, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l58, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l57, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l289, cdr: {car: l290, cdr: {car: l194, cdr: {car: l280, cdr: l3}}}}, cdr: {car: {car: l150, cdr: {car: {car: l56, cdr: {car: {car: l216, cdr: {car: {car: l152, cdr: {car: l289, cdr: l3}}, cdr: {car: {car: l152, cdr: {car: l290, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l151, cdr: {car: l280, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l56, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l287, cdr: {car: l194, cdr: {car: l280, cdr: l3}}}, cdr: {car: {car: l219, cdr: {car: {car: {car: l291, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l150, cdr: {car: {car: l219, cdr: {car: {car: {car: {car: l152, cdr: {car: l291, cdr: l3}}, cdr: {car: {car: l152, cdr: {car: l287, cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l151, cdr: {car: l280, cdr: l3}}, cdr: {car: {car: l152, cdr: {car: l291, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l55, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l194, cdr: {car: l292, cdr: l3}}, cdr: {car: {car: l51, cdr: {car: {car: {car: l11, cdr: {car: l292, cdr: l3}}, cdr: {car: l3, cdr: l3}}, cdr: {car: {car: {car: l11, cdr: {car: {car: l32, cdr: {car: l292, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l31, cdr: {car: l292, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l4, cdr: {car: {car: l219, cdr: {car: {car: {car: l293, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l150, cdr: {car: {car: l219, cdr: {car: {car: {car: {car: l152, cdr: {car: l293, cdr: l3}}, cdr: {car: {car: l152, cdr: {car: {car: l31, cdr: {car: l292, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l191, cdr: {car: {car: l152, cdr: {car: l293, cdr: l3}}, cdr: {car: {car: l152, cdr: {car: l293, cdr: l3}}, cdr: {car: {car: l55, cdr: {car: {car: l151, cdr: {car: {car: l32, cdr: {car: l292, 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: l54, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l194, cdr: {car: l292, cdr: l3}}, cdr: {car: {car: l51, cdr: {car: {car: {car: l11, cdr: {car: l292, cdr: l3}}, cdr: {car: l4, cdr: l3}}, cdr: {car: {car: {car: l11, cdr: {car: {car: l32, cdr: {car: l292, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l31, cdr: {car: l292, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l4, cdr: {car: {car: l150, cdr: {car: {car: l191, cdr: {car: {car: l152, cdr: {car: {car: l31, cdr: {car: l292, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l54, cdr: {car: {car: l151, cdr: {car: {car: l32, cdr: {car: l292, 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: l53, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l287, cdr: {car: l194, cdr: {car: l294, cdr: l3}}}, cdr: {car: {car: l150, cdr: {car: {car: l52, cdr: {car: {car: l152, cdr: {car: l287, cdr: l3}}, cdr: {car: {car: l151, cdr: {car: {car: l62, cdr: {car: l294, cdr: {car: {car: l150, cdr: {car: {car: {car: l4, cdr: {car: {car: l265, 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: l52, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l287, cdr: {car: l194, cdr: {car: l294, cdr: l3}}}, cdr: {car: {car: l219, cdr: {car: {car: {car: l295, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l150, cdr: {car: {car: l219, cdr: {car: {car: {car: {car: l152, cdr: {car: l295, cdr: l3}}, cdr: {car: {car: l152, cdr: {car: l287, cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l51, cdr: {car: {car: l151, cdr: {car: {car: l68, cdr: {car: {car: l202, cdr: {car: {car: l296, cdr: l3}, cdr: {car: {car: l191, cdr: {car: {car: l254, cdr: {car: {car: l31, cdr: {car: l296, cdr: l3}}, cdr: {car: l4, cdr: l3}}}, cdr: {car: l296, cdr: {car: {car: l150, cdr: {car: {car: {car: l27, cdr: {car: {car: l152, cdr: {car: l295, cdr: l3}}, cdr: {car: {car: l149, cdr: {car: {car: l152, cdr: {car: {car: l31, cdr: {car: l296, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l151, cdr: {car: {car: l32, cdr: {car: l296, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: {car: l294, cdr: l3}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l51, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l194, cdr: {car: l294, cdr: l3}}, cdr: {car: {car: l191, cdr: {car: {car: l11, cdr: {car: l294, cdr: l3}}, cdr: {car: l3, cdr: {car: {car: l191, cdr: {car: {car: l254, cdr: {car: {car: l33, cdr: {car: l294, cdr: l3}}, cdr: {car: l4, cdr: l3}}}, cdr: {car: {car: l150, cdr: {car: {car: l216, cdr: {car: {car: l151, cdr: {car: {car: l35, cdr: {car: l294, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l150, cdr: {car: {car: l191, cdr: {car: {car: l152, cdr: {car: {car: l33, cdr: {car: l294, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l216, cdr: {car: {car: l151, cdr: {car: {car: l35, cdr: {car: l294, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l51, cdr: {car: {car: l151, cdr: {car: {car: l32, cdr: {car: l294, 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: l181, cdr: {car: {car: l202, cdr: {car: {car: l297, cdr: {car: l194, cdr: {car: l280, cdr: l3}}}, cdr: {car: {car: l219, cdr: {car: {car: {car: l298, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: {car: {car: l299, cdr: {car: {car: l40, cdr: {car: l297, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l300, cdr: {car: {car: l41, cdr: {car: l297, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l290, cdr: {car: {car: l42, cdr: {car: l297, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: {car: {car: l150, cdr: {car: {car: l166, cdr: {car: l3, cdr: {car: {car: l219, cdr: {car: {car: {car: {car: l152, cdr: {car: l299, cdr: l3}}, cdr: {car: 0, cdr: l3}}, cdr: {car: {car: {car: l152, cdr: {car: l298, cdr: l3}}, cdr: {car: {car: l152, cdr: {car: l300, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l212, cdr: {car: {car: l239, cdr: {car: {car: l152, cdr: {car: l299, cdr: l3}}, cdr: {car: {car: l152, cdr: {car: l298, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l228, cdr: {car: {car: l151, cdr: {car: l280, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l46, cdr: {car: {car: l152, cdr: {car: l299, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: {car: {car: l152, cdr: {car: l290, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l49, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l297, cdr: {car: l194, cdr: {car: l280, cdr: l3}}}, cdr: {car: {car: l219, cdr: {car: {car: {car: l299, cdr: {car: {car: l40, cdr: {car: l297, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l301, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l150, cdr: {car: {car: l166, cdr: {car: l3, cdr: {car: {car: l219, cdr: {car: {car: {car: {car: l152, cdr: {car: l301, cdr: l3}}, cdr: {car: {car: l152, cdr: {car: {car: l41, cdr: {car: l297, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: {car: l152, cdr: {car: l299, cdr: l3}}, cdr: {car: l3, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l212, cdr: {car: {car: l152, cdr: {car: l301, cdr: l3}}, cdr: {car: {car: l204, cdr: {car: {car: l152, cdr: {car: l299, cdr: l3}}, cdr: {car: {car: l31, cdr: {car: {car: l152, cdr: {car: l301, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l228, cdr: {car: {car: l151, cdr: {car: l280, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l204, cdr: {car: {car: l152, cdr: {car: l301, cdr: l3}}, cdr: {car: {car: l32, cdr: {car: {car: l152, cdr: {car: l301, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}}}, cdr: {car: {car: l152, cdr: {car: {car: l42, cdr: {car: l297, 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: l181, cdr: {car: {car: l202, cdr: {car: {car: l302, cdr: {car: l303, cdr: l3}}, cdr: {car: {car: l150, cdr: {car: {car: l204, cdr: {car: {car: l152, cdr: {car: l303, cdr: l3}}, cdr: {car: {car: l29, cdr: {car: {car: l152, cdr: {car: l302, cdr: l3}}, cdr: {car: {car: l152, cdr: {car: l303, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l47, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l302, cdr: {car: l193, cdr: {car: {car: l304, cdr: {car: 1, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l150, cdr: {car: {car: l204, cdr: {car: {car: l152, cdr: {car: l302, cdr: l3}}, cdr: {car: {car: l20, cdr: {car: {car: l152, cdr: {car: l302, cdr: l3}}, cdr: {car: {car: l152, cdr: {car: l304, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l46, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l302, cdr: {car: l193, cdr: {car: {car: l304, cdr: {car: 1, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l150, cdr: {car: {car: l204, cdr: {car: {car: l152, cdr: {car: l302, cdr: l3}}, cdr: {car: {car: l19, cdr: {car: {car: l152, cdr: {car: l302, cdr: l3}}, cdr: {car: {car: l152, cdr: {car: l304, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l45, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l44, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l43, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l42, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l41, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l40, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l39, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l38, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l37, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l36, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l35, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l34, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l33, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l32, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l31, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l30, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l29, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l28, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l27, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l26, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l25, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l24, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l23, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l22, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l21, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l20, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l19, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l18, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l17, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l15, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l13, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l305, cdr: {car: l194, cdr: {car: l280, cdr: l3}}}, cdr: {car: {car: l150, cdr: {car: {car: l166, cdr: {car: l3, cdr: {car: {car: l212, cdr: {car: {car: l152, cdr: {car: l305, cdr: l3}}, cdr: {car: {car: l151, cdr: {car: l280, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l12, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l193, cdr: {car: l291, cdr: l3}}, cdr: {car: {car: l150, cdr: {car: {car: l221, cdr: {car: l3, cdr: {car: {car: l152, cdr: {car: l291, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l11, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l187, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l10, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l284, cdr: {car: l285, cdr: {car: l194, cdr: {car: l280, cdr: l3}}}}, cdr: {car: {car: l150, cdr: {car: {car: l216, cdr: {car: {car: l2, cdr: {car: {car: l187, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l250, cdr: {car: {car: l149, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l9, cdr: {car: {car: l152, cdr: {car: {car: l249, cdr: {car: l284, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l152, cdr: {car: l285, cdr: l3}}, cdr: {car: {car: l151, cdr: {car: {car: l191, cdr: {car: {car: l54, cdr: {car: {car: l257, cdr: {car: {car: l31, cdr: {car: l280, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l28, cdr: {car: {car: l11, cdr: {car: {car: l32, cdr: {car: l280, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l150, cdr: {car: {car: {car: l152, cdr: {car: {car: l31, cdr: {car: l280, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l166, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: {car: {car: l151, cdr: {car: {car: l32, cdr: {car: l280, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l150, cdr: {car: {car: {car: l166, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: {car: {car: l151, cdr: {car: l280, cdr: l3}}, cdr: l3}}}, cdr: l3}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: {car: {car: l149, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l9, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l284, cdr: {car: l285, cdr: {car: l194, cdr: {car: l280, cdr: l3}}}}, cdr: {car: {car: l219, cdr: {car: {car: {car: l302, cdr: {car: {car: l15, cdr: {car: "FN", cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l150, cdr: {car: {car: l219, cdr: {car: {car: {car: {car: l152, cdr: {car: l302, cdr: l3}}, cdr: {car: {car: l202, cdr: {car: {car: l152, cdr: {car: l285, cdr: l3}}, cdr: {car: {car: l151, cdr: {car: l280, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l269, cdr: {car: {car: l152, cdr: {car: l302, cdr: l3}}, cdr: {car: "fname", cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: l3}}}}, cdr: {car: {car: l152, cdr: {car: l302, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l8, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l284, cdr: {car: l291, cdr: {car: l193, cdr: {car: l306, cdr: l3}}}}, cdr: {car: {car: l150, cdr: {car: {car: l216, cdr: {car: {car: l204, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: {car: {car: l152, cdr: {car: l291, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l151, cdr: {car: {car: l5, cdr: {car: {car: l257, cdr: {car: l306, cdr: l3}}, cdr: {car: {car: l150, cdr: {car: {car: {car: l269, cdr: {car: {car: l149, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: l3}}, cdr: {car: "vardoc", cdr: {car: {car: l152, cdr: {car: l306, cdr: l3}}, cdr: l3}}}}, cdr: l3}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l149, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l7, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l284, cdr: {car: l291, cdr: {car: l193, cdr: {car: l306, cdr: l3}}}}, cdr: {car: {car: l150, cdr: {car: {car: l216, cdr: {car: {car: l6, cdr: {car: {car: l17, cdr: {car: {car: l149, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l204, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: {car: {car: l152, cdr: {car: l291, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: {car: l151, cdr: {car: {car: l5, cdr: {car: {car: l257, cdr: {car: l306, cdr: l3}}, cdr: {car: {car: l150, cdr: {car: {car: {car: l269, cdr: {car: {car: l149, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: l3}}, cdr: {car: "vardoc", cdr: {car: {car: l152, cdr: {car: l306, cdr: l3}}, cdr: l3}}}}, cdr: l3}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l149, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l6, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l305, cdr: {car: l194, cdr: {car: l280, cdr: l3}}}, cdr: {car: {car: l150, cdr: {car: {car: l191, cdr: {car: {car: l152, cdr: {car: l305, cdr: l3}}, cdr: {car: l3, cdr: {car: {car: l216, cdr: {car: {car: l151, cdr: {car: l280, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l5, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l305, cdr: {car: l194, cdr: {car: l280, cdr: l3}}}, cdr: {car: {car: l150, cdr: {car: {car: l191, cdr: {car: {car: l152, cdr: {car: l305, cdr: l3}}, cdr: {car: {car: l216, cdr: {car: {car: l151, cdr: {car: l280, cdr: l3}}, cdr: l3}}, cdr: {car: l3, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l2, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l194, cdr: {car: l282, cdr: l3}}, cdr: {car: {car: l150, cdr: {car: {car: l214, cdr: {car: {car: l151, cdr: {car: {car: l68, cdr: {car: {car: l202, cdr: {car: {car: l283, cdr: l3}, cdr: {car: {car: l150, cdr: {car: {car: l184, cdr: {car: {car: l149, cdr: {car: {car: l152, cdr: {car: l283, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l282, cdr: l3}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l1, cdr: {car: l181, cdr: {car: {car: l202, cdr: {car: {car: l284, cdr: {car: l285, cdr: {car: l194, cdr: {car: l280, cdr: l3}}}}, cdr: {car: {car: l150, cdr: {car: {car: l214, cdr: {car: {car: l180, cdr: {car: {car: l149, cdr: {car: {car: l152, cdr: {car: l284, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l149, cdr: {car: {car: l202, cdr: {car: {car: l152, cdr: {car: {car: l68, cdr: {car: {car: l202, cdr: {car: {car: l302, cdr: l3}, cdr: {car: {car: l191, cdr: {car: {car: l254, cdr: {car: l302, cdr: {car: {car: l149, cdr: {car: l307, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l149, cdr: {car: l194, cdr: l3}}, cdr: {car: l302, cdr: l3}}}}, cdr: l3}}}, cdr: {car: l285, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l151, cdr: {car: l280, 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}}}};
10624 (function(){
10625     l116.function(l277);
10626     l116.function(l276);
10627     l116.function(l275);
10628     l116.function(l274);
10629     l116.function(l273);
10630     l116.function(l272);
10631     l116.function(l271);
10632     l116.function(l270);
10633     l116.function(l269);
10634     l116.function(l268);
10635     l116.function(l267);
10636     l116.function(l266);
10637     l116.function(l265);
10638     l116.function(l264);
10639     l116.function(l263);
10640     l116.function(l262);
10641     l116.function(l261);
10642     l116.function(l260);
10643     l116.function(l259);
10644     l116.function(l258);
10645     l116.function(l257);
10646     l116.function(l256);
10647     l116.function(l255);
10648     l116.function(l254);
10649     l116.function(l253);
10650     l116.function(l252);
10651     l116.function(l251);
10652     l116.function(l250);
10653     l116.function(l249);
10654     l116.function(l248);
10655     l116.function(l247);
10656     l116.function(l246);
10657     l116.function(l245);
10658     l116.function(l244);
10659     l116.function(l243);
10660     l116.function(l242);
10661     l116.function(l241);
10662     l116.function(l240);
10663     l116.function(l239);
10664     l116.function(l238);
10665     l116.function(l237);
10666     l116.function(l236);
10667     l116.function(l235);
10668     l116.function(l234);
10669     l116.function(l233);
10670     l116.function(l232);
10671     l116.function(l231);
10672     l116.function(l230);
10673     l116.function(l229);
10674     l116.function(l228);
10675     l116.function(l227);
10676     l116.function(l226);
10677     l116.function(l225);
10678     l116.function(l224);
10679     l116.function(l223);
10680     l116.function(l222);
10681     l116.function(l221);
10682     l116.function(l220);
10683     l116.function(l219);
10684     l116.function(l218);
10685     l116.function(l217);
10686     l116.function(l216);
10687     l116.function(l215);
10688     l116.function(l214);
10689     l116.function(l213);
10690     l116.function(l212);
10691     l116.function(l211);
10692     l116.function(l210);
10693     l116.function(l209);
10694     l116.function(l208);
10695     l116.function(l207);
10696     l116.function(l206);
10697     l116.function(l205);
10698     l116.function(l204);
10699     l116.function(l203);
10700     l116.function(l202);
10701     l116.function(l201);
10702     l116.function(l200);
10703     l116.function(l199);
10704     l116.function(l198);
10705     l116.function(l197);
10706     l116.function(l196);
10707     l116.function(l194);
10708     l116.function(l193);
10709     l116.function(l192);
10710     l116.function(l191);
10711     l116.function(l190);
10712     l116.function(l189);
10713     l116.function(l188);
10714     l116.function(l187);
10715     l116.function(l186);
10716     l116.function(l185);
10717     l116.function(l184);
10718     l116.function(l183);
10719     l116.function(l182);
10720     l116.function(l181);
10721     l116.function(l180);
10722     l116.function(l179);
10723     l116.function(l178);
10724     l116.function(l177);
10725     l116.function(l176);
10726     l116.function(l175);
10727     l116.function(l174);
10728     l116.function(l173);
10729     l116.function(l172);
10730     l116.function(l171);
10731     l116.function(l170);
10732     l116.function(l169);
10733     l116.function(l168);
10734     l116.function(l167);
10735     l116.function(l166);
10736     l116.function(l165);
10737     l116.function(l164);
10738     l116.function(l163);
10739     l116.function(l162);
10740     l116.function(l161);
10741     l116.function(l160);
10742     l116.function(l159);
10743     l116.function(l158);
10744     l116.function(l157);
10745     l116.function(l156);
10746     l116.function(l155);
10747     l116.function(l154);
10748     l116.function(l153);
10749     l116.function(l152);
10750     l116.function(l151);
10751     l116.function(l150);
10752     l116.function(l149);
10753     l116.function(l148);
10754     l116.function(l147);
10755     l116.function(l146);
10756     l116.function(l145);
10757     l116.function(l144);
10758     l116.function(l143);
10759     l116.function(l142);
10760     l116.function(l141);
10761     l116.function(l140);
10762     l116.function(l139);
10763     l116.function(l138);
10764     l116.function(l137);
10765     l116.function(l136);
10766     l116.function(l135);
10767     l116.function(l134);
10768     l116.function(l133);
10769     l116.function(l132);
10770     l116.function(l131);
10771     l116.function(l130);
10772     l116.function(l129);
10773     l116.function(l128);
10774     l116.function(l127);
10775     l116.function(l126);
10776     l116.function(l125);
10777     l116.function(l124);
10778     l116.function(l123);
10779     l116.function(l122);
10780     l116.function(l121);
10781     l116.function(l120);
10782     l116.function(l119);
10783     l116.function(l118);
10784     l116.function(l117);
10785     l116.function(l116);
10786     l116.function(l115);
10787     l116.function(l114);
10788     l116.function(l113);
10789     l116.function(l112);
10790     l116.function(l111);
10791     l116.function(l110);
10792     l116.function(l109);
10793     l116.function(l108);
10794     l116.function(l107);
10795     l116.function(l106);
10796     l116.function(l105);
10797     l116.function(l104);
10798     l116.function(l103);
10799     l116.function(l102);
10800     l116.function(l101);
10801     l116.function(l100);
10802     l116.function(l99);
10803     l116.function(l98);
10804     l116.function(l97);
10805     l116.function(l96);
10806     l116.function(l95);
10807     l116.function(l94);
10808     l116.function(l93);
10809     l116.function(l92);
10810     l116.function(l91);
10811     l116.function(l90);
10812     l116.function(l89);
10813     l116.function(l88);
10814     l116.function(l87);
10815     l116.function(l86);
10816     l116.function(l85);
10817     l116.function(l84);
10818     l116.function(l83);
10819     l116.function(l82);
10820     l116.function(l81);
10821     l116.function(l80);
10822     l116.function(l79);
10823     l116.function(l78);
10824     l116.function(l77);
10825     l116.function(l76);
10826     l116.function(l75);
10827     l116.function(l74);
10828     l116.function(l73);
10829     l116.function(l72);
10830     l116.function(l71);
10831     l116.function(l70);
10832     l116.function(l69);
10833     l116.function(l68);
10834     l116.function(l67);
10835     l116.function(l66);
10836     l116.function(l65);
10837     l116.function(l64);
10838     l116.function(l63);
10839     l116.function(l62);
10840     l116.function(l61);
10841     l116.function(l60);
10842     l116.function(l59);
10843     l116.function(l58);
10844     l116.function(l57);
10845     l116.function(l56);
10846     l116.function(l55);
10847     l116.function(l54);
10848     l116.function(l53);
10849     l116.function(l52);
10850     l116.function(l51);
10851     l116.function(l50);
10852     l116.function(l49);
10853     l116.function(l48);
10854     l116.function(l47);
10855     l116.function(l46);
10856     l116.function(l45);
10857     l116.function(l44);
10858     l116.function(l43);
10859     l116.function(l42);
10860     l116.function(l41);
10861     l116.function(l40);
10862     l116.function(l39);
10863     l116.function(l38);
10864     l116.function(l37);
10865     l116.function(l36);
10866     l116.function(l35);
10867     l116.function(l34);
10868     l116.function(l33);
10869     l116.function(l32);
10870     l116.function(l31);
10871     l116.function(l30);
10872     l116.function(l29);
10873     l116.function(l28);
10874     l116.function(l27);
10875     l116.function(l26);
10876     l116.function(l25);
10877     l116.function(l24);
10878     l116.function(l23);
10879     l116.function(l22);
10880     l116.function(l21);
10881     l116.function(l20);
10882     l116.function(l19);
10883     l116.function(l18);
10884     l116.function(l17);
10885     l116.function(l16);
10886     l116.function(l15);
10887     l116.function(l14);
10888     l116.function(l13);
10889     l116.function(l12);
10890     l116.function(l11);
10891     l116.function(l10);
10892     l116.function(l9);
10893     l116.function(l8);
10894     l116.function(l7);
10895     l116.function(l6);
10896     l116.function(l5);
10897     l116.function(l4);
10898     l116.function(l3);
10899     l116.function(l2);
10900     l116.function(l1);
10901     (l208).value = l279;
10902     (l170).value = l308;
10903     (l171).value = 716;
10904     (l14).value = 190;
10905     return (l220).value = 252;
10906 })();
10907 (l209).value = 308;