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: "MAKE-PACKAGE"};
2656 (function(){
2657     (l100).function = (function(v184){
2658         ((v184)["fname"] = "MAKE-PACKAGE");
2659         return v184;
2660     })((function (v182){
2661         if (arguments.length < 1) throw 'too few arguments';
2662         if (arguments.length > 1) throw 'too many arguments';
2663         return (function(){
2664             try {
2665                 return (function(){
2666                     return (function(v183){
2667                         ((v183)["packageName"] = v182);
2668                         ((v183)["symbols"] = {});
2669                         (l99).value = ({car: v183, cdr: (function(){
2670                             var symbol = l99;
2671                             var value = symbol.value;
2672                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2673                             return value;
2674                         })()});
2675                         return v183;
2676                     })({});
2677                 })();
2678             }
2679             catch (cf){
2680                 if (cf.type == 'block' && cf.id == 81)
2681                     return cf.value;
2682                 else
2683                     throw cf;
2684             }
2685         })();
2686
2687     }));
2688     return l100;
2689 })();
2690 var l101 = {name: "PACKAGEP"};
2691 (function(){
2692     (l101).function = (function(v186){
2693         ((v186)["fname"] = "PACKAGEP");
2694         return v186;
2695     })((function (v185){
2696         if (arguments.length < 1) throw 'too few arguments';
2697         if (arguments.length > 1) throw 'too many arguments';
2698         return (function(){
2699             try {
2700                 return (function(){
2701                     return (((typeof (v185) === 'object')?l4.value: l3.value) !== l3.value ? ((("symbols") in (v185))?l4.value: l3.value) : l3.value);
2702                 })();
2703             }
2704             catch (cf){
2705                 if (cf.type == 'block' && cf.id == 82)
2706                     return cf.value;
2707                 else
2708                     throw cf;
2709             }
2710         })();
2711
2712     }));
2713     return l101;
2714 })();
2715 var l102 = {name: "FIND-PACKAGE"};
2716 var l103 = {name: "PACKAGE-NAME"};
2717 (function(){
2718     (l102).function = (function(v191){
2719         ((v191)["fname"] = "FIND-PACKAGE");
2720         return v191;
2721     })((function (v187){
2722         if (arguments.length < 1) throw 'too few arguments';
2723         if (arguments.length > 1) throw 'too many arguments';
2724         return (function(){
2725             try {
2726                 return (function(){
2727                     (l101.function(v187) !== l3.value ? (function(){
2728                         return (function(){
2729                             throw ({type: 'block', id: 83, value: v187, message: 'Return from unknown block FIND-PACKAGE.'})
2730                         })();
2731                     })() : l3.value);
2732                     return (function(v188){
2733                         return (function(){
2734                             try {
2735                                 return (function(){
2736                                     return (function(v189,v190){
2737                                         (function(){
2738                                             while(v189 !== l3.value){
2739                                                 v190 = (function(){
2740                                                     var tmp = v189;
2741                                                     return tmp === l3.value? l3.value: tmp.car;
2742                                                 })();
2743                                                 (function(){
2744                                                     (l92.function((function(){
2745                                                         var symbol = l103;
2746                                                         var func = symbol.function;
2747                                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2748                                                         return func;
2749                                                     })()(v190), v188) !== l3.value ? (function(){
2750                                                         return (function(){
2751                                                             throw ({type: 'block', id: 84, value: v190, message: 'Return from unknown block NIL.'})
2752                                                         })();
2753                                                     })() : l3.value);
2754                                                     return l3.value;
2755                                                 })();
2756                                                 v189 = (function(){
2757                                                     var tmp = v189;
2758                                                     return tmp === l3.value? l3.value: tmp.cdr;
2759                                                 })();
2760                                             }return l3.value;
2761                                         })();
2762                                         return l3.value;
2763                                     })((function(){
2764                                         var symbol = l99;
2765                                         var value = symbol.value;
2766                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2767                                         return value;
2768                                     })(),l3.value);
2769                                 })();
2770                             }
2771                             catch (cf){
2772                                 if (cf.type == 'block' && cf.id == 84)
2773                                     return cf.value;
2774                                 else
2775                                     throw cf;
2776                             }
2777                         })();
2778                     })(l91.function(v187));
2779                 })();
2780             }
2781             catch (cf){
2782                 if (cf.type == 'block' && cf.id == 83)
2783                     return cf.value;
2784                 else
2785                     throw cf;
2786             }
2787         })();
2788
2789     }));
2790     return l102;
2791 })();
2792 var l104 = {name: "FIND-PACKAGE-OR-FAIL"};
2793 (function(){
2794     (l104).function = (function(v194){
2795         ((v194)["fname"] = "FIND-PACKAGE-OR-FAIL");
2796         return v194;
2797     })((function (v192){
2798         if (arguments.length < 1) throw 'too few arguments';
2799         if (arguments.length > 1) throw 'too many arguments';
2800         return (function(){
2801             try {
2802                 return (function(){
2803                     return (function(v193){
2804                         return (v193 !== l3.value ? v193 : (function(){
2805                             throw "Package unknown.";
2806                         })());
2807                     })(l102.function(v192));
2808                 })();
2809             }
2810             catch (cf){
2811                 if (cf.type == 'block' && cf.id == 85)
2812                     return cf.value;
2813                 else
2814                     throw cf;
2815             }
2816         })();
2817
2818     }));
2819     return l104;
2820 })();
2821 (function(){
2822     (l103).function = (function(v197){
2823         ((v197)["fname"] = "PACKAGE-NAME");
2824         return v197;
2825     })((function (v195){
2826         if (arguments.length < 1) throw 'too few arguments';
2827         if (arguments.length > 1) throw 'too many arguments';
2828         return (function(){
2829             try {
2830                 return (function(){
2831                     return (function(v196){
2832                         return (function(){
2833                             var tmp = (v196)["packageName"];
2834                             return tmp == undefined? l3.value: tmp ;
2835                         })();
2836                     })(l104.function(v195));
2837                 })();
2838             }
2839             catch (cf){
2840                 if (cf.type == 'block' && cf.id == 86)
2841                     return cf.value;
2842                 else
2843                     throw cf;
2844             }
2845         })();
2846
2847     }));
2848     return l103;
2849 })();
2850 var l105 = {name: "%PACKAGE-SYMBOLS"};
2851 (function(){
2852     (l105).function = (function(v200){
2853         ((v200)["fname"] = "%PACKAGE-SYMBOLS");
2854         return v200;
2855     })((function (v198){
2856         if (arguments.length < 1) throw 'too few arguments';
2857         if (arguments.length > 1) throw 'too many arguments';
2858         return (function(){
2859             try {
2860                 return (function(){
2861                     return (function(v199){
2862                         return (function(){
2863                             var tmp = (v199)["symbols"];
2864                             return tmp == undefined? l3.value: tmp ;
2865                         })();
2866                     })(l104.function(v198));
2867                 })();
2868             }
2869             catch (cf){
2870                 if (cf.type == 'block' && cf.id == 87)
2871                     return cf.value;
2872                 else
2873                     throw cf;
2874             }
2875         })();
2876
2877     }));
2878     return l105;
2879 })();
2880 var l106 = {name: "*PACKAGE*"};
2881 (function(){
2882     (((l106.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
2883         return (l106).value = l100.function("CL");
2884     })());
2885     return l106;
2886 })();
2887 var l107 = {name: "%INTERN-SYMBOL"};
2888 (function(){
2889     (l107).function = (function(v203){
2890         ((v203)["fname"] = "%INTERN-SYMBOL");
2891         return v203;
2892     })((function (v201){
2893         if (arguments.length < 1) throw 'too few arguments';
2894         if (arguments.length > 1) throw 'too many arguments';
2895         return (function(){
2896             try {
2897                 return (function(){
2898                     return (function(v202){
2899                         ((v201)["package"] = (function(){
2900                             var symbol = l106;
2901                             var value = symbol.value;
2902                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2903                             return value;
2904                         })());
2905                         return ((v202)[(v201).name] = v201);
2906                     })(l105.function((function(){
2907                         var symbol = l106;
2908                         var value = symbol.value;
2909                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2910                         return value;
2911                     })()));
2912                 })();
2913             }
2914             catch (cf){
2915                 if (cf.type == 'block' && cf.id == 88)
2916                     return cf.value;
2917                 else
2918                     throw cf;
2919             }
2920         })();
2921
2922     }));
2923     return l107;
2924 })();
2925 var l108 = {name: "INTERN"};
2926 (function(){
2927     (l108).function = (function(v208){
2928         ((v208)["fname"] = "INTERN");
2929         return v208;
2930     })((function (v204,v205){
2931         if (arguments.length < 1) throw 'too few arguments';
2932         if (arguments.length > 2) throw 'too many arguments';
2933         switch(arguments.length){
2934         case 1:
2935         v205=(function(){
2936             var symbol = l106;
2937             var value = symbol.value;
2938             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2939             return value;
2940         })();
2941         default: break;
2942         }
2943         return (function(){
2944             try {
2945                 return (function(){
2946                     return (function(v206){
2947                         return ((((v204) in (v206))?l4.value: l3.value) !== l3.value ? (function(){
2948                             var tmp = (v206)[v204];
2949                             return tmp == undefined? l3.value: tmp ;
2950                         })() : (function(v207){
2951                             ((v207)["package"] = v205);
2952                             return ((v206)[v204] = v207);
2953                         })((function(){
2954                             var name = v204;
2955                             if (typeof name != 'string')
2956                                 throw 'The value ' + name + ' is not a type string.';
2957                             return ({name: name});
2958                         })()));
2959                     })(l105.function(v205));
2960                 })();
2961             }
2962             catch (cf){
2963                 if (cf.type == 'block' && cf.id == 89)
2964                     return cf.value;
2965                 else
2966                     throw cf;
2967             }
2968         })();
2969
2970     }));
2971     return l108;
2972 })();
2973 var l109 = {name: "FIND-SYMBOL"};
2974 (function(){
2975     (l109).function = (function(v212){
2976         ((v212)["fname"] = "FIND-SYMBOL");
2977         return v212;
2978     })((function (v209,v210){
2979         if (arguments.length < 1) throw 'too few arguments';
2980         if (arguments.length > 2) throw 'too many arguments';
2981         switch(arguments.length){
2982         case 1:
2983         v210=(function(){
2984             var symbol = l106;
2985             var value = symbol.value;
2986             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2987             return value;
2988         })();
2989         default: break;
2990         }
2991         return (function(){
2992             try {
2993                 return (function(){
2994                     return (function(v211){
2995                         return (function(){
2996                             var tmp = ((function(){
2997                                 var symbol = l106;
2998                                 var value = symbol.value;
2999                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3000                                 return value;
3001                             })())[v209];
3002                             return tmp == undefined? l3.value: tmp ;
3003                         })();
3004                     })(l105.function(v210));
3005                 })();
3006             }
3007             catch (cf){
3008                 if (cf.type == 'block' && cf.id == 90)
3009                     return cf.value;
3010                 else
3011                     throw cf;
3012             }
3013         })();
3014
3015     }));
3016     return l109;
3017 })();
3018 var l110 = {name: "SYMBOL-PACKAGE"};
3019 (function(){
3020     (l110).function = (function(v214){
3021         ((v214)["fname"] = "SYMBOL-PACKAGE");
3022         return v214;
3023     })((function (v213){
3024         if (arguments.length < 1) throw 'too few arguments';
3025         if (arguments.length > 1) throw 'too many arguments';
3026         return (function(){
3027             try {
3028                 return (function(){
3029                     (((function(){
3030                         var tmp = v213;
3031                         return (typeof tmp == 'object' && 'name' in tmp);
3032                     })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
3033                         return (function(){
3034                             throw "it is not a symbol";
3035                         })();
3036                     })());
3037                     return (function(){
3038                         var tmp = (v213)["package"];
3039                         return tmp == undefined? l3.value: tmp ;
3040                     })();
3041                 })();
3042             }
3043             catch (cf){
3044                 if (cf.type == 'block' && cf.id == 91)
3045                     return cf.value;
3046                 else
3047                     throw cf;
3048             }
3049         })();
3050
3051     }));
3052     return l110;
3053 })();
3054 var l111 = {name: "*NEWLINE*"};
3055 (function(){
3056     (((l111.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
3057         return (l111).value = l91.function(l71.function(10));
3058     })());
3059     return l111;
3060 })();
3061 var l112 = {name: "CONCAT"};
3062 (function(){
3063     (l112).function = (function(v216){
3064         ((v216)["fname"] = "CONCAT");
3065         return v216;
3066     })((function (){
3067         var v215= l3.value;
3068         for (var i = arguments.length-1; i>=0; i--)
3069             v215 = {car: arguments[i], cdr:
3070         v215};
3071         return (function(){
3072             try {
3073                 return (function(){
3074                     return l60.function((function(){
3075                         var symbol = l67;
3076                         var func = symbol.function;
3077                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3078                         return func;
3079                     })(), v215, "");
3080                 })();
3081             }
3082             catch (cf){
3083                 if (cf.type == 'block' && cf.id == 92)
3084                     return cf.value;
3085                 else
3086                     throw cf;
3087             }
3088         })();
3089
3090     }));
3091     return l112;
3092 })();
3093 var l113 = {name: "CONCATF"};
3094 l113;
3095 var l114 = {name: "JOIN"};
3096 (function(){
3097     (l114).function = (function(v219){
3098         ((v219)["fname"] = "JOIN");
3099         return v219;
3100     })((function (v217,v218){
3101         if (arguments.length < 1) throw 'too few arguments';
3102         if (arguments.length > 2) throw 'too many arguments';
3103         switch(arguments.length){
3104         case 1:
3105         v218="";
3106         default: break;
3107         }
3108         return (function(){
3109             try {
3110                 return (function(){
3111                     return (l11.function(v217) !== l3.value ? (function(){
3112                         return "";
3113                     })() : (l11.function((function(){
3114                         var tmp = v217;
3115                         return tmp === l3.value? l3.value: tmp.cdr;
3116                     })()) !== l3.value ? (function(){
3117                         return (function(){
3118                             var tmp = v217;
3119                             return tmp === l3.value? l3.value: tmp.car;
3120                         })();
3121                     })() : (function(){
3122                         return l112.function((function(){
3123                             var tmp = v217;
3124                             return tmp === l3.value? l3.value: tmp.car;
3125                         })(), v218, l114.function((function(){
3126                             var tmp = v217;
3127                             return tmp === l3.value? l3.value: tmp.cdr;
3128                         })(), v218));
3129                     })()));
3130                 })();
3131             }
3132             catch (cf){
3133                 if (cf.type == 'block' && cf.id == 93)
3134                     return cf.value;
3135                 else
3136                     throw cf;
3137             }
3138         })();
3139
3140     }));
3141     return l114;
3142 })();
3143 var l115 = {name: "JOIN-TRAILING"};
3144 (function(){
3145     (l115).function = (function(v222){
3146         ((v222)["fname"] = "JOIN-TRAILING");
3147         return v222;
3148     })((function (v220,v221){
3149         if (arguments.length < 1) throw 'too few arguments';
3150         if (arguments.length > 2) throw 'too many arguments';
3151         switch(arguments.length){
3152         case 1:
3153         v221="";
3154         default: break;
3155         }
3156         return (function(){
3157             try {
3158                 return (function(){
3159                     return (l11.function(v220) !== l3.value ? "" : l112.function((function(){
3160                         var tmp = v220;
3161                         return tmp === l3.value? l3.value: tmp.car;
3162                     })(), v221, l115.function((function(){
3163                         var tmp = v220;
3164                         return tmp === l3.value? l3.value: tmp.cdr;
3165                     })(), v221)));
3166                 })();
3167             }
3168             catch (cf){
3169                 if (cf.type == 'block' && cf.id == 94)
3170                     return cf.value;
3171                 else
3172                     throw cf;
3173             }
3174         })();
3175
3176     }));
3177     return l115;
3178 })();
3179 var l116 = {name: "MAPCONCAT"};
3180 (function(){
3181     (l116).function = (function(v225){
3182         ((v225)["fname"] = "MAPCONCAT");
3183         return v225;
3184     })((function (v223,v224){
3185         if (arguments.length < 2) throw 'too few arguments';
3186         if (arguments.length > 2) throw 'too many arguments';
3187         return (function(){
3188             try {
3189                 return (function(){
3190                     return l114.function(l68.function(v223, v224));
3191                 })();
3192             }
3193             catch (cf){
3194                 if (cf.type == 'block' && cf.id == 95)
3195                     return cf.value;
3196                 else
3197                     throw cf;
3198             }
3199         })();
3200
3201     }));
3202     return l116;
3203 })();
3204 var l117 = {name: "INDENT"};
3205 (function(){
3206     (l117).function = (function(v232){
3207         ((v232)["fname"] = "INDENT");
3208         return v232;
3209     })((function (){
3210         var v226= l3.value;
3211         for (var i = arguments.length-1; i>=0; i--)
3212             v226 = {car: arguments[i], cdr:
3213         v226};
3214         return (function(){
3215             try {
3216                 return (function(){
3217                     return (function(v227){
3218                         return (function(v228,v229,v230){
3219                             (l75.function(l66.function(v227)) !== l3.value ? (function(){
3220                                 return v228 = l112.function(v228, (function(){
3221                                     return "    ";
3222                                 })());
3223                             })() : l3.value);
3224                             (function(){
3225                                 try {
3226                                     return (function(){
3227                                         return (function(){
3228                                             while(((function(){
3229                                                 var x = v229;
3230                                                 var y = v230;
3231                                                 if (typeof x != 'number')
3232                                                     throw 'The value ' + x + ' is not a type number.';
3233                                                 if (typeof y != 'number')
3234                                                     throw 'The value ' + y + ' is not a type number.';
3235                                                 return x<y;
3236                                             })()?l4.value: l3.value) !== l3.value){
3237                                                 (function(v231){
3238                                                     return v228 = l112.function(v228, (function(){
3239                                                         return v231;
3240                                                     })());
3241                                                 })(((l73.function((function(){
3242                                                     var string = v227;
3243                                                     var index = v229;
3244                                                     if (typeof string != 'string')
3245                                                         throw 'The value ' + string + ' is not a type string.';
3246                                                     if (typeof index != 'number')
3247                                                         throw 'The value ' + index + ' is not a type number.';
3248                                                     return string.charCodeAt(index);
3249                                                 })(), 10) !== l3.value ? (((function(){
3250                                                     var x = v229;
3251                                                     var y = l24.function(v230);
3252                                                     if (typeof x != 'number')
3253                                                         throw 'The value ' + x + ' is not a type number.';
3254                                                     if (typeof y != 'number')
3255                                                         throw 'The value ' + y + ' is not a type number.';
3256                                                     return x<y;
3257                                                 })()?l4.value: l3.value) !== l3.value ? l28.function(l73.function((function(){
3258                                                     var string = v227;
3259                                                     var index = l23.function(v229);
3260                                                     if (typeof string != 'string')
3261                                                         throw 'The value ' + string + ' is not a type string.';
3262                                                     if (typeof index != 'number')
3263                                                         throw 'The value ' + index + ' is not a type number.';
3264                                                     return string.charCodeAt(index);
3265                                                 })(), 10)) : l3.value) : l3.value) !== l3.value ? l112.function(l91.function(10), "    ") : l91.function((function(){
3266                                                     var string = v227;
3267                                                     var index = v229;
3268                                                     if (typeof string != 'string')
3269                                                         throw 'The value ' + string + ' is not a type string.';
3270                                                     if (typeof index != 'number')
3271                                                         throw 'The value ' + index + ' is not a type number.';
3272                                                     return string.charCodeAt(index);
3273                                                 })())));
3274                                                 v229 = (function(){
3275                                                     var x = v229;
3276                                                     var y = 1;
3277                                                     if (typeof x != 'number')
3278                                                         throw 'The value ' + x + ' is not a type number.';
3279                                                     if (typeof y != 'number')
3280                                                         throw 'The value ' + y + ' is not a type number.';
3281                                                     return x+y;
3282                                                 })();
3283                                             }return l3.value;
3284                                         })();
3285                                     })();
3286                                 }
3287                                 catch (cf){
3288                                     if (cf.type == 'block' && cf.id == 97)
3289                                         return cf.value;
3290                                     else
3291                                         throw cf;
3292                                 }
3293                             })();
3294                             return v228;
3295                         })("",0,l66.function(v227));
3296                     })(l114.function(v226));
3297                 })();
3298             }
3299             catch (cf){
3300                 if (cf.type == 'block' && cf.id == 96)
3301                     return cf.value;
3302                 else
3303                     throw cf;
3304             }
3305         })();
3306
3307     }));
3308     return l117;
3309 })();
3310 (function(){
3311     (l16).function = (function(v236){
3312         ((v236)["fname"] = "INTEGER-TO-STRING");
3313         return v236;
3314     })((function (v233){
3315         if (arguments.length < 1) throw 'too few arguments';
3316         if (arguments.length > 1) throw 'too many arguments';
3317         return (function(){
3318             try {
3319                 return (function(){
3320                     return (l25.function(v233) !== l3.value ? (function(){
3321                         return "0";
3322                     })() : (l76.function(v233) !== l3.value ? (function(){
3323                         return l112.function("-", l16.function((function(){
3324                             var x = 0;
3325                             var y = v233;
3326                             if (typeof x != 'number')
3327                                 throw 'The value ' + x + ' is not a type number.';
3328                             if (typeof y != 'number')
3329                                 throw 'The value ' + y + ' is not a type number.';
3330                             return x-y;
3331                         })()));
3332                     })() : (function(){
3333                         return (function(v234){
3334                             (function(){
3335                                 try {
3336                                     return (function(){
3337                                         return (function(){
3338                                             while(l28.function(l25.function(v233)) !== l3.value){
3339                                                 v234 = ({car: (function(){
3340                                                     var x = v233;
3341                                                     var y = 10;
3342                                                     if (typeof x != 'number')
3343                                                         throw 'The value ' + x + ' is not a type number.';
3344                                                     if (typeof y != 'number')
3345                                                         throw 'The value ' + y + ' is not a type number.';
3346                                                     return x%y;
3347                                                 })(), cdr: v234});
3348                                                 v233 = l26.function(v233, 10);
3349                                             }return l3.value;
3350                                         })();
3351                                     })();
3352                                 }
3353                                 catch (cf){
3354                                     if (cf.type == 'block' && cf.id == 99)
3355                                         return cf.value;
3356                                     else
3357                                         throw cf;
3358                                 }
3359                             })();
3360                             return l114.function(l68.function((function (v235){
3361                                 if (arguments.length < 1) throw 'too few arguments';
3362                                 if (arguments.length > 1) throw 'too many arguments';
3363                                 return l91.function((function(){
3364                                     var string = "0123456789";
3365                                     var index = v235;
3366                                     if (typeof string != 'string')
3367                                         throw 'The value ' + string + ' is not a type string.';
3368                                     if (typeof index != 'number')
3369                                         throw 'The value ' + index + ' is not a type number.';
3370                                     return string.charCodeAt(index);
3371                                 })());
3372
3373                             }), v234));
3374                         })(l3.value);
3375                     })()));
3376                 })();
3377             }
3378             catch (cf){
3379                 if (cf.type == 'block' && cf.id == 98)
3380                     return cf.value;
3381                 else
3382                     throw cf;
3383             }
3384         })();
3385
3386     }));
3387     return l16;
3388 })();
3389 var l118 = {name: "JS!BOOL"};
3390 var l119 = {name: "LS-COMPILE"};
3391 (function(){
3392     (l118).function = (function(v238){
3393         ((v238)["fname"] = "JS!BOOL");
3394         return v238;
3395     })((function (v237){
3396         if (arguments.length < 1) throw 'too few arguments';
3397         if (arguments.length > 1) throw 'too many arguments';
3398         return (function(){
3399             try {
3400                 return (function(){
3401                     return l112.function("(", v237, "?", (function(){
3402                         var symbol = l119;
3403                         var func = symbol.function;
3404                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3405                         return func;
3406                     })()(l4.value), ": ", (function(){
3407                         var symbol = l119;
3408                         var func = symbol.function;
3409                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3410                         return func;
3411                     })()(l3.value), ")");
3412                 })();
3413             }
3414             catch (cf){
3415                 if (cf.type == 'block' && cf.id == 100)
3416                     return cf.value;
3417                 else
3418                     throw cf;
3419             }
3420         })();
3421
3422     }));
3423     return l118;
3424 })();
3425 var l120 = {name: "JS!SELFCALL"};
3426 l120;
3427 var l121 = {name: "PRIN1-TO-STRING"};
3428 var l122 = {name: "ESCAPE-STRING"};
3429 (function(){
3430     (l121).function = (function(v242){
3431         ((v242)["fname"] = "PRIN1-TO-STRING");
3432         return v242;
3433     })((function (v239){
3434         if (arguments.length < 1) throw 'too few arguments';
3435         if (arguments.length > 1) throw 'too many arguments';
3436         return (function(){
3437             try {
3438                 return (function(){
3439                     return (((function(){
3440                         var tmp = v239;
3441                         return (typeof tmp == 'object' && 'name' in tmp);
3442                     })()?l4.value: l3.value) !== l3.value ? (function(){
3443                         return (v239).name;
3444                     })() : (l74.function(v239) !== l3.value ? (function(){
3445                         return l16.function(v239);
3446                     })() : (((typeof(v239) == "string")?l4.value: l3.value) !== l3.value ? (function(){
3447                         return l112.function("\"", (function(){
3448                             var symbol = l122;
3449                             var func = symbol.function;
3450                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3451                             return func;
3452                         })()(v239), "\"");
3453                     })() : (((typeof v239 == 'function')?l4.value: l3.value) !== l3.value ? (function(){
3454                         return (function(v240){
3455                             return (v240 !== l3.value ? l112.function("#<FUNCTION ", v240, ">") : l112.function("#<FUNCTION>"));
3456                         })((function(){
3457                             var tmp = (v239)["fname"];
3458                             return tmp == undefined? l3.value: tmp ;
3459                         })());
3460                     })() : (l59.function(v239) !== l3.value ? (function(){
3461                         return l112.function("(", l115.function(l68.function((function(){
3462                             var symbol = l121;
3463                             var func = symbol.function;
3464                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3465                             return func;
3466                         })(), l80.function(v239)), " "), (function(v241){
3467                             return (l11.function((function(){
3468                                 var tmp = v241;
3469                                 return tmp === l3.value? l3.value: tmp.cdr;
3470                             })()) !== l3.value ? l121.function((function(){
3471                                 var tmp = v241;
3472                                 return tmp === l3.value? l3.value: tmp.car;
3473                             })()) : l112.function(l121.function((function(){
3474                                 var tmp = v241;
3475                                 return tmp === l3.value? l3.value: tmp.car;
3476                             })()), " . ", l121.function((function(){
3477                                 var tmp = v241;
3478                                 return tmp === l3.value? l3.value: tmp.cdr;
3479                             })())));
3480                         })(l79.function(v239)), ")");
3481                     })() : (l101.function(v239) !== l3.value ? (function(){
3482                         return l112.function("#<PACKAGE ", l103.function(v239), ">");
3483                     })() : l3.value))))));
3484                 })();
3485             }
3486             catch (cf){
3487                 if (cf.type == 'block' && cf.id == 101)
3488                     return cf.value;
3489                 else
3490                     throw cf;
3491             }
3492         })();
3493
3494     }));
3495     return l121;
3496 })();
3497 (function(){
3498     (l95).function = (function(v244){
3499         ((v244)["fname"] = "WRITE-LINE");
3500         return v244;
3501     })((function (v243){
3502         if (arguments.length < 1) throw 'too few arguments';
3503         if (arguments.length > 1) throw 'too many arguments';
3504         return (function(){
3505             try {
3506                 return (function(){
3507                     (function(){
3508                         var x = v243;
3509                         if (typeof x != 'string')
3510                             throw 'The value ' + x + ' is not a type string.';
3511                         return lisp.write(x);
3512                     })();
3513                     (function(){
3514                         var x = (function(){
3515                             var symbol = l111;
3516                             var value = symbol.value;
3517                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3518                             return value;
3519                         })();
3520                         if (typeof x != 'string')
3521                             throw 'The value ' + x + ' is not a type string.';
3522                         return lisp.write(x);
3523                     })();
3524                     return v243;
3525                 })();
3526             }
3527             catch (cf){
3528                 if (cf.type == 'block' && cf.id == 102)
3529                     return cf.value;
3530                 else
3531                     throw cf;
3532             }
3533         })();
3534
3535     }));
3536     return l95;
3537 })();
3538 var l123 = {name: "WARN"};
3539 (function(){
3540     (l123).function = (function(v246){
3541         ((v246)["fname"] = "WARN");
3542         return v246;
3543     })((function (v245){
3544         if (arguments.length < 1) throw 'too few arguments';
3545         if (arguments.length > 1) throw 'too many arguments';
3546         return (function(){
3547             try {
3548                 return (function(){
3549                     (function(){
3550                         var x = "WARNING: ";
3551                         if (typeof x != 'string')
3552                             throw 'The value ' + x + ' is not a type string.';
3553                         return lisp.write(x);
3554                     })();
3555                     return l95.function(v245);
3556                 })();
3557             }
3558             catch (cf){
3559                 if (cf.type == 'block' && cf.id == 103)
3560                     return cf.value;
3561                 else
3562                     throw cf;
3563             }
3564         })();
3565
3566     }));
3567     return l123;
3568 })();
3569 var l124 = {name: "PRINT"};
3570 (function(){
3571     (l124).function = (function(v248){
3572         ((v248)["fname"] = "PRINT");
3573         return v248;
3574     })((function (v247){
3575         if (arguments.length < 1) throw 'too few arguments';
3576         if (arguments.length > 1) throw 'too many arguments';
3577         return (function(){
3578             try {
3579                 return (function(){
3580                     l95.function(l121.function(v247));
3581                     return v247;
3582                 })();
3583             }
3584             catch (cf){
3585                 if (cf.type == 'block' && cf.id == 104)
3586                     return cf.value;
3587                 else
3588                     throw cf;
3589             }
3590         })();
3591
3592     }));
3593     return l124;
3594 })();
3595 var l125 = {name: "MAKE-STRING-STREAM"};
3596 (function(){
3597     (l125).function = (function(v250){
3598         ((v250)["fname"] = "MAKE-STRING-STREAM");
3599         return v250;
3600     })((function (v249){
3601         if (arguments.length < 1) throw 'too few arguments';
3602         if (arguments.length > 1) throw 'too many arguments';
3603         return (function(){
3604             try {
3605                 return (function(){
3606                     return ({car: v249, cdr: 0});
3607                 })();
3608             }
3609             catch (cf){
3610                 if (cf.type == 'block' && cf.id == 105)
3611                     return cf.value;
3612                 else
3613                     throw cf;
3614             }
3615         })();
3616
3617     }));
3618     return l125;
3619 })();
3620 var l126 = {name: "%PEEK-CHAR"};
3621 (function(){
3622     (l126).function = (function(v252){
3623         ((v252)["fname"] = "%PEEK-CHAR");
3624         return v252;
3625     })((function (v251){
3626         if (arguments.length < 1) throw 'too few arguments';
3627         if (arguments.length > 1) throw 'too many arguments';
3628         return (function(){
3629             try {
3630                 return (function(){
3631                     return (((function(){
3632                         var x = (function(){
3633                             var tmp = v251;
3634                             return tmp === l3.value? l3.value: tmp.cdr;
3635                         })();
3636                         var y = l66.function((function(){
3637                             var tmp = v251;
3638                             return tmp === l3.value? l3.value: tmp.car;
3639                         })());
3640                         if (typeof x != 'number')
3641                             throw 'The value ' + x + ' is not a type number.';
3642                         if (typeof y != 'number')
3643                             throw 'The value ' + y + ' is not a type number.';
3644                         return x<y;
3645                     })()?l4.value: l3.value) !== l3.value ? (function(){
3646                         var string = (function(){
3647                             var tmp = v251;
3648                             return tmp === l3.value? l3.value: tmp.car;
3649                         })();
3650                         var index = (function(){
3651                             var tmp = v251;
3652                             return tmp === l3.value? l3.value: tmp.cdr;
3653                         })();
3654                         if (typeof string != 'string')
3655                             throw 'The value ' + string + ' is not a type string.';
3656                         if (typeof index != 'number')
3657                             throw 'The value ' + index + ' is not a type number.';
3658                         return string.charCodeAt(index);
3659                     })() : l3.value);
3660                 })();
3661             }
3662             catch (cf){
3663                 if (cf.type == 'block' && cf.id == 106)
3664                     return cf.value;
3665                 else
3666                     throw cf;
3667             }
3668         })();
3669
3670     }));
3671     return l126;
3672 })();
3673 var l127 = {name: "%READ-CHAR"};
3674 (function(){
3675     (l127).function = (function(v255){
3676         ((v255)["fname"] = "%READ-CHAR");
3677         return v255;
3678     })((function (v253){
3679         if (arguments.length < 1) throw 'too few arguments';
3680         if (arguments.length > 1) throw 'too many arguments';
3681         return (function(){
3682             try {
3683                 return (function(){
3684                     return (((function(){
3685                         var x = (function(){
3686                             var tmp = v253;
3687                             return tmp === l3.value? l3.value: tmp.cdr;
3688                         })();
3689                         var y = l66.function((function(){
3690                             var tmp = v253;
3691                             return tmp === l3.value? l3.value: tmp.car;
3692                         })());
3693                         if (typeof x != 'number')
3694                             throw 'The value ' + x + ' is not a type number.';
3695                         if (typeof y != 'number')
3696                             throw 'The value ' + y + ' is not a type number.';
3697                         return x<y;
3698                     })()?l4.value: l3.value) !== l3.value ? (function(v254){
3699                         (function(){
3700                             var x = v253;
3701                             if (typeof x != 'object')
3702                                 throw 'The value ' + x + ' is not a type object.';
3703                             return (x.cdr = l23.function((function(){
3704                                 var tmp = v253;
3705                                 return tmp === l3.value? l3.value: tmp.cdr;
3706                             })()));
3707                         })();
3708                         return v254;
3709                     })((function(){
3710                         var string = (function(){
3711                             var tmp = v253;
3712                             return tmp === l3.value? l3.value: tmp.car;
3713                         })();
3714                         var index = (function(){
3715                             var tmp = v253;
3716                             return tmp === l3.value? l3.value: tmp.cdr;
3717                         })();
3718                         if (typeof string != 'string')
3719                             throw 'The value ' + string + ' is not a type string.';
3720                         if (typeof index != 'number')
3721                             throw 'The value ' + index + ' is not a type number.';
3722                         return string.charCodeAt(index);
3723                     })()) : l3.value);
3724                 })();
3725             }
3726             catch (cf){
3727                 if (cf.type == 'block' && cf.id == 107)
3728                     return cf.value;
3729                 else
3730                     throw cf;
3731             }
3732         })();
3733
3734     }));
3735     return l127;
3736 })();
3737 var l128 = {name: "WHITESPACEP"};
3738 (function(){
3739     (l128).function = (function(v259){
3740         ((v259)["fname"] = "WHITESPACEP");
3741         return v259;
3742     })((function (v256){
3743         if (arguments.length < 1) throw 'too few arguments';
3744         if (arguments.length > 1) throw 'too many arguments';
3745         return (function(){
3746             try {
3747                 return (function(){
3748                     return (function(v257){
3749                         return (v257 !== l3.value ? v257 : (function(v258){
3750                             return (v258 !== l3.value ? v258 : l73.function(v256, 9));
3751                         })(l73.function(v256, 10)));
3752                     })(l73.function(v256, 32));
3753                 })();
3754             }
3755             catch (cf){
3756                 if (cf.type == 'block' && cf.id == 108)
3757                     return cf.value;
3758                 else
3759                     throw cf;
3760             }
3761         })();
3762
3763     }));
3764     return l128;
3765 })();
3766 var l129 = {name: "SKIP-WHITESPACES"};
3767 (function(){
3768     (l129).function = (function(v262){
3769         ((v262)["fname"] = "SKIP-WHITESPACES");
3770         return v262;
3771     })((function (v260){
3772         if (arguments.length < 1) throw 'too few arguments';
3773         if (arguments.length > 1) throw 'too many arguments';
3774         return (function(){
3775             try {
3776                 return (function(){
3777                     return (function(v261){
3778                         v261 = l126.function(v260);
3779                         return (function(){
3780                             try {
3781                                 return (function(){
3782                                     return (function(){
3783                                         while((v261 !== l3.value ? l128.function(v261) : l3.value) !== l3.value){
3784                                             l127.function(v260);
3785                                             v261 = l126.function(v260);
3786                                         }return l3.value;
3787                                     })();
3788                                 })();
3789                             }
3790                             catch (cf){
3791                                 if (cf.type == 'block' && cf.id == 110)
3792                                     return cf.value;
3793                                 else
3794                                     throw cf;
3795                             }
3796                         })();
3797                     })(l3.value);
3798                 })();
3799             }
3800             catch (cf){
3801                 if (cf.type == 'block' && cf.id == 109)
3802                     return cf.value;
3803                 else
3804                     throw cf;
3805             }
3806         })();
3807
3808     }));
3809     return l129;
3810 })();
3811 var l130 = {name: "TERMINALP"};
3812 (function(){
3813     (l130).function = (function(v267){
3814         ((v267)["fname"] = "TERMINALP");
3815         return v267;
3816     })((function (v263){
3817         if (arguments.length < 1) throw 'too few arguments';
3818         if (arguments.length > 1) throw 'too many arguments';
3819         return (function(){
3820             try {
3821                 return (function(){
3822                     return (function(v264){
3823                         return (v264 !== l3.value ? v264 : (function(v265){
3824                             return (v265 !== l3.value ? v265 : (function(v266){
3825                                 return (v266 !== l3.value ? v266 : l73.function(40, v263));
3826                             })(l73.function(41, v263)));
3827                         })(l128.function(v263)));
3828                     })(l11.function(v263));
3829                 })();
3830             }
3831             catch (cf){
3832                 if (cf.type == 'block' && cf.id == 111)
3833                     return cf.value;
3834                 else
3835                     throw cf;
3836             }
3837         })();
3838
3839     }));
3840     return l130;
3841 })();
3842 var l131 = {name: "READ-UNTIL"};
3843 (function(){
3844     (l131).function = (function(v272){
3845         ((v272)["fname"] = "READ-UNTIL");
3846         return v272;
3847     })((function (v268,v269){
3848         if (arguments.length < 2) throw 'too few arguments';
3849         if (arguments.length > 2) throw 'too many arguments';
3850         return (function(){
3851             try {
3852                 return (function(){
3853                     return (function(v270,v271){
3854                         v271 = l126.function(v268);
3855                         (function(){
3856                             try {
3857                                 return (function(){
3858                                     return (function(){
3859                                         while((v271 !== l3.value ? l28.function((v269)(v271)) : l3.value) !== l3.value){
3860                                             v270 = l112.function(v270, l91.function(v271));
3861                                             l127.function(v268);
3862                                             v271 = l126.function(v268);
3863                                         }return l3.value;
3864                                     })();
3865                                 })();
3866                             }
3867                             catch (cf){
3868                                 if (cf.type == 'block' && cf.id == 113)
3869                                     return cf.value;
3870                                 else
3871                                     throw cf;
3872                             }
3873                         })();
3874                         return v270;
3875                     })("",l3.value);
3876                 })();
3877             }
3878             catch (cf){
3879                 if (cf.type == 'block' && cf.id == 112)
3880                     return cf.value;
3881                 else
3882                     throw cf;
3883             }
3884         })();
3885
3886     }));
3887     return l131;
3888 })();
3889 var l132 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
3890 (function(){
3891     (l132).function = (function(v276){
3892         ((v276)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
3893         return v276;
3894     })((function (v273){
3895         if (arguments.length < 1) throw 'too few arguments';
3896         if (arguments.length > 1) throw 'too many arguments';
3897         return (function(){
3898             try {
3899                 return (function(){
3900                     return (function(v274){
3901                         l129.function(v273);
3902                         v274 = l126.function(v273);
3903                         return (function(){
3904                             try {
3905                                 return (function(){
3906                                     return (function(){
3907                                         while((v274 !== l3.value ? l73.function(v274, 59) : l3.value) !== l3.value){
3908                                             l131.function(v273, (function (v275){
3909                                                 if (arguments.length < 1) throw 'too few arguments';
3910                                                 if (arguments.length > 1) throw 'too many arguments';
3911                                                 return l73.function(v275, 10);
3912
3913                                             }));
3914                                             l129.function(v273);
3915                                             v274 = l126.function(v273);
3916                                         }return l3.value;
3917                                     })();
3918                                 })();
3919                             }
3920                             catch (cf){
3921                                 if (cf.type == 'block' && cf.id == 115)
3922                                     return cf.value;
3923                                 else
3924                                     throw cf;
3925                             }
3926                         })();
3927                     })(l3.value);
3928                 })();
3929             }
3930             catch (cf){
3931                 if (cf.type == 'block' && cf.id == 114)
3932                     return cf.value;
3933                 else
3934                     throw cf;
3935             }
3936         })();
3937
3938     }));
3939     return l132;
3940 })();
3941 var l133 = {name: "%READ-LIST"};
3942 var l134 = {name: "LS-READ"};
3943 (function(){
3944     (l133).function = (function(v280){
3945         ((v280)["fname"] = "%READ-LIST");
3946         return v280;
3947     })((function (v277){
3948         if (arguments.length < 1) throw 'too few arguments';
3949         if (arguments.length > 1) throw 'too many arguments';
3950         return (function(){
3951             try {
3952                 return (function(){
3953                     l132.function(v277);
3954                     return (function(v278){
3955                         return (l11.function(v278) !== l3.value ? (function(){
3956                             return (function(){
3957                                 throw "Unspected EOF";
3958                             })();
3959                         })() : (l73.function(v278, 41) !== l3.value ? (function(){
3960                             l127.function(v277);
3961                             return l3.value;
3962                         })() : (l73.function(v278, 46) !== l3.value ? (function(){
3963                             l127.function(v277);
3964                             return (function(v279){
3965                                 l132.function(v277);
3966                                 (l73.function(l127.function(v277), 41) !== l3.value ? l3.value : (function(){
3967                                     return (function(){
3968                                         throw "')' was expected.";
3969                                     })();
3970                                 })());
3971                                 return v279;
3972                             })((function(){
3973                                 var symbol = l134;
3974                                 var func = symbol.function;
3975                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3976                                 return func;
3977                             })()(v277));
3978                         })() : (function(){
3979                             return ({car: (function(){
3980                                 var symbol = l134;
3981                                 var func = symbol.function;
3982                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3983                                 return func;
3984                             })()(v277), cdr: l133.function(v277)});
3985                         })())));
3986                     })(l126.function(v277));
3987                 })();
3988             }
3989             catch (cf){
3990                 if (cf.type == 'block' && cf.id == 116)
3991                     return cf.value;
3992                 else
3993                     throw cf;
3994             }
3995         })();
3996
3997     }));
3998     return l133;
3999 })();
4000 var l135 = {name: "READ-STRING"};
4001 (function(){
4002     (l135).function = (function(v284){
4003         ((v284)["fname"] = "READ-STRING");
4004         return v284;
4005     })((function (v281){
4006         if (arguments.length < 1) throw 'too few arguments';
4007         if (arguments.length > 1) throw 'too many arguments';
4008         return (function(){
4009             try {
4010                 return (function(){
4011                     return (function(v282,v283){
4012                         v283 = l127.function(v281);
4013                         (function(){
4014                             try {
4015                                 return (function(){
4016                                     return (function(){
4017                                         while(l28.function(l27.function(v283, 34)) !== l3.value){
4018                                             (l11.function(v283) !== l3.value ? (function(){
4019                                                 return (function(){
4020                                                     throw "Unexpected EOF";
4021                                                 })();
4022                                             })() : l3.value);
4023                                             (l27.function(v283, 92) !== l3.value ? (function(){
4024                                                 return v283 = l127.function(v281);
4025                                             })() : l3.value);
4026                                             v282 = l112.function(v282, l91.function(v283));
4027                                             v283 = l127.function(v281);
4028                                         }return l3.value;
4029                                     })();
4030                                 })();
4031                             }
4032                             catch (cf){
4033                                 if (cf.type == 'block' && cf.id == 118)
4034                                     return cf.value;
4035                                 else
4036                                     throw cf;
4037                             }
4038                         })();
4039                         return v282;
4040                     })("",l3.value);
4041                 })();
4042             }
4043             catch (cf){
4044                 if (cf.type == 'block' && cf.id == 117)
4045                     return cf.value;
4046                 else
4047                     throw cf;
4048             }
4049         })();
4050
4051     }));
4052     return l135;
4053 })();
4054 var l136 = {name: "READ-SHARP"};
4055 (function(){
4056     (l136).function = (function(v289){
4057         ((v289)["fname"] = "READ-SHARP");
4058         return v289;
4059     })((function (v285){
4060         if (arguments.length < 1) throw 'too few arguments';
4061         if (arguments.length > 1) throw 'too many arguments';
4062         return (function(){
4063             try {
4064                 return (function(){
4065                     l127.function(v285);
4066                     return (function(v286){
4067                         return (l27.function(v286, 39) !== l3.value ? (function(){
4068                             return l44.function(l97, (function(){
4069                                 var symbol = l134;
4070                                 var func = symbol.function;
4071                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4072                                 return func;
4073                             })()(v285));
4074                         })() : (l27.function(v286, 92) !== l3.value ? (function(){
4075                             return (function(v287){
4076                                 return (l92.function(v287, "space") !== l3.value ? (function(){
4077                                     return l72.function(32);
4078                                 })() : (l92.function(v287, "tab") !== l3.value ? (function(){
4079                                     return l72.function(9);
4080                                 })() : (l92.function(v287, "newline") !== l3.value ? (function(){
4081                                     return l72.function(10);
4082                                 })() : (function(){
4083                                     return l72.function((function(){
4084                                         var string = v287;
4085                                         var index = 0;
4086                                         if (typeof string != 'string')
4087                                             throw 'The value ' + string + ' is not a type string.';
4088                                         if (typeof index != 'number')
4089                                             throw 'The value ' + index + ' is not a type number.';
4090                                         return string.charCodeAt(index);
4091                                     })());
4092                                 })())));
4093                             })(l112.function(l91.function(l127.function(v285)), l131.function(v285, (function(){
4094                                 var symbol = l130;
4095                                 var func = symbol.function;
4096                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4097                                 return func;
4098                             })())));
4099                         })() : (l27.function(v286, 43) !== l3.value ? (function(){
4100                             return (function(v288){
4101                                 return (l92.function(v288, "common-lisp") !== l3.value ? (function(){
4102                                     (function(){
4103                                         var symbol = l134;
4104                                         var func = symbol.function;
4105                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4106                                         return func;
4107                                     })()(v285);
4108                                     return (function(){
4109                                         var symbol = l134;
4110                                         var func = symbol.function;
4111                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4112                                         return func;
4113                                     })()(v285);
4114                                 })() : (l92.function(v288, "ecmalisp") !== l3.value ? (function(){
4115                                     return (function(){
4116                                         var symbol = l134;
4117                                         var func = symbol.function;
4118                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4119                                         return func;
4120                                     })()(v285);
4121                                 })() : (function(){
4122                                     return (function(){
4123                                         throw "Unknown reader form.";
4124                                     })();
4125                                 })()));
4126                             })(l131.function(v285, (function(){
4127                                 var symbol = l130;
4128                                 var func = symbol.function;
4129                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4130                                 return func;
4131                             })()));
4132                         })() : (function(){
4133                             return (function(){
4134                                 throw "ECASE expression failed.";
4135                             })();
4136                         })())));
4137                     })(l127.function(v285));
4138                 })();
4139             }
4140             catch (cf){
4141                 if (cf.type == 'block' && cf.id == 119)
4142                     return cf.value;
4143                 else
4144                     throw cf;
4145             }
4146         })();
4147
4148     }));
4149     return l136;
4150 })();
4151 var l137 = {name: "*EOF*"};
4152 (function(){
4153     (((l137.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
4154         return (l137).value = (function(){
4155             var name = "EOF";
4156             if (typeof name != 'string')
4157                 throw 'The value ' + name + ' is not a type string.';
4158             return ({name: name});
4159         })();
4160     })());
4161     return l137;
4162 })();
4163 var l138 = {name: "QUOTE"};
4164 var l139 = {name: "BACKQUOTE"};
4165 var l140 = {name: "UNQUOTE-SPLICING"};
4166 var l141 = {name: "UNQUOTE"};
4167 (function(){
4168     (l134).function = (function(v293){
4169         ((v293)["fname"] = "LS-READ");
4170         return v293;
4171     })((function (v290){
4172         if (arguments.length < 1) throw 'too few arguments';
4173         if (arguments.length > 1) throw 'too many arguments';
4174         return (function(){
4175             try {
4176                 return (function(){
4177                     l132.function(v290);
4178                     return (function(v291){
4179                         return (l11.function(v291) !== l3.value ? (function(){
4180                             return (function(){
4181                                 var symbol = l137;
4182                                 var value = symbol.value;
4183                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4184                                 return value;
4185                             })();
4186                         })() : (l73.function(v291, 40) !== l3.value ? (function(){
4187                             l127.function(v290);
4188                             return l133.function(v290);
4189                         })() : (l73.function(v291, 39) !== l3.value ? (function(){
4190                             l127.function(v290);
4191                             return l44.function(l138, l134.function(v290));
4192                         })() : (l73.function(v291, 96) !== l3.value ? (function(){
4193                             l127.function(v290);
4194                             return l44.function(l139, l134.function(v290));
4195                         })() : (l73.function(v291, 34) !== l3.value ? (function(){
4196                             l127.function(v290);
4197                             return l135.function(v290);
4198                         })() : (l73.function(v291, 44) !== l3.value ? (function(){
4199                             l127.function(v290);
4200                             return (l27.function(l126.function(v290), 64) !== l3.value ? (function(){
4201                                 l127.function(v290);
4202                                 return l44.function(l140, l134.function(v290));
4203                             })() : l44.function(l141, l134.function(v290)));
4204                         })() : (l73.function(v291, 35) !== l3.value ? (function(){
4205                             return l136.function(v290);
4206                         })() : (function(){
4207                             return (function(v292){
4208                                 return (l89.function((function(){
4209                                     var symbol = l85;
4210                                     var func = symbol.function;
4211                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4212                                     return func;
4213                                 })(), v292) !== l3.value ? l87.function(v292) : l108.function((function(){
4214                                     var x = v292;
4215                                     if (typeof x != 'string')
4216                                         throw 'The value ' + x + ' is not a type string.';
4217                                     return x.toUpperCase();
4218                                 })()));
4219                             })(l131.function(v290, (function(){
4220                                 var symbol = l130;
4221                                 var func = symbol.function;
4222                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4223                                 return func;
4224                             })()));
4225                         })())))))));
4226                     })(l126.function(v290));
4227                 })();
4228             }
4229             catch (cf){
4230                 if (cf.type == 'block' && cf.id == 120)
4231                     return cf.value;
4232                 else
4233                     throw cf;
4234             }
4235         })();
4236
4237     }));
4238     return l134;
4239 })();
4240 var l142 = {name: "LS-READ-FROM-STRING"};
4241 (function(){
4242     (l142).function = (function(v295){
4243         ((v295)["fname"] = "LS-READ-FROM-STRING");
4244         return v295;
4245     })((function (v294){
4246         if (arguments.length < 1) throw 'too few arguments';
4247         if (arguments.length > 1) throw 'too many arguments';
4248         return (function(){
4249             try {
4250                 return (function(){
4251                     return l134.function(l125.function(v294));
4252                 })();
4253             }
4254             catch (cf){
4255                 if (cf.type == 'block' && cf.id == 121)
4256                     return cf.value;
4257                 else
4258                     throw cf;
4259             }
4260         })();
4261
4262     }));
4263     return l142;
4264 })();
4265 var l143 = {name: "*COMPILATION-UNIT-CHECKS*"};
4266 (function(){
4267     (((l143.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
4268         return (l143).value = l3;
4269     })());
4270     return l143;
4271 })();
4272 var l144 = {name: "MAKE-BINDING"};
4273 (function(){
4274     (l144).function = (function(v300){
4275         ((v300)["fname"] = "MAKE-BINDING");
4276         return v300;
4277     })((function (v296,v297,v298,v299){
4278         if (arguments.length < 3) throw 'too few arguments';
4279         if (arguments.length > 4) throw 'too many arguments';
4280         switch(arguments.length){
4281         case 3:
4282         v299=l3.value;
4283         default: break;
4284         }
4285         return (function(){
4286             try {
4287                 return (function(){
4288                     return l44.function(v296, v297, v298, v299);
4289                 })();
4290             }
4291             catch (cf){
4292                 if (cf.type == 'block' && cf.id == 122)
4293                     return cf.value;
4294                 else
4295                     throw cf;
4296             }
4297         })();
4298
4299     }));
4300     return l144;
4301 })();
4302 var l145 = {name: "BINDING-NAME"};
4303 (function(){
4304     (l145).function = (function(v302){
4305         ((v302)["fname"] = "BINDING-NAME");
4306         return v302;
4307     })((function (v301){
4308         if (arguments.length < 1) throw 'too few arguments';
4309         if (arguments.length > 1) throw 'too many arguments';
4310         return (function(){
4311             try {
4312                 return (function(){
4313                     return l40.function(v301);
4314                 })();
4315             }
4316             catch (cf){
4317                 if (cf.type == 'block' && cf.id == 123)
4318                     return cf.value;
4319                 else
4320                     throw cf;
4321             }
4322         })();
4323
4324     }));
4325     return l145;
4326 })();
4327 var l146 = {name: "BINDING-TYPE"};
4328 (function(){
4329     (l146).function = (function(v304){
4330         ((v304)["fname"] = "BINDING-TYPE");
4331         return v304;
4332     })((function (v303){
4333         if (arguments.length < 1) throw 'too few arguments';
4334         if (arguments.length > 1) throw 'too many arguments';
4335         return (function(){
4336             try {
4337                 return (function(){
4338                     return l41.function(v303);
4339                 })();
4340             }
4341             catch (cf){
4342                 if (cf.type == 'block' && cf.id == 124)
4343                     return cf.value;
4344                 else
4345                     throw cf;
4346             }
4347         })();
4348
4349     }));
4350     return l146;
4351 })();
4352 var l147 = {name: "BINDING-VALUE"};
4353 (function(){
4354     (l147).function = (function(v306){
4355         ((v306)["fname"] = "BINDING-VALUE");
4356         return v306;
4357     })((function (v305){
4358         if (arguments.length < 1) throw 'too few arguments';
4359         if (arguments.length > 1) throw 'too many arguments';
4360         return (function(){
4361             try {
4362                 return (function(){
4363                     return l42.function(v305);
4364                 })();
4365             }
4366             catch (cf){
4367                 if (cf.type == 'block' && cf.id == 125)
4368                     return cf.value;
4369                 else
4370                     throw cf;
4371             }
4372         })();
4373
4374     }));
4375     return l147;
4376 })();
4377 var l148 = {name: "BINDING-DECLARATIONS"};
4378 (function(){
4379     (l148).function = (function(v308){
4380         ((v308)["fname"] = "BINDING-DECLARATIONS");
4381         return v308;
4382     })((function (v307){
4383         if (arguments.length < 1) throw 'too few arguments';
4384         if (arguments.length > 1) throw 'too many arguments';
4385         return (function(){
4386             try {
4387                 return (function(){
4388                     return l43.function(v307);
4389                 })();
4390             }
4391             catch (cf){
4392                 if (cf.type == 'block' && cf.id == 126)
4393                     return cf.value;
4394                 else
4395                     throw cf;
4396             }
4397         })();
4398
4399     }));
4400     return l148;
4401 })();
4402 var l149 = {name: "SET-BINDING-VALUE"};
4403 (function(){
4404     (l149).function = (function(v311){
4405         ((v311)["fname"] = "SET-BINDING-VALUE");
4406         return v311;
4407     })((function (v309,v310){
4408         if (arguments.length < 2) throw 'too few arguments';
4409         if (arguments.length > 2) throw 'too many arguments';
4410         return (function(){
4411             try {
4412                 return (function(){
4413                     return (function(){
4414                         var x = l36.function(v309);
4415                         if (typeof x != 'object')
4416                             throw 'The value ' + x + ' is not a type object.';
4417                         return (x.car = v310);
4418                     })();
4419                 })();
4420             }
4421             catch (cf){
4422                 if (cf.type == 'block' && cf.id == 127)
4423                     return cf.value;
4424                 else
4425                     throw cf;
4426             }
4427         })();
4428
4429     }));
4430     return l149;
4431 })();
4432 var l150 = {name: "SET-BINDING-DECLARATIONS"};
4433 (function(){
4434     (l150).function = (function(v314){
4435         ((v314)["fname"] = "SET-BINDING-DECLARATIONS");
4436         return v314;
4437     })((function (v312,v313){
4438         if (arguments.length < 2) throw 'too few arguments';
4439         if (arguments.length > 2) throw 'too many arguments';
4440         return (function(){
4441             try {
4442                 return (function(){
4443                     return (function(){
4444                         var x = l38.function(v312);
4445                         if (typeof x != 'object')
4446                             throw 'The value ' + x + ' is not a type object.';
4447                         return (x.car = v313);
4448                     })();
4449                 })();
4450             }
4451             catch (cf){
4452                 if (cf.type == 'block' && cf.id == 128)
4453                     return cf.value;
4454                 else
4455                     throw cf;
4456             }
4457         })();
4458
4459     }));
4460     return l150;
4461 })();
4462 var l151 = {name: "PUSH-BINDING-DECLARATION"};
4463 (function(){
4464     (l151).function = (function(v317){
4465         ((v317)["fname"] = "PUSH-BINDING-DECLARATION");
4466         return v317;
4467     })((function (v315,v316){
4468         if (arguments.length < 2) throw 'too few arguments';
4469         if (arguments.length > 2) throw 'too many arguments';
4470         return (function(){
4471             try {
4472                 return (function(){
4473                     return l150.function(v316, ({car: v315, cdr: l148.function(v316)}));
4474                 })();
4475             }
4476             catch (cf){
4477                 if (cf.type == 'block' && cf.id == 129)
4478                     return cf.value;
4479                 else
4480                     throw cf;
4481             }
4482         })();
4483
4484     }));
4485     return l151;
4486 })();
4487 var l152 = {name: "MAKE-LEXENV"};
4488 (function(){
4489     (l152).function = (function(v318){
4490         ((v318)["fname"] = "MAKE-LEXENV");
4491         return v318;
4492     })((function (){
4493         if (arguments.length > 0) throw 'too many arguments';
4494         return (function(){
4495             try {
4496                 return (function(){
4497                     return l44.function(l3.value, l3.value, l3.value, l3.value);
4498                 })();
4499             }
4500             catch (cf){
4501                 if (cf.type == 'block' && cf.id == 130)
4502                     return cf.value;
4503                 else
4504                     throw cf;
4505             }
4506         })();
4507
4508     }));
4509     return l152;
4510 })();
4511 var l153 = {name: "COPY-LEXENV"};
4512 (function(){
4513     (l153).function = (function(v320){
4514         ((v320)["fname"] = "COPY-LEXENV");
4515         return v320;
4516     })((function (v319){
4517         if (arguments.length < 1) throw 'too few arguments';
4518         if (arguments.length > 1) throw 'too many arguments';
4519         return (function(){
4520             try {
4521                 return (function(){
4522                     return l70.function(v319);
4523                 })();
4524             }
4525             catch (cf){
4526                 if (cf.type == 'block' && cf.id == 131)
4527                     return cf.value;
4528                 else
4529                     throw cf;
4530             }
4531         })();
4532
4533     }));
4534     return l153;
4535 })();
4536 var l154 = {name: "PUSH-TO-LEXENV"};
4537 var l155 = {name: "BLOCK"};
4538 var l156 = {name: "GOTAG"};
4539 (function(){
4540     (l154).function = (function(v325){
4541         ((v325)["fname"] = "PUSH-TO-LEXENV");
4542         return v325;
4543     })((function (v321,v322,v323){
4544         if (arguments.length < 3) throw 'too few arguments';
4545         if (arguments.length > 3) throw 'too many arguments';
4546         return (function(){
4547             try {
4548                 return (function(){
4549                     return (function(v324){
4550                         return (l27.function(v324, l98) !== l3.value ? (function(){
4551                             return (function(){
4552                                 var x = v322;
4553                                 if (typeof x != 'object')
4554                                     throw 'The value ' + x + ' is not a type object.';
4555                                 return (x.car = ({car: v321, cdr: (function(){
4556                                     var tmp = v322;
4557                                     return tmp === l3.value? l3.value: tmp.car;
4558                                 })()}));
4559                             })();
4560                         })() : (l27.function(v324, l97) !== l3.value ? (function(){
4561                             return (function(){
4562                                 var x = (function(){
4563                                     var tmp = v322;
4564                                     return tmp === l3.value? l3.value: tmp.cdr;
4565                                 })();
4566                                 if (typeof x != 'object')
4567                                     throw 'The value ' + x + ' is not a type object.';
4568                                 return (x.car = ({car: v321, cdr: l34.function(v322)}));
4569                             })();
4570                         })() : (l27.function(v324, l155) !== l3.value ? (function(){
4571                             return (function(){
4572                                 var x = l36.function(v322);
4573                                 if (typeof x != 'object')
4574                                     throw 'The value ' + x + ' is not a type object.';
4575                                 return (x.car = ({car: v321, cdr: l37.function(v322)}));
4576                             })();
4577                         })() : (l27.function(v324, l156) !== l3.value ? (function(){
4578                             return (function(){
4579                                 var x = l38.function(v322);
4580                                 if (typeof x != 'object')
4581                                     throw 'The value ' + x + ' is not a type object.';
4582                                 return (x.car = ({car: v321, cdr: l39.function(v322)}));
4583                             })();
4584                         })() : (function(){
4585                             return (function(){
4586                                 throw "ECASE expression failed.";
4587                             })();
4588                         })()))));
4589                     })(v323);
4590                 })();
4591             }
4592             catch (cf){
4593                 if (cf.type == 'block' && cf.id == 132)
4594                     return cf.value;
4595                 else
4596                     throw cf;
4597             }
4598         })();
4599
4600     }));
4601     return l154;
4602 })();
4603 var l157 = {name: "EXTEND-LEXENV"};
4604 (function(){
4605     (l157).function = (function(v332){
4606         ((v332)["fname"] = "EXTEND-LEXENV");
4607         return v332;
4608     })((function (v326,v327,v328){
4609         if (arguments.length < 3) throw 'too few arguments';
4610         if (arguments.length > 3) throw 'too many arguments';
4611         return (function(){
4612             try {
4613                 return (function(){
4614                     return (function(v329){
4615                         return (function(){
4616                             try {
4617                                 return (function(){
4618                                     return (function(v330,v331){
4619                                         (function(){
4620                                             while(v330 !== l3.value){
4621                                                 v331 = (function(){
4622                                                     var tmp = v330;
4623                                                     return tmp === l3.value? l3.value: tmp.car;
4624                                                 })();
4625                                                 (function(){
4626                                                     l154.function(v331, v329, v328);
4627                                                     return l3.value;
4628                                                 })();
4629                                                 v330 = (function(){
4630                                                     var tmp = v330;
4631                                                     return tmp === l3.value? l3.value: tmp.cdr;
4632                                                 })();
4633                                             }return l3.value;
4634                                         })();
4635                                         return v329;
4636                                     })(l64.function(v326),l3.value);
4637                                 })();
4638                             }
4639                             catch (cf){
4640                                 if (cf.type == 'block' && cf.id == 134)
4641                                     return cf.value;
4642                                 else
4643                                     throw cf;
4644                             }
4645                         })();
4646                     })(l153.function(v327));
4647                 })();
4648             }
4649             catch (cf){
4650                 if (cf.type == 'block' && cf.id == 133)
4651                     return cf.value;
4652                 else
4653                     throw cf;
4654             }
4655         })();
4656
4657     }));
4658     return l157;
4659 })();
4660 var l158 = {name: "LOOKUP-IN-LEXENV"};
4661 (function(){
4662     (l158).function = (function(v337){
4663         ((v337)["fname"] = "LOOKUP-IN-LEXENV");
4664         return v337;
4665     })((function (v333,v334,v335){
4666         if (arguments.length < 3) throw 'too few arguments';
4667         if (arguments.length > 3) throw 'too many arguments';
4668         return (function(){
4669             try {
4670                 return (function(){
4671                     return l90.function(v333, (function(v336){
4672                         return (l27.function(v336, l98) !== l3.value ? (function(){
4673                             return l40.function(v334);
4674                         })() : (l27.function(v336, l97) !== l3.value ? (function(){
4675                             return l41.function(v334);
4676                         })() : (l27.function(v336, l155) !== l3.value ? (function(){
4677                             return l42.function(v334);
4678                         })() : (l27.function(v336, l156) !== l3.value ? (function(){
4679                             return l43.function(v334);
4680                         })() : (function(){
4681                             return (function(){
4682                                 throw "ECASE expression failed.";
4683                             })();
4684                         })()))));
4685                     })(v335));
4686                 })();
4687             }
4688             catch (cf){
4689                 if (cf.type == 'block' && cf.id == 135)
4690                     return cf.value;
4691                 else
4692                     throw cf;
4693             }
4694         })();
4695
4696     }));
4697     return l158;
4698 })();
4699 var l159 = {name: "*ENVIRONMENT*"};
4700 (function(){
4701     (((l159.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
4702         return (l159).value = l152.function();
4703     })());
4704     return l159;
4705 })();
4706 var l160 = {name: "*VARIABLE-COUNTER*"};
4707 (function(){
4708     (((l160.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
4709         return (l160).value = 0;
4710     })());
4711     return l160;
4712 })();
4713 var l161 = {name: "GVARNAME"};
4714 (function(){
4715     (l161).function = (function(v339){
4716         ((v339)["fname"] = "GVARNAME");
4717         return v339;
4718     })((function (v338){
4719         if (arguments.length < 1) throw 'too few arguments';
4720         if (arguments.length > 1) throw 'too many arguments';
4721         return (function(){
4722             try {
4723                 return (function(){
4724                     return l112.function("v", l16.function((l160).value = (function(){
4725                         var x = (function(){
4726                             var symbol = l160;
4727                             var value = symbol.value;
4728                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4729                             return value;
4730                         })();
4731                         var y = 1;
4732                         if (typeof x != 'number')
4733                             throw 'The value ' + x + ' is not a type number.';
4734                         if (typeof y != 'number')
4735                             throw 'The value ' + y + ' is not a type number.';
4736                         return x+y;
4737                     })()));
4738                 })();
4739             }
4740             catch (cf){
4741                 if (cf.type == 'block' && cf.id == 136)
4742                     return cf.value;
4743                 else
4744                     throw cf;
4745             }
4746         })();
4747
4748     }));
4749     return l161;
4750 })();
4751 var l162 = {name: "TRANSLATE-VARIABLE"};
4752 (function(){
4753     (l162).function = (function(v341){
4754         ((v341)["fname"] = "TRANSLATE-VARIABLE");
4755         return v341;
4756     })((function (v340){
4757         if (arguments.length < 1) throw 'too few arguments';
4758         if (arguments.length > 1) throw 'too many arguments';
4759         return (function(){
4760             try {
4761                 return (function(){
4762                     return l147.function(l158.function(v340, (function(){
4763                         var symbol = l159;
4764                         var value = symbol.value;
4765                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4766                         return value;
4767                     })(), l98));
4768                 })();
4769             }
4770             catch (cf){
4771                 if (cf.type == 'block' && cf.id == 137)
4772                     return cf.value;
4773                 else
4774                     throw cf;
4775             }
4776         })();
4777
4778     }));
4779     return l162;
4780 })();
4781 var l163 = {name: "EXTEND-LOCAL-ENV"};
4782 var l164 = {name: "LEXICAL-VARIABLE"};
4783 (function(){
4784     (l163).function = (function(v347){
4785         ((v347)["fname"] = "EXTEND-LOCAL-ENV");
4786         return v347;
4787     })((function (v342){
4788         if (arguments.length < 1) throw 'too few arguments';
4789         if (arguments.length > 1) throw 'too many arguments';
4790         return (function(){
4791             try {
4792                 return (function(){
4793                     return (function(v343){
4794                         return (function(){
4795                             try {
4796                                 return (function(){
4797                                     return (function(v344,v345){
4798                                         (function(){
4799                                             while(v344 !== l3.value){
4800                                                 v345 = (function(){
4801                                                     var tmp = v344;
4802                                                     return tmp === l3.value? l3.value: tmp.car;
4803                                                 })();
4804                                                 (function(){
4805                                                     (function(v346){
4806                                                         return l154.function(v346, v343, l98);
4807                                                     })(l144.function(v345, l164, l161.function(v345)));
4808                                                     return l3.value;
4809                                                 })();
4810                                                 v344 = (function(){
4811                                                     var tmp = v344;
4812                                                     return tmp === l3.value? l3.value: tmp.cdr;
4813                                                 })();
4814                                             }return l3.value;
4815                                         })();
4816                                         return v343;
4817                                     })(v342,l3.value);
4818                                 })();
4819                             }
4820                             catch (cf){
4821                                 if (cf.type == 'block' && cf.id == 139)
4822                                     return cf.value;
4823                                 else
4824                                     throw cf;
4825                             }
4826                         })();
4827                     })(l153.function((function(){
4828                         var symbol = l159;
4829                         var value = symbol.value;
4830                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4831                         return value;
4832                     })()));
4833                 })();
4834             }
4835             catch (cf){
4836                 if (cf.type == 'block' && cf.id == 138)
4837                     return cf.value;
4838                 else
4839                     throw cf;
4840             }
4841         })();
4842
4843     }));
4844     return l163;
4845 })();
4846 var l165 = {name: "*TOPLEVEL-COMPILATIONS*"};
4847 (function(){
4848     (((l165.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
4849         return (l165).value = l3.value;
4850     })());
4851     return l165;
4852 })();
4853 var l166 = {name: "TOPLEVEL-COMPILATION"};
4854 (function(){
4855     (l166).function = (function(v349){
4856         ((v349)["fname"] = "TOPLEVEL-COMPILATION");
4857         return v349;
4858     })((function (v348){
4859         if (arguments.length < 1) throw 'too few arguments';
4860         if (arguments.length > 1) throw 'too many arguments';
4861         return (function(){
4862             try {
4863                 return (function(){
4864                     return (l165).value = ({car: v348, cdr: (function(){
4865                         var symbol = l165;
4866                         var value = symbol.value;
4867                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4868                         return value;
4869                     })()});
4870                 })();
4871             }
4872             catch (cf){
4873                 if (cf.type == 'block' && cf.id == 140)
4874                     return cf.value;
4875                 else
4876                     throw cf;
4877             }
4878         })();
4879
4880     }));
4881     return l166;
4882 })();
4883 var l167 = {name: "NULL-OR-EMPTY-P"};
4884 (function(){
4885     (l167).function = (function(v351){
4886         ((v351)["fname"] = "NULL-OR-EMPTY-P");
4887         return v351;
4888     })((function (v350){
4889         if (arguments.length < 1) throw 'too few arguments';
4890         if (arguments.length > 1) throw 'too many arguments';
4891         return (function(){
4892             try {
4893                 return (function(){
4894                     return l25.function(l66.function(v350));
4895                 })();
4896             }
4897             catch (cf){
4898                 if (cf.type == 'block' && cf.id == 141)
4899                     return cf.value;
4900                 else
4901                     throw cf;
4902             }
4903         })();
4904
4905     }));
4906     return l167;
4907 })();
4908 var l168 = {name: "GET-TOPLEVEL-COMPILATIONS"};
4909 (function(){
4910     (l168).function = (function(v352){
4911         ((v352)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
4912         return v352;
4913     })((function (){
4914         if (arguments.length > 0) throw 'too many arguments';
4915         return (function(){
4916             try {
4917                 return (function(){
4918                     return l64.function(l83.function((function(){
4919                         var symbol = l167;
4920                         var func = symbol.function;
4921                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4922                         return func;
4923                     })(), (function(){
4924                         var symbol = l165;
4925                         var value = symbol.value;
4926                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4927                         return value;
4928                     })()));
4929                 })();
4930             }
4931             catch (cf){
4932                 if (cf.type == 'block' && cf.id == 142)
4933                     return cf.value;
4934                 else
4935                     throw cf;
4936             }
4937         })();
4938
4939     }));
4940     return l168;
4941 })();
4942 var l169 = {name: "%COMPILE-DEFMACRO"};
4943 var l170 = {name: "MACRO"};
4944 (function(){
4945     (l169).function = (function(v355){
4946         ((v355)["fname"] = "%COMPILE-DEFMACRO");
4947         return v355;
4948     })((function (v353,v354){
4949         if (arguments.length < 2) throw 'too few arguments';
4950         if (arguments.length > 2) throw 'too many arguments';
4951         return (function(){
4952             try {
4953                 return (function(){
4954                     l166.function((function(){
4955                         var symbol = l119;
4956                         var func = symbol.function;
4957                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4958                         return func;
4959                     })()(l62.function(l44.function(l138), l44.function(v353))));
4960                     return l154.function(l144.function(v353, l170, v354), (function(){
4961                         var symbol = l159;
4962                         var value = symbol.value;
4963                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4964                         return value;
4965                     })(), l97);
4966                 })();
4967             }
4968             catch (cf){
4969                 if (cf.type == 'block' && cf.id == 143)
4970                     return cf.value;
4971                 else
4972                     throw cf;
4973             }
4974         })();
4975
4976     }));
4977     return l169;
4978 })();
4979 var l171 = {name: "GLOBAL-BINDING"};
4980 (function(){
4981     (l171).function = (function(v361){
4982         ((v361)["fname"] = "GLOBAL-BINDING");
4983         return v361;
4984     })((function (v356,v357,v358){
4985         if (arguments.length < 3) throw 'too few arguments';
4986         if (arguments.length > 3) throw 'too many arguments';
4987         return (function(){
4988             try {
4989                 return (function(){
4990                     return (function(v359){
4991                         return (v359 !== l3.value ? v359 : (function(v360){
4992                             l154.function(v360, (function(){
4993                                 var symbol = l159;
4994                                 var value = symbol.value;
4995                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4996                                 return value;
4997                             })(), v358);
4998                             return v360;
4999                         })(l144.function(v356, v357, l3.value)));
5000                     })(l158.function(v356, (function(){
5001                         var symbol = l159;
5002                         var value = symbol.value;
5003                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5004                         return value;
5005                     })(), v358));
5006                 })();
5007             }
5008             catch (cf){
5009                 if (cf.type == 'block' && cf.id == 144)
5010                     return cf.value;
5011                 else
5012                     throw cf;
5013             }
5014         })();
5015
5016     }));
5017     return l171;
5018 })();
5019 var l172 = {name: "CLAIMP"};
5020 (function(){
5021     (l172).function = (function(v366){
5022         ((v366)["fname"] = "CLAIMP");
5023         return v366;
5024     })((function (v362,v363,v364){
5025         if (arguments.length < 3) throw 'too few arguments';
5026         if (arguments.length > 3) throw 'too many arguments';
5027         return (function(){
5028             try {
5029                 return (function(){
5030                     return (function(v365){
5031                         return (v365 !== l3.value ? l81.function(v364, l148.function(v365)) : l3.value);
5032                     })(l158.function(v362, (function(){
5033                         var symbol = l159;
5034                         var value = symbol.value;
5035                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5036                         return value;
5037                     })(), v363));
5038                 })();
5039             }
5040             catch (cf){
5041                 if (cf.type == 'block' && cf.id == 145)
5042                     return cf.value;
5043                 else
5044                     throw cf;
5045             }
5046         })();
5047
5048     }));
5049     return l172;
5050 })();
5051 var l173 = {name: "!PROCLAIM"};
5052 var l174 = {name: "NOTINLINE"};
5053 var l175 = {name: "CONSTANT"};
5054 var l176 = {name: "NON-OVERRIDABLE"};
5055 (function(){
5056     (l173).function = (function(v378){
5057         ((v378)["fname"] = "!PROCLAIM");
5058         return v378;
5059     })((function (v367){
5060         if (arguments.length < 1) throw 'too few arguments';
5061         if (arguments.length > 1) throw 'too many arguments';
5062         return (function(){
5063             try {
5064                 return (function(){
5065                     return (function(v368){
5066                         return (l27.function(v368, l174) !== l3.value ? (function(){
5067                             return (function(){
5068                                 try {
5069                                     return (function(){
5070                                         return (function(v369,v370){
5071                                             (function(){
5072                                                 while(v369 !== l3.value){
5073                                                     v370 = (function(){
5074                                                         var tmp = v369;
5075                                                         return tmp === l3.value? l3.value: tmp.car;
5076                                                     })();
5077                                                     (function(){
5078                                                         (function(v371){
5079                                                             return l151.function(l174, v371);
5080                                                         })(l171.function(v370, l97, l97));
5081                                                         return l3.value;
5082                                                     })();
5083                                                     v369 = (function(){
5084                                                         var tmp = v369;
5085                                                         return tmp === l3.value? l3.value: tmp.cdr;
5086                                                     })();
5087                                                 }return l3.value;
5088                                             })();
5089                                             return l3.value;
5090                                         })((function(){
5091                                             var tmp = v367;
5092                                             return tmp === l3.value? l3.value: tmp.cdr;
5093                                         })(),l3.value);
5094                                     })();
5095                                 }
5096                                 catch (cf){
5097                                     if (cf.type == 'block' && cf.id == 147)
5098                                         return cf.value;
5099                                     else
5100                                         throw cf;
5101                                 }
5102                             })();
5103                         })() : (l27.function(v368, l175) !== l3.value ? (function(){
5104                             return (function(){
5105                                 try {
5106                                     return (function(){
5107                                         return (function(v372,v373){
5108                                             (function(){
5109                                                 while(v372 !== l3.value){
5110                                                     v373 = (function(){
5111                                                         var tmp = v372;
5112                                                         return tmp === l3.value? l3.value: tmp.car;
5113                                                     })();
5114                                                     (function(){
5115                                                         (function(v374){
5116                                                             return l151.function(l175, v374);
5117                                                         })(l171.function(v373, l98, l98));
5118                                                         return l3.value;
5119                                                     })();
5120                                                     v372 = (function(){
5121                                                         var tmp = v372;
5122                                                         return tmp === l3.value? l3.value: tmp.cdr;
5123                                                     })();
5124                                                 }return l3.value;
5125                                             })();
5126                                             return l3.value;
5127                                         })((function(){
5128                                             var tmp = v367;
5129                                             return tmp === l3.value? l3.value: tmp.cdr;
5130                                         })(),l3.value);
5131                                     })();
5132                                 }
5133                                 catch (cf){
5134                                     if (cf.type == 'block' && cf.id == 148)
5135                                         return cf.value;
5136                                     else
5137                                         throw cf;
5138                                 }
5139                             })();
5140                         })() : (l27.function(v368, l176) !== l3.value ? (function(){
5141                             return (function(){
5142                                 try {
5143                                     return (function(){
5144                                         return (function(v375,v376){
5145                                             (function(){
5146                                                 while(v375 !== l3.value){
5147                                                     v376 = (function(){
5148                                                         var tmp = v375;
5149                                                         return tmp === l3.value? l3.value: tmp.car;
5150                                                     })();
5151                                                     (function(){
5152                                                         (function(v377){
5153                                                             return l151.function(l176, v377);
5154                                                         })(l171.function(v376, l97, l97));
5155                                                         return l3.value;
5156                                                     })();
5157                                                     v375 = (function(){
5158                                                         var tmp = v375;
5159                                                         return tmp === l3.value? l3.value: tmp.cdr;
5160                                                     })();
5161                                                 }return l3.value;
5162                                             })();
5163                                             return l3.value;
5164                                         })((function(){
5165                                             var tmp = v367;
5166                                             return tmp === l3.value? l3.value: tmp.cdr;
5167                                         })(),l3.value);
5168                                     })();
5169                                 }
5170                                 catch (cf){
5171                                     if (cf.type == 'block' && cf.id == 149)
5172                                         return cf.value;
5173                                     else
5174                                         throw cf;
5175                                 }
5176                             })();
5177                         })() : l3.value)));
5178                     })((function(){
5179                         var tmp = v367;
5180                         return tmp === l3.value? l3.value: tmp.car;
5181                     })());
5182                 })();
5183             }
5184             catch (cf){
5185                 if (cf.type == 'block' && cf.id == 146)
5186                     return cf.value;
5187                 else
5188                     throw cf;
5189             }
5190         })();
5191
5192     }));
5193     return l173;
5194 })();
5195 var l177 = {name: "PROCLAIM"};
5196 (l177).function = (function(){
5197     var symbol = l173;
5198     var func = symbol.function;
5199     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5200     return func;
5201 })();
5202 var l178 = {name: "*COMPILATIONS*"};
5203 (function(){
5204     (((l178.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
5205         return (l178).value = l3.value;
5206     })());
5207     return l178;
5208 })();
5209 var l179 = {name: "DEFINE-COMPILATION"};
5210 l179;
5211 var l180 = {name: "IF"};
5212 (l178).value = ({car: l44.function(l180, (function (v379,v380,v381){
5213     if (arguments.length < 3) throw 'too few arguments';
5214     if (arguments.length > 3) throw 'too many arguments';
5215     return (function(){
5216         try {
5217             return (function(){
5218                 return l112.function("(", (function(){
5219                     var symbol = l119;
5220                     var func = symbol.function;
5221                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5222                     return func;
5223                 })()(v379), " !== ", (function(){
5224                     var symbol = l119;
5225                     var func = symbol.function;
5226                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5227                     return func;
5228                 })()(l3.value), " ? ", (function(){
5229                     var symbol = l119;
5230                     var func = symbol.function;
5231                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5232                     return func;
5233                 })()(v380), " : ", (function(){
5234                     var symbol = l119;
5235                     var func = symbol.function;
5236                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5237                     return func;
5238                 })()(v381), ")");
5239             })();
5240         }
5241         catch (cf){
5242             if (cf.type == 'block' && cf.id == 150)
5243                 return cf.value;
5244             else
5245                 throw cf;
5246         }
5247     })();
5248
5249 })), cdr: (function(){
5250     var symbol = l178;
5251     var value = symbol.value;
5252     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5253     return value;
5254 })()});
5255 var l181 = {name: "*LAMBDA-LIST-KEYWORDS*"};
5256 var l182 = {name: "&OPTIONAL"};
5257 var l183 = {name: "&REST"};
5258 var l184 = {car: l182, cdr: {car: l183, cdr: l3}};
5259 (function(){
5260     (((l181.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
5261         return (l181).value = l184;
5262     })());
5263     return l181;
5264 })();
5265 var l185 = {name: "LIST-UNTIL-KEYWORD"};
5266 (function(){
5267     (l185).function = (function(v384){
5268         ((v384)["fname"] = "LIST-UNTIL-KEYWORD");
5269         return v384;
5270     })((function (v382){
5271         if (arguments.length < 1) throw 'too few arguments';
5272         if (arguments.length > 1) throw 'too many arguments';
5273         return (function(){
5274             try {
5275                 return (function(){
5276                     return ((function(v383){
5277                         return (v383 !== l3.value ? v383 : l81.function((function(){
5278                             var tmp = v382;
5279                             return tmp === l3.value? l3.value: tmp.car;
5280                         })(), (function(){
5281                             var symbol = l181;
5282                             var value = symbol.value;
5283                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5284                             return value;
5285                         })()));
5286                     })(l11.function(v382)) !== l3.value ? l3.value : ({car: (function(){
5287                         var tmp = v382;
5288                         return tmp === l3.value? l3.value: tmp.car;
5289                     })(), cdr: l185.function((function(){
5290                         var tmp = v382;
5291                         return tmp === l3.value? l3.value: tmp.cdr;
5292                     })())}));
5293                 })();
5294             }
5295             catch (cf){
5296                 if (cf.type == 'block' && cf.id == 151)
5297                     return cf.value;
5298                 else
5299                     throw cf;
5300             }
5301         })();
5302
5303     }));
5304     return l185;
5305 })();
5306 var l186 = {name: "LAMBDA-LIST-REQUIRED-ARGUMENTS"};
5307 (function(){
5308     (l186).function = (function(v386){
5309         ((v386)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
5310         return v386;
5311     })((function (v385){
5312         if (arguments.length < 1) throw 'too few arguments';
5313         if (arguments.length > 1) throw 'too many arguments';
5314         return (function(){
5315             try {
5316                 return (function(){
5317                     return l185.function(v385);
5318                 })();
5319             }
5320             catch (cf){
5321                 if (cf.type == 'block' && cf.id == 152)
5322                     return cf.value;
5323                 else
5324                     throw cf;
5325             }
5326         })();
5327
5328     }));
5329     return l186;
5330 })();
5331 var l187 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"};
5332 (function(){
5333     (l187).function = (function(v388){
5334         ((v388)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
5335         return v388;
5336     })((function (v387){
5337         if (arguments.length < 1) throw 'too few arguments';
5338         if (arguments.length > 1) throw 'too many arguments';
5339         return (function(){
5340             try {
5341                 return (function(){
5342                     return l68.function((function(){
5343                         var symbol = l58;
5344                         var func = symbol.function;
5345                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5346                         return func;
5347                     })(), l185.function((function(){
5348                         var tmp = l81.function(l182, v387);
5349                         return tmp === l3.value? l3.value: tmp.cdr;
5350                     })()));
5351                 })();
5352             }
5353             catch (cf){
5354                 if (cf.type == 'block' && cf.id == 153)
5355                     return cf.value;
5356                 else
5357                     throw cf;
5358             }
5359         })();
5360
5361     }));
5362     return l187;
5363 })();
5364 var l188 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS"};
5365 (function(){
5366     (l188).function = (function(v390){
5367         ((v390)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
5368         return v390;
5369     })((function (v389){
5370         if (arguments.length < 1) throw 'too few arguments';
5371         if (arguments.length > 1) throw 'too many arguments';
5372         return (function(){
5373             try {
5374                 return (function(){
5375                     return l68.function((function(){
5376                         var symbol = l31;
5377                         var func = symbol.function;
5378                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5379                         return func;
5380                     })(), l187.function(v389));
5381                 })();
5382             }
5383             catch (cf){
5384                 if (cf.type == 'block' && cf.id == 154)
5385                     return cf.value;
5386                 else
5387                     throw cf;
5388             }
5389         })();
5390
5391     }));
5392     return l188;
5393 })();
5394 var l189 = {name: "LAMBDA-LIST-REST-ARGUMENT"};
5395 (function(){
5396     (l189).function = (function(v393){
5397         ((v393)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
5398         return v393;
5399     })((function (v391){
5400         if (arguments.length < 1) throw 'too few arguments';
5401         if (arguments.length > 1) throw 'too many arguments';
5402         return (function(){
5403             try {
5404                 return (function(){
5405                     return (function(v392){
5406                         ((function(){
5407                             var tmp = v392;
5408                             return tmp === l3.value? l3.value: tmp.cdr;
5409                         })() !== l3.value ? (function(){
5410                             return (function(){
5411                                 throw "Bad lambda-list";
5412                             })();
5413                         })() : l3.value);
5414                         return (function(){
5415                             var tmp = v392;
5416                             return tmp === l3.value? l3.value: tmp.car;
5417                         })();
5418                     })(l185.function((function(){
5419                         var tmp = l81.function(l183, v391);
5420                         return tmp === l3.value? l3.value: tmp.cdr;
5421                     })()));
5422                 })();
5423             }
5424             catch (cf){
5425                 if (cf.type == 'block' && cf.id == 155)
5426                     return cf.value;
5427                 else
5428                     throw cf;
5429             }
5430         })();
5431
5432     }));
5433     return l189;
5434 })();
5435 var l190 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
5436 (function(){
5437     (l190).function = (function(v396){
5438         ((v396)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
5439         return v396;
5440     })((function (v395){
5441         if (arguments.length < 1) throw 'too few arguments';
5442         var v394= l3.value;
5443         for (var i = arguments.length-1; i>=1; i--)
5444             v394 = {car: arguments[i], cdr:
5445         v394};
5446         return (function(){
5447             try {
5448                 return (function(){
5449                     return (v395 !== l3.value ? l112.function("(function(){", (function(){
5450                         var symbol = l111;
5451                         var value = symbol.value;
5452                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5453                         return value;
5454                     })(), l117.function("var func = ", l114.function(v394), ";", (function(){
5455                         var symbol = l111;
5456                         var value = symbol.value;
5457                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5458                         return value;
5459                     })(), "func.docstring = '", v395, "';", (function(){
5460                         var symbol = l111;
5461                         var value = symbol.value;
5462                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5463                         return value;
5464                     })(), "return func;", (function(){
5465                         var symbol = l111;
5466                         var value = symbol.value;
5467                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5468                         return value;
5469                     })()), "})()") : l114.function(v394));
5470                 })();
5471             }
5472             catch (cf){
5473                 if (cf.type == 'block' && cf.id == 156)
5474                     return cf.value;
5475                 else
5476                     throw cf;
5477             }
5478         })();
5479
5480     }));
5481     return l190;
5482 })();
5483 var l191 = {name: "LAMBDA"};
5484 var l192 = {name: "LS-COMPILE-BLOCK"};
5485 (l178).value = ({car: l44.function(l191, (function (v398){
5486     if (arguments.length < 1) throw 'too few arguments';
5487     var v397= l3.value;
5488     for (var i = arguments.length-1; i>=1; i--)
5489         v397 = {car: arguments[i], cdr:
5490     v397};
5491     return (function(){
5492         try {
5493             return (function(){
5494                 return (function(v399,v400,v401,v402){
5495                     ((((typeof((function(){
5496                         var tmp = v397;
5497                         return tmp === l3.value? l3.value: tmp.car;
5498                     })()) == "string")?l4.value: l3.value) !== l3.value ? l28.function(l11.function((function(){
5499                         var tmp = v397;
5500                         return tmp === l3.value? l3.value: tmp.cdr;
5501                     })())) : l3.value) !== l3.value ? (function(){
5502                         v402 = (function(){
5503                             var tmp = v397;
5504                             return tmp === l3.value? l3.value: tmp.car;
5505                         })();
5506                         return v397 = (function(){
5507                             var tmp = v397;
5508                             return tmp === l3.value? l3.value: tmp.cdr;
5509                         })();
5510                     })() : l3.value);
5511                     return (function(v403,v404,v405){
5512                         try {
5513                             var tmp;
5514                             tmp = l159.value;
5515                             l159.value = v405;
5516                             v405 = tmp;
5517                             return l190.function(v402, "(function (", l114.function(l68.function((function(){
5518                                 var symbol = l162;
5519                                 var func = symbol.function;
5520                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5521                                 return func;
5522                             })(), l62.function(v399, v400)), ","), "){", (function(){
5523                                 var symbol = l111;
5524                                 var value = symbol.value;
5525                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5526                                 return value;
5527                             })(), l117.function((v399 !== l3.value ? l112.function("if (arguments.length < ", l16.function(v403), ") throw 'too few arguments';", (function(){
5528                                 var symbol = l111;
5529                                 var value = symbol.value;
5530                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5531                                 return value;
5532                             })()) : ""), (l28.function(v401) !== l3.value ? l112.function("if (arguments.length > ", l16.function((function(){
5533                                 var x = v403;
5534                                 var y = v404;
5535                                 if (typeof x != 'number')
5536                                     throw 'The value ' + x + ' is not a type number.';
5537                                 if (typeof y != 'number')
5538                                     throw 'The value ' + y + ' is not a type number.';
5539                                 return x+y;
5540                             })()), ") throw 'too many arguments';", (function(){
5541                                 var symbol = l111;
5542                                 var value = symbol.value;
5543                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5544                                 return value;
5545                             })()) : ""), (v400 !== l3.value ? l112.function("switch(arguments.length){", (function(){
5546                                 var symbol = l111;
5547                                 var value = symbol.value;
5548                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5549                                 return value;
5550                             })(), (function(v406,v407,v408){
5551                                 return (function(){
5552                                     (function(){
5553                                         try {
5554                                             return (function(){
5555                                                 return (function(){
5556                                                     while(((function(){
5557                                                         var x = v408;
5558                                                         var y = v404;
5559                                                         if (typeof x != 'number')
5560                                                             throw 'The value ' + x + ' is not a type number.';
5561                                                         if (typeof y != 'number')
5562                                                             throw 'The value ' + y + ' is not a type number.';
5563                                                         return x<y;
5564                                                     })()?l4.value: l3.value) !== l3.value){
5565                                                         (function(v409){
5566                                                             v407 = ({car: l112.function("case ", l16.function((function(){
5567                                                                 var x = v408;
5568                                                                 var y = v403;
5569                                                                 if (typeof x != 'number')
5570                                                                     throw 'The value ' + x + ' is not a type number.';
5571                                                                 if (typeof y != 'number')
5572                                                                     throw 'The value ' + y + ' is not a type number.';
5573                                                                 return x+y;
5574                                                             })()), ":", (function(){
5575                                                                 var symbol = l111;
5576                                                                 var value = symbol.value;
5577                                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5578                                                                 return value;
5579                                                             })(), l162.function((function(){
5580                                                                 var tmp = v409;
5581                                                                 return tmp === l3.value? l3.value: tmp.car;
5582                                                             })()), "=", (function(){
5583                                                                 var symbol = l119;
5584                                                                 var func = symbol.function;
5585                                                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5586                                                                 return func;
5587                                                             })()(l34.function(v409)), ";", (function(){
5588                                                                 var symbol = l111;
5589                                                                 var value = symbol.value;
5590                                                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5591                                                                 return value;
5592                                                             })()), cdr: v407});
5593                                                             return v408 = (function(){
5594                                                                 var x = v408;
5595                                                                 var y = 1;
5596                                                                 if (typeof x != 'number')
5597                                                                     throw 'The value ' + x + ' is not a type number.';
5598                                                                 if (typeof y != 'number')
5599                                                                     throw 'The value ' + y + ' is not a type number.';
5600                                                                 return x+y;
5601                                                             })();
5602                                                         })(l78.function(v408, v406));
5603                                                     }return l3.value;
5604                                                 })();
5605                                             })();
5606                                         }
5607                                         catch (cf){
5608                                             if (cf.type == 'block' && cf.id == 158)
5609                                                 return cf.value;
5610                                             else
5611                                                 throw cf;
5612                                         }
5613                                     })();
5614                                     v407 = ({car: l112.function("default: break;", (function(){
5615                                         var symbol = l111;
5616                                         var value = symbol.value;
5617                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5618                                         return value;
5619                                     })()), cdr: v407});
5620                                     return l114.function(l64.function(v407));
5621                                 })();
5622                             })(l187.function(v398),l3.value,0), "}", (function(){
5623                                 var symbol = l111;
5624                                 var value = symbol.value;
5625                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5626                                 return value;
5627                             })()) : ""), (v401 !== l3.value ? (function(v410){
5628                                 return l112.function("var ", v410, "= ", (function(){
5629                                     var symbol = l119;
5630                                     var func = symbol.function;
5631                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5632                                     return func;
5633                                 })()(l3.value), ";", (function(){
5634                                     var symbol = l111;
5635                                     var value = symbol.value;
5636                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5637                                     return value;
5638                                 })(), "for (var i = arguments.length-1; i>=", l16.function((function(){
5639                                     var x = v403;
5640                                     var y = v404;
5641                                     if (typeof x != 'number')
5642                                         throw 'The value ' + x + ' is not a type number.';
5643                                     if (typeof y != 'number')
5644                                         throw 'The value ' + y + ' is not a type number.';
5645                                     return x+y;
5646                                 })()), "; i--)", (function(){
5647                                     var symbol = l111;
5648                                     var value = symbol.value;
5649                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5650                                     return value;
5651                                 })(), l117.function(v410, " = ", "{car: arguments[i], cdr: "), v410, "};", (function(){
5652                                     var symbol = l111;
5653                                     var value = symbol.value;
5654                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5655                                     return value;
5656                                 })());
5657                             })(l162.function(v401)) : ""), (function(){
5658                                 var symbol = l192;
5659                                 var func = symbol.function;
5660                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5661                                 return func;
5662                             })()(v397, l4.value)), (function(){
5663                                 var symbol = l111;
5664                                 var value = symbol.value;
5665                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5666                                 return value;
5667                             })(), "})");
5668                         }
5669                         finally {
5670                             l159.value = v405;
5671                         }
5672                     })(l66.function(v399),l66.function(v400),l163.function(l62.function(l58.function(v401), v399, v400)));
5673                 })(l186.function(v398),l188.function(v398),l189.function(v398),l3.value);
5674             })();
5675         }
5676         catch (cf){
5677             if (cf.type == 'block' && cf.id == 157)
5678                 return cf.value;
5679             else
5680                 throw cf;
5681         }
5682     })();
5683
5684 })), cdr: (function(){
5685     var symbol = l178;
5686     var value = symbol.value;
5687     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5688     return value;
5689 })()});
5690 var l193 = {name: "SETQ"};
5691 var l194 = {name: "SET"};
5692 (l178).value = ({car: l44.function(l193, (function (v411,v412){
5693     if (arguments.length < 2) throw 'too few arguments';
5694     if (arguments.length > 2) throw 'too many arguments';
5695     return (function(){
5696         try {
5697             return (function(){
5698                 return (function(v413){
5699                     return (((l146.function(v413) === l164)?l4.value: l3.value) !== l3.value ? l112.function(l147.function(v413), " = ", (function(){
5700                         var symbol = l119;
5701                         var func = symbol.function;
5702                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5703                         return func;
5704                     })()(v412)) : (function(){
5705                         var symbol = l119;
5706                         var func = symbol.function;
5707                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5708                         return func;
5709                     })()(l62.function(l44.function(l194), l44.function(l62.function(l44.function(l138), l44.function(v411))), l44.function(v412))));
5710                 })(l158.function(v411, (function(){
5711                     var symbol = l159;
5712                     var value = symbol.value;
5713                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5714                     return value;
5715                 })(), l98));
5716             })();
5717         }
5718         catch (cf){
5719             if (cf.type == 'block' && cf.id == 159)
5720                 return cf.value;
5721             else
5722                 throw cf;
5723         }
5724     })();
5725
5726 })), cdr: (function(){
5727     var symbol = l178;
5728     var value = symbol.value;
5729     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5730     return value;
5731 })()});
5732 var l195 = {name: "JS-VREF"};
5733 (l178).value = ({car: l44.function(l195, (function (v414){
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 v414;
5740             })();
5741         }
5742         catch (cf){
5743             if (cf.type == 'block' && cf.id == 160)
5744                 return cf.value;
5745             else
5746                 throw cf;
5747         }
5748     })();
5749
5750 })), cdr: (function(){
5751     var symbol = l178;
5752     var value = symbol.value;
5753     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5754     return value;
5755 })()});
5756 var l196 = {name: "JS-VSET"};
5757 (l178).value = ({car: l44.function(l196, (function (v415,v416){
5758     if (arguments.length < 2) throw 'too few arguments';
5759     if (arguments.length > 2) throw 'too many arguments';
5760     return (function(){
5761         try {
5762             return (function(){
5763                 return l112.function("(", v415, " = ", (function(){
5764                     var symbol = l119;
5765                     var func = symbol.function;
5766                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5767                     return func;
5768                 })()(v416), ")");
5769             })();
5770         }
5771         catch (cf){
5772             if (cf.type == 'block' && cf.id == 161)
5773                 return cf.value;
5774             else
5775                 throw cf;
5776         }
5777     })();
5778
5779 })), cdr: (function(){
5780     var symbol = l178;
5781     var value = symbol.value;
5782     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5783     return value;
5784 })()});
5785 (function(){
5786     (l122).function = (function(v423){
5787         ((v423)["fname"] = "ESCAPE-STRING");
5788         return v423;
5789     })((function (v417){
5790         if (arguments.length < 1) throw 'too few arguments';
5791         if (arguments.length > 1) throw 'too many arguments';
5792         return (function(){
5793             try {
5794                 return (function(){
5795                     return (function(v418,v419,v420){
5796                         (function(){
5797                             try {
5798                                 return (function(){
5799                                     return (function(){
5800                                         while(((function(){
5801                                             var x = v419;
5802                                             var y = v420;
5803                                             if (typeof x != 'number')
5804                                                 throw 'The value ' + x + ' is not a type number.';
5805                                             if (typeof y != 'number')
5806                                                 throw 'The value ' + y + ' is not a type number.';
5807                                             return x<y;
5808                                         })()?l4.value: l3.value) !== l3.value){
5809                                             (function(v421){
5810                                                 ((function(v422){
5811                                                     return (v422 !== l3.value ? v422 : l73.function(v421, 92));
5812                                                 })(l73.function(v421, 34)) !== l3.value ? (function(){
5813                                                     return v418 = l112.function(v418, "\\");
5814                                                 })() : l3.value);
5815                                                 (l73.function(v421, 10) !== l3.value ? (function(){
5816                                                     v418 = l112.function(v418, "\\");
5817                                                     return v421 = 110;
5818                                                 })() : l3.value);
5819                                                 return v418 = l112.function(v418, l91.function(v421));
5820                                             })((function(){
5821                                                 var string = v417;
5822                                                 var index = v419;
5823                                                 if (typeof string != 'string')
5824                                                     throw 'The value ' + string + ' is not a type string.';
5825                                                 if (typeof index != 'number')
5826                                                     throw 'The value ' + index + ' is not a type number.';
5827                                                 return string.charCodeAt(index);
5828                                             })());
5829                                             v419 = (function(){
5830                                                 var x = v419;
5831                                                 var y = 1;
5832                                                 if (typeof x != 'number')
5833                                                     throw 'The value ' + x + ' is not a type number.';
5834                                                 if (typeof y != 'number')
5835                                                     throw 'The value ' + y + ' is not a type number.';
5836                                                 return x+y;
5837                                             })();
5838                                         }return l3.value;
5839                                     })();
5840                                 })();
5841                             }
5842                             catch (cf){
5843                                 if (cf.type == 'block' && cf.id == 163)
5844                                     return cf.value;
5845                                 else
5846                                     throw cf;
5847                             }
5848                         })();
5849                         return v418;
5850                     })("",0,l66.function(v417));
5851                 })();
5852             }
5853             catch (cf){
5854                 if (cf.type == 'block' && cf.id == 162)
5855                     return cf.value;
5856                 else
5857                     throw cf;
5858             }
5859         })();
5860
5861     }));
5862     return l122;
5863 })();
5864 var l197 = {name: "*LITERAL-SYMBOLS*"};
5865 (function(){
5866     (((l197.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
5867         return (l197).value = l3.value;
5868     })());
5869     return l197;
5870 })();
5871 var l198 = {name: "*LITERAL-COUNTER*"};
5872 (function(){
5873     (((l198.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
5874         return (l198).value = 0;
5875     })());
5876     return l198;
5877 })();
5878 var l199 = {name: "GENLIT"};
5879 (function(){
5880     (l199).function = (function(v424){
5881         ((v424)["fname"] = "GENLIT");
5882         return v424;
5883     })((function (){
5884         if (arguments.length > 0) throw 'too many arguments';
5885         return (function(){
5886             try {
5887                 return (function(){
5888                     return l112.function("l", l16.function((l198).value = (function(){
5889                         var x = (function(){
5890                             var symbol = l198;
5891                             var value = symbol.value;
5892                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5893                             return value;
5894                         })();
5895                         var y = 1;
5896                         if (typeof x != 'number')
5897                             throw 'The value ' + x + ' is not a type number.';
5898                         if (typeof y != 'number')
5899                             throw 'The value ' + y + ' is not a type number.';
5900                         return x+y;
5901                     })()));
5902                 })();
5903             }
5904             catch (cf){
5905                 if (cf.type == 'block' && cf.id == 164)
5906                     return cf.value;
5907                 else
5908                     throw cf;
5909             }
5910         })();
5911
5912     }));
5913     return l199;
5914 })();
5915 var l200 = {name: "LITERAL"};
5916 (function(){
5917     (l200).function = (function(v432){
5918         ((v432)["fname"] = "LITERAL");
5919         return v432;
5920     })((function (v425,v426){
5921         if (arguments.length < 1) throw 'too few arguments';
5922         if (arguments.length > 2) throw 'too many arguments';
5923         switch(arguments.length){
5924         case 1:
5925         v426=l3.value;
5926         default: break;
5927         }
5928         return (function(){
5929             try {
5930                 return (function(){
5931                     return (l74.function(v425) !== l3.value ? (function(){
5932                         return l16.function(v425);
5933                     })() : (((typeof(v425) == "string")?l4.value: l3.value) !== l3.value ? (function(){
5934                         return l112.function("\"", l122.function(v425), "\"");
5935                     })() : (((function(){
5936                         var tmp = v425;
5937                         return (typeof tmp == 'object' && 'name' in tmp);
5938                     })()?l4.value: l3.value) !== l3.value ? (function(){
5939                         return (function(v427){
5940                             return (v427 !== l3.value ? v427 : (function(v428,v429){
5941                                 (l197).value = ({car: ({car: v425, cdr: v428}), cdr: (function(){
5942                                     var symbol = l197;
5943                                     var value = symbol.value;
5944                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5945                                     return value;
5946                                 })()});
5947                                 l166.function(l112.function("var ", v428, " = ", v429));
5948                                 return v428;
5949                             })(l199.function(),(function(){
5950                                 var symbol = l119;
5951                                 var func = symbol.function;
5952                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5953                                 return func;
5954                             })()(l62.function(l44.function(l108), l44.function((v425).name)))));
5955                         })((function(){
5956                             var tmp = l90.function(v425, (function(){
5957                                 var symbol = l197;
5958                                 var value = symbol.value;
5959                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5960                                 return value;
5961                             })());
5962                             return tmp === l3.value? l3.value: tmp.cdr;
5963                         })());
5964                     })() : (((function(){
5965                         var tmp = v425;
5966                         return (typeof tmp == 'object' && 'car' in tmp);
5967                     })()?l4.value: l3.value) !== l3.value ? (function(){
5968                         return (function(v430){
5969                             return (v426 !== l3.value ? v430 : (function(v431){
5970                                 l166.function(l112.function("var ", v431, " = ", v430));
5971                                 return v431;
5972                             })(l199.function()));
5973                         })(l112.function("{car: ", l200.function((function(){
5974                             var tmp = v425;
5975                             return tmp === l3.value? l3.value: tmp.car;
5976                         })(), l4.value), ", ", "cdr: ", l200.function((function(){
5977                             var tmp = v425;
5978                             return tmp === l3.value? l3.value: tmp.cdr;
5979                         })(), l4.value), "}"));
5980                     })() : l3.value))));
5981                 })();
5982             }
5983             catch (cf){
5984                 if (cf.type == 'block' && cf.id == 165)
5985                     return cf.value;
5986                 else
5987                     throw cf;
5988             }
5989         })();
5990
5991     }));
5992     return l200;
5993 })();
5994 (l178).value = ({car: l44.function(l138, (function (v433){
5995     if (arguments.length < 1) throw 'too few arguments';
5996     if (arguments.length > 1) throw 'too many arguments';
5997     return (function(){
5998         try {
5999             return (function(){
6000                 return l200.function(v433);
6001             })();
6002         }
6003         catch (cf){
6004             if (cf.type == 'block' && cf.id == 166)
6005                 return cf.value;
6006             else
6007                 throw cf;
6008         }
6009     })();
6010
6011 })), cdr: (function(){
6012     var symbol = l178;
6013     var value = symbol.value;
6014     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6015     return value;
6016 })()});
6017 var l201 = {name: "%WHILE"};
6018 (l178).value = ({car: l44.function(l201, (function (v435){
6019     if (arguments.length < 1) throw 'too few arguments';
6020     var v434= l3.value;
6021     for (var i = arguments.length-1; i>=1; i--)
6022         v434 = {car: arguments[i], cdr:
6023     v434};
6024     return (function(){
6025         try {
6026             return (function(){
6027                 return l112.function("(function(){", (function(){
6028                     var symbol = l111;
6029                     var value = symbol.value;
6030                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6031                     return value;
6032                 })(), l117.function("while(", (function(){
6033                     var symbol = l119;
6034                     var func = symbol.function;
6035                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6036                     return func;
6037                 })()(v435), " !== ", (function(){
6038                     var symbol = l119;
6039                     var func = symbol.function;
6040                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6041                     return func;
6042                 })()(l3.value), "){", (function(){
6043                     var symbol = l111;
6044                     var value = symbol.value;
6045                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6046                     return value;
6047                 })(), l117.function((function(){
6048                     var symbol = l192;
6049                     var func = symbol.function;
6050                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6051                     return func;
6052                 })()(v434)), "}", "return ", (function(){
6053                     var symbol = l119;
6054                     var func = symbol.function;
6055                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6056                     return func;
6057                 })()(l3.value), ";", (function(){
6058                     var symbol = l111;
6059                     var value = symbol.value;
6060                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6061                     return value;
6062                 })()), "})()");
6063             })();
6064         }
6065         catch (cf){
6066             if (cf.type == 'block' && cf.id == 167)
6067                 return cf.value;
6068             else
6069                 throw cf;
6070         }
6071     })();
6072
6073 })), cdr: (function(){
6074     var symbol = l178;
6075     var value = symbol.value;
6076     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6077     return value;
6078 })()});
6079 var l202 = {name: "SYMBOL-FUNCTION"};
6080 (l178).value = ({car: l44.function(l97, (function (v436){
6081     if (arguments.length < 1) throw 'too few arguments';
6082     if (arguments.length > 1) throw 'too many arguments';
6083     return (function(){
6084         try {
6085             return (function(){
6086                 return ((l59.function(v436) !== l3.value ? (((function(){
6087                     var tmp = v436;
6088                     return tmp === l3.value? l3.value: tmp.car;
6089                 })() === l191)?l4.value: l3.value) : l3.value) !== l3.value ? (function(){
6090                     return (function(){
6091                         var symbol = l119;
6092                         var func = symbol.function;
6093                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6094                         return func;
6095                     })()(v436);
6096                 })() : (((function(){
6097                     var tmp = v436;
6098                     return (typeof tmp == 'object' && 'name' in tmp);
6099                 })()?l4.value: l3.value) !== l3.value ? (function(){
6100                     return (function(){
6101                         var symbol = l119;
6102                         var func = symbol.function;
6103                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6104                         return func;
6105                     })()(l62.function(l44.function(l202), l44.function(l62.function(l44.function(l138), l44.function(v436)))));
6106                 })() : l3.value));
6107             })();
6108         }
6109         catch (cf){
6110             if (cf.type == 'block' && cf.id == 168)
6111                 return cf.value;
6112             else
6113                 throw cf;
6114         }
6115     })();
6116
6117 })), cdr: (function(){
6118     var symbol = l178;
6119     var value = symbol.value;
6120     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6121     return value;
6122 })()});
6123 var l203 = {name: "EVAL-WHEN-COMPILE"};
6124 var l204 = {name: "EVAL"};
6125 var l205 = {name: "PROGN"};
6126 (l178).value = ({car: l44.function(l203, (function (){
6127     var v437= l3.value;
6128     for (var i = arguments.length-1; i>=0; i--)
6129         v437 = {car: arguments[i], cdr:
6130     v437};
6131     return (function(){
6132         try {
6133             return (function(){
6134                 (function(){
6135                     var symbol = l204;
6136                     var func = symbol.function;
6137                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6138                     return func;
6139                 })()(({car: l205, cdr: v437}));
6140                 return l3.value;
6141             })();
6142         }
6143         catch (cf){
6144             if (cf.type == 'block' && cf.id == 169)
6145                 return cf.value;
6146             else
6147                 throw cf;
6148         }
6149     })();
6150
6151 })), cdr: (function(){
6152     var symbol = l178;
6153     var value = symbol.value;
6154     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6155     return value;
6156 })()});
6157 var l206 = {name: "DEFINE-TRANSFORMATION"};
6158 l206;
6159 (l178).value = ({car: l44.function(l205, (function (){
6160     var v438= l3.value;
6161     for (var i = arguments.length-1; i>=0; i--)
6162         v438 = {car: arguments[i], cdr:
6163     v438};
6164     return (function(){
6165         try {
6166             return (function(){
6167                 return l112.function("(function(){", (function(){
6168                     var symbol = l111;
6169                     var value = symbol.value;
6170                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6171                     return value;
6172                 })(), l117.function((function(){
6173                     var symbol = l192;
6174                     var func = symbol.function;
6175                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6176                     return func;
6177                 })()(v438, l4.value)), "})()");
6178             })();
6179         }
6180         catch (cf){
6181             if (cf.type == 'block' && cf.id == 170)
6182                 return cf.value;
6183             else
6184                 throw cf;
6185         }
6186     })();
6187
6188 })), cdr: (function(){
6189     var symbol = l178;
6190     var value = symbol.value;
6191     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6192     return value;
6193 })()});
6194 var l207 = {name: "DYNAMIC-BINDING-WRAPPER"};
6195 (function(){
6196     (l207).function = (function(v445){
6197         ((v445)["fname"] = "DYNAMIC-BINDING-WRAPPER");
6198         return v445;
6199     })((function (v439,v440){
6200         if (arguments.length < 2) throw 'too few arguments';
6201         if (arguments.length > 2) throw 'too many arguments';
6202         return (function(){
6203             try {
6204                 return (function(){
6205                     return (l11.function(v439) !== l3.value ? v440 : l112.function("try {", (function(){
6206                         var symbol = l111;
6207                         var value = symbol.value;
6208                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6209                         return value;
6210                     })(), l117.function("var tmp;", (function(){
6211                         var symbol = l111;
6212                         var value = symbol.value;
6213                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6214                         return value;
6215                     })(), l114.function(l68.function((function (v441){
6216                         if (arguments.length < 1) throw 'too few arguments';
6217                         if (arguments.length > 1) throw 'too many arguments';
6218                         return (function(v442){
6219                             return l112.function("tmp = ", v442, ".value;", (function(){
6220                                 var symbol = l111;
6221                                 var value = symbol.value;
6222                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6223                                 return value;
6224                             })(), v442, ".value = ", (function(){
6225                                 var tmp = v441;
6226                                 return tmp === l3.value? l3.value: tmp.cdr;
6227                             })(), ";", (function(){
6228                                 var symbol = l111;
6229                                 var value = symbol.value;
6230                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6231                                 return value;
6232                             })(), (function(){
6233                                 var tmp = v441;
6234                                 return tmp === l3.value? l3.value: tmp.cdr;
6235                             })(), " = tmp;", (function(){
6236                                 var symbol = l111;
6237                                 var value = symbol.value;
6238                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6239                                 return value;
6240                             })());
6241                         })((function(){
6242                             var symbol = l119;
6243                             var func = symbol.function;
6244                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6245                             return func;
6246                         })()(l62.function(l44.function(l138), l44.function((function(){
6247                             var tmp = v441;
6248                             return tmp === l3.value? l3.value: tmp.car;
6249                         })()))));
6250
6251                     }), v439)), v440), "}", (function(){
6252                         var symbol = l111;
6253                         var value = symbol.value;
6254                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6255                         return value;
6256                     })(), "finally {", (function(){
6257                         var symbol = l111;
6258                         var value = symbol.value;
6259                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6260                         return value;
6261                     })(), l117.function(l115.function(l68.function((function (v443){
6262                         if (arguments.length < 1) throw 'too few arguments';
6263                         if (arguments.length > 1) throw 'too many arguments';
6264                         return (function(v444){
6265                             return l112.function(v444, ".value", " = ", (function(){
6266                                 var tmp = v443;
6267                                 return tmp === l3.value? l3.value: tmp.cdr;
6268                             })());
6269                         })((function(){
6270                             var symbol = l119;
6271                             var func = symbol.function;
6272                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6273                             return func;
6274                         })()(l62.function(l44.function(l138), l44.function((function(){
6275                             var tmp = v443;
6276                             return tmp === l3.value? l3.value: tmp.car;
6277                         })()))));
6278
6279                     }), v439), l112.function(";", (function(){
6280                         var symbol = l111;
6281                         var value = symbol.value;
6282                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6283                         return value;
6284                     })()))), "}", (function(){
6285                         var symbol = l111;
6286                         var value = symbol.value;
6287                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6288                         return value;
6289                     })()));
6290                 })();
6291             }
6292             catch (cf){
6293                 if (cf.type == 'block' && cf.id == 171)
6294                     return cf.value;
6295                 else
6296                     throw cf;
6297             }
6298         })();
6299
6300     }));
6301     return l207;
6302 })();
6303 var l208 = {name: "LET"};
6304 (l178).value = ({car: l44.function(l208, (function (v447){
6305     if (arguments.length < 1) throw 'too few arguments';
6306     var v446= l3.value;
6307     for (var i = arguments.length-1; i>=1; i--)
6308         v446 = {car: arguments[i], cdr:
6309     v446};
6310     return (function(){
6311         try {
6312             return (function(){
6313                 return (function(v448){
6314                     return (function(v449,v450){
6315                         return (function(v451,v453,v452){
6316                             try {
6317                                 var tmp;
6318                                 tmp = l159.value;
6319                                 l159.value = v453;
6320                                 v453 = tmp;
6321                                 return l112.function("(function(", l114.function(l68.function((function (v454){
6322                                     if (arguments.length < 1) throw 'too few arguments';
6323                                     if (arguments.length > 1) throw 'too many arguments';
6324                                     return (((v454.value !== undefined)?l4.value: l3.value) !== l3.value ? (function(v455){
6325                                         v452 = ({car: ({car: v454, cdr: v455}), cdr: v452});
6326                                         return v455;
6327                                     })(l161.function(v454)) : l162.function(v454));
6328
6329                                 }), v449), ","), "){", (function(){
6330                                     var symbol = l111;
6331                                     var value = symbol.value;
6332                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6333                                     return value;
6334                                 })(), (function(v456){
6335                                     return l117.function(l207.function(v452, v456));
6336                                 })((function(){
6337                                     var symbol = l192;
6338                                     var func = symbol.function;
6339                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6340                                     return func;
6341                                 })()(v446, l4.value)), "})(", l114.function(v451, ","), ")");
6342                             }
6343                             finally {
6344                                 l159.value = v453;
6345                             }
6346                         })(l68.function((function(){
6347                             var symbol = l119;
6348                             var func = symbol.function;
6349                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6350                             return func;
6351                         })(), v450),l163.function(l83.function((function(){
6352                             var symbol = l17;
6353                             var func = symbol.function;
6354                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6355                             return func;
6356                         })(), v449)),l3.value);
6357                     })(l68.function((function(){
6358                         var symbol = l40;
6359                         var func = symbol.function;
6360                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6361                         return func;
6362                     })(), v448),l68.function((function(){
6363                         var symbol = l41;
6364                         var func = symbol.function;
6365                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6366                         return func;
6367                     })(), v448));
6368                 })(l68.function((function(){
6369                     var symbol = l58;
6370                     var func = symbol.function;
6371                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6372                     return func;
6373                 })(), v447));
6374             })();
6375         }
6376         catch (cf){
6377             if (cf.type == 'block' && cf.id == 172)
6378                 return cf.value;
6379             else
6380                 throw cf;
6381         }
6382     })();
6383
6384 })), cdr: (function(){
6385     var symbol = l178;
6386     var value = symbol.value;
6387     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6388     return value;
6389 })()});
6390 var l209 = {name: "*BLOCK-COUNTER*"};
6391 (function(){
6392     (((l209.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
6393         return (l209).value = 0;
6394     })());
6395     return l209;
6396 })();
6397 (l178).value = ({car: l44.function(l155, (function (v458){
6398     if (arguments.length < 1) throw 'too few arguments';
6399     var v457= l3.value;
6400     for (var i = arguments.length-1; i>=1; i--)
6401         v457 = {car: arguments[i], cdr:
6402     v457};
6403     return (function(){
6404         try {
6405             return (function(){
6406                 return (function(v459){
6407                     return (function(v460){
6408                         return l112.function("(function(){", (function(){
6409                             var symbol = l111;
6410                             var value = symbol.value;
6411                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6412                             return value;
6413                         })(), l117.function("try {", (function(){
6414                             var symbol = l111;
6415                             var value = symbol.value;
6416                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6417                             return value;
6418                         })(), (function(v461){
6419                             try {
6420                                 var tmp;
6421                                 tmp = l159.value;
6422                                 l159.value = v461;
6423                                 v461 = tmp;
6424                                 return l117.function("return ", (function(){
6425                                     var symbol = l119;
6426                                     var func = symbol.function;
6427                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6428                                     return func;
6429                                 })()(l62.function(l44.function(l205), v457)), ";", (function(){
6430                                     var symbol = l111;
6431                                     var value = symbol.value;
6432                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6433                                     return value;
6434                                 })());
6435                             }
6436                             finally {
6437                                 l159.value = v461;
6438                             }
6439                         })(l157.function(l44.function(v460), (function(){
6440                             var symbol = l159;
6441                             var value = symbol.value;
6442                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6443                             return value;
6444                         })(), l155)), "}", (function(){
6445                             var symbol = l111;
6446                             var value = symbol.value;
6447                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6448                             return value;
6449                         })(), "catch (cf){", (function(){
6450                             var symbol = l111;
6451                             var value = symbol.value;
6452                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6453                             return value;
6454                         })(), "    if (cf.type == 'block' && cf.id == ", v459, ")", (function(){
6455                             var symbol = l111;
6456                             var value = symbol.value;
6457                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6458                             return value;
6459                         })(), "        return cf.value;", (function(){
6460                             var symbol = l111;
6461                             var value = symbol.value;
6462                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6463                             return value;
6464                         })(), "    else", (function(){
6465                             var symbol = l111;
6466                             var value = symbol.value;
6467                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6468                             return value;
6469                         })(), "        throw cf;", (function(){
6470                             var symbol = l111;
6471                             var value = symbol.value;
6472                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6473                             return value;
6474                         })(), "}", (function(){
6475                             var symbol = l111;
6476                             var value = symbol.value;
6477                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6478                             return value;
6479                         })()), "})()");
6480                     })(l144.function(v458, l155, v459));
6481                 })(l16.function((l209).value = (function(){
6482                     var x = (function(){
6483                         var symbol = l209;
6484                         var value = symbol.value;
6485                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6486                         return value;
6487                     })();
6488                     var y = 1;
6489                     if (typeof x != 'number')
6490                         throw 'The value ' + x + ' is not a type number.';
6491                     if (typeof y != 'number')
6492                         throw 'The value ' + y + ' is not a type number.';
6493                     return x+y;
6494                 })()));
6495             })();
6496         }
6497         catch (cf){
6498             if (cf.type == 'block' && cf.id == 173)
6499                 return cf.value;
6500             else
6501                 throw cf;
6502         }
6503     })();
6504
6505 })), cdr: (function(){
6506     var symbol = l178;
6507     var value = symbol.value;
6508     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6509     return value;
6510 })()});
6511 var l210 = {name: "RETURN-FROM"};
6512 (l178).value = ({car: l44.function(l210, (function (v462,v463){
6513     if (arguments.length < 1) throw 'too few arguments';
6514     if (arguments.length > 2) throw 'too many arguments';
6515     switch(arguments.length){
6516     case 1:
6517     v463=l3.value;
6518     default: break;
6519     }
6520     return (function(){
6521         try {
6522             return (function(){
6523                 return (function(v464){
6524                     return (v464 !== l3.value ? l112.function("(function(){", (function(){
6525                         var symbol = l111;
6526                         var value = symbol.value;
6527                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6528                         return value;
6529                     })(), l117.function("throw ({", "type: 'block', ", "id: ", l147.function(v464), ", ", "value: ", (function(){
6530                         var symbol = l119;
6531                         var func = symbol.function;
6532                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6533                         return func;
6534                     })()(v463), ", ", "message: 'Return from unknown block ", (v462).name, ".'", "})"), "})()") : (function(){
6535                         throw l112.function("Unknown block `", (v462).name, "'.");
6536                     })());
6537                 })(l158.function(v462, (function(){
6538                     var symbol = l159;
6539                     var value = symbol.value;
6540                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6541                     return value;
6542                 })(), l155));
6543             })();
6544         }
6545         catch (cf){
6546             if (cf.type == 'block' && cf.id == 174)
6547                 return cf.value;
6548             else
6549                 throw cf;
6550         }
6551     })();
6552
6553 })), cdr: (function(){
6554     var symbol = l178;
6555     var value = symbol.value;
6556     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6557     return value;
6558 })()});
6559 var l211 = {name: "CATCH"};
6560 (l178).value = ({car: l44.function(l211, (function (v466){
6561     if (arguments.length < 1) throw 'too few arguments';
6562     var v465= l3.value;
6563     for (var i = arguments.length-1; i>=1; i--)
6564         v465 = {car: arguments[i], cdr:
6565     v465};
6566     return (function(){
6567         try {
6568             return (function(){
6569                 return l112.function("(function(){", (function(){
6570                     var symbol = l111;
6571                     var value = symbol.value;
6572                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6573                     return value;
6574                 })(), l117.function("var id = ", (function(){
6575                     var symbol = l119;
6576                     var func = symbol.function;
6577                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6578                     return func;
6579                 })()(v466), ";", (function(){
6580                     var symbol = l111;
6581                     var value = symbol.value;
6582                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6583                     return value;
6584                 })(), "try {", (function(){
6585                     var symbol = l111;
6586                     var value = symbol.value;
6587                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6588                     return value;
6589                 })(), l117.function("return ", (function(){
6590                     var symbol = l119;
6591                     var func = symbol.function;
6592                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6593                     return func;
6594                 })()(l62.function(l44.function(l205), v465)), ";", (function(){
6595                     var symbol = l111;
6596                     var value = symbol.value;
6597                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6598                     return value;
6599                 })()), "}", (function(){
6600                     var symbol = l111;
6601                     var value = symbol.value;
6602                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6603                     return value;
6604                 })(), "catch (cf){", (function(){
6605                     var symbol = l111;
6606                     var value = symbol.value;
6607                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6608                     return value;
6609                 })(), "    if (cf.type == 'catch' && cf.id == id)", (function(){
6610                     var symbol = l111;
6611                     var value = symbol.value;
6612                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6613                     return value;
6614                 })(), "        return cf.value;", (function(){
6615                     var symbol = l111;
6616                     var value = symbol.value;
6617                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6618                     return value;
6619                 })(), "    else", (function(){
6620                     var symbol = l111;
6621                     var value = symbol.value;
6622                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6623                     return value;
6624                 })(), "        throw cf;", (function(){
6625                     var symbol = l111;
6626                     var value = symbol.value;
6627                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6628                     return value;
6629                 })(), "}", (function(){
6630                     var symbol = l111;
6631                     var value = symbol.value;
6632                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6633                     return value;
6634                 })()), "})()");
6635             })();
6636         }
6637         catch (cf){
6638             if (cf.type == 'block' && cf.id == 175)
6639                 return cf.value;
6640             else
6641                 throw cf;
6642         }
6643     })();
6644
6645 })), cdr: (function(){
6646     var symbol = l178;
6647     var value = symbol.value;
6648     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6649     return value;
6650 })()});
6651 var l212 = {name: "THROW"};
6652 (l178).value = ({car: l44.function(l212, (function (v467,v468){
6653     if (arguments.length < 1) throw 'too few arguments';
6654     if (arguments.length > 2) throw 'too many arguments';
6655     switch(arguments.length){
6656     case 1:
6657     v468=l3.value;
6658     default: break;
6659     }
6660     return (function(){
6661         try {
6662             return (function(){
6663                 return l112.function("(function(){", (function(){
6664                     var symbol = l111;
6665                     var value = symbol.value;
6666                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6667                     return value;
6668                 })(), l117.function("throw ({", "type: 'catch', ", "id: ", (function(){
6669                     var symbol = l119;
6670                     var func = symbol.function;
6671                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6672                     return func;
6673                 })()(v467), ", ", "value: ", (function(){
6674                     var symbol = l119;
6675                     var func = symbol.function;
6676                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6677                     return func;
6678                 })()(v468), ", ", "message: 'Throw uncatched.'", "})"), "})()");
6679             })();
6680         }
6681         catch (cf){
6682             if (cf.type == 'block' && cf.id == 176)
6683                 return cf.value;
6684             else
6685                 throw cf;
6686         }
6687     })();
6688
6689 })), cdr: (function(){
6690     var symbol = l178;
6691     var value = symbol.value;
6692     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6693     return value;
6694 })()});
6695 var l213 = {name: "*TAGBODY-COUNTER*"};
6696 (function(){
6697     (((l213.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
6698         return (l213).value = 0;
6699     })());
6700     return l213;
6701 })();
6702 var l214 = {name: "*GO-TAG-COUNTER*"};
6703 (function(){
6704     (((l214.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
6705         return (l214).value = 0;
6706     })());
6707     return l214;
6708 })();
6709 var l215 = {name: "GO-TAG-P"};
6710 (function(){
6711     (l215).function = (function(v471){
6712         ((v471)["fname"] = "GO-TAG-P");
6713         return v471;
6714     })((function (v469){
6715         if (arguments.length < 1) throw 'too few arguments';
6716         if (arguments.length > 1) throw 'too many arguments';
6717         return (function(){
6718             try {
6719                 return (function(){
6720                     return (function(v470){
6721                         return (v470 !== l3.value ? v470 : ((function(){
6722                             var tmp = v469;
6723                             return (typeof tmp == 'object' && 'name' in tmp);
6724                         })()?l4.value: l3.value));
6725                     })(l74.function(v469));
6726                 })();
6727             }
6728             catch (cf){
6729                 if (cf.type == 'block' && cf.id == 177)
6730                     return cf.value;
6731                 else
6732                     throw cf;
6733             }
6734         })();
6735
6736     }));
6737     return l215;
6738 })();
6739 var l216 = {name: "DECLARE-TAGBODY-TAGS"};
6740 (function(){
6741     (l216).function = (function(v477){
6742         ((v477)["fname"] = "DECLARE-TAGBODY-TAGS");
6743         return v477;
6744     })((function (v472,v473){
6745         if (arguments.length < 2) throw 'too few arguments';
6746         if (arguments.length > 2) throw 'too many arguments';
6747         return (function(){
6748             try {
6749                 return (function(){
6750                     return (function(v476){
6751                         return l157.function(v476, (function(){
6752                             var symbol = l159;
6753                             var value = symbol.value;
6754                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6755                             return value;
6756                         })(), l156);
6757                     })(l68.function((function (v474){
6758                         if (arguments.length < 1) throw 'too few arguments';
6759                         if (arguments.length > 1) throw 'too many arguments';
6760                         return (function(v475){
6761                             return l144.function(v474, l156, l44.function(v472, v475));
6762                         })(l16.function((l214).value = (function(){
6763                             var x = (function(){
6764                                 var symbol = l214;
6765                                 var value = symbol.value;
6766                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6767                                 return value;
6768                             })();
6769                             var y = 1;
6770                             if (typeof x != 'number')
6771                                 throw 'The value ' + x + ' is not a type number.';
6772                             if (typeof y != 'number')
6773                                 throw 'The value ' + y + ' is not a type number.';
6774                             return x+y;
6775                         })()));
6776
6777                     }), l84.function((function(){
6778                         var symbol = l215;
6779                         var func = symbol.function;
6780                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6781                         return func;
6782                     })(), v473)));
6783                 })();
6784             }
6785             catch (cf){
6786                 if (cf.type == 'block' && cf.id == 178)
6787                     return cf.value;
6788                 else
6789                     throw cf;
6790             }
6791         })();
6792
6793     }));
6794     return l216;
6795 })();
6796 var l217 = {name: "TAGBODY"};
6797 (l178).value = ({car: l44.function(l217, (function (){
6798     var v478= l3.value;
6799     for (var i = arguments.length-1; i>=0; i--)
6800         v478 = {car: arguments[i], cdr:
6801     v478};
6802     return (function(){
6803         try {
6804             return (function(){
6805                 (l88.function((function(){
6806                     var symbol = l215;
6807                     var func = symbol.function;
6808                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6809                     return func;
6810                 })(), v478) !== l3.value ? l3.value : (function(){
6811                     return (function(){
6812                         throw ({type: 'block', id: 179, value: (function(){
6813                             var symbol = l119;
6814                             var func = symbol.function;
6815                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6816                             return func;
6817                         })()(l62.function(l44.function(l205), v478, l44.function(l3))), message: 'Return from unknown block TAGBODY.'})
6818                     })();
6819                 })());
6820                 (l215.function((function(){
6821                     var tmp = v478;
6822                     return tmp === l3.value? l3.value: tmp.car;
6823                 })()) !== l3.value ? l3.value : (function(){
6824                     return v478 = ({car: l15.function("START"), cdr: v478});
6825                 })());
6826                 return (function(v479){
6827                     return (function(v481,v480){
6828                         try {
6829                             var tmp;
6830                             tmp = l159.value;
6831                             l159.value = v481;
6832                             v481 = tmp;
6833                             (function(v482){
6834                                 return v480 = l41.function(l147.function(v482));
6835                             })(l158.function(l40.function(v478), (function(){
6836                                 var symbol = l159;
6837                                 var value = symbol.value;
6838                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6839                                 return value;
6840                             })(), l156));
6841                             return l112.function("(function(){", (function(){
6842                                 var symbol = l111;
6843                                 var value = symbol.value;
6844                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6845                                 return value;
6846                             })(), l117.function("var tagbody_", v479, " = ", v480, ";", (function(){
6847                                 var symbol = l111;
6848                                 var value = symbol.value;
6849                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6850                                 return value;
6851                             })(), "tbloop:", (function(){
6852                                 var symbol = l111;
6853                                 var value = symbol.value;
6854                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6855                                 return value;
6856                             })(), "while (true) {", (function(){
6857                                 var symbol = l111;
6858                                 var value = symbol.value;
6859                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6860                                 return value;
6861                             })(), l117.function("try {", (function(){
6862                                 var symbol = l111;
6863                                 var value = symbol.value;
6864                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6865                                 return value;
6866                             })(), l117.function((function(v483){
6867                                 return l112.function("switch(tagbody_", v479, "){", (function(){
6868                                     var symbol = l111;
6869                                     var value = symbol.value;
6870                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6871                                     return value;
6872                                 })(), "case ", v480, ":", (function(){
6873                                     var symbol = l111;
6874                                     var value = symbol.value;
6875                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6876                                     return value;
6877                                 })(), (function(){
6878                                     try {
6879                                         return (function(){
6880                                             return (function(v484,v485){
6881                                                 (function(){
6882                                                     while(v484 !== l3.value){
6883                                                         v485 = (function(){
6884                                                             var tmp = v484;
6885                                                             return tmp === l3.value? l3.value: tmp.car;
6886                                                         })();
6887                                                         (function(){
6888                                                             v483 = l112.function(v483, (function(){
6889                                                                 return (l28.function(l215.function(v485)) !== l3.value ? l117.function((function(){
6890                                                                     var symbol = l119;
6891                                                                     var func = symbol.function;
6892                                                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6893                                                                     return func;
6894                                                                 })()(v485), ";", (function(){
6895                                                                     var symbol = l111;
6896                                                                     var value = symbol.value;
6897                                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6898                                                                     return value;
6899                                                                 })()) : (function(v486){
6900                                                                     return l112.function("case ", l41.function(l147.function(v486)), ":", (function(){
6901                                                                         var symbol = l111;
6902                                                                         var value = symbol.value;
6903                                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6904                                                                         return value;
6905                                                                     })());
6906                                                                 })(l158.function(v485, (function(){
6907                                                                     var symbol = l159;
6908                                                                     var value = symbol.value;
6909                                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6910                                                                     return value;
6911                                                                 })(), l156)));
6912                                                             })());
6913                                                             return l3.value;
6914                                                         })();
6915                                                         v484 = (function(){
6916                                                             var tmp = v484;
6917                                                             return tmp === l3.value? l3.value: tmp.cdr;
6918                                                         })();
6919                                                     }return l3.value;
6920                                                 })();
6921                                                 return v483;
6922                                             })((function(){
6923                                                 var tmp = v478;
6924                                                 return tmp === l3.value? l3.value: tmp.cdr;
6925                                             })(),l3.value);
6926                                         })();
6927                                     }
6928                                     catch (cf){
6929                                         if (cf.type == 'block' && cf.id == 180)
6930                                             return cf.value;
6931                                         else
6932                                             throw cf;
6933                                     }
6934                                 })(), "default:", (function(){
6935                                     var symbol = l111;
6936                                     var value = symbol.value;
6937                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6938                                     return value;
6939                                 })(), "    break tbloop;", (function(){
6940                                     var symbol = l111;
6941                                     var value = symbol.value;
6942                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6943                                     return value;
6944                                 })(), "}", (function(){
6945                                     var symbol = l111;
6946                                     var value = symbol.value;
6947                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6948                                     return value;
6949                                 })());
6950                             })("")), "}", (function(){
6951                                 var symbol = l111;
6952                                 var value = symbol.value;
6953                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6954                                 return value;
6955                             })(), "catch (jump) {", (function(){
6956                                 var symbol = l111;
6957                                 var value = symbol.value;
6958                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6959                                 return value;
6960                             })(), "    if (jump.type == 'tagbody' && jump.id == ", v479, ")", (function(){
6961                                 var symbol = l111;
6962                                 var value = symbol.value;
6963                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6964                                 return value;
6965                             })(), "        tagbody_", v479, " = jump.label;", (function(){
6966                                 var symbol = l111;
6967                                 var value = symbol.value;
6968                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6969                                 return value;
6970                             })(), "    else", (function(){
6971                                 var symbol = l111;
6972                                 var value = symbol.value;
6973                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6974                                 return value;
6975                             })(), "        throw(jump);", (function(){
6976                                 var symbol = l111;
6977                                 var value = symbol.value;
6978                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6979                                 return value;
6980                             })(), "}", (function(){
6981                                 var symbol = l111;
6982                                 var value = symbol.value;
6983                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6984                                 return value;
6985                             })()), "}", (function(){
6986                                 var symbol = l111;
6987                                 var value = symbol.value;
6988                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6989                                 return value;
6990                             })(), "return ", (function(){
6991                                 var symbol = l119;
6992                                 var func = symbol.function;
6993                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6994                                 return func;
6995                             })()(l3.value), ";", (function(){
6996                                 var symbol = l111;
6997                                 var value = symbol.value;
6998                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6999                                 return value;
7000                             })()), "})()");
7001                         }
7002                         finally {
7003                             l159.value = v481;
7004                         }
7005                     })(l216.function(v479, v478),l3.value);
7006                 })(l16.function((function(){
7007                     var symbol = l213;
7008                     var value = symbol.value;
7009                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7010                     return value;
7011                 })()));
7012             })();
7013         }
7014         catch (cf){
7015             if (cf.type == 'block' && cf.id == 179)
7016                 return cf.value;
7017             else
7018                 throw cf;
7019         }
7020     })();
7021
7022 })), cdr: (function(){
7023     var symbol = l178;
7024     var value = symbol.value;
7025     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7026     return value;
7027 })()});
7028 var l218 = {name: "GO"};
7029 (l178).value = ({car: l44.function(l218, (function (v487){
7030     if (arguments.length < 1) throw 'too few arguments';
7031     if (arguments.length > 1) throw 'too many arguments';
7032     return (function(){
7033         try {
7034             return (function(){
7035                 return (function(v488,v489){
7036                     return (v488 !== l3.value ? l112.function("(function(){", (function(){
7037                         var symbol = l111;
7038                         var value = symbol.value;
7039                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7040                         return value;
7041                     })(), l117.function("throw ({", "type: 'tagbody', ", "id: ", l40.function(l147.function(v488)), ", ", "label: ", l41.function(l147.function(v488)), ", ", "message: 'Attempt to GO to non-existing tag ", v489, "'", "})", (function(){
7042                         var symbol = l111;
7043                         var value = symbol.value;
7044                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7045                         return value;
7046                     })()), "})()") : (function(){
7047                         throw l112.function("Unknown tag `", v489, "'.");
7048                     })());
7049                 })(l158.function(v487, (function(){
7050                     var symbol = l159;
7051                     var value = symbol.value;
7052                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7053                     return value;
7054                 })(), l156),(((function(){
7055                     var tmp = v487;
7056                     return (typeof tmp == 'object' && 'name' in tmp);
7057                 })()?l4.value: l3.value) !== l3.value ? (function(){
7058                     return (v487).name;
7059                 })() : (l74.function(v487) !== l3.value ? (function(){
7060                     return l16.function(v487);
7061                 })() : l3.value)));
7062             })();
7063         }
7064         catch (cf){
7065             if (cf.type == 'block' && cf.id == 181)
7066                 return cf.value;
7067             else
7068                 throw cf;
7069         }
7070     })();
7071
7072 })), cdr: (function(){
7073     var symbol = l178;
7074     var value = symbol.value;
7075     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7076     return value;
7077 })()});
7078 var l219 = {name: "UNWIND-PROTECT"};
7079 (l178).value = ({car: l44.function(l219, (function (v491){
7080     if (arguments.length < 1) throw 'too few arguments';
7081     var v490= l3.value;
7082     for (var i = arguments.length-1; i>=1; i--)
7083         v490 = {car: arguments[i], cdr:
7084     v490};
7085     return (function(){
7086         try {
7087             return (function(){
7088                 return l112.function("(function(){", (function(){
7089                     var symbol = l111;
7090                     var value = symbol.value;
7091                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7092                     return value;
7093                 })(), l117.function("var ret = ", (function(){
7094                     var symbol = l119;
7095                     var func = symbol.function;
7096                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7097                     return func;
7098                 })()(l3.value), ";", (function(){
7099                     var symbol = l111;
7100                     var value = symbol.value;
7101                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7102                     return value;
7103                 })(), "try {", (function(){
7104                     var symbol = l111;
7105                     var value = symbol.value;
7106                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7107                     return value;
7108                 })(), l117.function("ret = ", (function(){
7109                     var symbol = l119;
7110                     var func = symbol.function;
7111                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7112                     return func;
7113                 })()(v491), ";", (function(){
7114                     var symbol = l111;
7115                     var value = symbol.value;
7116                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7117                     return value;
7118                 })()), "} finally {", (function(){
7119                     var symbol = l111;
7120                     var value = symbol.value;
7121                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7122                     return value;
7123                 })(), l117.function((function(){
7124                     var symbol = l192;
7125                     var func = symbol.function;
7126                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7127                     return func;
7128                 })()(v490)), "}", (function(){
7129                     var symbol = l111;
7130                     var value = symbol.value;
7131                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7132                     return value;
7133                 })(), "return ret;", (function(){
7134                     var symbol = l111;
7135                     var value = symbol.value;
7136                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7137                     return value;
7138                 })()), "})()");
7139             })();
7140         }
7141         catch (cf){
7142             if (cf.type == 'block' && cf.id == 182)
7143                 return cf.value;
7144             else
7145                 throw cf;
7146         }
7147     })();
7148
7149 })), cdr: (function(){
7150     var symbol = l178;
7151     var value = symbol.value;
7152     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7153     return value;
7154 })()});
7155 var l220 = {name: "BACKQUOTE-EXPAND-1"};
7156 (function(){
7157     (l220).function = (function(v494){
7158         ((v494)["fname"] = "BACKQUOTE-EXPAND-1");
7159         return v494;
7160     })((function (v492){
7161         if (arguments.length < 1) throw 'too few arguments';
7162         if (arguments.length > 1) throw 'too many arguments';
7163         return (function(){
7164             try {
7165                 return (function(){
7166                     return (((function(){
7167                         var tmp = v492;
7168                         return (typeof tmp == 'object' && 'name' in tmp);
7169                     })()?l4.value: l3.value) !== l3.value ? (function(){
7170                         return l44.function(l138, v492);
7171                     })() : (l45.function(v492) !== l3.value ? (function(){
7172                         return v492;
7173                     })() : ((((function(){
7174                         var tmp = v492;
7175                         return tmp === l3.value? l3.value: tmp.car;
7176                     })() === l141)?l4.value: l3.value) !== l3.value ? (function(){
7177                         return (function(){
7178                             var tmp = v492;
7179                             return tmp === l3.value? l3.value: tmp.car;
7180                         })();
7181                     })() : ((((function(){
7182                         var tmp = v492;
7183                         return tmp === l3.value? l3.value: tmp.car;
7184                     })() === l139)?l4.value: l3.value) !== l3.value ? (function(){
7185                         return l220.function(l220.function(l34.function(v492)));
7186                     })() : (function(){
7187                         return ({car: l62, cdr: l68.function((function (v493){
7188                             if (arguments.length < 1) throw 'too few arguments';
7189                             if (arguments.length > 1) throw 'too many arguments';
7190                             return ((l59.function(v493) !== l3.value ? (((function(){
7191                                 var tmp = v493;
7192                                 return tmp === l3.value? l3.value: tmp.car;
7193                             })() === l141)?l4.value: l3.value) : l3.value) !== l3.value ? (function(){
7194                                 return l44.function(l44, l34.function(v493));
7195                             })() : ((l59.function(v493) !== l3.value ? (((function(){
7196                                 var tmp = v493;
7197                                 return tmp === l3.value? l3.value: tmp.car;
7198                             })() === l140)?l4.value: l3.value) : l3.value) !== l3.value ? (function(){
7199                                 return l34.function(v493);
7200                             })() : (function(){
7201                                 return l44.function(l44, l220.function(v493));
7202                             })()));
7203
7204                         }), v492)});
7205                     })()))));
7206                 })();
7207             }
7208             catch (cf){
7209                 if (cf.type == 'block' && cf.id == 183)
7210                     return cf.value;
7211                 else
7212                     throw cf;
7213             }
7214         })();
7215
7216     }));
7217     return l220;
7218 })();
7219 var l221 = {name: "BACKQUOTE-EXPAND"};
7220 (function(){
7221     (l221).function = (function(v496){
7222         ((v496)["fname"] = "BACKQUOTE-EXPAND");
7223         return v496;
7224     })((function (v495){
7225         if (arguments.length < 1) throw 'too few arguments';
7226         if (arguments.length > 1) throw 'too many arguments';
7227         return (function(){
7228             try {
7229                 return (function(){
7230                     return ((l59.function(v495) !== l3.value ? (((function(){
7231                         var tmp = v495;
7232                         return tmp === l3.value? l3.value: tmp.car;
7233                     })() === l139)?l4.value: l3.value) : l3.value) !== l3.value ? l220.function(l34.function(v495)) : v495);
7234                 })();
7235             }
7236             catch (cf){
7237                 if (cf.type == 'block' && cf.id == 184)
7238                     return cf.value;
7239                 else
7240                     throw cf;
7241             }
7242         })();
7243
7244     }));
7245     return l221;
7246 })();
7247 l139;
7248 (l178).value = ({car: l44.function(l139, (function (v497){
7249     if (arguments.length < 1) throw 'too few arguments';
7250     if (arguments.length > 1) throw 'too many arguments';
7251     return (function(){
7252         try {
7253             return (function(){
7254                 return (function(){
7255                     var symbol = l119;
7256                     var func = symbol.function;
7257                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7258                     return func;
7259                 })()(l220.function(v497));
7260             })();
7261         }
7262         catch (cf){
7263             if (cf.type == 'block' && cf.id == 185)
7264                 return cf.value;
7265             else
7266                 throw cf;
7267         }
7268     })();
7269
7270 })), cdr: (function(){
7271     var symbol = l178;
7272     var value = symbol.value;
7273     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7274     return value;
7275 })()});
7276 var l222 = {name: "*BUILTINS*"};
7277 (function(){
7278     (((l222.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
7279         return (l222).value = l3.value;
7280     })());
7281     return l222;
7282 })();
7283 var l223 = {name: "DEFINE-RAW-BUILTIN"};
7284 l223;
7285 var l224 = {name: "DEFINE-BUILTIN"};
7286 l224;
7287 var l225 = {name: "TYPE-CHECK"};
7288 l225;
7289 var l226 = {name: "NUM-OP-NUM"};
7290 (function(){
7291     (l226).function = (function(v501){
7292         ((v501)["fname"] = "NUM-OP-NUM");
7293         return v501;
7294     })((function (v498,v499,v500){
7295         if (arguments.length < 3) throw 'too few arguments';
7296         if (arguments.length > 3) throw 'too many arguments';
7297         return (function(){
7298             try {
7299                 return (function(){
7300                     return l112.function("(function(){", (function(){
7301                         var symbol = l111;
7302                         var value = symbol.value;
7303                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7304                         return value;
7305                     })(), l117.function(l112.function("var ", "x", " = ", v498, ";", (function(){
7306                         var symbol = l111;
7307                         var value = symbol.value;
7308                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7309                         return value;
7310                     })()), l112.function("var ", "y", " = ", v500, ";", (function(){
7311                         var symbol = l111;
7312                         var value = symbol.value;
7313                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7314                         return value;
7315                     })()), l112.function("if (typeof ", "x", " != '", "number", "')", (function(){
7316                         var symbol = l111;
7317                         var value = symbol.value;
7318                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7319                         return value;
7320                     })(), l117.function("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7321                         var symbol = l111;
7322                         var value = symbol.value;
7323                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7324                         return value;
7325                     })())), l112.function("if (typeof ", "y", " != '", "number", "')", (function(){
7326                         var symbol = l111;
7327                         var value = symbol.value;
7328                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7329                         return value;
7330                     })(), l117.function("throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
7331                         var symbol = l111;
7332                         var value = symbol.value;
7333                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7334                         return value;
7335                     })())), l112.function("return ", (function(){
7336                         return l112.function("x", v499, "y");
7337                     })(), ";", (function(){
7338                         var symbol = l111;
7339                         var value = symbol.value;
7340                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7341                         return value;
7342                     })())), "})()");
7343                 })();
7344             }
7345             catch (cf){
7346                 if (cf.type == 'block' && cf.id == 186)
7347                     return cf.value;
7348                 else
7349                     throw cf;
7350             }
7351         })();
7352
7353     }));
7354     return l226;
7355 })();
7356 (function(){
7357     return (l222).value = ({car: l44.function(l19, (function (v502,v503){
7358         if (arguments.length < 2) throw 'too few arguments';
7359         if (arguments.length > 2) throw 'too many arguments';
7360         return (function(){
7361             try {
7362                 return (function(){
7363                     return (function(v504,v505){
7364                         return l226.function(v504, "+", v505);
7365                     })((function(){
7366                         var symbol = l119;
7367                         var func = symbol.function;
7368                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7369                         return func;
7370                     })()(v502),(function(){
7371                         var symbol = l119;
7372                         var func = symbol.function;
7373                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7374                         return func;
7375                     })()(v503));
7376                 })();
7377             }
7378             catch (cf){
7379                 if (cf.type == 'block' && cf.id == 187)
7380                     return cf.value;
7381                 else
7382                     throw cf;
7383             }
7384         })();
7385
7386     })), cdr: (function(){
7387         var symbol = l222;
7388         var value = symbol.value;
7389         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7390         return value;
7391     })()});
7392 })();
7393 (function(){
7394     return (l222).value = ({car: l44.function(l20, (function (v506,v507){
7395         if (arguments.length < 2) throw 'too few arguments';
7396         if (arguments.length > 2) throw 'too many arguments';
7397         return (function(){
7398             try {
7399                 return (function(){
7400                     return (function(v508,v509){
7401                         return l226.function(v508, "-", v509);
7402                     })((function(){
7403                         var symbol = l119;
7404                         var func = symbol.function;
7405                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7406                         return func;
7407                     })()(v506),(function(){
7408                         var symbol = l119;
7409                         var func = symbol.function;
7410                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7411                         return func;
7412                     })()(v507));
7413                 })();
7414             }
7415             catch (cf){
7416                 if (cf.type == 'block' && cf.id == 188)
7417                     return cf.value;
7418                 else
7419                     throw cf;
7420             }
7421         })();
7422
7423     })), cdr: (function(){
7424         var symbol = l222;
7425         var value = symbol.value;
7426         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7427         return value;
7428     })()});
7429 })();
7430 (function(){
7431     return (l222).value = ({car: l44.function(l21, (function (v510,v511){
7432         if (arguments.length < 2) throw 'too few arguments';
7433         if (arguments.length > 2) throw 'too many arguments';
7434         return (function(){
7435             try {
7436                 return (function(){
7437                     return (function(v512,v513){
7438                         return l226.function(v512, "*", v513);
7439                     })((function(){
7440                         var symbol = l119;
7441                         var func = symbol.function;
7442                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7443                         return func;
7444                     })()(v510),(function(){
7445                         var symbol = l119;
7446                         var func = symbol.function;
7447                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7448                         return func;
7449                     })()(v511));
7450                 })();
7451             }
7452             catch (cf){
7453                 if (cf.type == 'block' && cf.id == 189)
7454                     return cf.value;
7455                 else
7456                     throw cf;
7457             }
7458         })();
7459
7460     })), cdr: (function(){
7461         var symbol = l222;
7462         var value = symbol.value;
7463         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7464         return value;
7465     })()});
7466 })();
7467 (function(){
7468     return (l222).value = ({car: l44.function(l22, (function (v514,v515){
7469         if (arguments.length < 2) throw 'too few arguments';
7470         if (arguments.length > 2) throw 'too many arguments';
7471         return (function(){
7472             try {
7473                 return (function(){
7474                     return (function(v516,v517){
7475                         return l226.function(v516, "/", v517);
7476                     })((function(){
7477                         var symbol = l119;
7478                         var func = symbol.function;
7479                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7480                         return func;
7481                     })()(v514),(function(){
7482                         var symbol = l119;
7483                         var func = symbol.function;
7484                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7485                         return func;
7486                     })()(v515));
7487                 })();
7488             }
7489             catch (cf){
7490                 if (cf.type == 'block' && cf.id == 190)
7491                     return cf.value;
7492                 else
7493                     throw cf;
7494             }
7495         })();
7496
7497     })), cdr: (function(){
7498         var symbol = l222;
7499         var value = symbol.value;
7500         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7501         return value;
7502     })()});
7503 })();
7504 var l227 = {name: "MOD"};
7505 (function(){
7506     return (l222).value = ({car: l44.function(l227, (function (v518,v519){
7507         if (arguments.length < 2) throw 'too few arguments';
7508         if (arguments.length > 2) throw 'too many arguments';
7509         return (function(){
7510             try {
7511                 return (function(){
7512                     return (function(v520,v521){
7513                         return l226.function(v520, "%", v521);
7514                     })((function(){
7515                         var symbol = l119;
7516                         var func = symbol.function;
7517                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7518                         return func;
7519                     })()(v518),(function(){
7520                         var symbol = l119;
7521                         var func = symbol.function;
7522                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7523                         return func;
7524                     })()(v519));
7525                 })();
7526             }
7527             catch (cf){
7528                 if (cf.type == 'block' && cf.id == 191)
7529                     return cf.value;
7530                 else
7531                     throw cf;
7532             }
7533         })();
7534
7535     })), cdr: (function(){
7536         var symbol = l222;
7537         var value = symbol.value;
7538         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7539         return value;
7540     })()});
7541 })();
7542 var l228 = {name: "<"};
7543 (function(){
7544     return (l222).value = ({car: l44.function(l228, (function (v522,v523){
7545         if (arguments.length < 2) throw 'too few arguments';
7546         if (arguments.length > 2) throw 'too many arguments';
7547         return (function(){
7548             try {
7549                 return (function(){
7550                     return (function(v524,v525){
7551                         return l118.function(l226.function(v524, "<", v525));
7552                     })((function(){
7553                         var symbol = l119;
7554                         var func = symbol.function;
7555                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7556                         return func;
7557                     })()(v522),(function(){
7558                         var symbol = l119;
7559                         var func = symbol.function;
7560                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7561                         return func;
7562                     })()(v523));
7563                 })();
7564             }
7565             catch (cf){
7566                 if (cf.type == 'block' && cf.id == 192)
7567                     return cf.value;
7568                 else
7569                     throw cf;
7570             }
7571         })();
7572
7573     })), cdr: (function(){
7574         var symbol = l222;
7575         var value = symbol.value;
7576         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7577         return value;
7578     })()});
7579 })();
7580 var l229 = {name: ">"};
7581 (function(){
7582     return (l222).value = ({car: l44.function(l229, (function (v526,v527){
7583         if (arguments.length < 2) throw 'too few arguments';
7584         if (arguments.length > 2) throw 'too many arguments';
7585         return (function(){
7586             try {
7587                 return (function(){
7588                     return (function(v528,v529){
7589                         return l118.function(l226.function(v528, ">", v529));
7590                     })((function(){
7591                         var symbol = l119;
7592                         var func = symbol.function;
7593                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7594                         return func;
7595                     })()(v526),(function(){
7596                         var symbol = l119;
7597                         var func = symbol.function;
7598                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7599                         return func;
7600                     })()(v527));
7601                 })();
7602             }
7603             catch (cf){
7604                 if (cf.type == 'block' && cf.id == 193)
7605                     return cf.value;
7606                 else
7607                     throw cf;
7608             }
7609         })();
7610
7611     })), cdr: (function(){
7612         var symbol = l222;
7613         var value = symbol.value;
7614         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7615         return value;
7616     })()});
7617 })();
7618 (function(){
7619     return (l222).value = ({car: l44.function(l18, (function (v530,v531){
7620         if (arguments.length < 2) throw 'too few arguments';
7621         if (arguments.length > 2) throw 'too many arguments';
7622         return (function(){
7623             try {
7624                 return (function(){
7625                     return (function(v532,v533){
7626                         return l118.function(l226.function(v532, "==", v533));
7627                     })((function(){
7628                         var symbol = l119;
7629                         var func = symbol.function;
7630                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7631                         return func;
7632                     })()(v530),(function(){
7633                         var symbol = l119;
7634                         var func = symbol.function;
7635                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7636                         return func;
7637                     })()(v531));
7638                 })();
7639             }
7640             catch (cf){
7641                 if (cf.type == 'block' && cf.id == 194)
7642                     return cf.value;
7643                 else
7644                     throw cf;
7645             }
7646         })();
7647
7648     })), cdr: (function(){
7649         var symbol = l222;
7650         var value = symbol.value;
7651         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7652         return value;
7653     })()});
7654 })();
7655 var l230 = {name: "<="};
7656 (function(){
7657     return (l222).value = ({car: l44.function(l230, (function (v534,v535){
7658         if (arguments.length < 2) throw 'too few arguments';
7659         if (arguments.length > 2) throw 'too many arguments';
7660         return (function(){
7661             try {
7662                 return (function(){
7663                     return (function(v536,v537){
7664                         return l118.function(l226.function(v536, "<=", v537));
7665                     })((function(){
7666                         var symbol = l119;
7667                         var func = symbol.function;
7668                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7669                         return func;
7670                     })()(v534),(function(){
7671                         var symbol = l119;
7672                         var func = symbol.function;
7673                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7674                         return func;
7675                     })()(v535));
7676                 })();
7677             }
7678             catch (cf){
7679                 if (cf.type == 'block' && cf.id == 195)
7680                     return cf.value;
7681                 else
7682                     throw cf;
7683             }
7684         })();
7685
7686     })), cdr: (function(){
7687         var symbol = l222;
7688         var value = symbol.value;
7689         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7690         return value;
7691     })()});
7692 })();
7693 var l231 = {name: ">="};
7694 (function(){
7695     return (l222).value = ({car: l44.function(l231, (function (v538,v539){
7696         if (arguments.length < 2) throw 'too few arguments';
7697         if (arguments.length > 2) throw 'too many arguments';
7698         return (function(){
7699             try {
7700                 return (function(){
7701                     return (function(v540,v541){
7702                         return l118.function(l226.function(v540, ">=", v541));
7703                     })((function(){
7704                         var symbol = l119;
7705                         var func = symbol.function;
7706                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7707                         return func;
7708                     })()(v538),(function(){
7709                         var symbol = l119;
7710                         var func = symbol.function;
7711                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7712                         return func;
7713                     })()(v539));
7714                 })();
7715             }
7716             catch (cf){
7717                 if (cf.type == 'block' && cf.id == 196)
7718                     return cf.value;
7719                 else
7720                     throw cf;
7721             }
7722         })();
7723
7724     })), cdr: (function(){
7725         var symbol = l222;
7726         var value = symbol.value;
7727         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7728         return value;
7729     })()});
7730 })();
7731 var l232 = {name: "NUMBERP"};
7732 (function(){
7733     return (l222).value = ({car: l44.function(l232, (function (v542){
7734         if (arguments.length < 1) throw 'too few arguments';
7735         if (arguments.length > 1) throw 'too many arguments';
7736         return (function(){
7737             try {
7738                 return (function(){
7739                     return (function(v543){
7740                         return l118.function(l112.function("(typeof (", v543, ") == \"number\")"));
7741                     })((function(){
7742                         var symbol = l119;
7743                         var func = symbol.function;
7744                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7745                         return func;
7746                     })()(v542));
7747                 })();
7748             }
7749             catch (cf){
7750                 if (cf.type == 'block' && cf.id == 197)
7751                     return cf.value;
7752                 else
7753                     throw cf;
7754             }
7755         })();
7756
7757     })), cdr: (function(){
7758         var symbol = l222;
7759         var value = symbol.value;
7760         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7761         return value;
7762     })()});
7763 })();
7764 var l233 = {name: "FLOOR"};
7765 (function(){
7766     return (l222).value = ({car: l44.function(l233, (function (v544){
7767         if (arguments.length < 1) throw 'too few arguments';
7768         if (arguments.length > 1) throw 'too many arguments';
7769         return (function(){
7770             try {
7771                 return (function(){
7772                     return (function(v545){
7773                         return l112.function("(function(){", (function(){
7774                             var symbol = l111;
7775                             var value = symbol.value;
7776                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7777                             return value;
7778                         })(), l117.function(l112.function("var ", "x", " = ", v545, ";", (function(){
7779                             var symbol = l111;
7780                             var value = symbol.value;
7781                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7782                             return value;
7783                         })()), l112.function("if (typeof ", "x", " != '", "number", "')", (function(){
7784                             var symbol = l111;
7785                             var value = symbol.value;
7786                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7787                             return value;
7788                         })(), l117.function("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7789                             var symbol = l111;
7790                             var value = symbol.value;
7791                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7792                             return value;
7793                         })())), l112.function("return ", (function(){
7794                             return "Math.floor(x)";
7795                         })(), ";", (function(){
7796                             var symbol = l111;
7797                             var value = symbol.value;
7798                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7799                             return value;
7800                         })())), "})()");
7801                     })((function(){
7802                         var symbol = l119;
7803                         var func = symbol.function;
7804                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7805                         return func;
7806                     })()(v544));
7807                 })();
7808             }
7809             catch (cf){
7810                 if (cf.type == 'block' && cf.id == 198)
7811                     return cf.value;
7812                 else
7813                     throw cf;
7814             }
7815         })();
7816
7817     })), cdr: (function(){
7818         var symbol = l222;
7819         var value = symbol.value;
7820         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7821         return value;
7822     })()});
7823 })();
7824 (function(){
7825     return (l222).value = ({car: l44.function(l29, (function (v546,v547){
7826         if (arguments.length < 2) throw 'too few arguments';
7827         if (arguments.length > 2) throw 'too many arguments';
7828         return (function(){
7829             try {
7830                 return (function(){
7831                     return (function(v548,v549){
7832                         return l112.function("({car: ", v548, ", cdr: ", v549, "})");
7833                     })((function(){
7834                         var symbol = l119;
7835                         var func = symbol.function;
7836                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7837                         return func;
7838                     })()(v546),(function(){
7839                         var symbol = l119;
7840                         var func = symbol.function;
7841                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7842                         return func;
7843                     })()(v547));
7844                 })();
7845             }
7846             catch (cf){
7847                 if (cf.type == 'block' && cf.id == 199)
7848                     return cf.value;
7849                 else
7850                     throw cf;
7851             }
7852         })();
7853
7854     })), cdr: (function(){
7855         var symbol = l222;
7856         var value = symbol.value;
7857         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7858         return value;
7859     })()});
7860 })();
7861 (function(){
7862     return (l222).value = ({car: l44.function(l30, (function (v550){
7863         if (arguments.length < 1) throw 'too few arguments';
7864         if (arguments.length > 1) throw 'too many arguments';
7865         return (function(){
7866             try {
7867                 return (function(){
7868                     return (function(v551){
7869                         return l118.function(l112.function("(function(){", (function(){
7870                             var symbol = l111;
7871                             var value = symbol.value;
7872                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7873                             return value;
7874                         })(), l117.function("var tmp = ", v551, ";", (function(){
7875                             var symbol = l111;
7876                             var value = symbol.value;
7877                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7878                             return value;
7879                         })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
7880                             var symbol = l111;
7881                             var value = symbol.value;
7882                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7883                             return value;
7884                         })()), "})()"));
7885                     })((function(){
7886                         var symbol = l119;
7887                         var func = symbol.function;
7888                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7889                         return func;
7890                     })()(v550));
7891                 })();
7892             }
7893             catch (cf){
7894                 if (cf.type == 'block' && cf.id == 200)
7895                     return cf.value;
7896                 else
7897                     throw cf;
7898             }
7899         })();
7900
7901     })), cdr: (function(){
7902         var symbol = l222;
7903         var value = symbol.value;
7904         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7905         return value;
7906     })()});
7907 })();
7908 (function(){
7909     return (l222).value = ({car: l44.function(l31, (function (v552){
7910         if (arguments.length < 1) throw 'too few arguments';
7911         if (arguments.length > 1) throw 'too many arguments';
7912         return (function(){
7913             try {
7914                 return (function(){
7915                     return (function(v553){
7916                         return l112.function("(function(){", (function(){
7917                             var symbol = l111;
7918                             var value = symbol.value;
7919                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7920                             return value;
7921                         })(), l117.function("var tmp = ", v553, ";", (function(){
7922                             var symbol = l111;
7923                             var value = symbol.value;
7924                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7925                             return value;
7926                         })(), "return tmp === ", (function(){
7927                             var symbol = l119;
7928                             var func = symbol.function;
7929                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7930                             return func;
7931                         })()(l3.value), "? ", (function(){
7932                             var symbol = l119;
7933                             var func = symbol.function;
7934                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7935                             return func;
7936                         })()(l3.value), ": tmp.car;", (function(){
7937                             var symbol = l111;
7938                             var value = symbol.value;
7939                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7940                             return value;
7941                         })()), "})()");
7942                     })((function(){
7943                         var symbol = l119;
7944                         var func = symbol.function;
7945                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7946                         return func;
7947                     })()(v552));
7948                 })();
7949             }
7950             catch (cf){
7951                 if (cf.type == 'block' && cf.id == 201)
7952                     return cf.value;
7953                 else
7954                     throw cf;
7955             }
7956         })();
7957
7958     })), cdr: (function(){
7959         var symbol = l222;
7960         var value = symbol.value;
7961         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7962         return value;
7963     })()});
7964 })();
7965 (function(){
7966     return (l222).value = ({car: l44.function(l32, (function (v554){
7967         if (arguments.length < 1) throw 'too few arguments';
7968         if (arguments.length > 1) throw 'too many arguments';
7969         return (function(){
7970             try {
7971                 return (function(){
7972                     return (function(v555){
7973                         return l112.function("(function(){", (function(){
7974                             var symbol = l111;
7975                             var value = symbol.value;
7976                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7977                             return value;
7978                         })(), l117.function("var tmp = ", v555, ";", (function(){
7979                             var symbol = l111;
7980                             var value = symbol.value;
7981                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7982                             return value;
7983                         })(), "return tmp === ", (function(){
7984                             var symbol = l119;
7985                             var func = symbol.function;
7986                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7987                             return func;
7988                         })()(l3.value), "? ", (function(){
7989                             var symbol = l119;
7990                             var func = symbol.function;
7991                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7992                             return func;
7993                         })()(l3.value), ": tmp.cdr;", (function(){
7994                             var symbol = l111;
7995                             var value = symbol.value;
7996                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7997                             return value;
7998                         })()), "})()");
7999                     })((function(){
8000                         var symbol = l119;
8001                         var func = symbol.function;
8002                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8003                         return func;
8004                     })()(v554));
8005                 })();
8006             }
8007             catch (cf){
8008                 if (cf.type == 'block' && cf.id == 202)
8009                     return cf.value;
8010                 else
8011                     throw cf;
8012             }
8013         })();
8014
8015     })), cdr: (function(){
8016         var symbol = l222;
8017         var value = symbol.value;
8018         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8019         return value;
8020     })()});
8021 })();
8022 var l234 = {name: "SETCAR"};
8023 (function(){
8024     return (l222).value = ({car: l44.function(l234, (function (v556,v557){
8025         if (arguments.length < 2) throw 'too few arguments';
8026         if (arguments.length > 2) throw 'too many arguments';
8027         return (function(){
8028             try {
8029                 return (function(){
8030                     return (function(v558,v559){
8031                         return l112.function("(function(){", (function(){
8032                             var symbol = l111;
8033                             var value = symbol.value;
8034                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8035                             return value;
8036                         })(), l117.function(l112.function("var ", "x", " = ", v558, ";", (function(){
8037                             var symbol = l111;
8038                             var value = symbol.value;
8039                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8040                             return value;
8041                         })()), l112.function("if (typeof ", "x", " != '", "object", "')", (function(){
8042                             var symbol = l111;
8043                             var value = symbol.value;
8044                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8045                             return value;
8046                         })(), l117.function("throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
8047                             var symbol = l111;
8048                             var value = symbol.value;
8049                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8050                             return value;
8051                         })())), l112.function("return ", (function(){
8052                             return l112.function("(x.car = ", v559, ")");
8053                         })(), ";", (function(){
8054                             var symbol = l111;
8055                             var value = symbol.value;
8056                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8057                             return value;
8058                         })())), "})()");
8059                     })((function(){
8060                         var symbol = l119;
8061                         var func = symbol.function;
8062                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8063                         return func;
8064                     })()(v556),(function(){
8065                         var symbol = l119;
8066                         var func = symbol.function;
8067                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8068                         return func;
8069                     })()(v557));
8070                 })();
8071             }
8072             catch (cf){
8073                 if (cf.type == 'block' && cf.id == 203)
8074                     return cf.value;
8075                 else
8076                     throw cf;
8077             }
8078         })();
8079
8080     })), cdr: (function(){
8081         var symbol = l222;
8082         var value = symbol.value;
8083         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8084         return value;
8085     })()});
8086 })();
8087 var l235 = {name: "SETCDR"};
8088 (function(){
8089     return (l222).value = ({car: l44.function(l235, (function (v560,v561){
8090         if (arguments.length < 2) throw 'too few arguments';
8091         if (arguments.length > 2) throw 'too many arguments';
8092         return (function(){
8093             try {
8094                 return (function(){
8095                     return (function(v562,v563){
8096                         return l112.function("(function(){", (function(){
8097                             var symbol = l111;
8098                             var value = symbol.value;
8099                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8100                             return value;
8101                         })(), l117.function(l112.function("var ", "x", " = ", v562, ";", (function(){
8102                             var symbol = l111;
8103                             var value = symbol.value;
8104                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8105                             return value;
8106                         })()), l112.function("if (typeof ", "x", " != '", "object", "')", (function(){
8107                             var symbol = l111;
8108                             var value = symbol.value;
8109                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8110                             return value;
8111                         })(), l117.function("throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
8112                             var symbol = l111;
8113                             var value = symbol.value;
8114                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8115                             return value;
8116                         })())), l112.function("return ", (function(){
8117                             return l112.function("(x.cdr = ", v563, ")");
8118                         })(), ";", (function(){
8119                             var symbol = l111;
8120                             var value = symbol.value;
8121                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8122                             return value;
8123                         })())), "})()");
8124                     })((function(){
8125                         var symbol = l119;
8126                         var func = symbol.function;
8127                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8128                         return func;
8129                     })()(v560),(function(){
8130                         var symbol = l119;
8131                         var func = symbol.function;
8132                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8133                         return func;
8134                     })()(v561));
8135                 })();
8136             }
8137             catch (cf){
8138                 if (cf.type == 'block' && cf.id == 204)
8139                     return cf.value;
8140                 else
8141                     throw cf;
8142             }
8143         })();
8144
8145     })), cdr: (function(){
8146         var symbol = l222;
8147         var value = symbol.value;
8148         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8149         return value;
8150     })()});
8151 })();
8152 var l236 = {name: "SYMBOLP"};
8153 (function(){
8154     return (l222).value = ({car: l44.function(l236, (function (v564){
8155         if (arguments.length < 1) throw 'too few arguments';
8156         if (arguments.length > 1) throw 'too many arguments';
8157         return (function(){
8158             try {
8159                 return (function(){
8160                     return (function(v565){
8161                         return l118.function(l112.function("(function(){", (function(){
8162                             var symbol = l111;
8163                             var value = symbol.value;
8164                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8165                             return value;
8166                         })(), l117.function("var tmp = ", v565, ";", (function(){
8167                             var symbol = l111;
8168                             var value = symbol.value;
8169                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8170                             return value;
8171                         })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
8172                             var symbol = l111;
8173                             var value = symbol.value;
8174                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8175                             return value;
8176                         })()), "})()"));
8177                     })((function(){
8178                         var symbol = l119;
8179                         var func = symbol.function;
8180                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8181                         return func;
8182                     })()(v564));
8183                 })();
8184             }
8185             catch (cf){
8186                 if (cf.type == 'block' && cf.id == 205)
8187                     return cf.value;
8188                 else
8189                     throw cf;
8190             }
8191         })();
8192
8193     })), cdr: (function(){
8194         var symbol = l222;
8195         var value = symbol.value;
8196         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8197         return value;
8198     })()});
8199 })();
8200 var l237 = {name: "MAKE-SYMBOL"};
8201 (function(){
8202     return (l222).value = ({car: l44.function(l237, (function (v566){
8203         if (arguments.length < 1) throw 'too few arguments';
8204         if (arguments.length > 1) throw 'too many arguments';
8205         return (function(){
8206             try {
8207                 return (function(){
8208                     return (function(v567){
8209                         return l112.function("(function(){", (function(){
8210                             var symbol = l111;
8211                             var value = symbol.value;
8212                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8213                             return value;
8214                         })(), l117.function(l112.function("var ", "name", " = ", v567, ";", (function(){
8215                             var symbol = l111;
8216                             var value = symbol.value;
8217                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8218                             return value;
8219                         })()), l112.function("if (typeof ", "name", " != '", "string", "')", (function(){
8220                             var symbol = l111;
8221                             var value = symbol.value;
8222                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8223                             return value;
8224                         })(), l117.function("throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
8225                             var symbol = l111;
8226                             var value = symbol.value;
8227                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8228                             return value;
8229                         })())), l112.function("return ", (function(){
8230                             return "({name: name})";
8231                         })(), ";", (function(){
8232                             var symbol = l111;
8233                             var value = symbol.value;
8234                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8235                             return value;
8236                         })())), "})()");
8237                     })((function(){
8238                         var symbol = l119;
8239                         var func = symbol.function;
8240                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8241                         return func;
8242                     })()(v566));
8243                 })();
8244             }
8245             catch (cf){
8246                 if (cf.type == 'block' && cf.id == 206)
8247                     return cf.value;
8248                 else
8249                     throw cf;
8250             }
8251         })();
8252
8253     })), cdr: (function(){
8254         var symbol = l222;
8255         var value = symbol.value;
8256         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8257         return value;
8258     })()});
8259 })();
8260 var l238 = {name: "SYMBOL-NAME"};
8261 (function(){
8262     return (l222).value = ({car: l44.function(l238, (function (v568){
8263         if (arguments.length < 1) throw 'too few arguments';
8264         if (arguments.length > 1) throw 'too many arguments';
8265         return (function(){
8266             try {
8267                 return (function(){
8268                     return (function(v569){
8269                         return l112.function("(", v569, ").name");
8270                     })((function(){
8271                         var symbol = l119;
8272                         var func = symbol.function;
8273                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8274                         return func;
8275                     })()(v568));
8276                 })();
8277             }
8278             catch (cf){
8279                 if (cf.type == 'block' && cf.id == 207)
8280                     return cf.value;
8281                 else
8282                     throw cf;
8283             }
8284         })();
8285
8286     })), cdr: (function(){
8287         var symbol = l222;
8288         var value = symbol.value;
8289         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8290         return value;
8291     })()});
8292 })();
8293 (function(){
8294     return (l222).value = ({car: l44.function(l194, (function (v570,v571){
8295         if (arguments.length < 2) throw 'too few arguments';
8296         if (arguments.length > 2) throw 'too many arguments';
8297         return (function(){
8298             try {
8299                 return (function(){
8300                     return (function(v572,v573){
8301                         return l112.function("(", v572, ").value = ", v573);
8302                     })((function(){
8303                         var symbol = l119;
8304                         var func = symbol.function;
8305                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8306                         return func;
8307                     })()(v570),(function(){
8308                         var symbol = l119;
8309                         var func = symbol.function;
8310                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8311                         return func;
8312                     })()(v571));
8313                 })();
8314             }
8315             catch (cf){
8316                 if (cf.type == 'block' && cf.id == 208)
8317                     return cf.value;
8318                 else
8319                     throw cf;
8320             }
8321         })();
8322
8323     })), cdr: (function(){
8324         var symbol = l222;
8325         var value = symbol.value;
8326         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8327         return value;
8328     })()});
8329 })();
8330 var l239 = {name: "FSET"};
8331 (function(){
8332     return (l222).value = ({car: l44.function(l239, (function (v574,v575){
8333         if (arguments.length < 2) throw 'too few arguments';
8334         if (arguments.length > 2) throw 'too many arguments';
8335         return (function(){
8336             try {
8337                 return (function(){
8338                     return (function(v576,v577){
8339                         return l112.function("(", v576, ").function = ", v577);
8340                     })((function(){
8341                         var symbol = l119;
8342                         var func = symbol.function;
8343                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8344                         return func;
8345                     })()(v574),(function(){
8346                         var symbol = l119;
8347                         var func = symbol.function;
8348                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8349                         return func;
8350                     })()(v575));
8351                 })();
8352             }
8353             catch (cf){
8354                 if (cf.type == 'block' && cf.id == 209)
8355                     return cf.value;
8356                 else
8357                     throw cf;
8358             }
8359         })();
8360
8361     })), cdr: (function(){
8362         var symbol = l222;
8363         var value = symbol.value;
8364         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8365         return value;
8366     })()});
8367 })();
8368 (function(){
8369     return (l222).value = ({car: l44.function(l17, (function (v578){
8370         if (arguments.length < 1) throw 'too few arguments';
8371         if (arguments.length > 1) throw 'too many arguments';
8372         return (function(){
8373             try {
8374                 return (function(){
8375                     return (function(v579){
8376                         return l118.function(l112.function("(", v579, ".value !== undefined)"));
8377                     })((function(){
8378                         var symbol = l119;
8379                         var func = symbol.function;
8380                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8381                         return func;
8382                     })()(v578));
8383                 })();
8384             }
8385             catch (cf){
8386                 if (cf.type == 'block' && cf.id == 210)
8387                     return cf.value;
8388                 else
8389                     throw cf;
8390             }
8391         })();
8392
8393     })), cdr: (function(){
8394         var symbol = l222;
8395         var value = symbol.value;
8396         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8397         return value;
8398     })()});
8399 })();
8400 var l240 = {name: "SYMBOL-VALUE"};
8401 (function(){
8402     return (l222).value = ({car: l44.function(l240, (function (v580){
8403         if (arguments.length < 1) throw 'too few arguments';
8404         if (arguments.length > 1) throw 'too many arguments';
8405         return (function(){
8406             try {
8407                 return (function(){
8408                     return (function(v581){
8409                         return l112.function("(function(){", (function(){
8410                             var symbol = l111;
8411                             var value = symbol.value;
8412                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8413                             return value;
8414                         })(), l117.function("var symbol = ", v581, ";", (function(){
8415                             var symbol = l111;
8416                             var value = symbol.value;
8417                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8418                             return value;
8419                         })(), "var value = symbol.value;", (function(){
8420                             var symbol = l111;
8421                             var value = symbol.value;
8422                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8423                             return value;
8424                         })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
8425                             var symbol = l111;
8426                             var value = symbol.value;
8427                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8428                             return value;
8429                         })(), "return value;", (function(){
8430                             var symbol = l111;
8431                             var value = symbol.value;
8432                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8433                             return value;
8434                         })()), "})()");
8435                     })((function(){
8436                         var symbol = l119;
8437                         var func = symbol.function;
8438                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8439                         return func;
8440                     })()(v580));
8441                 })();
8442             }
8443             catch (cf){
8444                 if (cf.type == 'block' && cf.id == 211)
8445                     return cf.value;
8446                 else
8447                     throw cf;
8448             }
8449         })();
8450
8451     })), cdr: (function(){
8452         var symbol = l222;
8453         var value = symbol.value;
8454         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8455         return value;
8456     })()});
8457 })();
8458 (function(){
8459     return (l222).value = ({car: l44.function(l202, (function (v582){
8460         if (arguments.length < 1) throw 'too few arguments';
8461         if (arguments.length > 1) throw 'too many arguments';
8462         return (function(){
8463             try {
8464                 return (function(){
8465                     return (function(v583){
8466                         return l112.function("(function(){", (function(){
8467                             var symbol = l111;
8468                             var value = symbol.value;
8469                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8470                             return value;
8471                         })(), l117.function("var symbol = ", v583, ";", (function(){
8472                             var symbol = l111;
8473                             var value = symbol.value;
8474                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8475                             return value;
8476                         })(), "var func = symbol.function;", (function(){
8477                             var symbol = l111;
8478                             var value = symbol.value;
8479                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8480                             return value;
8481                         })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
8482                             var symbol = l111;
8483                             var value = symbol.value;
8484                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8485                             return value;
8486                         })(), "return func;", (function(){
8487                             var symbol = l111;
8488                             var value = symbol.value;
8489                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8490                             return value;
8491                         })()), "})()");
8492                     })((function(){
8493                         var symbol = l119;
8494                         var func = symbol.function;
8495                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8496                         return func;
8497                     })()(v582));
8498                 })();
8499             }
8500             catch (cf){
8501                 if (cf.type == 'block' && cf.id == 212)
8502                     return cf.value;
8503                 else
8504                     throw cf;
8505             }
8506         })();
8507
8508     })), cdr: (function(){
8509         var symbol = l222;
8510         var value = symbol.value;
8511         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8512         return value;
8513     })()});
8514 })();
8515 var l241 = {name: "SYMBOL-PLIST"};
8516 (function(){
8517     return (l222).value = ({car: l44.function(l241, (function (v584){
8518         if (arguments.length < 1) throw 'too few arguments';
8519         if (arguments.length > 1) throw 'too many arguments';
8520         return (function(){
8521             try {
8522                 return (function(){
8523                     return (function(v585){
8524                         return l112.function("((", v585, ").plist || ", (function(){
8525                             var symbol = l119;
8526                             var func = symbol.function;
8527                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8528                             return func;
8529                         })()(l3.value), ")");
8530                     })((function(){
8531                         var symbol = l119;
8532                         var func = symbol.function;
8533                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8534                         return func;
8535                     })()(v584));
8536                 })();
8537             }
8538             catch (cf){
8539                 if (cf.type == 'block' && cf.id == 213)
8540                     return cf.value;
8541                 else
8542                     throw cf;
8543             }
8544         })();
8545
8546     })), cdr: (function(){
8547         var symbol = l222;
8548         var value = symbol.value;
8549         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8550         return value;
8551     })()});
8552 })();
8553 var l242 = {name: "LAMBDA-CODE"};
8554 (function(){
8555     return (l222).value = ({car: l44.function(l242, (function (v586){
8556         if (arguments.length < 1) throw 'too few arguments';
8557         if (arguments.length > 1) throw 'too many arguments';
8558         return (function(){
8559             try {
8560                 return (function(){
8561                     return (function(v587){
8562                         return l112.function("(", v587, ").toString()");
8563                     })((function(){
8564                         var symbol = l119;
8565                         var func = symbol.function;
8566                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8567                         return func;
8568                     })()(v586));
8569                 })();
8570             }
8571             catch (cf){
8572                 if (cf.type == 'block' && cf.id == 214)
8573                     return cf.value;
8574                 else
8575                     throw cf;
8576             }
8577         })();
8578
8579     })), cdr: (function(){
8580         var symbol = l222;
8581         var value = symbol.value;
8582         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8583         return value;
8584     })()});
8585 })();
8586 var l243 = {name: "EQ"};
8587 (function(){
8588     return (l222).value = ({car: l44.function(l243, (function (v588,v589){
8589         if (arguments.length < 2) throw 'too few arguments';
8590         if (arguments.length > 2) throw 'too many arguments';
8591         return (function(){
8592             try {
8593                 return (function(){
8594                     return (function(v590,v591){
8595                         return l118.function(l112.function("(", v590, " === ", v591, ")"));
8596                     })((function(){
8597                         var symbol = l119;
8598                         var func = symbol.function;
8599                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8600                         return func;
8601                     })()(v588),(function(){
8602                         var symbol = l119;
8603                         var func = symbol.function;
8604                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8605                         return func;
8606                     })()(v589));
8607                 })();
8608             }
8609             catch (cf){
8610                 if (cf.type == 'block' && cf.id == 215)
8611                     return cf.value;
8612                 else
8613                     throw cf;
8614             }
8615         })();
8616
8617     })), cdr: (function(){
8618         var symbol = l222;
8619         var value = symbol.value;
8620         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8621         return value;
8622     })()});
8623 })();
8624 var l244 = {name: "EQUAL"};
8625 (function(){
8626     return (l222).value = ({car: l44.function(l244, (function (v592,v593){
8627         if (arguments.length < 2) throw 'too few arguments';
8628         if (arguments.length > 2) throw 'too many arguments';
8629         return (function(){
8630             try {
8631                 return (function(){
8632                     return (function(v594,v595){
8633                         return l118.function(l112.function("(", v594, " == ", v595, ")"));
8634                     })((function(){
8635                         var symbol = l119;
8636                         var func = symbol.function;
8637                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8638                         return func;
8639                     })()(v592),(function(){
8640                         var symbol = l119;
8641                         var func = symbol.function;
8642                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8643                         return func;
8644                     })()(v593));
8645                 })();
8646             }
8647             catch (cf){
8648                 if (cf.type == 'block' && cf.id == 216)
8649                     return cf.value;
8650                 else
8651                     throw cf;
8652             }
8653         })();
8654
8655     })), cdr: (function(){
8656         var symbol = l222;
8657         var value = symbol.value;
8658         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8659         return value;
8660     })()});
8661 })();
8662 var l245 = {name: "CHAR-TO-STRING"};
8663 (function(){
8664     return (l222).value = ({car: l44.function(l245, (function (v596){
8665         if (arguments.length < 1) throw 'too few arguments';
8666         if (arguments.length > 1) throw 'too many arguments';
8667         return (function(){
8668             try {
8669                 return (function(){
8670                     return (function(v597){
8671                         return l112.function("(function(){", (function(){
8672                             var symbol = l111;
8673                             var value = symbol.value;
8674                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8675                             return value;
8676                         })(), l117.function(l112.function("var ", "x", " = ", v597, ";", (function(){
8677                             var symbol = l111;
8678                             var value = symbol.value;
8679                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8680                             return value;
8681                         })()), l112.function("if (typeof ", "x", " != '", "number", "')", (function(){
8682                             var symbol = l111;
8683                             var value = symbol.value;
8684                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8685                             return value;
8686                         })(), l117.function("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
8687                             var symbol = l111;
8688                             var value = symbol.value;
8689                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8690                             return value;
8691                         })())), l112.function("return ", (function(){
8692                             return "String.fromCharCode(x)";
8693                         })(), ";", (function(){
8694                             var symbol = l111;
8695                             var value = symbol.value;
8696                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8697                             return value;
8698                         })())), "})()");
8699                     })((function(){
8700                         var symbol = l119;
8701                         var func = symbol.function;
8702                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8703                         return func;
8704                     })()(v596));
8705                 })();
8706             }
8707             catch (cf){
8708                 if (cf.type == 'block' && cf.id == 217)
8709                     return cf.value;
8710                 else
8711                     throw cf;
8712             }
8713         })();
8714
8715     })), cdr: (function(){
8716         var symbol = l222;
8717         var value = symbol.value;
8718         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8719         return value;
8720     })()});
8721 })();
8722 var l246 = {name: "STRINGP"};
8723 (function(){
8724     return (l222).value = ({car: l44.function(l246, (function (v598){
8725         if (arguments.length < 1) throw 'too few arguments';
8726         if (arguments.length > 1) throw 'too many arguments';
8727         return (function(){
8728             try {
8729                 return (function(){
8730                     return (function(v599){
8731                         return l118.function(l112.function("(typeof(", v599, ") == \"string\")"));
8732                     })((function(){
8733                         var symbol = l119;
8734                         var func = symbol.function;
8735                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8736                         return func;
8737                     })()(v598));
8738                 })();
8739             }
8740             catch (cf){
8741                 if (cf.type == 'block' && cf.id == 218)
8742                     return cf.value;
8743                 else
8744                     throw cf;
8745             }
8746         })();
8747
8748     })), cdr: (function(){
8749         var symbol = l222;
8750         var value = symbol.value;
8751         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8752         return value;
8753     })()});
8754 })();
8755 var l247 = {name: "STRING-UPCASE"};
8756 (function(){
8757     return (l222).value = ({car: l44.function(l247, (function (v600){
8758         if (arguments.length < 1) throw 'too few arguments';
8759         if (arguments.length > 1) throw 'too many arguments';
8760         return (function(){
8761             try {
8762                 return (function(){
8763                     return (function(v601){
8764                         return l112.function("(function(){", (function(){
8765                             var symbol = l111;
8766                             var value = symbol.value;
8767                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8768                             return value;
8769                         })(), l117.function(l112.function("var ", "x", " = ", v601, ";", (function(){
8770                             var symbol = l111;
8771                             var value = symbol.value;
8772                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8773                             return value;
8774                         })()), l112.function("if (typeof ", "x", " != '", "string", "')", (function(){
8775                             var symbol = l111;
8776                             var value = symbol.value;
8777                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8778                             return value;
8779                         })(), l117.function("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
8780                             var symbol = l111;
8781                             var value = symbol.value;
8782                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8783                             return value;
8784                         })())), l112.function("return ", (function(){
8785                             return "x.toUpperCase()";
8786                         })(), ";", (function(){
8787                             var symbol = l111;
8788                             var value = symbol.value;
8789                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8790                             return value;
8791                         })())), "})()");
8792                     })((function(){
8793                         var symbol = l119;
8794                         var func = symbol.function;
8795                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8796                         return func;
8797                     })()(v600));
8798                 })();
8799             }
8800             catch (cf){
8801                 if (cf.type == 'block' && cf.id == 219)
8802                     return cf.value;
8803                 else
8804                     throw cf;
8805             }
8806         })();
8807
8808     })), cdr: (function(){
8809         var symbol = l222;
8810         var value = symbol.value;
8811         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8812         return value;
8813     })()});
8814 })();
8815 var l248 = {name: "STRING-LENGTH"};
8816 (function(){
8817     return (l222).value = ({car: l44.function(l248, (function (v602){
8818         if (arguments.length < 1) throw 'too few arguments';
8819         if (arguments.length > 1) throw 'too many arguments';
8820         return (function(){
8821             try {
8822                 return (function(){
8823                     return (function(v603){
8824                         return l112.function("(function(){", (function(){
8825                             var symbol = l111;
8826                             var value = symbol.value;
8827                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8828                             return value;
8829                         })(), l117.function(l112.function("var ", "x", " = ", v603, ";", (function(){
8830                             var symbol = l111;
8831                             var value = symbol.value;
8832                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8833                             return value;
8834                         })()), l112.function("if (typeof ", "x", " != '", "string", "')", (function(){
8835                             var symbol = l111;
8836                             var value = symbol.value;
8837                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8838                             return value;
8839                         })(), l117.function("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
8840                             var symbol = l111;
8841                             var value = symbol.value;
8842                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8843                             return value;
8844                         })())), l112.function("return ", (function(){
8845                             return "x.length";
8846                         })(), ";", (function(){
8847                             var symbol = l111;
8848                             var value = symbol.value;
8849                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8850                             return value;
8851                         })())), "})()");
8852                     })((function(){
8853                         var symbol = l119;
8854                         var func = symbol.function;
8855                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8856                         return func;
8857                     })()(v602));
8858                 })();
8859             }
8860             catch (cf){
8861                 if (cf.type == 'block' && cf.id == 220)
8862                     return cf.value;
8863                 else
8864                     throw cf;
8865             }
8866         })();
8867
8868     })), cdr: (function(){
8869         var symbol = l222;
8870         var value = symbol.value;
8871         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8872         return value;
8873     })()});
8874 })();
8875 var l249 = {name: "SLICE"};
8876 (l222).value = ({car: l44.function(l249, (function (v604,v605,v606){
8877     if (arguments.length < 2) throw 'too few arguments';
8878     if (arguments.length > 3) throw 'too many arguments';
8879     switch(arguments.length){
8880     case 2:
8881     v606=l3.value;
8882     default: break;
8883     }
8884     return (function(){
8885         try {
8886             return (function(){
8887                 return l112.function("(function(){", (function(){
8888                     var symbol = l111;
8889                     var value = symbol.value;
8890                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8891                     return value;
8892                 })(), l117.function("var str = ", (function(){
8893                     var symbol = l119;
8894                     var func = symbol.function;
8895                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8896                     return func;
8897                 })()(v604), ";", (function(){
8898                     var symbol = l111;
8899                     var value = symbol.value;
8900                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8901                     return value;
8902                 })(), "var a = ", (function(){
8903                     var symbol = l119;
8904                     var func = symbol.function;
8905                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8906                     return func;
8907                 })()(v605), ";", (function(){
8908                     var symbol = l111;
8909                     var value = symbol.value;
8910                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8911                     return value;
8912                 })(), "var b;", (function(){
8913                     var symbol = l111;
8914                     var value = symbol.value;
8915                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8916                     return value;
8917                 })(), (v606 !== l3.value ? l112.function("b = ", (function(){
8918                     var symbol = l119;
8919                     var func = symbol.function;
8920                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8921                     return func;
8922                 })()(v606), ";", (function(){
8923                     var symbol = l111;
8924                     var value = symbol.value;
8925                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8926                     return value;
8927                 })()) : ""), "return str.slice(a,b);", (function(){
8928                     var symbol = l111;
8929                     var value = symbol.value;
8930                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8931                     return value;
8932                 })()), "})()");
8933             })();
8934         }
8935         catch (cf){
8936             if (cf.type == 'block' && cf.id == 221)
8937                 return cf.value;
8938             else
8939                 throw cf;
8940         }
8941     })();
8942
8943 })), cdr: (function(){
8944     var symbol = l222;
8945     var value = symbol.value;
8946     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8947     return value;
8948 })()});
8949 var l250 = {name: "CHAR"};
8950 (function(){
8951     return (l222).value = ({car: l44.function(l250, (function (v607,v608){
8952         if (arguments.length < 2) throw 'too few arguments';
8953         if (arguments.length > 2) throw 'too many arguments';
8954         return (function(){
8955             try {
8956                 return (function(){
8957                     return (function(v609,v610){
8958                         return l112.function("(function(){", (function(){
8959                             var symbol = l111;
8960                             var value = symbol.value;
8961                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8962                             return value;
8963                         })(), l117.function(l112.function("var ", "string", " = ", v609, ";", (function(){
8964                             var symbol = l111;
8965                             var value = symbol.value;
8966                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8967                             return value;
8968                         })()), l112.function("var ", "index", " = ", v610, ";", (function(){
8969                             var symbol = l111;
8970                             var value = symbol.value;
8971                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8972                             return value;
8973                         })()), l112.function("if (typeof ", "string", " != '", "string", "')", (function(){
8974                             var symbol = l111;
8975                             var value = symbol.value;
8976                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8977                             return value;
8978                         })(), l117.function("throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
8979                             var symbol = l111;
8980                             var value = symbol.value;
8981                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8982                             return value;
8983                         })())), l112.function("if (typeof ", "index", " != '", "number", "')", (function(){
8984                             var symbol = l111;
8985                             var value = symbol.value;
8986                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8987                             return value;
8988                         })(), l117.function("throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
8989                             var symbol = l111;
8990                             var value = symbol.value;
8991                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8992                             return value;
8993                         })())), l112.function("return ", (function(){
8994                             return "string.charCodeAt(index)";
8995                         })(), ";", (function(){
8996                             var symbol = l111;
8997                             var value = symbol.value;
8998                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8999                             return value;
9000                         })())), "})()");
9001                     })((function(){
9002                         var symbol = l119;
9003                         var func = symbol.function;
9004                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9005                         return func;
9006                     })()(v607),(function(){
9007                         var symbol = l119;
9008                         var func = symbol.function;
9009                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9010                         return func;
9011                     })()(v608));
9012                 })();
9013             }
9014             catch (cf){
9015                 if (cf.type == 'block' && cf.id == 222)
9016                     return cf.value;
9017                 else
9018                     throw cf;
9019             }
9020         })();
9021
9022     })), cdr: (function(){
9023         var symbol = l222;
9024         var value = symbol.value;
9025         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9026         return value;
9027     })()});
9028 })();
9029 (function(){
9030     return (l222).value = ({car: l44.function(l67, (function (v611,v612){
9031         if (arguments.length < 2) throw 'too few arguments';
9032         if (arguments.length > 2) throw 'too many arguments';
9033         return (function(){
9034             try {
9035                 return (function(){
9036                     return (function(v613,v614){
9037                         return l112.function("(function(){", (function(){
9038                             var symbol = l111;
9039                             var value = symbol.value;
9040                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9041                             return value;
9042                         })(), l117.function(l112.function("var ", "string1", " = ", v613, ";", (function(){
9043                             var symbol = l111;
9044                             var value = symbol.value;
9045                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9046                             return value;
9047                         })()), l112.function("var ", "string2", " = ", v614, ";", (function(){
9048                             var symbol = l111;
9049                             var value = symbol.value;
9050                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9051                             return value;
9052                         })()), l112.function("if (typeof ", "string1", " != '", "string", "')", (function(){
9053                             var symbol = l111;
9054                             var value = symbol.value;
9055                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9056                             return value;
9057                         })(), l117.function("throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
9058                             var symbol = l111;
9059                             var value = symbol.value;
9060                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9061                             return value;
9062                         })())), l112.function("if (typeof ", "string2", " != '", "string", "')", (function(){
9063                             var symbol = l111;
9064                             var value = symbol.value;
9065                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9066                             return value;
9067                         })(), l117.function("throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
9068                             var symbol = l111;
9069                             var value = symbol.value;
9070                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9071                             return value;
9072                         })())), l112.function("return ", (function(){
9073                             return "string1.concat(string2)";
9074                         })(), ";", (function(){
9075                             var symbol = l111;
9076                             var value = symbol.value;
9077                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9078                             return value;
9079                         })())), "})()");
9080                     })((function(){
9081                         var symbol = l119;
9082                         var func = symbol.function;
9083                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9084                         return func;
9085                     })()(v611),(function(){
9086                         var symbol = l119;
9087                         var func = symbol.function;
9088                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9089                         return func;
9090                     })()(v612));
9091                 })();
9092             }
9093             catch (cf){
9094                 if (cf.type == 'block' && cf.id == 223)
9095                     return cf.value;
9096                 else
9097                     throw cf;
9098             }
9099         })();
9100
9101     })), cdr: (function(){
9102         var symbol = l222;
9103         var value = symbol.value;
9104         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9105         return value;
9106     })()});
9107 })();
9108 var l251 = {name: "FUNCALL"};
9109 (l222).value = ({car: l44.function(l251, (function (v616){
9110     if (arguments.length < 1) throw 'too few arguments';
9111     var v615= l3.value;
9112     for (var i = arguments.length-1; i>=1; i--)
9113         v615 = {car: arguments[i], cdr:
9114     v615};
9115     return (function(){
9116         try {
9117             return (function(){
9118                 return l112.function("(", (function(){
9119                     var symbol = l119;
9120                     var func = symbol.function;
9121                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9122                     return func;
9123                 })()(v616), ")(", l114.function(l68.function((function(){
9124                     var symbol = l119;
9125                     var func = symbol.function;
9126                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9127                     return func;
9128                 })(), v615), ", "), ")");
9129             })();
9130         }
9131         catch (cf){
9132             if (cf.type == 'block' && cf.id == 224)
9133                 return cf.value;
9134             else
9135                 throw cf;
9136         }
9137     })();
9138
9139 })), cdr: (function(){
9140     var symbol = l222;
9141     var value = symbol.value;
9142     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9143     return value;
9144 })()});
9145 var l252 = {name: "APPLY"};
9146 (l222).value = ({car: l44.function(l252, (function (v618){
9147     if (arguments.length < 1) throw 'too few arguments';
9148     var v617= l3.value;
9149     for (var i = arguments.length-1; i>=1; i--)
9150         v617 = {car: arguments[i], cdr:
9151     v617};
9152     return (function(){
9153         try {
9154             return (function(){
9155                 return (l11.function(v617) !== l3.value ? l112.function("(", (function(){
9156                     var symbol = l119;
9157                     var func = symbol.function;
9158                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9159                     return func;
9160                 })()(v618), ")()") : (function(v619,v620){
9161                     return l112.function("(function(){", (function(){
9162                         var symbol = l111;
9163                         var value = symbol.value;
9164                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9165                         return value;
9166                     })(), l117.function("var f = ", (function(){
9167                         var symbol = l119;
9168                         var func = symbol.function;
9169                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9170                         return func;
9171                     })()(v618), ";", (function(){
9172                         var symbol = l111;
9173                         var value = symbol.value;
9174                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9175                         return value;
9176                     })(), "var args = [", l114.function(l68.function((function(){
9177                         var symbol = l119;
9178                         var func = symbol.function;
9179                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9180                         return func;
9181                     })(), v619), ", "), "];", (function(){
9182                         var symbol = l111;
9183                         var value = symbol.value;
9184                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9185                         return value;
9186                     })(), "var tail = (", (function(){
9187                         var symbol = l119;
9188                         var func = symbol.function;
9189                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9190                         return func;
9191                     })()(v620), ");", (function(){
9192                         var symbol = l111;
9193                         var value = symbol.value;
9194                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9195                         return value;
9196                     })(), "while (tail != ", (function(){
9197                         var symbol = l119;
9198                         var func = symbol.function;
9199                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9200                         return func;
9201                     })()(l3.value), "){", (function(){
9202                         var symbol = l111;
9203                         var value = symbol.value;
9204                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9205                         return value;
9206                     })(), "    args.push(tail.car);", (function(){
9207                         var symbol = l111;
9208                         var value = symbol.value;
9209                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9210                         return value;
9211                     })(), "    tail = tail.cdr;", (function(){
9212                         var symbol = l111;
9213                         var value = symbol.value;
9214                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9215                         return value;
9216                     })(), "}", (function(){
9217                         var symbol = l111;
9218                         var value = symbol.value;
9219                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9220                         return value;
9221                     })(), "return f.apply(this, args);", (function(){
9222                         var symbol = l111;
9223                         var value = symbol.value;
9224                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9225                         return value;
9226                     })()), "})()");
9227                 })(l80.function(v617),(function(){
9228                     var tmp = l79.function(v617);
9229                     return tmp === l3.value? l3.value: tmp.car;
9230                 })()));
9231             })();
9232         }
9233         catch (cf){
9234             if (cf.type == 'block' && cf.id == 225)
9235                 return cf.value;
9236             else
9237                 throw cf;
9238         }
9239     })();
9240
9241 })), cdr: (function(){
9242     var symbol = l222;
9243     var value = symbol.value;
9244     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9245     return value;
9246 })()});
9247 var l253 = {name: "JS-EVAL"};
9248 (function(){
9249     return (l222).value = ({car: l44.function(l253, (function (v621){
9250         if (arguments.length < 1) throw 'too few arguments';
9251         if (arguments.length > 1) throw 'too many arguments';
9252         return (function(){
9253             try {
9254                 return (function(){
9255                     return (function(v622){
9256                         return l112.function("(function(){", (function(){
9257                             var symbol = l111;
9258                             var value = symbol.value;
9259                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9260                             return value;
9261                         })(), l117.function(l112.function("var ", "string", " = ", v622, ";", (function(){
9262                             var symbol = l111;
9263                             var value = symbol.value;
9264                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9265                             return value;
9266                         })()), l112.function("if (typeof ", "string", " != '", "string", "')", (function(){
9267                             var symbol = l111;
9268                             var value = symbol.value;
9269                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9270                             return value;
9271                         })(), l117.function("throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
9272                             var symbol = l111;
9273                             var value = symbol.value;
9274                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9275                             return value;
9276                         })())), l112.function("return ", (function(){
9277                             return "eval.apply(window, [string])";
9278                         })(), ";", (function(){
9279                             var symbol = l111;
9280                             var value = symbol.value;
9281                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9282                             return value;
9283                         })())), "})()");
9284                     })((function(){
9285                         var symbol = l119;
9286                         var func = symbol.function;
9287                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9288                         return func;
9289                     })()(v621));
9290                 })();
9291             }
9292             catch (cf){
9293                 if (cf.type == 'block' && cf.id == 226)
9294                     return cf.value;
9295                 else
9296                     throw cf;
9297             }
9298         })();
9299
9300     })), cdr: (function(){
9301         var symbol = l222;
9302         var value = symbol.value;
9303         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9304         return value;
9305     })()});
9306 })();
9307 var l254 = {name: "ERROR"};
9308 (function(){
9309     return (l222).value = ({car: l44.function(l254, (function (v623){
9310         if (arguments.length < 1) throw 'too few arguments';
9311         if (arguments.length > 1) throw 'too many arguments';
9312         return (function(){
9313             try {
9314                 return (function(){
9315                     return (function(v624){
9316                         return l112.function("(function(){", (function(){
9317                             var symbol = l111;
9318                             var value = symbol.value;
9319                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9320                             return value;
9321                         })(), l117.function("throw ", v624, ";", (function(){
9322                             var symbol = l111;
9323                             var value = symbol.value;
9324                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9325                             return value;
9326                         })()), "})()");
9327                     })((function(){
9328                         var symbol = l119;
9329                         var func = symbol.function;
9330                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9331                         return func;
9332                     })()(v623));
9333                 })();
9334             }
9335             catch (cf){
9336                 if (cf.type == 'block' && cf.id == 227)
9337                     return cf.value;
9338                 else
9339                     throw cf;
9340             }
9341         })();
9342
9343     })), cdr: (function(){
9344         var symbol = l222;
9345         var value = symbol.value;
9346         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9347         return value;
9348     })()});
9349 })();
9350 var l255 = {name: "NEW"};
9351 (function(){
9352     return (l222).value = ({car: l44.function(l255, (function (){
9353         if (arguments.length > 0) throw 'too many arguments';
9354         return (function(){
9355             try {
9356                 return (function(){
9357                     return (function(){
9358                         return "{}";
9359                     })();
9360                 })();
9361             }
9362             catch (cf){
9363                 if (cf.type == 'block' && cf.id == 228)
9364                     return cf.value;
9365                 else
9366                     throw cf;
9367             }
9368         })();
9369
9370     })), cdr: (function(){
9371         var symbol = l222;
9372         var value = symbol.value;
9373         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9374         return value;
9375     })()});
9376 })();
9377 var l256 = {name: "OBJECTP"};
9378 (function(){
9379     return (l222).value = ({car: l44.function(l256, (function (v625){
9380         if (arguments.length < 1) throw 'too few arguments';
9381         if (arguments.length > 1) throw 'too many arguments';
9382         return (function(){
9383             try {
9384                 return (function(){
9385                     return (function(v626){
9386                         return l118.function(l112.function("(typeof (", v626, ") === 'object')"));
9387                     })((function(){
9388                         var symbol = l119;
9389                         var func = symbol.function;
9390                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9391                         return func;
9392                     })()(v625));
9393                 })();
9394             }
9395             catch (cf){
9396                 if (cf.type == 'block' && cf.id == 229)
9397                     return cf.value;
9398                 else
9399                     throw cf;
9400             }
9401         })();
9402
9403     })), cdr: (function(){
9404         var symbol = l222;
9405         var value = symbol.value;
9406         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9407         return value;
9408     })()});
9409 })();
9410 var l257 = {name: "OGET"};
9411 (function(){
9412     return (l222).value = ({car: l44.function(l257, (function (v627,v628){
9413         if (arguments.length < 2) throw 'too few arguments';
9414         if (arguments.length > 2) throw 'too many arguments';
9415         return (function(){
9416             try {
9417                 return (function(){
9418                     return (function(v629,v630){
9419                         return l112.function("(function(){", (function(){
9420                             var symbol = l111;
9421                             var value = symbol.value;
9422                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9423                             return value;
9424                         })(), l117.function("var tmp = ", "(", v629, ")[", v630, "];", (function(){
9425                             var symbol = l111;
9426                             var value = symbol.value;
9427                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9428                             return value;
9429                         })(), "return tmp == undefined? ", (function(){
9430                             var symbol = l119;
9431                             var func = symbol.function;
9432                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9433                             return func;
9434                         })()(l3.value), ": tmp ;", (function(){
9435                             var symbol = l111;
9436                             var value = symbol.value;
9437                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9438                             return value;
9439                         })()), "})()");
9440                     })((function(){
9441                         var symbol = l119;
9442                         var func = symbol.function;
9443                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9444                         return func;
9445                     })()(v627),(function(){
9446                         var symbol = l119;
9447                         var func = symbol.function;
9448                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9449                         return func;
9450                     })()(v628));
9451                 })();
9452             }
9453             catch (cf){
9454                 if (cf.type == 'block' && cf.id == 230)
9455                     return cf.value;
9456                 else
9457                     throw cf;
9458             }
9459         })();
9460
9461     })), cdr: (function(){
9462         var symbol = l222;
9463         var value = symbol.value;
9464         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9465         return value;
9466     })()});
9467 })();
9468 var l258 = {name: "OSET"};
9469 (function(){
9470     return (l222).value = ({car: l44.function(l258, (function (v631,v632,v633){
9471         if (arguments.length < 3) throw 'too few arguments';
9472         if (arguments.length > 3) throw 'too many arguments';
9473         return (function(){
9474             try {
9475                 return (function(){
9476                     return (function(v634,v635,v636){
9477                         return l112.function("((", v634, ")[", v635, "] = ", v636, ")");
9478                     })((function(){
9479                         var symbol = l119;
9480                         var func = symbol.function;
9481                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9482                         return func;
9483                     })()(v631),(function(){
9484                         var symbol = l119;
9485                         var func = symbol.function;
9486                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9487                         return func;
9488                     })()(v632),(function(){
9489                         var symbol = l119;
9490                         var func = symbol.function;
9491                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9492                         return func;
9493                     })()(v633));
9494                 })();
9495             }
9496             catch (cf){
9497                 if (cf.type == 'block' && cf.id == 231)
9498                     return cf.value;
9499                 else
9500                     throw cf;
9501             }
9502         })();
9503
9504     })), cdr: (function(){
9505         var symbol = l222;
9506         var value = symbol.value;
9507         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9508         return value;
9509     })()});
9510 })();
9511 var l259 = {name: "IN"};
9512 (function(){
9513     return (l222).value = ({car: l44.function(l259, (function (v637,v638){
9514         if (arguments.length < 2) throw 'too few arguments';
9515         if (arguments.length > 2) throw 'too many arguments';
9516         return (function(){
9517             try {
9518                 return (function(){
9519                     return (function(v639,v640){
9520                         return l118.function(l112.function("((", v639, ") in (", v640, "))"));
9521                     })((function(){
9522                         var symbol = l119;
9523                         var func = symbol.function;
9524                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9525                         return func;
9526                     })()(v637),(function(){
9527                         var symbol = l119;
9528                         var func = symbol.function;
9529                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9530                         return func;
9531                     })()(v638));
9532                 })();
9533             }
9534             catch (cf){
9535                 if (cf.type == 'block' && cf.id == 232)
9536                     return cf.value;
9537                 else
9538                     throw cf;
9539             }
9540         })();
9541
9542     })), cdr: (function(){
9543         var symbol = l222;
9544         var value = symbol.value;
9545         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9546         return value;
9547     })()});
9548 })();
9549 var l260 = {name: "FUNCTIONP"};
9550 (function(){
9551     return (l222).value = ({car: l44.function(l260, (function (v641){
9552         if (arguments.length < 1) throw 'too few arguments';
9553         if (arguments.length > 1) throw 'too many arguments';
9554         return (function(){
9555             try {
9556                 return (function(){
9557                     return (function(v642){
9558                         return l118.function(l112.function("(typeof ", v642, " == 'function')"));
9559                     })((function(){
9560                         var symbol = l119;
9561                         var func = symbol.function;
9562                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9563                         return func;
9564                     })()(v641));
9565                 })();
9566             }
9567             catch (cf){
9568                 if (cf.type == 'block' && cf.id == 233)
9569                     return cf.value;
9570                 else
9571                     throw cf;
9572             }
9573         })();
9574
9575     })), cdr: (function(){
9576         var symbol = l222;
9577         var value = symbol.value;
9578         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9579         return value;
9580     })()});
9581 })();
9582 var l261 = {name: "WRITE-STRING"};
9583 (function(){
9584     return (l222).value = ({car: l44.function(l261, (function (v643){
9585         if (arguments.length < 1) throw 'too few arguments';
9586         if (arguments.length > 1) throw 'too many arguments';
9587         return (function(){
9588             try {
9589                 return (function(){
9590                     return (function(v644){
9591                         return l112.function("(function(){", (function(){
9592                             var symbol = l111;
9593                             var value = symbol.value;
9594                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9595                             return value;
9596                         })(), l117.function(l112.function("var ", "x", " = ", v644, ";", (function(){
9597                             var symbol = l111;
9598                             var value = symbol.value;
9599                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9600                             return value;
9601                         })()), l112.function("if (typeof ", "x", " != '", "string", "')", (function(){
9602                             var symbol = l111;
9603                             var value = symbol.value;
9604                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9605                             return value;
9606                         })(), l117.function("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
9607                             var symbol = l111;
9608                             var value = symbol.value;
9609                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9610                             return value;
9611                         })())), l112.function("return ", (function(){
9612                             return "lisp.write(x)";
9613                         })(), ";", (function(){
9614                             var symbol = l111;
9615                             var value = symbol.value;
9616                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9617                             return value;
9618                         })())), "})()");
9619                     })((function(){
9620                         var symbol = l119;
9621                         var func = symbol.function;
9622                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9623                         return func;
9624                     })()(v643));
9625                 })();
9626             }
9627             catch (cf){
9628                 if (cf.type == 'block' && cf.id == 234)
9629                     return cf.value;
9630                 else
9631                     throw cf;
9632             }
9633         })();
9634
9635     })), cdr: (function(){
9636         var symbol = l222;
9637         var value = symbol.value;
9638         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9639         return value;
9640     })()});
9641 })();
9642 (function(){
9643     (l170).function = (function(v647){
9644         ((v647)["fname"] = "MACRO");
9645         return v647;
9646     })((function (v645){
9647         if (arguments.length < 1) throw 'too few arguments';
9648         if (arguments.length > 1) throw 'too many arguments';
9649         return (function(){
9650             try {
9651                 return (function(){
9652                     return (((function(){
9653                         var tmp = v645;
9654                         return (typeof tmp == 'object' && 'name' in tmp);
9655                     })()?l4.value: l3.value) !== l3.value ? (function(v646){
9656                         return (((l146.function(v646) === l170)?l4.value: l3.value) !== l3.value ? v646 : l3.value);
9657                     })(l158.function(v645, (function(){
9658                         var symbol = l159;
9659                         var value = symbol.value;
9660                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9661                         return value;
9662                     })(), l97)) : l3.value);
9663                 })();
9664             }
9665             catch (cf){
9666                 if (cf.type == 'block' && cf.id == 235)
9667                     return cf.value;
9668                 else
9669                     throw cf;
9670             }
9671         })();
9672
9673     }));
9674     return l170;
9675 })();
9676 var l262 = {name: "LS-MACROEXPAND-1"};
9677 (function(){
9678     (l262).function = (function(v652){
9679         ((v652)["fname"] = "LS-MACROEXPAND-1");
9680         return v652;
9681     })((function (v648){
9682         if (arguments.length < 1) throw 'too few arguments';
9683         if (arguments.length > 1) throw 'too many arguments';
9684         return (function(){
9685             try {
9686                 return (function(){
9687                     return (function(v649){
9688                         return (v649 !== l3.value ? (function(v650){
9689                             (l59.function(v650) !== l3.value ? (function(){
9690                                 return (function(v651){
9691                                     l149.function(v649, v651);
9692                                     return v650 = v651;
9693                                 })((function(){
9694                                     var symbol = l204;
9695                                     var func = symbol.function;
9696                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9697                                     return func;
9698                                 })()(v650));
9699                             })() : l3.value);
9700                             return (function(){
9701                                 var f = v650;
9702                                 var args = [];
9703                                 var tail = ((function(){
9704                                     var tmp = v648;
9705                                     return tmp === l3.value? l3.value: tmp.cdr;
9706                                 })());
9707                                 while (tail != l3.value){
9708                                     args.push(tail.car);
9709                                     tail = tail.cdr;
9710                                 }
9711                                 return f.apply(this, args);
9712                             })();
9713                         })(l147.function(v649)) : v648);
9714                     })(l170.function((function(){
9715                         var tmp = v648;
9716                         return tmp === l3.value? l3.value: tmp.car;
9717                     })()));
9718                 })();
9719             }
9720             catch (cf){
9721                 if (cf.type == 'block' && cf.id == 236)
9722                     return cf.value;
9723                 else
9724                     throw cf;
9725             }
9726         })();
9727
9728     }));
9729     return l262;
9730 })();
9731 var l263 = {name: "COMPILE-FUNCALL"};
9732 (function(){
9733     (l263).function = (function(v655){
9734         ((v655)["fname"] = "COMPILE-FUNCALL");
9735         return v655;
9736     })((function (v653,v654){
9737         if (arguments.length < 2) throw 'too few arguments';
9738         if (arguments.length > 2) throw 'too many arguments';
9739         return (function(){
9740             try {
9741                 return (function(){
9742                     return ((((function(){
9743                         var tmp = v653;
9744                         return (typeof tmp == 'object' && 'name' in tmp);
9745                     })()?l4.value: l3.value) !== l3.value ? l172.function(v653, l97, l176) : l3.value) !== l3.value ? l112.function((function(){
9746                         var symbol = l119;
9747                         var func = symbol.function;
9748                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9749                         return func;
9750                     })()(l62.function(l44.function(l138), l44.function(v653))), ".function(", l114.function(l68.function((function(){
9751                         var symbol = l119;
9752                         var func = symbol.function;
9753                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9754                         return func;
9755                     })(), v654), ", "), ")") : l112.function((function(){
9756                         var symbol = l119;
9757                         var func = symbol.function;
9758                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9759                         return func;
9760                     })()(l62.function(l44.function(l97), l44.function(v653))), "(", l114.function(l68.function((function(){
9761                         var symbol = l119;
9762                         var func = symbol.function;
9763                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9764                         return func;
9765                     })(), v654), ", "), ")"));
9766                 })();
9767             }
9768             catch (cf){
9769                 if (cf.type == 'block' && cf.id == 237)
9770                     return cf.value;
9771                 else
9772                     throw cf;
9773             }
9774         })();
9775
9776     }));
9777     return l263;
9778 })();
9779 (function(){
9780     (l192).function = (function(v658){
9781         ((v658)["fname"] = "LS-COMPILE-BLOCK");
9782         return v658;
9783     })((function (v656,v657){
9784         if (arguments.length < 1) throw 'too few arguments';
9785         if (arguments.length > 2) throw 'too many arguments';
9786         switch(arguments.length){
9787         case 1:
9788         v657=l3.value;
9789         default: break;
9790         }
9791         return (function(){
9792             try {
9793                 return (function(){
9794                     return (v657 !== l3.value ? l112.function(l192.function(l80.function(v656)), "return ", (function(){
9795                         var symbol = l119;
9796                         var func = symbol.function;
9797                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9798                         return func;
9799                     })()((function(){
9800                         var tmp = l79.function(v656);
9801                         return tmp === l3.value? l3.value: tmp.car;
9802                     })()), ";") : l115.function(l83.function((function(){
9803                         var symbol = l167;
9804                         var func = symbol.function;
9805                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9806                         return func;
9807                     })(), l68.function((function(){
9808                         var symbol = l119;
9809                         var func = symbol.function;
9810                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9811                         return func;
9812                     })(), v656)), l112.function(";", (function(){
9813                         var symbol = l111;
9814                         var value = symbol.value;
9815                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9816                         return value;
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     }));
9829     return l192;
9830 })();
9831 (function(){
9832     (l119).function = (function(v665){
9833         ((v665)["fname"] = "LS-COMPILE");
9834         return v665;
9835     })((function (v659){
9836         if (arguments.length < 1) throw 'too few arguments';
9837         if (arguments.length > 1) throw 'too many arguments';
9838         return (function(){
9839             try {
9840                 return (function(){
9841                     return (((function(){
9842                         var tmp = v659;
9843                         return (typeof tmp == 'object' && 'name' in tmp);
9844                     })()?l4.value: l3.value) !== l3.value ? (function(){
9845                         return (function(v660){
9846                             return (((l146.function(v660) === l164)?l4.value: l3.value) !== l3.value ? (function(){
9847                                 return l147.function(v660);
9848                             })() : (l172.function(v659, l98, l175) !== l3.value ? (function(){
9849                                 return l112.function(l119.function(l62.function(l44.function(l138), l44.function(v659))), ".value");
9850                             })() : (function(){
9851                                 return l119.function(l62.function(l44.function(l240), l44.function(l62.function(l44.function(l138), l44.function(v659)))));
9852                             })()));
9853                         })(l158.function(v659, (function(){
9854                             var symbol = l159;
9855                             var value = symbol.value;
9856                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9857                             return value;
9858                         })(), l98));
9859                     })() : (l74.function(v659) !== l3.value ? (function(){
9860                         return l16.function(v659);
9861                     })() : (((typeof(v659) == "string")?l4.value: l3.value) !== l3.value ? (function(){
9862                         return l112.function("\"", l122.function(v659), "\"");
9863                     })() : (l59.function(v659) !== l3.value ? (function(){
9864                         return (function(v661,v662){
9865                             return (l90.function(v661, (function(){
9866                                 var symbol = l178;
9867                                 var value = symbol.value;
9868                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9869                                 return value;
9870                             })()) !== l3.value ? (function(){
9871                                 return (function(v663){
9872                                     return (function(){
9873                                         var f = v663;
9874                                         var args = [];
9875                                         var tail = (v662);
9876                                         while (tail != l3.value){
9877                                             args.push(tail.car);
9878                                             tail = tail.cdr;
9879                                         }
9880                                         return f.apply(this, args);
9881                                     })();
9882                                 })(l41.function(l90.function(v661, (function(){
9883                                     var symbol = l178;
9884                                     var value = symbol.value;
9885                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9886                                     return value;
9887                                 })())));
9888                             })() : ((l90.function(v661, (function(){
9889                                 var symbol = l222;
9890                                 var value = symbol.value;
9891                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9892                                 return value;
9893                             })()) !== l3.value ? l28.function(l172.function(v661, l97, l174)) : l3.value) !== l3.value ? (function(){
9894                                 return (function(v664){
9895                                     return (function(){
9896                                         var f = v664;
9897                                         var args = [];
9898                                         var tail = (v662);
9899                                         while (tail != l3.value){
9900                                             args.push(tail.car);
9901                                             tail = tail.cdr;
9902                                         }
9903                                         return f.apply(this, args);
9904                                     })();
9905                                 })(l41.function(l90.function(v661, (function(){
9906                                     var symbol = l222;
9907                                     var value = symbol.value;
9908                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9909                                     return value;
9910                                 })())));
9911                             })() : (function(){
9912                                 return (l170.function(v661) !== l3.value ? l119.function(l262.function(v659)) : l263.function(v661, v662));
9913                             })()));
9914                         })((function(){
9915                             var tmp = v659;
9916                             return tmp === l3.value? l3.value: tmp.car;
9917                         })(),(function(){
9918                             var tmp = v659;
9919                             return tmp === l3.value? l3.value: tmp.cdr;
9920                         })());
9921                     })() : l3.value))));
9922                 })();
9923             }
9924             catch (cf){
9925                 if (cf.type == 'block' && cf.id == 239)
9926                     return cf.value;
9927                 else
9928                     throw cf;
9929             }
9930         })();
9931
9932     }));
9933     return l119;
9934 })();
9935 var l264 = {name: "LS-COMPILE-TOPLEVEL"};
9936 (function(){
9937     (l264).function = (function(v670){
9938         ((v670)["fname"] = "LS-COMPILE-TOPLEVEL");
9939         return v670;
9940     })((function (v666){
9941         if (arguments.length < 1) throw 'too few arguments';
9942         if (arguments.length > 1) throw 'too many arguments';
9943         return (function(){
9944             try {
9945                 return (function(){
9946                     return (function(v667){
9947                         try {
9948                             var tmp;
9949                             tmp = l165.value;
9950                             l165.value = v667;
9951                             v667 = tmp;
9952                             return ((((function(){
9953                                 var tmp = v666;
9954                                 return (typeof tmp == 'object' && 'car' in tmp);
9955                             })()?l4.value: l3.value) !== l3.value ? (((function(){
9956                                 var tmp = v666;
9957                                 return tmp === l3.value? l3.value: tmp.car;
9958                             })() === l205)?l4.value: l3.value) : l3.value) !== l3.value ? (function(){
9959                                 return (function(v668){
9960                                     return l114.function(l83.function((function(){
9961                                         var symbol = l167;
9962                                         var func = symbol.function;
9963                                         if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9964                                         return func;
9965                                     })(), v668));
9966                                 })(l68.function((function(){
9967                                     var symbol = l264;
9968                                     var func = symbol.function;
9969                                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9970                                     return func;
9971                                 })(), (function(){
9972                                     var tmp = v666;
9973                                     return tmp === l3.value? l3.value: tmp.cdr;
9974                                 })()));
9975                             })() : (function(){
9976                                 return (function(v669){
9977                                     return l112.function(l115.function(l168.function(), l112.function(";", (function(){
9978                                         var symbol = l111;
9979                                         var value = symbol.value;
9980                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9981                                         return value;
9982                                     })())), (v669 !== l3.value ? l112.function(v669, ";", (function(){
9983                                         var symbol = l111;
9984                                         var value = symbol.value;
9985                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9986                                         return value;
9987                                     })()) : ""));
9988                                 })(l119.function(v666));
9989                             })());
9990                         }
9991                         finally {
9992                             l165.value = v667;
9993                         }
9994                     })(l3.value);
9995                 })();
9996             }
9997             catch (cf){
9998                 if (cf.type == 'block' && cf.id == 240)
9999                     return cf.value;
10000                 else
10001                     throw cf;
10002             }
10003         })();
10004
10005     }));
10006     return l264;
10007 })();
10008 var l265 = {name: "WITH-COMPILATION-UNIT"};
10009 l265;
10010 (function(){
10011     (l204).function = (function(v676){
10012         ((v676)["fname"] = "EVAL");
10013         return v676;
10014     })((function (v671){
10015         if (arguments.length < 1) throw 'too few arguments';
10016         if (arguments.length > 1) throw 'too many arguments';
10017         return (function(){
10018             try {
10019                 return (function(){
10020                     return (function(v675){
10021                         return (function(){
10022                             var string = v675;
10023                             if (typeof string != 'string')
10024                                 throw 'The value ' + string + ' is not a type string.';
10025                             return eval.apply(window, [string]);
10026                         })();
10027                     })((function(v672){
10028                         (function(){
10029                             try {
10030                                 return (function(){
10031                                     return (function(v673,v674){
10032                                         (function(){
10033                                             while(v673 !== l3.value){
10034                                                 v674 = (function(){
10035                                                     var tmp = v673;
10036                                                     return tmp === l3.value? l3.value: tmp.car;
10037                                                 })();
10038                                                 (function(){
10039                                                     (v674)();
10040                                                     return l3.value;
10041                                                 })();
10042                                                 v673 = (function(){
10043                                                     var tmp = v673;
10044                                                     return tmp === l3.value? l3.value: tmp.cdr;
10045                                                 })();
10046                                             }return l3.value;
10047                                         })();
10048                                         return l3.value;
10049                                     })((function(){
10050                                         var symbol = l143;
10051                                         var value = symbol.value;
10052                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10053                                         return value;
10054                                     })(),l3.value);
10055                                 })();
10056                             }
10057                             catch (cf){
10058                                 if (cf.type == 'block' && cf.id == 242)
10059                                     return cf.value;
10060                                 else
10061                                     throw cf;
10062                             }
10063                         })();
10064                         return v672;
10065                     })((function(){
10066                         (l143).value = l3.value;
10067                         return l264.function(v671);
10068                     })()));
10069                 })();
10070             }
10071             catch (cf){
10072                 if (cf.type == 'block' && cf.id == 241)
10073                     return cf.value;
10074                 else
10075                     throw cf;
10076             }
10077         })();
10078
10079     }));
10080     return l204;
10081 })();
10082 (function(){
10083     var string = "var lisp";
10084     if (typeof string != 'string')
10085         throw 'The value ' + string + ' is not a type string.';
10086     return eval.apply(window, [string]);
10087 })();
10088 (lisp = {});
10089 (lisp.read = (function(){
10090     var symbol = l142;
10091     var func = symbol.function;
10092     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10093     return func;
10094 })());
10095 (lisp.print = (function(){
10096     var symbol = l121;
10097     var func = symbol.function;
10098     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10099     return func;
10100 })());
10101 (lisp.eval = (function(){
10102     var symbol = l204;
10103     var func = symbol.function;
10104     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10105     return func;
10106 })());
10107 (lisp.compile = (function(){
10108     var symbol = l264;
10109     var func = symbol.function;
10110     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10111     return func;
10112 })());
10113 (lisp.evalString = (function (v677){
10114     if (arguments.length < 1) throw 'too few arguments';
10115     if (arguments.length > 1) throw 'too many arguments';
10116     return l204.function(l142.function(v677));
10117
10118 }));
10119 (lisp.compileString = (function (v678){
10120     if (arguments.length < 1) throw 'too few arguments';
10121     if (arguments.length > 1) throw 'too many arguments';
10122     return l264.function(l142.function(v678));
10123
10124 }));
10125 var l266 = {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: l195, cdr: "l195"}, cdr: {car: {car: l194, cdr: "l194"}, cdr: {car: {car: l193, cdr: "l193"}, cdr: {car: {car: l192, cdr: "l192"}, cdr: {car: {car: l191, cdr: "l191"}, cdr: {car: {car: l190, cdr: "l190"}, cdr: {car: {car: l189, cdr: "l189"}, cdr: {car: {car: l188, cdr: "l188"}, cdr: {car: {car: l187, cdr: "l187"}, cdr: {car: {car: l186, cdr: "l186"}, cdr: {car: {car: l185, cdr: "l185"}, cdr: {car: {car: 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}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}};
10126 var l267 = {name: "BODY"};
10127 var l268 = {name: "CHECK"};
10128 var l269 = {name: "DECLS"};
10129 var l270 = {name: "DECL"};
10130 var l271 = {name: "NAME"};
10131 var l272 = {name: "ARGS"};
10132 var l273 = {name: "ARG"};
10133 var l274 = {name: "FORM"};
10134 var l275 = {name: "FORM1"};
10135 var l276 = {name: "RESULT"};
10136 var l277 = {name: "VALUE"};
10137 var l278 = {name: "FORMS"};
10138 var l279 = {name: "G"};
10139 var l280 = {name: "CLAUSULES"};
10140 var l281 = {name: "!FORM"};
10141 var l282 = {name: "CLAUSULE"};
10142 var l283 = {name: "ITER"};
10143 var l284 = {name: "G!TO"};
10144 var l285 = {name: "VAR"};
10145 var l286 = {name: "TO"};
10146 var l287 = {name: "G!LIST"};
10147 var l288 = {name: "X"};
10148 var l289 = {name: "PLACE"};
10149 var l290 = {name: "DELTA"};
10150 var l291 = {name: "CONDITION"};
10151 var l292 = {name: "DOCSTRING"};
10152 var l293 = {name: "&BODY"};
10153 var l294 = {car: {car: {car: l4, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l175, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l3, cdr: {car: l98, cdr: {car: l3, cdr: {car: {car: l175, cdr: l3}, cdr: l3}}}}, cdr: l3}}, cdr: {car: {car: {car: l204, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l265, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l183, cdr: {car: l267, cdr: l3}}, cdr: {car: {car: l139, cdr: {car: {car: l56, cdr: {car: {car: l205, cdr: {car: {car: l193, cdr: {car: l143, cdr: {car: l3, cdr: l3}}}, cdr: {car: {car: l140, cdr: {car: l267, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l49, cdr: {car: {car: l268, cdr: {car: l143, cdr: l3}}, cdr: {car: {car: l251, cdr: {car: l268, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l264, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l119, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l192, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l263, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l262, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l170, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l226, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l225, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l269, cdr: {car: l183, cdr: {car: l267, cdr: l3}}}, cdr: {car: {car: l139, cdr: {car: {car: l120, cdr: {car: {car: l140, cdr: {car: {car: l68, cdr: {car: {car: l191, cdr: {car: {car: l270, cdr: l3}, cdr: {car: {car: l139, cdr: {car: {car: l112, cdr: {car: "var ", cdr: {car: {car: l141, cdr: {car: {car: l40, cdr: {car: l270, cdr: l3}}, cdr: l3}}, cdr: {car: " = ", cdr: {car: {car: l141, cdr: {car: {car: l42, cdr: {car: l270, cdr: l3}}, cdr: l3}}, cdr: {car: ";", cdr: {car: l111, cdr: l3}}}}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l269, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l140, cdr: {car: {car: l68, cdr: {car: {car: l191, cdr: {car: {car: l270, cdr: l3}, cdr: {car: {car: l139, cdr: {car: {car: l112, cdr: {car: "if (typeof ", cdr: {car: {car: l141, cdr: {car: {car: l40, cdr: {car: l270, cdr: l3}}, cdr: l3}}, cdr: {car: " != '", cdr: {car: {car: l141, cdr: {car: {car: l41, cdr: {car: l270, cdr: l3}}, cdr: l3}}, cdr: {car: "')", cdr: {car: l111, cdr: {car: {car: l117, cdr: {car: "throw 'The value ' + ", cdr: {car: {car: l141, cdr: {car: {car: l40, cdr: {car: l270, cdr: l3}}, cdr: l3}}, cdr: {car: " + ' is not a type ", cdr: {car: {car: l141, cdr: {car: {car: l41, cdr: {car: l270, cdr: l3}}, cdr: l3}}, cdr: {car: ".';", cdr: {car: l111, cdr: l3}}}}}}}, cdr: l3}}}}}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l269, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l112, cdr: {car: "return ", cdr: {car: {car: l205, cdr: {car: {car: l140, cdr: {car: l267, cdr: l3}}, cdr: l3}}, cdr: {car: ";", cdr: {car: l111, cdr: l3}}}}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l224, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l271, cdr: {car: l272, cdr: {car: l183, cdr: {car: l267, cdr: l3}}}}, cdr: {car: {car: l139, cdr: {car: {car: l205, cdr: {car: {car: l223, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: {car: {car: l141, cdr: {car: l272, cdr: l3}}, cdr: {car: {car: l208, cdr: {car: {car: l141, cdr: {car: {car: l68, cdr: {car: {car: l191, cdr: {car: {car: l273, cdr: l3}, cdr: {car: {car: l139, cdr: {car: {car: {car: l141, cdr: {car: l273, cdr: l3}}, cdr: {car: {car: l119, cdr: {car: {car: l141, cdr: {car: l273, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l272, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l140, cdr: {car: l267, cdr: l3}}, cdr: l3}}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l223, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l271, cdr: {car: l272, cdr: {car: l183, cdr: {car: l267, cdr: l3}}}}, cdr: {car: {car: l139, cdr: {car: {car: l48, cdr: {car: {car: l44, cdr: {car: {car: l138, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l191, cdr: {car: {car: l141, cdr: {car: l272, cdr: l3}}, cdr: {car: {car: l155, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: {car: {car: l140, cdr: {car: l267, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l222, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l139, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l274, cdr: l3}, cdr: {car: {car: l220, cdr: {car: l274, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l221, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l220, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l216, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l215, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l207, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l206, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l271, cdr: {car: l272, cdr: {car: l274, cdr: l3}}}, cdr: {car: {car: l139, cdr: {car: {car: l179, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: {car: {car: l141, cdr: {car: l272, cdr: l3}}, cdr: {car: {car: l119, cdr: {car: {car: l141, cdr: {car: l274, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l200, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l199, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l122, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l190, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l189, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l188, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l187, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l186, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l185, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l179, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l271, cdr: {car: l272, cdr: {car: l183, cdr: {car: l267, cdr: l3}}}}, cdr: {car: {car: l139, cdr: {car: {car: l48, cdr: {car: {car: l44, cdr: {car: {car: l138, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l191, cdr: {car: {car: l141, cdr: {car: l272, cdr: l3}}, cdr: {car: {car: l155, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: {car: {car: l140, cdr: {car: l267, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l178, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l173, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l172, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l171, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l169, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l168, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l167, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l166, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l163, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l162, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l161, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l158, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l157, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l154, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l153, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l152, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l151, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l150, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l149, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l148, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l147, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l146, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l145, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l144, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l142, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l134, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l136, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l135, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l133, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l132, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l131, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l130, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l129, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l128, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l127, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l126, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l125, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l124, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l123, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l95, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l121, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l120, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l183, cdr: {car: l267, cdr: l3}}, cdr: {car: {car: l139, cdr: {car: {car: l112, cdr: {car: "(function(){", cdr: {car: l111, cdr: {car: {car: l117, cdr: {car: {car: l140, cdr: {car: l267, cdr: l3}}, cdr: l3}}, cdr: {car: "})()", cdr: l3}}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l118, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l16, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l117, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l116, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l115, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l114, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l113, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l98, cdr: {car: l183, cdr: {car: l274, cdr: l3}}}, cdr: {car: {car: l139, cdr: {car: {car: l193, cdr: {car: {car: l141, cdr: {car: l98, cdr: l3}}, cdr: {car: {car: l112, cdr: {car: {car: l141, cdr: {car: l98, cdr: l3}}, cdr: {car: {car: l205, cdr: {car: {car: l140, cdr: {car: l274, 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: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l110, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l109, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l108, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l107, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l105, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l103, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l104, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l102, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l101, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l100, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l96, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l94, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l93, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l92, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l91, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l90, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l89, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l88, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l87, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l86, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l85, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l84, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l83, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l82, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l81, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l80, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l79, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l78, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l77, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l59, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l76, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l75, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l74, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l73, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l72, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l71, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l70, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l69, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l68, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l67, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l66, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l65, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l64, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l63, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l62, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l61, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l60, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l58, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l57, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l275, cdr: {car: l276, cdr: {car: l183, cdr: {car: l267, cdr: l3}}}}, cdr: {car: {car: l139, cdr: {car: {car: l56, cdr: {car: {car: l205, cdr: {car: {car: l141, cdr: {car: l275, cdr: l3}}, cdr: {car: {car: l141, cdr: {car: l276, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l140, cdr: {car: l267, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l56, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l274, cdr: {car: l183, cdr: {car: l267, cdr: l3}}}, cdr: {car: {car: l208, cdr: {car: {car: {car: l277, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l139, cdr: {car: {car: l208, cdr: {car: {car: {car: {car: l141, cdr: {car: l277, cdr: l3}}, cdr: {car: {car: l141, cdr: {car: l274, cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l140, cdr: {car: l267, cdr: l3}}, cdr: {car: {car: l141, cdr: {car: l277, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l55, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l183, cdr: {car: l278, cdr: l3}}, cdr: {car: {car: l51, cdr: {car: {car: {car: l11, cdr: {car: l278, cdr: l3}}, cdr: {car: l3, cdr: l3}}, cdr: {car: {car: {car: l11, cdr: {car: {car: l32, cdr: {car: l278, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l31, cdr: {car: l278, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l4, cdr: {car: {car: l208, cdr: {car: {car: {car: l279, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l139, cdr: {car: {car: l208, cdr: {car: {car: {car: {car: l141, cdr: {car: l279, cdr: l3}}, cdr: {car: {car: l141, cdr: {car: {car: l31, cdr: {car: l278, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l180, cdr: {car: {car: l141, cdr: {car: l279, cdr: l3}}, cdr: {car: {car: l141, cdr: {car: l279, cdr: l3}}, cdr: {car: {car: l55, cdr: {car: {car: l140, cdr: {car: {car: l32, cdr: {car: l278, 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: l170, cdr: {car: {car: l191, cdr: {car: {car: l183, cdr: {car: l278, cdr: l3}}, cdr: {car: {car: l51, cdr: {car: {car: {car: l11, cdr: {car: l278, cdr: l3}}, cdr: {car: l4, cdr: l3}}, cdr: {car: {car: {car: l11, cdr: {car: {car: l32, cdr: {car: l278, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l31, cdr: {car: l278, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l4, cdr: {car: {car: l139, cdr: {car: {car: l180, cdr: {car: {car: l141, cdr: {car: {car: l31, cdr: {car: l278, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l54, cdr: {car: {car: l140, cdr: {car: {car: l32, cdr: {car: l278, 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: l170, cdr: {car: {car: l191, cdr: {car: {car: l274, cdr: {car: l183, cdr: {car: l280, cdr: l3}}}, cdr: {car: {car: l139, cdr: {car: {car: l52, cdr: {car: {car: l141, cdr: {car: l274, cdr: l3}}, cdr: {car: {car: l140, cdr: {car: {car: l62, cdr: {car: l280, cdr: {car: {car: l139, cdr: {car: {car: {car: l4, cdr: {car: {car: l254, 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: l170, cdr: {car: {car: l191, cdr: {car: {car: l274, cdr: {car: l183, cdr: {car: l280, cdr: l3}}}, cdr: {car: {car: l208, cdr: {car: {car: {car: l281, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l139, cdr: {car: {car: l208, cdr: {car: {car: {car: {car: l141, cdr: {car: l281, cdr: l3}}, cdr: {car: {car: l141, cdr: {car: l274, cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l51, cdr: {car: {car: l140, cdr: {car: {car: l68, cdr: {car: {car: l191, cdr: {car: {car: l282, cdr: l3}, cdr: {car: {car: l180, cdr: {car: {car: l243, cdr: {car: {car: l31, cdr: {car: l282, cdr: l3}}, cdr: {car: l4, cdr: l3}}}, cdr: {car: l282, cdr: {car: {car: l139, cdr: {car: {car: {car: l27, cdr: {car: {car: l141, cdr: {car: l281, cdr: l3}}, cdr: {car: {car: l138, cdr: {car: {car: l141, cdr: {car: {car: l31, cdr: {car: l282, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l140, cdr: {car: {car: l32, cdr: {car: l282, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: {car: l280, 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: l170, cdr: {car: {car: l191, cdr: {car: {car: l183, cdr: {car: l280, cdr: l3}}, cdr: {car: {car: l180, cdr: {car: {car: l11, cdr: {car: l280, cdr: l3}}, cdr: {car: l3, cdr: {car: {car: l180, cdr: {car: {car: l243, cdr: {car: {car: l33, cdr: {car: l280, cdr: l3}}, cdr: {car: l4, cdr: l3}}}, cdr: {car: {car: l139, cdr: {car: {car: l205, cdr: {car: {car: l140, cdr: {car: {car: l35, cdr: {car: l280, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l139, cdr: {car: {car: l180, cdr: {car: {car: l141, cdr: {car: {car: l33, cdr: {car: l280, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l205, cdr: {car: {car: l140, cdr: {car: {car: l35, cdr: {car: l280, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l51, cdr: {car: {car: l140, cdr: {car: {car: l32, cdr: {car: l280, 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: l170, cdr: {car: {car: l191, cdr: {car: {car: l283, cdr: {car: l183, cdr: {car: l267, cdr: l3}}}, cdr: {car: {car: l208, cdr: {car: {car: {car: l284, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: {car: {car: l285, cdr: {car: {car: l40, cdr: {car: l283, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l286, cdr: {car: {car: l41, cdr: {car: l283, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l276, cdr: {car: {car: l42, cdr: {car: l283, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: {car: {car: l139, cdr: {car: {car: l155, cdr: {car: l3, cdr: {car: {car: l208, cdr: {car: {car: {car: {car: l141, cdr: {car: l285, cdr: l3}}, cdr: {car: 0, cdr: l3}}, cdr: {car: {car: {car: l141, cdr: {car: l284, cdr: l3}}, cdr: {car: {car: l141, cdr: {car: l286, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l201, cdr: {car: {car: l228, cdr: {car: {car: l141, cdr: {car: l285, cdr: l3}}, cdr: {car: {car: l141, cdr: {car: l284, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l217, cdr: {car: {car: l140, cdr: {car: l267, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l46, cdr: {car: {car: l141, cdr: {car: l285, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: {car: {car: l141, cdr: {car: l276, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l49, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l283, cdr: {car: l183, cdr: {car: l267, cdr: l3}}}, cdr: {car: {car: l208, cdr: {car: {car: {car: l285, cdr: {car: {car: l40, cdr: {car: l283, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l287, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l139, cdr: {car: {car: l155, cdr: {car: l3, cdr: {car: {car: l208, cdr: {car: {car: {car: {car: l141, cdr: {car: l287, cdr: l3}}, cdr: {car: {car: l141, cdr: {car: {car: l41, cdr: {car: l283, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: {car: l141, cdr: {car: l285, cdr: l3}}, cdr: {car: l3, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l201, cdr: {car: {car: l141, cdr: {car: l287, cdr: l3}}, cdr: {car: {car: l193, cdr: {car: {car: l141, cdr: {car: l285, cdr: l3}}, cdr: {car: {car: l31, cdr: {car: {car: l141, cdr: {car: l287, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l217, cdr: {car: {car: l140, cdr: {car: l267, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l193, cdr: {car: {car: l141, cdr: {car: l287, cdr: l3}}, cdr: {car: {car: l32, cdr: {car: {car: l141, cdr: {car: l287, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}}}, cdr: {car: {car: l141, cdr: {car: {car: l42, cdr: {car: l283, 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: l170, cdr: {car: {car: l191, cdr: {car: {car: l288, cdr: {car: l289, cdr: l3}}, cdr: {car: {car: l139, cdr: {car: {car: l193, cdr: {car: {car: l141, cdr: {car: l289, cdr: l3}}, cdr: {car: {car: l29, cdr: {car: {car: l141, cdr: {car: l288, cdr: l3}}, cdr: {car: {car: l141, cdr: {car: l289, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l47, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l288, cdr: {car: l182, cdr: {car: {car: l290, cdr: {car: 1, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l139, cdr: {car: {car: l193, cdr: {car: {car: l141, cdr: {car: l288, cdr: l3}}, cdr: {car: {car: l20, cdr: {car: {car: l141, cdr: {car: l288, cdr: l3}}, cdr: {car: {car: l141, cdr: {car: l290, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l46, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l288, cdr: {car: l182, cdr: {car: {car: l290, cdr: {car: 1, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l139, cdr: {car: {car: l193, cdr: {car: {car: l141, cdr: {car: l288, cdr: l3}}, cdr: {car: {car: l19, cdr: {car: {car: l141, cdr: {car: l288, cdr: l3}}, cdr: {car: {car: l141, cdr: {car: l290, 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: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l44, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l43, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l42, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l41, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l40, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l39, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l38, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l37, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l36, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l35, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l34, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l33, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l32, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l31, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l30, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l29, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l28, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l27, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l26, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l25, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l24, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l23, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l22, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l21, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l20, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l19, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l18, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l17, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l15, cdr: {car: l97, cdr: {car: l3, cdr: {car: {car: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l13, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l291, cdr: {car: l183, cdr: {car: l267, cdr: l3}}}, cdr: {car: {car: l139, cdr: {car: {car: l155, cdr: {car: l3, cdr: {car: {car: l201, cdr: {car: {car: l141, cdr: {car: l291, cdr: l3}}, cdr: {car: {car: l140, cdr: {car: l267, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l12, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l182, cdr: {car: l277, cdr: l3}}, cdr: {car: {car: l139, cdr: {car: {car: l210, cdr: {car: l3, cdr: {car: {car: l141, cdr: {car: l277, 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: l176, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l10, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l271, cdr: {car: l272, cdr: {car: l183, cdr: {car: l267, cdr: l3}}}}, cdr: {car: {car: l139, cdr: {car: {car: l205, cdr: {car: {car: l2, cdr: {car: {car: l176, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l239, cdr: {car: {car: l138, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l9, cdr: {car: {car: l141, cdr: {car: {car: l238, cdr: {car: l271, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l141, cdr: {car: l272, cdr: l3}}, cdr: {car: {car: l140, cdr: {car: {car: l180, cdr: {car: {car: l54, cdr: {car: {car: l246, cdr: {car: {car: l31, cdr: {car: l267, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l28, cdr: {car: {car: l11, cdr: {car: {car: l32, cdr: {car: l267, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l139, cdr: {car: {car: {car: l141, cdr: {car: {car: l31, cdr: {car: l267, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l155, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: {car: {car: l140, cdr: {car: {car: l32, cdr: {car: l267, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l139, cdr: {car: {car: {car: l155, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: {car: {car: l140, cdr: {car: l267, cdr: l3}}, cdr: l3}}}, cdr: l3}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: {car: {car: l138, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l9, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l271, cdr: {car: l272, cdr: {car: l183, cdr: {car: l267, cdr: l3}}}}, cdr: {car: {car: l208, cdr: {car: {car: {car: l288, cdr: {car: {car: l15, cdr: {car: "FN", cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l139, cdr: {car: {car: l208, cdr: {car: {car: {car: {car: l141, cdr: {car: l288, cdr: l3}}, cdr: {car: {car: l191, cdr: {car: {car: l141, cdr: {car: l272, cdr: l3}}, cdr: {car: {car: l140, cdr: {car: l267, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l258, cdr: {car: {car: l141, cdr: {car: l288, cdr: l3}}, cdr: {car: "fname", cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: l3}}}}, cdr: {car: {car: l141, cdr: {car: l288, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l8, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l271, cdr: {car: l277, cdr: {car: l182, cdr: {car: l292, cdr: l3}}}}, cdr: {car: {car: l139, cdr: {car: {car: l205, cdr: {car: {car: l193, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: {car: {car: l141, cdr: {car: l277, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l140, cdr: {car: {car: l5, cdr: {car: {car: l246, cdr: {car: l292, cdr: l3}}, cdr: {car: {car: l139, cdr: {car: {car: {car: l258, cdr: {car: {car: l138, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: l3}}, cdr: {car: "vardoc", cdr: {car: {car: l141, cdr: {car: l292, cdr: l3}}, cdr: l3}}}}, cdr: l3}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l138, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l7, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l271, cdr: {car: l277, cdr: {car: l182, cdr: {car: l292, cdr: l3}}}}, cdr: {car: {car: l139, cdr: {car: {car: l205, cdr: {car: {car: l6, cdr: {car: {car: l17, cdr: {car: {car: l138, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l193, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: {car: {car: l141, cdr: {car: l277, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: {car: l140, cdr: {car: {car: l5, cdr: {car: {car: l246, cdr: {car: l292, cdr: l3}}, cdr: {car: {car: l139, cdr: {car: {car: {car: l258, cdr: {car: {car: l138, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: l3}}, cdr: {car: "vardoc", cdr: {car: {car: l141, cdr: {car: l292, cdr: l3}}, cdr: l3}}}}, cdr: l3}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l138, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l6, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l291, cdr: {car: l183, cdr: {car: l267, cdr: l3}}}, cdr: {car: {car: l139, cdr: {car: {car: l180, cdr: {car: {car: l141, cdr: {car: l291, cdr: l3}}, cdr: {car: l3, cdr: {car: {car: l205, cdr: {car: {car: l140, cdr: {car: l267, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l5, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l291, cdr: {car: l183, cdr: {car: l267, cdr: l3}}}, cdr: {car: {car: l139, cdr: {car: {car: l180, cdr: {car: {car: l141, cdr: {car: l291, cdr: l3}}, cdr: {car: {car: l205, cdr: {car: {car: l140, cdr: {car: l267, cdr: l3}}, cdr: l3}}, cdr: {car: l3, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l2, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l183, cdr: {car: l269, cdr: l3}}, cdr: {car: {car: l139, cdr: {car: {car: l203, cdr: {car: {car: l140, cdr: {car: {car: l68, cdr: {car: {car: l191, cdr: {car: {car: l270, cdr: l3}, cdr: {car: {car: l139, cdr: {car: {car: l173, cdr: {car: {car: l138, cdr: {car: {car: l141, cdr: {car: l270, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l269, cdr: l3}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l1, cdr: {car: l170, cdr: {car: {car: l191, cdr: {car: {car: l271, cdr: {car: l272, cdr: {car: l183, cdr: {car: l267, cdr: l3}}}}, cdr: {car: {car: l139, cdr: {car: {car: l203, cdr: {car: {car: l169, cdr: {car: {car: l138, cdr: {car: {car: l141, cdr: {car: l271, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l138, cdr: {car: {car: l191, cdr: {car: {car: l141, cdr: {car: {car: l68, cdr: {car: {car: l191, cdr: {car: {car: l288, cdr: l3}, cdr: {car: {car: l180, cdr: {car: {car: l243, cdr: {car: l288, cdr: {car: {car: l138, cdr: {car: l293, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l138, cdr: {car: l183, cdr: l3}}, cdr: {car: l288, cdr: l3}}}}, cdr: l3}}}, cdr: {car: l272, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l140, cdr: {car: l267, 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}}}};
10154 (function(){
10155     l107.function(l265);
10156     l107.function(l264);
10157     l107.function(l263);
10158     l107.function(l262);
10159     l107.function(l261);
10160     l107.function(l260);
10161     l107.function(l259);
10162     l107.function(l258);
10163     l107.function(l257);
10164     l107.function(l256);
10165     l107.function(l255);
10166     l107.function(l254);
10167     l107.function(l253);
10168     l107.function(l252);
10169     l107.function(l251);
10170     l107.function(l250);
10171     l107.function(l249);
10172     l107.function(l248);
10173     l107.function(l247);
10174     l107.function(l246);
10175     l107.function(l245);
10176     l107.function(l244);
10177     l107.function(l243);
10178     l107.function(l242);
10179     l107.function(l241);
10180     l107.function(l240);
10181     l107.function(l239);
10182     l107.function(l238);
10183     l107.function(l237);
10184     l107.function(l236);
10185     l107.function(l235);
10186     l107.function(l234);
10187     l107.function(l233);
10188     l107.function(l232);
10189     l107.function(l231);
10190     l107.function(l230);
10191     l107.function(l229);
10192     l107.function(l228);
10193     l107.function(l227);
10194     l107.function(l226);
10195     l107.function(l225);
10196     l107.function(l224);
10197     l107.function(l223);
10198     l107.function(l222);
10199     l107.function(l221);
10200     l107.function(l220);
10201     l107.function(l219);
10202     l107.function(l218);
10203     l107.function(l217);
10204     l107.function(l216);
10205     l107.function(l215);
10206     l107.function(l214);
10207     l107.function(l213);
10208     l107.function(l212);
10209     l107.function(l211);
10210     l107.function(l210);
10211     l107.function(l209);
10212     l107.function(l208);
10213     l107.function(l207);
10214     l107.function(l206);
10215     l107.function(l205);
10216     l107.function(l204);
10217     l107.function(l203);
10218     l107.function(l202);
10219     l107.function(l201);
10220     l107.function(l200);
10221     l107.function(l199);
10222     l107.function(l198);
10223     l107.function(l197);
10224     l107.function(l196);
10225     l107.function(l195);
10226     l107.function(l194);
10227     l107.function(l193);
10228     l107.function(l192);
10229     l107.function(l191);
10230     l107.function(l190);
10231     l107.function(l189);
10232     l107.function(l188);
10233     l107.function(l187);
10234     l107.function(l186);
10235     l107.function(l185);
10236     l107.function(l183);
10237     l107.function(l182);
10238     l107.function(l181);
10239     l107.function(l180);
10240     l107.function(l179);
10241     l107.function(l178);
10242     l107.function(l177);
10243     l107.function(l176);
10244     l107.function(l175);
10245     l107.function(l174);
10246     l107.function(l173);
10247     l107.function(l172);
10248     l107.function(l171);
10249     l107.function(l170);
10250     l107.function(l169);
10251     l107.function(l168);
10252     l107.function(l167);
10253     l107.function(l166);
10254     l107.function(l165);
10255     l107.function(l164);
10256     l107.function(l163);
10257     l107.function(l162);
10258     l107.function(l161);
10259     l107.function(l160);
10260     l107.function(l159);
10261     l107.function(l158);
10262     l107.function(l157);
10263     l107.function(l156);
10264     l107.function(l155);
10265     l107.function(l154);
10266     l107.function(l153);
10267     l107.function(l152);
10268     l107.function(l151);
10269     l107.function(l150);
10270     l107.function(l149);
10271     l107.function(l148);
10272     l107.function(l147);
10273     l107.function(l146);
10274     l107.function(l145);
10275     l107.function(l144);
10276     l107.function(l143);
10277     l107.function(l142);
10278     l107.function(l141);
10279     l107.function(l140);
10280     l107.function(l139);
10281     l107.function(l138);
10282     l107.function(l137);
10283     l107.function(l136);
10284     l107.function(l135);
10285     l107.function(l134);
10286     l107.function(l133);
10287     l107.function(l132);
10288     l107.function(l131);
10289     l107.function(l130);
10290     l107.function(l129);
10291     l107.function(l128);
10292     l107.function(l127);
10293     l107.function(l126);
10294     l107.function(l125);
10295     l107.function(l124);
10296     l107.function(l123);
10297     l107.function(l122);
10298     l107.function(l121);
10299     l107.function(l120);
10300     l107.function(l119);
10301     l107.function(l118);
10302     l107.function(l117);
10303     l107.function(l116);
10304     l107.function(l115);
10305     l107.function(l114);
10306     l107.function(l113);
10307     l107.function(l112);
10308     l107.function(l111);
10309     l107.function(l110);
10310     l107.function(l109);
10311     l107.function(l108);
10312     l107.function(l107);
10313     l107.function(l106);
10314     l107.function(l105);
10315     l107.function(l104);
10316     l107.function(l103);
10317     l107.function(l102);
10318     l107.function(l101);
10319     l107.function(l100);
10320     l107.function(l99);
10321     l107.function(l98);
10322     l107.function(l97);
10323     l107.function(l96);
10324     l107.function(l95);
10325     l107.function(l94);
10326     l107.function(l93);
10327     l107.function(l92);
10328     l107.function(l91);
10329     l107.function(l90);
10330     l107.function(l89);
10331     l107.function(l88);
10332     l107.function(l87);
10333     l107.function(l86);
10334     l107.function(l85);
10335     l107.function(l84);
10336     l107.function(l83);
10337     l107.function(l82);
10338     l107.function(l81);
10339     l107.function(l80);
10340     l107.function(l79);
10341     l107.function(l78);
10342     l107.function(l77);
10343     l107.function(l76);
10344     l107.function(l75);
10345     l107.function(l74);
10346     l107.function(l73);
10347     l107.function(l72);
10348     l107.function(l71);
10349     l107.function(l70);
10350     l107.function(l69);
10351     l107.function(l68);
10352     l107.function(l67);
10353     l107.function(l66);
10354     l107.function(l65);
10355     l107.function(l64);
10356     l107.function(l63);
10357     l107.function(l62);
10358     l107.function(l61);
10359     l107.function(l60);
10360     l107.function(l59);
10361     l107.function(l58);
10362     l107.function(l57);
10363     l107.function(l56);
10364     l107.function(l55);
10365     l107.function(l54);
10366     l107.function(l53);
10367     l107.function(l52);
10368     l107.function(l51);
10369     l107.function(l50);
10370     l107.function(l49);
10371     l107.function(l48);
10372     l107.function(l47);
10373     l107.function(l46);
10374     l107.function(l45);
10375     l107.function(l44);
10376     l107.function(l43);
10377     l107.function(l42);
10378     l107.function(l41);
10379     l107.function(l40);
10380     l107.function(l39);
10381     l107.function(l38);
10382     l107.function(l37);
10383     l107.function(l36);
10384     l107.function(l35);
10385     l107.function(l34);
10386     l107.function(l33);
10387     l107.function(l32);
10388     l107.function(l31);
10389     l107.function(l30);
10390     l107.function(l29);
10391     l107.function(l28);
10392     l107.function(l27);
10393     l107.function(l26);
10394     l107.function(l25);
10395     l107.function(l24);
10396     l107.function(l23);
10397     l107.function(l22);
10398     l107.function(l21);
10399     l107.function(l20);
10400     l107.function(l19);
10401     l107.function(l18);
10402     l107.function(l17);
10403     l107.function(l16);
10404     l107.function(l15);
10405     l107.function(l14);
10406     l107.function(l13);
10407     l107.function(l12);
10408     l107.function(l11);
10409     l107.function(l10);
10410     l107.function(l9);
10411     l107.function(l8);
10412     l107.function(l7);
10413     l107.function(l6);
10414     l107.function(l5);
10415     l107.function(l4);
10416     l107.function(l3);
10417     l107.function(l2);
10418     l107.function(l1);
10419     (l197).value = l266;
10420     (l159).value = l294;
10421     (l160).value = 678;
10422     (l14).value = 178;
10423     return (l209).value = 242;
10424 })();
10425 (l198).value = 294;