ecmalisp.js

   1 var f153;
   2 var f152;
   3 var f151;
   4 var f150;
   5 var f149;
   6 var f148;
   7 var f147;
   8 var f146;
   9 var f145;
  10 var f144;
  11 var f143;
  12 var f142;
  13 var f141;
  14 var f140;
  15 var f139;
  16 var f138;
  17 var f137;
  18 var f136;
  19 var f135;
  20 var f134;
  21 var f133;
  22 var f132;
  23 var f131;
  24 var f130;
  25 var f129;
  26 var f128;
  27 var f127;
  28 var f126;
  29 var f124;
  30 var v644;
  31 var f123;
  32 var f122;
  33 var f121;
  34 var f120;
  35 var v635;
  36 var v634;
  37 var v633;
  38 (function(){
  39     (function(){
  40         return v633 = {};
  41     })();
  42     (function(){
  43         return v634 = (function(){
  44             var name = "NIL";
  45             if (typeof name != 'string')
  46                 throw 'The value ' + name + ' is not a type string.';
  47             return ({name: name});
  48         })();
  49     })();
  50     ((v633)["NIL"] = v634);
  51     (function(){
  52         return v635 = (function(){
  53             var name = "T";
  54             if (typeof name != 'string')
  55                 throw 'The value ' + name + ' is not a type string.';
  56             return ({name: name});
  57         })();
  58     })();
  59     ((v633)["T"] = v635);
  60     (function(){
  61         return f120 = (function(v636){
  62             ((v636)["fname"] = "NULL");
  63             return v636;
  64         })((function (v637){
  65             if (arguments.length < 1) throw 'too few arguments';
  66             if (arguments.length > 1) throw 'too many arguments';
  67             return ((v637 === v634)?v635: v634);
  68         }));
  69     })();
  70     (function(){
  71         return f121 = (function(v638){
  72             ((v638)["fname"] = "INTERNP");
  73             return v638;
  74         })((function (v639){
  75             if (arguments.length < 1) throw 'too few arguments';
  76             if (arguments.length > 1) throw 'too many arguments';
  77             return (((v639) in (v633))?v635: v634);
  78         }));
  79     })();
  80     (function(){
  81         return f122 = (function(v640){
  82             ((v640)["fname"] = "INTERN");
  83             return v640;
  84         })((function (v641){
  85             if (arguments.length < 1) throw 'too few arguments';
  86             if (arguments.length > 1) throw 'too many arguments';
  87             return (f121(v641) !== v634 ? (function(){
  88                 var tmp = (v633)[v641];
  89                 return tmp == undefined? v634: tmp ;
  90             })() : ((v633)[v641] = (function(){
  91                 var name = v641;
  92                 if (typeof name != 'string')
  93                     throw 'The value ' + name + ' is not a type string.';
  94                 return ({name: name});
  95             })()));
  96         }));
  97     })();
  98     (function(){
  99         return f123 = (function(v642){
 100             ((v642)["fname"] = "FIND-SYMBOL");
 101             return v642;
 102         })((function (v643){
 103             if (arguments.length < 1) throw 'too few arguments';
 104             if (arguments.length > 1) throw 'too many arguments';
 105             return (function(){
 106                 var tmp = (v633)[v643];
 107                 return tmp == undefined? v634: tmp ;
 108             })();
 109         }));
 110     })();
 111     (function(){
 112         return v644 = 0;
 113     })();
 114     (function(){
 115         return f124 = (function(v645){
 116             ((v645)["fname"] = "GENSYM");
 117             return v645;
 118         })((function (v646){
 119             if (arguments.length > 1) throw 'too many arguments';
 120             switch(arguments.length){
 121             case 0:
 122             v646="G";
 123             default: break;
 124             }
 125             v644 = (function(){
 126                 var x = v644;
 127                 var y = 1;
 128                 if (typeof x != 'number')
 129                     throw 'The value ' + x + ' is not a type number.';
 130                 if (typeof y != 'number')
 131                     throw 'The value ' + y + ' is not a type number.';
 132                 return x+y;
 133             })();
 134             return (function(){
 135                 var name = (function(){
 136                     var string1 = v646;
 137                     var string2 = f125(v644);
 138                     if (typeof string1 != 'string')
 139                         throw 'The value ' + string1 + ' is not a type string.';
 140                     if (typeof string2 != 'string')
 141                         throw 'The value ' + string2 + ' is not a type string.';
 142                     return string1.concat(string2);
 143                 })();
 144                 if (typeof name != 'string')
 145                     throw 'The value ' + name + ' is not a type string.';
 146                 return ({name: name});
 147             })();
 148         }));
 149     })();
 150     (function(){
 151         return f126 = (function(v647){
 152             ((v647)["fname"] = "=");
 153             return v647;
 154         })((function (v648,v649){
 155             if (arguments.length < 2) throw 'too few arguments';
 156             if (arguments.length > 2) throw 'too many arguments';
 157             return ((function(){
 158                 var x = v648;
 159                 var y = v649;
 160                 if (typeof x != 'number')
 161                     throw 'The value ' + x + ' is not a type number.';
 162                 if (typeof y != 'number')
 163                     throw 'The value ' + y + ' is not a type number.';
 164                 return x==y;
 165             })()?v635: v634);
 166         }));
 167     })();
 168     (function(){
 169         return f127 = (function(v650){
 170             ((v650)["fname"] = "+");
 171             return v650;
 172         })((function (v651,v652){
 173             if (arguments.length < 2) throw 'too few arguments';
 174             if (arguments.length > 2) throw 'too many arguments';
 175             return (function(){
 176                 var x = v651;
 177                 var y = v652;
 178                 if (typeof x != 'number')
 179                     throw 'The value ' + x + ' is not a type number.';
 180                 if (typeof y != 'number')
 181                     throw 'The value ' + y + ' is not a type number.';
 182                 return x+y;
 183             })();
 184         }));
 185     })();
 186     (function(){
 187         return f128 = (function(v653){
 188             ((v653)["fname"] = "-");
 189             return v653;
 190         })((function (v654,v655){
 191             if (arguments.length < 2) throw 'too few arguments';
 192             if (arguments.length > 2) throw 'too many arguments';
 193             return (function(){
 194                 var x = v654;
 195                 var y = v655;
 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     (function(){
 205         return f129 = (function(v656){
 206             ((v656)["fname"] = "*");
 207             return v656;
 208         })((function (v657,v658){
 209             if (arguments.length < 2) throw 'too few arguments';
 210             if (arguments.length > 2) throw 'too many arguments';
 211             return (function(){
 212                 var x = v657;
 213                 var y = v658;
 214                 if (typeof x != 'number')
 215                     throw 'The value ' + x + ' is not a type number.';
 216                 if (typeof y != 'number')
 217                     throw 'The value ' + y + ' is not a type number.';
 218                 return x*y;
 219             })();
 220         }));
 221     })();
 222     (function(){
 223         return f130 = (function(v659){
 224             ((v659)["fname"] = "/");
 225             return v659;
 226         })((function (v660,v661){
 227             if (arguments.length < 2) throw 'too few arguments';
 228             if (arguments.length > 2) throw 'too many arguments';
 229             return (function(){
 230                 var x = v660;
 231                 var y = v661;
 232                 if (typeof x != 'number')
 233                     throw 'The value ' + x + ' is not a type number.';
 234                 if (typeof y != 'number')
 235                     throw 'The value ' + y + ' is not a type number.';
 236                 return x/y;
 237             })();
 238         }));
 239     })();
 240     (function(){
 241         return f131 = (function(v662){
 242             ((v662)["fname"] = "1+");
 243             return v662;
 244         })((function (v663){
 245             if (arguments.length < 1) throw 'too few arguments';
 246             if (arguments.length > 1) throw 'too many arguments';
 247             return (function(){
 248                 var x = v663;
 249                 var y = 1;
 250                 if (typeof x != 'number')
 251                     throw 'The value ' + x + ' is not a type number.';
 252                 if (typeof y != 'number')
 253                     throw 'The value ' + y + ' is not a type number.';
 254                 return x+y;
 255             })();
 256         }));
 257     })();
 258     (function(){
 259         return f132 = (function(v664){
 260             ((v664)["fname"] = "1-");
 261             return v664;
 262         })((function (v665){
 263             if (arguments.length < 1) throw 'too few arguments';
 264             if (arguments.length > 1) throw 'too many arguments';
 265             return (function(){
 266                 var x = v665;
 267                 var y = 1;
 268                 if (typeof x != 'number')
 269                     throw 'The value ' + x + ' is not a type number.';
 270                 if (typeof y != 'number')
 271                     throw 'The value ' + y + ' is not a type number.';
 272                 return x-y;
 273             })();
 274         }));
 275     })();
 276     (function(){
 277         return f133 = (function(v666){
 278             ((v666)["fname"] = "ZEROP");
 279             return v666;
 280         })((function (v667){
 281             if (arguments.length < 1) throw 'too few arguments';
 282             if (arguments.length > 1) throw 'too many arguments';
 283             return ((function(){
 284                 var x = v667;
 285                 var y = 0;
 286                 if (typeof x != 'number')
 287                     throw 'The value ' + x + ' is not a type number.';
 288                 if (typeof y != 'number')
 289                     throw 'The value ' + y + ' is not a type number.';
 290                 return x==y;
 291             })()?v635: v634);
 292         }));
 293     })();
 294     (function(){
 295         return f134 = (function(v668){
 296             ((v668)["fname"] = "TRUNCATE");
 297             return v668;
 298         })((function (v669,v670){
 299             if (arguments.length < 2) throw 'too few arguments';
 300             if (arguments.length > 2) throw 'too many arguments';
 301             return (function(){
 302                 var x = (function(){
 303                     var x = v669;
 304                     var y = v670;
 305                     if (typeof x != 'number')
 306                         throw 'The value ' + x + ' is not a type number.';
 307                     if (typeof y != 'number')
 308                         throw 'The value ' + y + ' is not a type number.';
 309                     return x/y;
 310                 })();
 311                 if (typeof x != 'number')
 312                     throw 'The value ' + x + ' is not a type number.';
 313                 return Math.floor(x);
 314             })();
 315         }));
 316     })();
 317     (function(){
 318         return f135 = (function(v671){
 319             ((v671)["fname"] = "EQL");
 320             return v671;
 321         })((function (v672,v673){
 322             if (arguments.length < 2) throw 'too few arguments';
 323             if (arguments.length > 2) throw 'too many arguments';
 324             return ((v672 === v673)?v635: v634);
 325         }));
 326     })();
 327     (function(){
 328         return f136 = (function(v674){
 329             ((v674)["fname"] = "NOT");
 330             return v674;
 331         })((function (v675){
 332             if (arguments.length < 1) throw 'too few arguments';
 333             if (arguments.length > 1) throw 'too many arguments';
 334             return (v675 !== v634 ? v634 : v635);
 335         }));
 336     })();
 337     (function(){
 338         return f137 = (function(v676){
 339             ((v676)["fname"] = "CONS");
 340             return v676;
 341         })((function (v677,v678){
 342             if (arguments.length < 2) throw 'too few arguments';
 343             if (arguments.length > 2) throw 'too many arguments';
 344             return ({car: v677, cdr: v678});
 345         }));
 346     })();
 347     (function(){
 348         return f138 = (function(v679){
 349             ((v679)["fname"] = "CONSP");
 350             return v679;
 351         })((function (v680){
 352             if (arguments.length < 1) throw 'too few arguments';
 353             if (arguments.length > 1) throw 'too many arguments';
 354             return ((function(){
 355                 var tmp = v680;
 356                 return (typeof tmp == 'object' && 'car' in tmp);
 357             })()?v635: v634);
 358         }));
 359     })();
 360     (function(){
 361         return f139 = (function(v681){
 362             ((v681)["fname"] = "CAR");
 363             return v681;
 364         })((function (v682){
 365             if (arguments.length < 1) throw 'too few arguments';
 366             if (arguments.length > 1) throw 'too many arguments';
 367             return (function(){
 368                 var tmp = v682;
 369                 return tmp === v634? v634: tmp.car;
 370             })();
 371         }));
 372     })();
 373     (function(){
 374         return f140 = (function(v683){
 375             ((v683)["fname"] = "CDR");
 376             return v683;
 377         })((function (v684){
 378             if (arguments.length < 1) throw 'too few arguments';
 379             if (arguments.length > 1) throw 'too many arguments';
 380             return (function(){
 381                 var tmp = v684;
 382                 return tmp === v634? v634: tmp.cdr;
 383             })();
 384         }));
 385     })();
 386     (function(){
 387         return f141 = (function(v685){
 388             ((v685)["fname"] = "CAAR");
 389             return v685;
 390         })((function (v686){
 391             if (arguments.length < 1) throw 'too few arguments';
 392             if (arguments.length > 1) throw 'too many arguments';
 393             return (function(){
 394                 var tmp = (function(){
 395                     var tmp = v686;
 396                     return tmp === v634? v634: tmp.car;
 397                 })();
 398                 return tmp === v634? v634: tmp.car;
 399             })();
 400         }));
 401     })();
 402     (function(){
 403         return f142 = (function(v687){
 404             ((v687)["fname"] = "CADR");
 405             return v687;
 406         })((function (v688){
 407             if (arguments.length < 1) throw 'too few arguments';
 408             if (arguments.length > 1) throw 'too many arguments';
 409             return (function(){
 410                 var tmp = (function(){
 411                     var tmp = v688;
 412                     return tmp === v634? v634: tmp.cdr;
 413                 })();
 414                 return tmp === v634? v634: tmp.car;
 415             })();
 416         }));
 417     })();
 418     (function(){
 419         return f143 = (function(v689){
 420             ((v689)["fname"] = "CDAR");
 421             return v689;
 422         })((function (v690){
 423             if (arguments.length < 1) throw 'too few arguments';
 424             if (arguments.length > 1) throw 'too many arguments';
 425             return (function(){
 426                 var tmp = (function(){
 427                     var tmp = v690;
 428                     return tmp === v634? v634: tmp.car;
 429                 })();
 430                 return tmp === v634? v634: tmp.cdr;
 431             })();
 432         }));
 433     })();
 434     (function(){
 435         return f144 = (function(v691){
 436             ((v691)["fname"] = "CDDR");
 437             return v691;
 438         })((function (v692){
 439             if (arguments.length < 1) throw 'too few arguments';
 440             if (arguments.length > 1) throw 'too many arguments';
 441             return (function(){
 442                 var tmp = (function(){
 443                     var tmp = v692;
 444                     return tmp === v634? v634: tmp.cdr;
 445                 })();
 446                 return tmp === v634? v634: tmp.cdr;
 447             })();
 448         }));
 449     })();
 450     (function(){
 451         return f145 = (function(v693){
 452             ((v693)["fname"] = "CADDR");
 453             return v693;
 454         })((function (v694){
 455             if (arguments.length < 1) throw 'too few arguments';
 456             if (arguments.length > 1) throw 'too many arguments';
 457             return (function(){
 458                 var tmp = (function(){
 459                     var tmp = (function(){
 460                         var tmp = v694;
 461                         return tmp === v634? v634: tmp.cdr;
 462                     })();
 463                     return tmp === v634? v634: tmp.cdr;
 464                 })();
 465                 return tmp === v634? v634: tmp.car;
 466             })();
 467         }));
 468     })();
 469     (function(){
 470         return f146 = (function(v695){
 471             ((v695)["fname"] = "CDDDR");
 472             return v695;
 473         })((function (v696){
 474             if (arguments.length < 1) throw 'too few arguments';
 475             if (arguments.length > 1) throw 'too many arguments';
 476             return (function(){
 477                 var tmp = (function(){
 478                     var tmp = (function(){
 479                         var tmp = v696;
 480                         return tmp === v634? v634: tmp.cdr;
 481                     })();
 482                     return tmp === v634? v634: tmp.cdr;
 483                 })();
 484                 return tmp === v634? v634: tmp.cdr;
 485             })();
 486         }));
 487     })();
 488     (function(){
 489         return f147 = (function(v697){
 490             ((v697)["fname"] = "CADDDR");
 491             return v697;
 492         })((function (v698){
 493             if (arguments.length < 1) throw 'too few arguments';
 494             if (arguments.length > 1) throw 'too many arguments';
 495             return (function(){
 496                 var tmp = (function(){
 497                     var tmp = (function(){
 498                         var tmp = (function(){
 499                             var tmp = v698;
 500                             return tmp === v634? v634: tmp.cdr;
 501                         })();
 502                         return tmp === v634? v634: tmp.cdr;
 503                     })();
 504                     return tmp === v634? v634: tmp.cdr;
 505                 })();
 506                 return tmp === v634? v634: tmp.car;
 507             })();
 508         }));
 509     })();
 510     (function(){
 511         return f148 = (function(v699){
 512             ((v699)["fname"] = "FIRST");
 513             return v699;
 514         })((function (v700){
 515             if (arguments.length < 1) throw 'too few arguments';
 516             if (arguments.length > 1) throw 'too many arguments';
 517             return (function(){
 518                 var tmp = v700;
 519                 return tmp === v634? v634: tmp.car;
 520             })();
 521         }));
 522     })();
 523     (function(){
 524         return f149 = (function(v701){
 525             ((v701)["fname"] = "SECOND");
 526             return v701;
 527         })((function (v702){
 528             if (arguments.length < 1) throw 'too few arguments';
 529             if (arguments.length > 1) throw 'too many arguments';
 530             return f142(v702);
 531         }));
 532     })();
 533     (function(){
 534         return f150 = (function(v703){
 535             ((v703)["fname"] = "THIRD");
 536             return v703;
 537         })((function (v704){
 538             if (arguments.length < 1) throw 'too few arguments';
 539             if (arguments.length > 1) throw 'too many arguments';
 540             return f145(v704);
 541         }));
 542     })();
 543     (function(){
 544         return f151 = (function(v705){
 545             ((v705)["fname"] = "FOURTH");
 546             return v705;
 547         })((function (v706){
 548             if (arguments.length < 1) throw 'too few arguments';
 549             if (arguments.length > 1) throw 'too many arguments';
 550             return f147(v706);
 551         }));
 552     })();
 553     (function(){
 554         return f152 = (function(v707){
 555             ((v707)["fname"] = "LIST");
 556             return v707;
 557         })((function (){
 558             var v708= v634;
 559             for (var i = arguments.length-1; i>=0; i--)
 560                 v708 = {car: arguments[i], cdr: v708};
 561             return v708;
 562         }));
 563     })();
 564     (function(){
 565         return f153 = (function(v709){
 566             ((v709)["fname"] = "ATOM");
 567             return v709;
 568         })((function (v710){
 569             if (arguments.length < 1) throw 'too few arguments';
 570             if (arguments.length > 1) throw 'too many arguments';
 571             return f136(((function(){
 572                 var tmp = v710;
 573                 return (typeof tmp == 'object' && 'car' in tmp);
 574             })()?v635: v634));
 575         }));
 576     })();
 577     return ;
 578 })();
 579 var f154;
 580 (function(){
 581     return f154 = (function(v711){
 582         ((v711)["fname"] = "ENSURE-LIST");
 583         return v711;
 584     })((function (v712){
 585         if (arguments.length < 1) throw 'too few arguments';
 586         if (arguments.length > 1) throw 'too many arguments';
 587         return (f155(v712) !== v634 ? v712 : f152(v712));
 588     }));
 589 })();
 590 var f156;
 591 (function(){
 592     return f156 = (function(v713){
 593         ((v713)["fname"] = "!REDUCE");
 594         return v713;
 595     })((function (v714,v715,v716){
 596         if (arguments.length < 3) throw 'too few arguments';
 597         if (arguments.length > 3) throw 'too many arguments';
 598         return (f120(v715) !== v634 ? v716 : f156(v714, (function(){
 599             var tmp = v715;
 600             return tmp === v634? v634: tmp.cdr;
 601         })(), (v714)(v716, (function(){
 602             var tmp = v715;
 603             return tmp === v634? v634: tmp.car;
 604         })())));
 605     }));
 606 })();
 607 var l219 = f122("STRING=");
 608 var f183;
 609 var l218 = f122("ASSOC");
 610 var f182;
 611 var l217 = f122("EVERY");
 612 var f181;
 613 var l216 = f122("PARSE-INTEGER");
 614 var f180;
 615 var l215 = f122("SUBSEQ");
 616 var f179;
 617 var l214 = f122("DIGIT-CHAR-P");
 618 var f178;
 619 var l213 = f122("REMOVE-IF-NOT");
 620 var f177;
 621 var l212 = f122("REMOVE-IF");
 622 var f176;
 623 var l211 = f122("REMOVE");
 624 var f175;
 625 var l210 = f122("MEMBER");
 626 var f174;
 627 var l209 = f122("BUTLAST");
 628 var f173;
 629 var l208 = f122("LAST");
 630 var f172;
 631 var l207 = f122("NTH");
 632 var f171;
 633 var l206 = f122("LISTP");
 634 var f155;
 635 var l205 = f122("MINUSP");
 636 var f170;
 637 var l204 = f122("PLUSP");
 638 var f169;
 639 var l203 = f122("INTEGERP");
 640 var f168;
 641 var l202 = f122("CHAR=");
 642 var f167;
 643 var l201 = f122("CHAR-CODE");
 644 var f166;
 645 var l200 = f122("CODE-CHAR");
 646 var f165;
 647 var l199 = f122("MAPCAR");
 648 var l198 = f122("NIL");
 649 var f164;
 650 var l197 = f122("CONCAT-TWO");
 651 var f163;
 652 var l196 = f122("LENGTH");
 653 var f162;
 654 var l195 = f122("LIST-LENGTH");
 655 var f161;
 656 var l194 = f122("REVERSE");
 657 var l193 = f122("NIL");
 658 var f160;
 659 var l192 = f122("REVERSE-AUX");
 660 var f159;
 661 var l191 = f122("APPEND");
 662 var l190 = f122("NIL");
 663 var f158;
 664 var l189 = f122("APPEND-TWO");
 665 var f157;
 666 (function(){
 667     (function(){
 668         (function(){
 669             return f157 = (function(v717){
 670                 ((v717)["fname"] = "APPEND-TWO");
 671                 return v717;
 672             })((function (v718,v719){
 673                 if (arguments.length < 2) throw 'too few arguments';
 674                 if (arguments.length > 2) throw 'too many arguments';
 675                 return (f120(v718) !== v634 ? v719 : ({car: (function(){
 676                     var tmp = v718;
 677                     return tmp === v634? v634: tmp.car;
 678                 })(), cdr: f158((function(){
 679                     var tmp = v718;
 680                     return tmp === v634? v634: tmp.cdr;
 681                 })(), v719)}));
 682             }));
 683         })();
 684         return l189;
 685     })();
 686     (function(){
 687         (function(){
 688             return f158 = (function(v720){
 689                 ((v720)["fname"] = "APPEND");
 690                 return v720;
 691             })((function (){
 692                 var v721= v634;
 693                 for (var i = arguments.length-1; i>=0; i--)
 694                     v721 = {car: arguments[i], cdr: v721};
 695                 return f156(f157, v721, l190);
 696             }));
 697         })();
 698         return l191;
 699     })();
 700     (function(){
 701         (function(){
 702             return f159 = (function(v722){
 703                 ((v722)["fname"] = "REVERSE-AUX");
 704                 return v722;
 705             })((function (v723,v724){
 706                 if (arguments.length < 2) throw 'too few arguments';
 707                 if (arguments.length > 2) throw 'too many arguments';
 708                 return (f120(v723) !== v634 ? v724 : f159((function(){
 709                     var tmp = v723;
 710                     return tmp === v634? v634: tmp.cdr;
 711                 })(), ({car: (function(){
 712                     var tmp = v723;
 713                     return tmp === v634? v634: tmp.car;
 714                 })(), cdr: v724})));
 715             }));
 716         })();
 717         return l192;
 718     })();
 719     (function(){
 720         (function(){
 721             return f160 = (function(v725){
 722                 ((v725)["fname"] = "REVERSE");
 723                 return v725;
 724             })((function (v726){
 725                 if (arguments.length < 1) throw 'too few arguments';
 726                 if (arguments.length > 1) throw 'too many arguments';
 727                 return f159(v726, l193);
 728             }));
 729         })();
 730         return l194;
 731     })();
 732     (function(){
 733         (function(){
 734             return f161 = (function(v727){
 735                 ((v727)["fname"] = "LIST-LENGTH");
 736                 return v727;
 737             })((function (v728){
 738                 if (arguments.length < 1) throw 'too few arguments';
 739                 if (arguments.length > 1) throw 'too many arguments';
 740                 return (function(v729){
 741                     (function(){
 742                         while(f136(f120(v728)) !== v634){
 743                             v729 = (function(){
 744                                 var x = v729;
 745                                 var y = 1;
 746                                 if (typeof x != 'number')
 747                                     throw 'The value ' + x + ' is not a type number.';
 748                                 if (typeof y != 'number')
 749                                     throw 'The value ' + y + ' is not a type number.';
 750                                 return x+y;
 751                             })();
 752                             v728 = (function(){
 753                                 var tmp = v728;
 754                                 return tmp === v634? v634: tmp.cdr;
 755                             })();
 756                     }})();
 757                     return v729;
 758                 })(0);
 759             }));
 760         })();
 761         return l195;
 762     })();
 763     (function(){
 764         (function(){
 765             return f162 = (function(v730){
 766                 ((v730)["fname"] = "LENGTH");
 767                 return v730;
 768             })((function (v731){
 769                 if (arguments.length < 1) throw 'too few arguments';
 770                 if (arguments.length > 1) throw 'too many arguments';
 771                 return (((typeof(v731) == "string")?v635: v634) !== v634 ? (function(){
 772                     var x = v731;
 773                     if (typeof x != 'string')
 774                         throw 'The value ' + x + ' is not a type string.';
 775                     return x.length;
 776                 })() : f161(v731));
 777             }));
 778         })();
 779         return l196;
 780     })();
 781     (function(){
 782         (function(){
 783             return f163 = (function(v732){
 784                 ((v732)["fname"] = "CONCAT-TWO");
 785                 return v732;
 786             })((function (v733,v734){
 787                 if (arguments.length < 2) throw 'too few arguments';
 788                 if (arguments.length > 2) throw 'too many arguments';
 789                 return (function(){
 790                     var string1 = v733;
 791                     var string2 = v734;
 792                     if (typeof string1 != 'string')
 793                         throw 'The value ' + string1 + ' is not a type string.';
 794                     if (typeof string2 != 'string')
 795                         throw 'The value ' + string2 + ' is not a type string.';
 796                     return string1.concat(string2);
 797                 })();
 798             }));
 799         })();
 800         return l197;
 801     })();
 802     (function(){
 803         (function(){
 804             return f164 = (function(v735){
 805                 ((v735)["fname"] = "MAPCAR");
 806                 return v735;
 807             })((function (v736,v737){
 808                 if (arguments.length < 2) throw 'too few arguments';
 809                 if (arguments.length > 2) throw 'too many arguments';
 810                 return (f120(v737) !== v634 ? l198 : ({car: (v736)((function(){
 811                     var tmp = v737;
 812                     return tmp === v634? v634: tmp.car;
 813                 })()), cdr: f164(v736, (function(){
 814                     var tmp = v737;
 815                     return tmp === v634? v634: tmp.cdr;
 816                 })())}));
 817             }));
 818         })();
 819         return l199;
 820     })();
 821     (function(){
 822         (function(){
 823             return f165 = (function(v738){
 824                 ((v738)["fname"] = "CODE-CHAR");
 825                 return v738;
 826             })((function (v739){
 827                 if (arguments.length < 1) throw 'too few arguments';
 828                 if (arguments.length > 1) throw 'too many arguments';
 829                 return v739;
 830             }));
 831         })();
 832         return l200;
 833     })();
 834     (function(){
 835         (function(){
 836             return f166 = (function(v740){
 837                 ((v740)["fname"] = "CHAR-CODE");
 838                 return v740;
 839             })((function (v741){
 840                 if (arguments.length < 1) throw 'too few arguments';
 841                 if (arguments.length > 1) throw 'too many arguments';
 842                 return v741;
 843             }));
 844         })();
 845         return l201;
 846     })();
 847     (function(){
 848         (function(){
 849             return f167 = (function(v742){
 850                 ((v742)["fname"] = "CHAR=");
 851                 return v742;
 852             })((function (v743,v744){
 853                 if (arguments.length < 2) throw 'too few arguments';
 854                 if (arguments.length > 2) throw 'too many arguments';
 855                 return ((function(){
 856                     var x = v743;
 857                     var y = v744;
 858                     if (typeof x != 'number')
 859                         throw 'The value ' + x + ' is not a type number.';
 860                     if (typeof y != 'number')
 861                         throw 'The value ' + y + ' is not a type number.';
 862                     return x==y;
 863                 })()?v635: v634);
 864             }));
 865         })();
 866         return l202;
 867     })();
 868     (function(){
 869         (function(){
 870             return f168 = (function(v745){
 871                 ((v745)["fname"] = "INTEGERP");
 872                 return v745;
 873             })((function (v746){
 874                 if (arguments.length < 1) throw 'too few arguments';
 875                 if (arguments.length > 1) throw 'too many arguments';
 876                 return (((typeof (v746) == "number")?v635: v634) !== v634 ? ((function(){
 877                     var x = (function(){
 878                         var x = v746;
 879                         if (typeof x != 'number')
 880                             throw 'The value ' + x + ' is not a type number.';
 881                         return Math.floor(x);
 882                     })();
 883                     var y = v746;
 884                     if (typeof x != 'number')
 885                         throw 'The value ' + x + ' is not a type number.';
 886                     if (typeof y != 'number')
 887                         throw 'The value ' + y + ' is not a type number.';
 888                     return x==y;
 889                 })()?v635: v634) : v634);
 890             }));
 891         })();
 892         return l203;
 893     })();
 894     (function(){
 895         (function(){
 896             return f169 = (function(v747){
 897                 ((v747)["fname"] = "PLUSP");
 898                 return v747;
 899             })((function (v748){
 900                 if (arguments.length < 1) throw 'too few arguments';
 901                 if (arguments.length > 1) throw 'too many arguments';
 902                 return ((function(){
 903                     var x = 0;
 904                     var y = v748;
 905                     if (typeof x != 'number')
 906                         throw 'The value ' + x + ' is not a type number.';
 907                     if (typeof y != 'number')
 908                         throw 'The value ' + y + ' is not a type number.';
 909                     return x<y;
 910                 })()?v635: v634);
 911             }));
 912         })();
 913         return l204;
 914     })();
 915     (function(){
 916         (function(){
 917             return f170 = (function(v749){
 918                 ((v749)["fname"] = "MINUSP");
 919                 return v749;
 920             })((function (v750){
 921                 if (arguments.length < 1) throw 'too few arguments';
 922                 if (arguments.length > 1) throw 'too many arguments';
 923                 return ((function(){
 924                     var x = v750;
 925                     var y = 0;
 926                     if (typeof x != 'number')
 927                         throw 'The value ' + x + ' is not a type number.';
 928                     if (typeof y != 'number')
 929                         throw 'The value ' + y + ' is not a type number.';
 930                     return x<y;
 931                 })()?v635: v634);
 932             }));
 933         })();
 934         return l205;
 935     })();
 936     (function(){
 937         (function(){
 938             return f155 = (function(v751){
 939                 ((v751)["fname"] = "LISTP");
 940                 return v751;
 941             })((function (v752){
 942                 if (arguments.length < 1) throw 'too few arguments';
 943                 if (arguments.length > 1) throw 'too many arguments';
 944                 return (function(v753){
 945                     return (v753 !== v634 ? v753 : f120(v752));
 946                 })(((function(){
 947                     var tmp = v752;
 948                     return (typeof tmp == 'object' && 'car' in tmp);
 949                 })()?v635: v634));
 950             }));
 951         })();
 952         return l206;
 953     })();
 954     (function(){
 955         (function(){
 956             return f171 = (function(v754){
 957                 ((v754)["fname"] = "NTH");
 958                 return v754;
 959             })((function (v755,v756){
 960                 if (arguments.length < 2) throw 'too few arguments';
 961                 if (arguments.length > 2) throw 'too many arguments';
 962                 return (f120(v756) !== v634 ? (function(){
 963                     return v756;
 964                 })() : (f133(v755) !== v634 ? (function(){
 965                     return (function(){
 966                         var tmp = v756;
 967                         return tmp === v634? v634: tmp.car;
 968                     })();
 969                 })() : (function(){
 970                     return f171(f132(v755), (function(){
 971                         var tmp = v756;
 972                         return tmp === v634? v634: tmp.cdr;
 973                     })());
 974                 })()));
 975             }));
 976         })();
 977         return l207;
 978     })();
 979     (function(){
 980         (function(){
 981             return f172 = (function(v757){
 982                 ((v757)["fname"] = "LAST");
 983                 return v757;
 984             })((function (v758){
 985                 if (arguments.length < 1) throw 'too few arguments';
 986                 if (arguments.length > 1) throw 'too many arguments';
 987                 return (((function(){
 988                     var tmp = (function(){
 989                         var tmp = v758;
 990                         return tmp === v634? v634: tmp.cdr;
 991                     })();
 992                     return (typeof tmp == 'object' && 'car' in tmp);
 993                 })()?v635: v634) !== v634 ? f172((function(){
 994                     var tmp = v758;
 995                     return tmp === v634? v634: tmp.cdr;
 996                 })()) : v758);
 997             }));
 998         })();
 999         return l208;
1000     })();
1001     (function(){
1002         (function(){
1003             return f173 = (function(v759){
1004                 ((v759)["fname"] = "BUTLAST");
1005                 return v759;
1006             })((function (v760){
1007                 if (arguments.length < 1) throw 'too few arguments';
1008                 if (arguments.length > 1) throw 'too many arguments';
1009                 return (((function(){
1010                     var tmp = (function(){
1011                         var tmp = v760;
1012                         return tmp === v634? v634: tmp.cdr;
1013                     })();
1014                     return (typeof tmp == 'object' && 'car' in tmp);
1015                 })()?v635: v634) !== v634 ? ({car: (function(){
1016                     var tmp = v760;
1017                     return tmp === v634? v634: tmp.car;
1018                 })(), cdr: f173((function(){
1019                     var tmp = v760;
1020                     return tmp === v634? v634: tmp.cdr;
1021                 })())}) : v634);
1022             }));
1023         })();
1024         return l209;
1025     })();
1026     (function(){
1027         (function(){
1028             return f174 = (function(v761){
1029                 ((v761)["fname"] = "MEMBER");
1030                 return v761;
1031             })((function (v762,v763){
1032                 if (arguments.length < 2) throw 'too few arguments';
1033                 if (arguments.length > 2) throw 'too many arguments';
1034                 return (f120(v763) !== v634 ? (function(){
1035                     return v634;
1036                 })() : (f135(v762, (function(){
1037                     var tmp = v763;
1038                     return tmp === v634? v634: tmp.car;
1039                 })()) !== v634 ? (function(){
1040                     return v763;
1041                 })() : (function(){
1042                     return f174(v762, (function(){
1043                         var tmp = v763;
1044                         return tmp === v634? v634: tmp.cdr;
1045                     })());
1046                 })()));
1047             }));
1048         })();
1049         return l210;
1050     })();
1051     (function(){
1052         (function(){
1053             return f175 = (function(v764){
1054                 ((v764)["fname"] = "REMOVE");
1055                 return v764;
1056             })((function (v765,v766){
1057                 if (arguments.length < 2) throw 'too few arguments';
1058                 if (arguments.length > 2) throw 'too many arguments';
1059                 return (f120(v766) !== v634 ? (function(){
1060                     return v634;
1061                 })() : (f135(v765, (function(){
1062                     var tmp = v766;
1063                     return tmp === v634? v634: tmp.car;
1064                 })()) !== v634 ? (function(){
1065                     return f175(v765, (function(){
1066                         var tmp = v766;
1067                         return tmp === v634? v634: tmp.cdr;
1068                     })());
1069                 })() : (function(){
1070                     return ({car: (function(){
1071                         var tmp = v766;
1072                         return tmp === v634? v634: tmp.car;
1073                     })(), cdr: f175(v765, (function(){
1074                         var tmp = v766;
1075                         return tmp === v634? v634: tmp.cdr;
1076                     })())});
1077                 })()));
1078             }));
1079         })();
1080         return l211;
1081     })();
1082     (function(){
1083         (function(){
1084             return f176 = (function(v767){
1085                 ((v767)["fname"] = "REMOVE-IF");
1086                 return v767;
1087             })((function (v768,v769){
1088                 if (arguments.length < 2) throw 'too few arguments';
1089                 if (arguments.length > 2) throw 'too many arguments';
1090                 return (f120(v769) !== v634 ? (function(){
1091                     return v634;
1092                 })() : ((v768)((function(){
1093                     var tmp = v769;
1094                     return tmp === v634? v634: tmp.car;
1095                 })()) !== v634 ? (function(){
1096                     return f176(v768, (function(){
1097                         var tmp = v769;
1098                         return tmp === v634? v634: tmp.cdr;
1099                     })());
1100                 })() : (function(){
1101                     return ({car: (function(){
1102                         var tmp = v769;
1103                         return tmp === v634? v634: tmp.car;
1104                     })(), cdr: f176(v768, (function(){
1105                         var tmp = v769;
1106                         return tmp === v634? v634: tmp.cdr;
1107                     })())});
1108                 })()));
1109             }));
1110         })();
1111         return l212;
1112     })();
1113     (function(){
1114         (function(){
1115             return f177 = (function(v770){
1116                 ((v770)["fname"] = "REMOVE-IF-NOT");
1117                 return v770;
1118             })((function (v771,v772){
1119                 if (arguments.length < 2) throw 'too few arguments';
1120                 if (arguments.length > 2) throw 'too many arguments';
1121                 return (f120(v772) !== v634 ? (function(){
1122                     return v634;
1123                 })() : ((v771)((function(){
1124                     var tmp = v772;
1125                     return tmp === v634? v634: tmp.car;
1126                 })()) !== v634 ? (function(){
1127                     return ({car: (function(){
1128                         var tmp = v772;
1129                         return tmp === v634? v634: tmp.car;
1130                     })(), cdr: f177(v771, (function(){
1131                         var tmp = v772;
1132                         return tmp === v634? v634: tmp.cdr;
1133                     })())});
1134                 })() : (function(){
1135                     return f177(v771, (function(){
1136                         var tmp = v772;
1137                         return tmp === v634? v634: tmp.cdr;
1138                     })());
1139                 })()));
1140             }));
1141         })();
1142         return l213;
1143     })();
1144     (function(){
1145         (function(){
1146             return f178 = (function(v773){
1147                 ((v773)["fname"] = "DIGIT-CHAR-P");
1148                 return v773;
1149             })((function (v774){
1150                 if (arguments.length < 1) throw 'too few arguments';
1151                 if (arguments.length > 1) throw 'too many arguments';
1152                 return ((((function(){
1153                     var x = 48;
1154                     var y = v774;
1155                     if (typeof x != 'number')
1156                         throw 'The value ' + x + ' is not a type number.';
1157                     if (typeof y != 'number')
1158                         throw 'The value ' + y + ' is not a type number.';
1159                     return x<=y;
1160                 })()?v635: v634) !== v634 ? ((function(){
1161                     var x = v774;
1162                     var y = 57;
1163                     if (typeof x != 'number')
1164                         throw 'The value ' + x + ' is not a type number.';
1165                     if (typeof y != 'number')
1166                         throw 'The value ' + y + ' is not a type number.';
1167                     return x<=y;
1168                 })()?v635: v634) : v634) !== v634 ? (function(){
1169                     var x = v774;
1170                     var y = 48;
1171                     if (typeof x != 'number')
1172                         throw 'The value ' + x + ' is not a type number.';
1173                     if (typeof y != 'number')
1174                         throw 'The value ' + y + ' is not a type number.';
1175                     return x-y;
1176                 })() : v634);
1177             }));
1178         })();
1179         return l214;
1180     })();
1181     (function(){
1182         (function(){
1183             return f179 = (function(v775){
1184                 ((v775)["fname"] = "SUBSEQ");
1185                 return v775;
1186             })((function (v776,v777,v778){
1187                 if (arguments.length < 2) throw 'too few arguments';
1188                 if (arguments.length > 3) throw 'too many arguments';
1189                 switch(arguments.length){
1190                 case 2:
1191                 v778=v634;
1192                 default: break;
1193                 }
1194                 return (((typeof(v776) == "string")?v635: v634) !== v634 ? (function(){
1195                     return (v778 !== v634 ? (function(){
1196                         var str = v776;
1197                         var a = v777;
1198                         var b;
1199                         b = v778;
1200                         return str.slice(a,b);
1201                     })() : (function(){
1202                         var str = v776;
1203                         var a = v777;
1204                         var b;
1205                         return str.slice(a,b);
1206                     })());
1207                 })() : (function(){
1208                     return (function (){ throw "Unsupported argument.";return 0;})();
1209                 })());
1210             }));
1211         })();
1212         return l215;
1213     })();
1214     (function(){
1215         (function(){
1216             return f180 = (function(v779){
1217                 ((v779)["fname"] = "PARSE-INTEGER");
1218                 return v779;
1219             })((function (v780){
1220                 if (arguments.length < 1) throw 'too few arguments';
1221                 if (arguments.length > 1) throw 'too many arguments';
1222                 return (function(v781,v782,v783){
1223                     (function(){
1224                         while(((function(){
1225                             var x = v782;
1226                             var y = v783;
1227                             if (typeof x != 'number')
1228                                 throw 'The value ' + x + ' is not a type number.';
1229                             if (typeof y != 'number')
1230                                 throw 'The value ' + y + ' is not a type number.';
1231                             return x<y;
1232                         })()?v635: v634) !== v634){
1233                             v781 = (function(){
1234                                 var x = (function(){
1235                                     var x = v781;
1236                                     var y = 10;
1237                                     if (typeof x != 'number')
1238                                         throw 'The value ' + x + ' is not a type number.';
1239                                     if (typeof y != 'number')
1240                                         throw 'The value ' + y + ' is not a type number.';
1241                                     return x*y;
1242                                 })();
1243                                 var y = f178((function(){
1244                                     var string = v780;
1245                                     var index = v782;
1246                                     if (typeof string != 'string')
1247                                         throw 'The value ' + string + ' is not a type string.';
1248                                     if (typeof index != 'number')
1249                                         throw 'The value ' + index + ' is not a type number.';
1250                                     return string.charCodeAt(index);
1251                                 })());
1252                                 if (typeof x != 'number')
1253                                     throw 'The value ' + x + ' is not a type number.';
1254                                 if (typeof y != 'number')
1255                                     throw 'The value ' + y + ' is not a type number.';
1256                                 return x+y;
1257                             })();
1258                             v782 = (function(){
1259                                 var x = v782;
1260                                 var y = 1;
1261                                 if (typeof x != 'number')
1262                                     throw 'The value ' + x + ' is not a type number.';
1263                                 if (typeof y != 'number')
1264                                     throw 'The value ' + y + ' is not a type number.';
1265                                 return x+y;
1266                             })();
1267                     }})();
1268                     return v781;
1269                 })(0,0,f162(v780));
1270             }));
1271         })();
1272         return l216;
1273     })();
1274     (function(){
1275         (function(){
1276             return f181 = (function(v784){
1277                 ((v784)["fname"] = "EVERY");
1278                 return v784;
1279             })((function (v785,v786){
1280                 if (arguments.length < 2) throw 'too few arguments';
1281                 if (arguments.length > 2) throw 'too many arguments';
1282                 return (function(v787,v788,v789){
1283                     (function(){
1284                         while((v787 !== v634 ? ((function(){
1285                             var x = v788;
1286                             var y = v789;
1287                             if (typeof x != 'number')
1288                                 throw 'The value ' + x + ' is not a type number.';
1289                             if (typeof y != 'number')
1290                                 throw 'The value ' + y + ' is not a type number.';
1291                             return x<y;
1292                         })()?v635: v634) : v634) !== v634){
1293                             ((v785)((function(){
1294                                 var string = v786;
1295                                 var index = v788;
1296                                 if (typeof string != 'string')
1297                                     throw 'The value ' + string + ' is not a type string.';
1298                                 if (typeof index != 'number')
1299                                     throw 'The value ' + index + ' is not a type number.';
1300                                 return string.charCodeAt(index);
1301                             })()) !== v634 ? v634 : (function(){
1302                                 return v787 = v634;
1303                             })());
1304                             v788 = (function(){
1305                                 var x = v788;
1306                                 var y = 1;
1307                                 if (typeof x != 'number')
1308                                     throw 'The value ' + x + ' is not a type number.';
1309                                 if (typeof y != 'number')
1310                                     throw 'The value ' + y + ' is not a type number.';
1311                                 return x+y;
1312                             })();
1313                     }})();
1314                     return v787;
1315                 })(v635,0,f162(v786));
1316             }));
1317         })();
1318         return l217;
1319     })();
1320     (function(){
1321         (function(){
1322             return f182 = (function(v790){
1323                 ((v790)["fname"] = "ASSOC");
1324                 return v790;
1325             })((function (v791,v792){
1326                 if (arguments.length < 2) throw 'too few arguments';
1327                 if (arguments.length > 2) throw 'too many arguments';
1328                 return (f120(v792) !== v634 ? (function(){
1329                     return v634;
1330                 })() : (f135(v791, f141(v792)) !== v634 ? (function(){
1331                     return (function(){
1332                         var tmp = v792;
1333                         return tmp === v634? v634: tmp.car;
1334                     })();
1335                 })() : (function(){
1336                     return f182(v791, (function(){
1337                         var tmp = v792;
1338                         return tmp === v634? v634: tmp.cdr;
1339                     })());
1340                 })()));
1341             }));
1342         })();
1343         return l218;
1344     })();
1345     return (function(){
1346         (function(){
1347             return f183 = (function(v793){
1348                 ((v793)["fname"] = "STRING=");
1349                 return v793;
1350             })((function (v794,v795){
1351                 if (arguments.length < 2) throw 'too few arguments';
1352                 if (arguments.length > 2) throw 'too many arguments';
1353                 return ((v794 == v795)?v635: v634);
1354             }));
1355         })();
1356         return l219;
1357     })();
1358 })();
1359 var l220 = f122("*NEWLINE*");
1360 var v796;
1361 (function(){
1362     (function(){
1363         return v796 = (function(){
1364             var x = f165(10);
1365             if (typeof x != 'number')
1366                 throw 'The value ' + x + ' is not a type number.';
1367             return String.fromCharCode(x);
1368         })();
1369     })();
1370     return l220;
1371 })();
1372 var l221 = f122("CONCAT");
1373 var f184;
1374 (function(){
1375     (function(){
1376         return f184 = (function(v797){
1377             ((v797)["fname"] = "CONCAT");
1378             return v797;
1379         })((function (){
1380             var v798= v634;
1381             for (var i = arguments.length-1; i>=0; i--)
1382                 v798 = {car: arguments[i], cdr: v798};
1383             return f156(f163, v798, "");
1384         }));
1385     })();
1386     return l221;
1387 })();
1388 var l222 = f122("JOIN");
1389 var f185;
1390 (function(){
1391     (function(){
1392         return f185 = (function(v799){
1393             ((v799)["fname"] = "JOIN");
1394             return v799;
1395         })((function (v800,v801){
1396             if (arguments.length < 1) throw 'too few arguments';
1397             if (arguments.length > 2) throw 'too many arguments';
1398             switch(arguments.length){
1399             case 1:
1400             v801="";
1401             default: break;
1402             }
1403             return (f120(v800) !== v634 ? (function(){
1404                 return "";
1405             })() : (f120((function(){
1406                 var tmp = v800;
1407                 return tmp === v634? v634: tmp.cdr;
1408             })()) !== v634 ? (function(){
1409                 return (function(){
1410                     var tmp = v800;
1411                     return tmp === v634? v634: tmp.car;
1412                 })();
1413             })() : (function(){
1414                 return f184((function(){
1415                     var tmp = v800;
1416                     return tmp === v634? v634: tmp.car;
1417                 })(), v801, f185((function(){
1418                     var tmp = v800;
1419                     return tmp === v634? v634: tmp.cdr;
1420                 })(), v801));
1421             })()));
1422         }));
1423     })();
1424     return l222;
1425 })();
1426 var l223 = f122("JOIN-TRAILING");
1427 var f186;
1428 (function(){
1429     (function(){
1430         return f186 = (function(v802){
1431             ((v802)["fname"] = "JOIN-TRAILING");
1432             return v802;
1433         })((function (v803,v804){
1434             if (arguments.length < 1) throw 'too few arguments';
1435             if (arguments.length > 2) throw 'too many arguments';
1436             switch(arguments.length){
1437             case 1:
1438             v804="";
1439             default: break;
1440             }
1441             return (f120(v803) !== v634 ? "" : f184((function(){
1442                 var tmp = v803;
1443                 return tmp === v634? v634: tmp.car;
1444             })(), v804, f186((function(){
1445                 var tmp = v803;
1446                 return tmp === v634? v634: tmp.cdr;
1447             })(), v804)));
1448         }));
1449     })();
1450     return l223;
1451 })();
1452 var l224 = f122("INDENT");
1453 var f187;
1454 (function(){
1455     (function(){
1456         return f187 = (function(v805){
1457             ((v805)["fname"] = "INDENT");
1458             return v805;
1459         })((function (){
1460             var v806= v634;
1461             for (var i = arguments.length-1; i>=0; i--)
1462                 v806 = {car: arguments[i], cdr: v806};
1463             return (function(v807){
1464                 return (function(v808,v809,v810){
1465                     (f169(v810) !== v634 ? (function(){
1466                         return v808 = "    ";
1467                     })() : v634);
1468                     (function(){
1469                         while(((function(){
1470                             var x = v809;
1471                             var y = v810;
1472                             if (typeof x != 'number')
1473                                 throw 'The value ' + x + ' is not a type number.';
1474                             if (typeof y != 'number')
1475                                 throw 'The value ' + y + ' is not a type number.';
1476                             return x<y;
1477                         })()?v635: v634) !== v634){
1478                             v808 = f184(v808, ((f167((function(){
1479                                 var string = v807;
1480                                 var index = v809;
1481                                 if (typeof string != 'string')
1482                                     throw 'The value ' + string + ' is not a type string.';
1483                                 if (typeof index != 'number')
1484                                     throw 'The value ' + index + ' is not a type number.';
1485                                 return string.charCodeAt(index);
1486                             })(), 10) !== v634 ? (((function(){
1487                                 var x = v809;
1488                                 var y = f132(v810);
1489                                 if (typeof x != 'number')
1490                                     throw 'The value ' + x + ' is not a type number.';
1491                                 if (typeof y != 'number')
1492                                     throw 'The value ' + y + ' is not a type number.';
1493                                 return x<y;
1494                             })()?v635: v634) !== v634 ? f136(f167((function(){
1495                                 var string = v807;
1496                                 var index = f131(v809);
1497                                 if (typeof string != 'string')
1498                                     throw 'The value ' + string + ' is not a type string.';
1499                                 if (typeof index != 'number')
1500                                     throw 'The value ' + index + ' is not a type number.';
1501                                 return string.charCodeAt(index);
1502                             })(), 10)) : v634) : v634) !== v634 ? f184((function(){
1503                                 var x = 10;
1504                                 if (typeof x != 'number')
1505                                     throw 'The value ' + x + ' is not a type number.';
1506                                 return String.fromCharCode(x);
1507                             })(), "    ") : f179(v807, v809, f131(v809))));
1508                             v809 = (function(){
1509                                 var x = v809;
1510                                 var y = 1;
1511                                 if (typeof x != 'number')
1512                                     throw 'The value ' + x + ' is not a type number.';
1513                                 if (typeof y != 'number')
1514                                     throw 'The value ' + y + ' is not a type number.';
1515                                 return x+y;
1516                             })();
1517                     }})();
1518                     return v808;
1519                 })("",0,f162(v807));
1520             })(f156(f184, v806, ""));
1521         }));
1522     })();
1523     return l224;
1524 })();
1525 var l225 = f122("INTEGER-TO-STRING");
1526 var f125;
1527 (function(){
1528     (function(){
1529         return f125 = (function(v811){
1530             ((v811)["fname"] = "INTEGER-TO-STRING");
1531             return v811;
1532         })((function (v812){
1533             if (arguments.length < 1) throw 'too few arguments';
1534             if (arguments.length > 1) throw 'too many arguments';
1535             return (f133(v812) !== v634 ? (function(){
1536                 return "0";
1537             })() : (f170(v812) !== v634 ? (function(){
1538                 return f184("-", f125((function(){
1539                     var x = 0;
1540                     var y = v812;
1541                     if (typeof x != 'number')
1542                         throw 'The value ' + x + ' is not a type number.';
1543                     if (typeof y != 'number')
1544                         throw 'The value ' + y + ' is not a type number.';
1545                     return x-y;
1546                 })()));
1547             })() : (function(){
1548                 return (function(v813){
1549                     (function(){
1550                         while(f136(f133(v812)) !== v634){
1551                             v813 = ({car: (function(){
1552                                 var x = v812;
1553                                 var y = 10;
1554                                 if (typeof x != 'number')
1555                                     throw 'The value ' + x + ' is not a type number.';
1556                                 if (typeof y != 'number')
1557                                     throw 'The value ' + y + ' is not a type number.';
1558                                 return x%y;
1559                             })(), cdr: v813});
1560                             v812 = f134(v812, 10);
1561                     }})();
1562                     return f185(f164((function (v814){
1563                         if (arguments.length < 1) throw 'too few arguments';
1564                         if (arguments.length > 1) throw 'too many arguments';
1565                         return (function(){
1566                             var x = (function(){
1567                                 var string = "0123456789";
1568                                 var index = v814;
1569                                 if (typeof string != 'string')
1570                                     throw 'The value ' + string + ' is not a type string.';
1571                                 if (typeof index != 'number')
1572                                     throw 'The value ' + index + ' is not a type number.';
1573                                 return string.charCodeAt(index);
1574                             })();
1575                             if (typeof x != 'number')
1576                                 throw 'The value ' + x + ' is not a type number.';
1577                             return String.fromCharCode(x);
1578                         })();
1579                     }), v813));
1580                 })(v634);
1581             })()));
1582         }));
1583     })();
1584     return l225;
1585 })();
1586 var l228 = f122("PRINT");
1587 var f191;
1588 var l227 = f122("WRITE-LINE");
1589 var f190;
1590 var l226 = f122("PRINT-TO-STRING");
1591 var f188;
1592 (function(){
1593     (function(){
1594         (function(){
1595             return f188 = (function(v815){
1596                 ((v815)["fname"] = "PRINT-TO-STRING");
1597                 return v815;
1598             })((function (v816){
1599                 if (arguments.length < 1) throw 'too few arguments';
1600                 if (arguments.length > 1) throw 'too many arguments';
1601                 return (((function(){
1602                     var tmp = v816;
1603                     return (typeof tmp == 'object' && 'name' in tmp);
1604                 })()?v635: v634) !== v634 ? (function(){
1605                     return (v816).name;
1606                 })() : (f168(v816) !== v634 ? (function(){
1607                     return f125(v816);
1608                 })() : (((typeof(v816) == "string")?v635: v634) !== v634 ? (function(){
1609                     return f184("\"", f189(v816), "\"");
1610                 })() : (((typeof v816 == 'function')?v635: v634) !== v634 ? (function(){
1611                     return (function(v817){
1612                         return (v817 !== v634 ? f184("#<FUNCTION ", v817, ">") : f184("#<FUNCTION>"));
1613                     })((function(){
1614                         var tmp = (v816)["fname"];
1615                         return tmp == undefined? v634: tmp ;
1616                     })());
1617                 })() : (f155(v816) !== v634 ? (function(){
1618                     return f184("(", f186(f164(f188, f173(v816)), " "), (function(v818){
1619                         return (f120((function(){
1620                             var tmp = v818;
1621                             return tmp === v634? v634: tmp.cdr;
1622                         })()) !== v634 ? f188((function(){
1623                             var tmp = v818;
1624                             return tmp === v634? v634: tmp.car;
1625                         })()) : f184(f188((function(){
1626                             var tmp = v818;
1627                             return tmp === v634? v634: tmp.car;
1628                         })()), " . ", f188((function(){
1629                             var tmp = v818;
1630                             return tmp === v634? v634: tmp.cdr;
1631                         })())));
1632                     })(f172(v816)), ")");
1633                 })() : v634)))));
1634             }));
1635         })();
1636         return l226;
1637     })();
1638     (function(){
1639         (function(){
1640             return f190 = (function(v819){
1641                 ((v819)["fname"] = "WRITE-LINE");
1642                 return v819;
1643             })((function (v820){
1644                 if (arguments.length < 1) throw 'too few arguments';
1645                 if (arguments.length > 1) throw 'too many arguments';
1646                 (function(){
1647                     var x = v820;
1648                     if (typeof x != 'string')
1649                         throw 'The value ' + x + ' is not a type string.';
1650                     return lisp.write(x);
1651                 })();
1652                 (function(){
1653                     var x = v796;
1654                     if (typeof x != 'string')
1655                         throw 'The value ' + x + ' is not a type string.';
1656                     return lisp.write(x);
1657                 })();
1658                 return v820;
1659             }));
1660         })();
1661         return l227;
1662     })();
1663     return (function(){
1664         (function(){
1665             return f191 = (function(v821){
1666                 ((v821)["fname"] = "PRINT");
1667                 return v821;
1668             })((function (v822){
1669                 if (arguments.length < 1) throw 'too few arguments';
1670                 if (arguments.length > 1) throw 'too many arguments';
1671                 return f190(f188(v822));
1672             }));
1673         })();
1674         return l228;
1675     })();
1676 })();
1677 var l229 = f122("MAKE-STRING-STREAM");
1678 var f192;
1679 (function(){
1680     (function(){
1681         return f192 = (function(v823){
1682             ((v823)["fname"] = "MAKE-STRING-STREAM");
1683             return v823;
1684         })((function (v824){
1685             if (arguments.length < 1) throw 'too few arguments';
1686             if (arguments.length > 1) throw 'too many arguments';
1687             return ({car: v824, cdr: 0});
1688         }));
1689     })();
1690     return l229;
1691 })();
1692 var l230 = f122("%PEEK-CHAR");
1693 var f193;
1694 (function(){
1695     (function(){
1696         return f193 = (function(v825){
1697             ((v825)["fname"] = "%PEEK-CHAR");
1698             return v825;
1699         })((function (v826){
1700             if (arguments.length < 1) throw 'too few arguments';
1701             if (arguments.length > 1) throw 'too many arguments';
1702             return (((function(){
1703                 var x = (function(){
1704                     var tmp = v826;
1705                     return tmp === v634? v634: tmp.cdr;
1706                 })();
1707                 var y = f162((function(){
1708                     var tmp = v826;
1709                     return tmp === v634? v634: tmp.car;
1710                 })());
1711                 if (typeof x != 'number')
1712                     throw 'The value ' + x + ' is not a type number.';
1713                 if (typeof y != 'number')
1714                     throw 'The value ' + y + ' is not a type number.';
1715                 return x<y;
1716             })()?v635: v634) !== v634 ? (function(){
1717                 var string = (function(){
1718                     var tmp = v826;
1719                     return tmp === v634? v634: tmp.car;
1720                 })();
1721                 var index = (function(){
1722                     var tmp = v826;
1723                     return tmp === v634? v634: tmp.cdr;
1724                 })();
1725                 if (typeof string != 'string')
1726                     throw 'The value ' + string + ' is not a type string.';
1727                 if (typeof index != 'number')
1728                     throw 'The value ' + index + ' is not a type number.';
1729                 return string.charCodeAt(index);
1730             })() : v634);
1731         }));
1732     })();
1733     return l230;
1734 })();
1735 var l231 = f122("%READ-CHAR");
1736 var f194;
1737 (function(){
1738     (function(){
1739         return f194 = (function(v827){
1740             ((v827)["fname"] = "%READ-CHAR");
1741             return v827;
1742         })((function (v828){
1743             if (arguments.length < 1) throw 'too few arguments';
1744             if (arguments.length > 1) throw 'too many arguments';
1745             return (((function(){
1746                 var x = (function(){
1747                     var tmp = v828;
1748                     return tmp === v634? v634: tmp.cdr;
1749                 })();
1750                 var y = f162((function(){
1751                     var tmp = v828;
1752                     return tmp === v634? v634: tmp.car;
1753                 })());
1754                 if (typeof x != 'number')
1755                     throw 'The value ' + x + ' is not a type number.';
1756                 if (typeof y != 'number')
1757                     throw 'The value ' + y + ' is not a type number.';
1758                 return x<y;
1759             })()?v635: v634) !== v634 ? (function(v829){
1760                 (function(){
1761                     var x = v828;
1762                     if (typeof x != 'object')
1763                         throw 'The value ' + x + ' is not a type object.';
1764                     return (x.cdr = f131((function(){
1765                         var tmp = v828;
1766                         return tmp === v634? v634: tmp.cdr;
1767                     })()));
1768                 })();
1769                 return v829;
1770             })((function(){
1771                 var string = (function(){
1772                     var tmp = v828;
1773                     return tmp === v634? v634: tmp.car;
1774                 })();
1775                 var index = (function(){
1776                     var tmp = v828;
1777                     return tmp === v634? v634: tmp.cdr;
1778                 })();
1779                 if (typeof string != 'string')
1780                     throw 'The value ' + string + ' is not a type string.';
1781                 if (typeof index != 'number')
1782                     throw 'The value ' + index + ' is not a type number.';
1783                 return string.charCodeAt(index);
1784             })()) : v634);
1785         }));
1786     })();
1787     return l231;
1788 })();
1789 var l232 = f122("WHITESPACEP");
1790 var f195;
1791 (function(){
1792     (function(){
1793         return f195 = (function(v830){
1794             ((v830)["fname"] = "WHITESPACEP");
1795             return v830;
1796         })((function (v831){
1797             if (arguments.length < 1) throw 'too few arguments';
1798             if (arguments.length > 1) throw 'too many arguments';
1799             return (function(v832){
1800                 return (v832 !== v634 ? v832 : (function(v833){
1801                     return (v833 !== v634 ? v833 : f167(v831, 9));
1802                 })(f167(v831, 10)));
1803             })(f167(v831, 32));
1804         }));
1805     })();
1806     return l232;
1807 })();
1808 var l233 = f122("SKIP-WHITESPACES");
1809 var f196;
1810 (function(){
1811     (function(){
1812         return f196 = (function(v834){
1813             ((v834)["fname"] = "SKIP-WHITESPACES");
1814             return v834;
1815         })((function (v835){
1816             if (arguments.length < 1) throw 'too few arguments';
1817             if (arguments.length > 1) throw 'too many arguments';
1818             return (function(v836){
1819                 v836 = f193(v835);
1820                 return (function(){
1821                     while((v836 !== v634 ? f195(v836) : v634) !== v634){
1822                         f194(v835);
1823                         v836 = f193(v835);
1824                 }})();
1825             })(v634);
1826         }));
1827     })();
1828     return l233;
1829 })();
1830 var l234 = f122("TERMINALP");
1831 var f197;
1832 (function(){
1833     (function(){
1834         return f197 = (function(v837){
1835             ((v837)["fname"] = "TERMINALP");
1836             return v837;
1837         })((function (v838){
1838             if (arguments.length < 1) throw 'too few arguments';
1839             if (arguments.length > 1) throw 'too many arguments';
1840             return (function(v839){
1841                 return (v839 !== v634 ? v839 : (function(v840){
1842                     return (v840 !== v634 ? v840 : (function(v841){
1843                         return (v841 !== v634 ? v841 : f167(40, v838));
1844                     })(f167(41, v838)));
1845                 })(f195(v838)));
1846             })(f120(v838));
1847         }));
1848     })();
1849     return l234;
1850 })();
1851 var l235 = f122("READ-UNTIL");
1852 var f198;
1853 (function(){
1854     (function(){
1855         return f198 = (function(v842){
1856             ((v842)["fname"] = "READ-UNTIL");
1857             return v842;
1858         })((function (v843,v844){
1859             if (arguments.length < 2) throw 'too few arguments';
1860             if (arguments.length > 2) throw 'too many arguments';
1861             return (function(v845,v846){
1862                 v846 = f193(v843);
1863                 (function(){
1864                     while((v846 !== v634 ? f136((v844)(v846)) : v634) !== v634){
1865                         v845 = f184(v845, (function(){
1866                             var x = v846;
1867                             if (typeof x != 'number')
1868                                 throw 'The value ' + x + ' is not a type number.';
1869                             return String.fromCharCode(x);
1870                         })());
1871                         f194(v843);
1872                         v846 = f193(v843);
1873                 }})();
1874                 return v845;
1875             })("",v634);
1876         }));
1877     })();
1878     return l235;
1879 })();
1880 var l236 = f122("SKIP-WHITESPACES-AND-COMMENTS");
1881 var f199;
1882 (function(){
1883     (function(){
1884         return f199 = (function(v847){
1885             ((v847)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
1886             return v847;
1887         })((function (v848){
1888             if (arguments.length < 1) throw 'too few arguments';
1889             if (arguments.length > 1) throw 'too many arguments';
1890             return (function(v849){
1891                 f196(v848);
1892                 v849 = f193(v848);
1893                 return (function(){
1894                     while((v849 !== v634 ? f167(v849, 59) : v634) !== v634){
1895                         f198(v848, (function (v850){
1896                             if (arguments.length < 1) throw 'too few arguments';
1897                             if (arguments.length > 1) throw 'too many arguments';
1898                             return f167(v850, 10);
1899                         }));
1900                         f196(v848);
1901                         v849 = f193(v848);
1902                 }})();
1903             })(v634);
1904         }));
1905     })();
1906     return l236;
1907 })();
1908 var l237 = f122("%READ-LIST");
1909 var f200;
1910 (function(){
1911     (function(){
1912         return f200 = (function(v851){
1913             ((v851)["fname"] = "%READ-LIST");
1914             return v851;
1915         })((function (v852){
1916             if (arguments.length < 1) throw 'too few arguments';
1917             if (arguments.length > 1) throw 'too many arguments';
1918             f199(v852);
1919             return (function(v853){
1920                 return (f120(v853) !== v634 ? (function(){
1921                     return (function (){ throw "Unspected EOF";return 0;})();
1922                 })() : (f167(v853, 41) !== v634 ? (function(){
1923                     f194(v852);
1924                     return v634;
1925                 })() : (f167(v853, 46) !== v634 ? (function(){
1926                     f194(v852);
1927                     return (function(v854){
1928                         f199(v852);
1929                         (f167(f194(v852), 41) !== v634 ? v634 : (function(){
1930                             return (function (){ throw "')' was expected.";return 0;})();
1931                         })());
1932                         return v854;
1933                     })(f201(v852));
1934                 })() : (function(){
1935                     return ({car: f201(v852), cdr: f200(v852)});
1936                 })())));
1937             })(f193(v852));
1938         }));
1939     })();
1940     return l237;
1941 })();
1942 var l238 = f122("READ-STRING");
1943 var f202;
1944 (function(){
1945     (function(){
1946         return f202 = (function(v855){
1947             ((v855)["fname"] = "READ-STRING");
1948             return v855;
1949         })((function (v856){
1950             if (arguments.length < 1) throw 'too few arguments';
1951             if (arguments.length > 1) throw 'too many arguments';
1952             return (function(v857,v858){
1953                 v858 = f194(v856);
1954                 (function(){
1955                     while(f136(f135(v858, 34)) !== v634){
1956                         (f120(v858) !== v634 ? (function(){
1957                             return (function (){ throw "Unexpected EOF";return 0;})();
1958                         })() : v634);
1959                         (f135(v858, 92) !== v634 ? (function(){
1960                             return v858 = f194(v856);
1961                         })() : v634);
1962                         v857 = f184(v857, (function(){
1963                             var x = v858;
1964                             if (typeof x != 'number')
1965                                 throw 'The value ' + x + ' is not a type number.';
1966                             return String.fromCharCode(x);
1967                         })());
1968                         v858 = f194(v856);
1969                 }})();
1970                 return v857;
1971             })("",v634);
1972         }));
1973     })();
1974     return l238;
1975 })();
1976 var l240 = f122("READ-SHARP");
1977 var l239 = f122("FUNCTION");
1978 var f203;
1979 (function(){
1980     (function(){
1981         return f203 = (function(v859){
1982             ((v859)["fname"] = "READ-SHARP");
1983             return v859;
1984         })((function (v860){
1985             if (arguments.length < 1) throw 'too few arguments';
1986             if (arguments.length > 1) throw 'too many arguments';
1987             f194(v860);
1988             return (function(v861){
1989                 return (f135(v861, 39) !== v634 ? (function(){
1990                     return f152(l239, f201(v860));
1991                 })() : (f135(v861, 92) !== v634 ? (function(){
1992                     return (function(v862){
1993                         return (f183(v862, "space") !== v634 ? (function(){
1994                             return f166(32);
1995                         })() : (f183(v862, "tab") !== v634 ? (function(){
1996                             return f166(9);
1997                         })() : (f183(v862, "newline") !== v634 ? (function(){
1998                             return f166(10);
1999                         })() : (function(){
2000                             return f166((function(){
2001                                 var string = v862;
2002                                 var index = 0;
2003                                 if (typeof string != 'string')
2004                                     throw 'The value ' + string + ' is not a type string.';
2005                                 if (typeof index != 'number')
2006                                     throw 'The value ' + index + ' is not a type number.';
2007                                 return string.charCodeAt(index);
2008                             })());
2009                         })())));
2010                     })(f184((function(){
2011                         var x = f194(v860);
2012                         if (typeof x != 'number')
2013                             throw 'The value ' + x + ' is not a type number.';
2014                         return String.fromCharCode(x);
2015                     })(), f198(v860, f197)));
2016                 })() : (f135(v861, 43) !== v634 ? (function(){
2017                     return (function(v863){
2018                         return (f183(v863, "common-lisp") !== v634 ? (function(){
2019                             f201(v860);
2020                             return f201(v860);
2021                         })() : (f183(v863, "ecmalisp") !== v634 ? (function(){
2022                             return f201(v860);
2023                         })() : (function(){
2024                             return (function (){ throw "Unknown reader form.";return 0;})();
2025                         })()));
2026                     })(f198(v860, f197));
2027                 })() : (function(){
2028                     return (function (){ throw "ECASE expression failed.";return 0;})();
2029                 })())));
2030             })(f194(v860));
2031         }));
2032     })();
2033     return l240;
2034 })();
2035 var l241 = f122("*EOF*");
2036 var v864;
2037 (function(){
2038     (function(){
2039         return v864 = (function(){
2040             var name = "EOF";
2041             if (typeof name != 'string')
2042                 throw 'The value ' + name + ' is not a type string.';
2043             return ({name: name});
2044         })();
2045     })();
2046     return l241;
2047 })();
2048 var l246 = f122("LS-READ");
2049 var l245 = f122("UNQUOTE");
2050 var l244 = f122("UNQUOTE-SPLICING");
2051 var l243 = f122("BACKQUOTE");
2052 var l242 = f122("QUOTE");
2053 var f201;
2054 (function(){
2055     (function(){
2056         return f201 = (function(v865){
2057             ((v865)["fname"] = "LS-READ");
2058             return v865;
2059         })((function (v866){
2060             if (arguments.length < 1) throw 'too few arguments';
2061             if (arguments.length > 1) throw 'too many arguments';
2062             f199(v866);
2063             return (function(v867){
2064                 return (f120(v867) !== v634 ? (function(){
2065                     return v864;
2066                 })() : (f167(v867, 40) !== v634 ? (function(){
2067                     f194(v866);
2068                     return f200(v866);
2069                 })() : (f167(v867, 39) !== v634 ? (function(){
2070                     f194(v866);
2071                     return f152(l242, f201(v866));
2072                 })() : (f167(v867, 96) !== v634 ? (function(){
2073                     f194(v866);
2074                     return f152(l243, f201(v866));
2075                 })() : (f167(v867, 34) !== v634 ? (function(){
2076                     f194(v866);
2077                     return f202(v866);
2078                 })() : (f167(v867, 44) !== v634 ? (function(){
2079                     f194(v866);
2080                     return (f135(f193(v866), 64) !== v634 ? (function(){
2081                         f194(v866);
2082                         return f152(l244, f201(v866));
2083                     })() : f152(l245, f201(v866)));
2084                 })() : (f167(v867, 35) !== v634 ? (function(){
2085                     return f203(v866);
2086                 })() : (function(){
2087                     return (function(v868){
2088                         return (f181(f178, v868) !== v634 ? f180(v868) : f122((function(){
2089                             var x = v868;
2090                             if (typeof x != 'string')
2091                                 throw 'The value ' + x + ' is not a type string.';
2092                             return x.toUpperCase();
2093                         })()));
2094                     })(f198(v866, f197));
2095                 })())))))));
2096             })(f193(v866));
2097         }));
2098     })();
2099     return l246;
2100 })();
2101 var l247 = f122("LS-READ-FROM-STRING");
2102 var f204;
2103 (function(){
2104     (function(){
2105         return f204 = (function(v869){
2106             ((v869)["fname"] = "LS-READ-FROM-STRING");
2107             return v869;
2108         })((function (v870){
2109             if (arguments.length < 1) throw 'too few arguments';
2110             if (arguments.length > 1) throw 'too many arguments';
2111             return f201(f192(v870));
2112         }));
2113     })();
2114     return l247;
2115 })();
2116 var l249 = f122("*COMPILATION-UNIT-CHECKS*");
2117 var l248 = f122("NIL");
2118 var v871;
2119 (function(){
2120     (function(){
2121         return v871 = l248;
2122     })();
2123     return l249;
2124 })();
2125 var l251 = f122("*ENV*");
2126 var l250 = f122("NIL");
2127 var v872;
2128 (function(){
2129     (function(){
2130         return v872 = l250;
2131     })();
2132     return l251;
2133 })();
2134 var l253 = f122("*FENV*");
2135 var l252 = f122("NIL");
2136 var v873;
2137 (function(){
2138     (function(){
2139         return v873 = l252;
2140     })();
2141     return l253;
2142 })();
2143 var l254 = f122("MAKE-BINDING");
2144 var f205;
2145 (function(){
2146     (function(){
2147         return f205 = (function(v874){
2148             ((v874)["fname"] = "MAKE-BINDING");
2149             return v874;
2150         })((function (v875,v876,v877,v878){
2151             if (arguments.length < 4) throw 'too few arguments';
2152             if (arguments.length > 4) throw 'too many arguments';
2153             return f152(v875, v876, v877, v878);
2154         }));
2155     })();
2156     return l254;
2157 })();
2158 var l255 = f122("BINDING-NAME");
2159 var f206;
2160 (function(){
2161     (function(){
2162         return f206 = (function(v879){
2163             ((v879)["fname"] = "BINDING-NAME");
2164             return v879;
2165         })((function (v880){
2166             if (arguments.length < 1) throw 'too few arguments';
2167             if (arguments.length > 1) throw 'too many arguments';
2168             return f148(v880);
2169         }));
2170     })();
2171     return l255;
2172 })();
2173 var l256 = f122("BINDING-TYPE");
2174 var f207;
2175 (function(){
2176     (function(){
2177         return f207 = (function(v881){
2178             ((v881)["fname"] = "BINDING-TYPE");
2179             return v881;
2180         })((function (v882){
2181             if (arguments.length < 1) throw 'too few arguments';
2182             if (arguments.length > 1) throw 'too many arguments';
2183             return f149(v882);
2184         }));
2185     })();
2186     return l256;
2187 })();
2188 var l257 = f122("BINDING-TRANSLATION");
2189 var f208;
2190 (function(){
2191     (function(){
2192         return f208 = (function(v883){
2193             ((v883)["fname"] = "BINDING-TRANSLATION");
2194             return v883;
2195         })((function (v884){
2196             if (arguments.length < 1) throw 'too few arguments';
2197             if (arguments.length > 1) throw 'too many arguments';
2198             return f150(v884);
2199         }));
2200     })();
2201     return l257;
2202 })();
2203 var l258 = f122("BINDING-DECLARED");
2204 var f209;
2205 (function(){
2206     (function(){
2207         return f209 = (function(v885){
2208             ((v885)["fname"] = "BINDING-DECLARED");
2209             return v885;
2210         })((function (v886){
2211             if (arguments.length < 1) throw 'too few arguments';
2212             if (arguments.length > 1) throw 'too many arguments';
2213             return (v886 !== v634 ? f151(v886) : v634);
2214         }));
2215     })();
2216     return l258;
2217 })();
2218 var l259 = f122("MARK-BINDING-AS-DECLARED");
2219 var f210;
2220 (function(){
2221     (function(){
2222         return f210 = (function(v887){
2223             ((v887)["fname"] = "MARK-BINDING-AS-DECLARED");
2224             return v887;
2225         })((function (v888){
2226             if (arguments.length < 1) throw 'too few arguments';
2227             if (arguments.length > 1) throw 'too many arguments';
2228             return (function(){
2229                 var x = f146(v888);
2230                 if (typeof x != 'object')
2231                     throw 'The value ' + x + ' is not a type object.';
2232                 return (x.car = v635);
2233             })();
2234         }));
2235     })();
2236     return l259;
2237 })();
2238 var l260 = f122("*VARIABLE-COUNTER*");
2239 var v889;
2240 (function(){
2241     (function(){
2242         return v889 = 0;
2243     })();
2244     return l260;
2245 })();
2246 var l261 = f122("GVARNAME");
2247 var f211;
2248 (function(){
2249     (function(){
2250         return f211 = (function(v890){
2251             ((v890)["fname"] = "GVARNAME");
2252             return v890;
2253         })((function (v891){
2254             if (arguments.length < 1) throw 'too few arguments';
2255             if (arguments.length > 1) throw 'too many arguments';
2256             return f184("v", f125(v889 = (function(){
2257                 var x = v889;
2258                 var y = 1;
2259                 if (typeof x != 'number')
2260                     throw 'The value ' + x + ' is not a type number.';
2261                 if (typeof y != 'number')
2262                     throw 'The value ' + y + ' is not a type number.';
2263                 return x+y;
2264             })()));
2265         }));
2266     })();
2267     return l261;
2268 })();
2269 var l263 = f122("LOOKUP-VARIABLE");
2270 var l262 = f122("VARIABLE");
2271 var f212;
2272 (function(){
2273     (function(){
2274         return f212 = (function(v892){
2275             ((v892)["fname"] = "LOOKUP-VARIABLE");
2276             return v892;
2277         })((function (v893,v894){
2278             if (arguments.length < 2) throw 'too few arguments';
2279             if (arguments.length > 2) throw 'too many arguments';
2280             return (function(v895){
2281                 return (v895 !== v634 ? v895 : (function(v896){
2282                     return (v896 !== v634 ? v896 : (function(v897,v898){
2283                         v872 = ({car: v898, cdr: v872});
2284                         v871 = ({car: (function (){
2285                             if (arguments.length > 0) throw 'too many arguments';
2286                             return (f209(f182(v893, v872)) !== v634 ? v634 : (function(){
2287                                 return (function (){ throw f184("Undefined variable `", v897, "'");return 0;})();
2288                             })());
2289                         }), cdr: v871});
2290                         return v898;
2291                     })((v893).name,f205(v893, l262, f211(v893), v634)));
2292                 })(f182(v893, v872)));
2293             })(f182(v893, v894));
2294         }));
2295     })();
2296     return l263;
2297 })();
2298 var l264 = f122("LOOKUP-VARIABLE-TRANSLATION");
2299 var f213;
2300 (function(){
2301     (function(){
2302         return f213 = (function(v899){
2303             ((v899)["fname"] = "LOOKUP-VARIABLE-TRANSLATION");
2304             return v899;
2305         })((function (v900,v901){
2306             if (arguments.length < 2) throw 'too few arguments';
2307             if (arguments.length > 2) throw 'too many arguments';
2308             return f208(f212(v900, v901));
2309         }));
2310     })();
2311     return l264;
2312 })();
2313 var l266 = f122("EXTEND-LOCAL-ENV");
2314 var l265 = f122("VARIABLE");
2315 var f214;
2316 (function(){
2317     (function(){
2318         return f214 = (function(v902){
2319             ((v902)["fname"] = "EXTEND-LOCAL-ENV");
2320             return v902;
2321         })((function (v903,v904){
2322             if (arguments.length < 2) throw 'too few arguments';
2323             if (arguments.length > 2) throw 'too many arguments';
2324             return f158(f164((function (v905){
2325                 if (arguments.length < 1) throw 'too few arguments';
2326                 if (arguments.length > 1) throw 'too many arguments';
2327                 return f205(v905, l265, f211(v905), v635);
2328             }), v903), v904);
2329         }));
2330     })();
2331     return l266;
2332 })();
2333 var l267 = f122("*FUNCTION-COUNTER*");
2334 var v906;
2335 (function(){
2336     (function(){
2337         return v906 = 0;
2338     })();
2339     return l267;
2340 })();
2341 var l269 = f122("LOOKUP-FUNCTION");
2342 var l268 = f122("FUNCTION");
2343 var f215;
2344 (function(){
2345     (function(){
2346         return f215 = (function(v907){
2347             ((v907)["fname"] = "LOOKUP-FUNCTION");
2348             return v907;
2349         })((function (v908,v909){
2350             if (arguments.length < 2) throw 'too few arguments';
2351             if (arguments.length > 2) throw 'too many arguments';
2352             return (function(v910){
2353                 return (v910 !== v634 ? v910 : (function(v911){
2354                     return (v911 !== v634 ? v911 : (function(v912,v913){
2355                         v873 = ({car: v913, cdr: v873});
2356                         v871 = ({car: (function (){
2357                             if (arguments.length > 0) throw 'too many arguments';
2358                             return (f209(f182(v908, v873)) !== v634 ? v634 : (function(){
2359                                 return (function (){ throw f184("Undefined function `", v912, "'");return 0;})();
2360                             })());
2361                         }), cdr: v871});
2362                         return v913;
2363                     })((v908).name,f205(v908, l268, f184("f", f125(v906 = (function(){
2364                         var x = v906;
2365                         var y = 1;
2366                         if (typeof x != 'number')
2367                             throw 'The value ' + x + ' is not a type number.';
2368                         if (typeof y != 'number')
2369                             throw 'The value ' + y + ' is not a type number.';
2370                         return x+y;
2371                     })())), v634)));
2372                 })(f182(v908, v873)));
2373             })(f182(v908, v909));
2374         }));
2375     })();
2376     return l269;
2377 })();
2378 var l270 = f122("LOOKUP-FUNCTION-TRANSLATION");
2379 var f216;
2380 (function(){
2381     (function(){
2382         return f216 = (function(v914){
2383             ((v914)["fname"] = "LOOKUP-FUNCTION-TRANSLATION");
2384             return v914;
2385         })((function (v915,v916){
2386             if (arguments.length < 2) throw 'too few arguments';
2387             if (arguments.length > 2) throw 'too many arguments';
2388             return f208(f215(v915, v916));
2389         }));
2390     })();
2391     return l270;
2392 })();
2393 var l271 = f122("*TOPLEVEL-COMPILATIONS*");
2394 var v917;
2395 (function(){
2396     (function(){
2397         return v917 = v634;
2398     })();
2399     return l271;
2400 })();
2401 var l272 = f122("%COMPILE-DEFVAR");
2402 var f217;
2403 (function(){
2404     (function(){
2405         return f217 = (function(v918){
2406             ((v918)["fname"] = "%COMPILE-DEFVAR");
2407             return v918;
2408         })((function (v919){
2409             if (arguments.length < 1) throw 'too few arguments';
2410             if (arguments.length > 1) throw 'too many arguments';
2411             return (function(v920){
2412                 f210(v920);
2413                 return v917 = ({car: f184("var ", f208(v920)), cdr: v917});
2414             })(f212(v919, v872));
2415         }));
2416     })();
2417     return l272;
2418 })();
2419 var l273 = f122("%COMPILE-DEFUN");
2420 var f218;
2421 (function(){
2422     (function(){
2423         return f218 = (function(v921){
2424             ((v921)["fname"] = "%COMPILE-DEFUN");
2425             return v921;
2426         })((function (v922){
2427             if (arguments.length < 1) throw 'too few arguments';
2428             if (arguments.length > 1) throw 'too many arguments';
2429             return (function(v923){
2430                 f210(v923);
2431                 return v917 = ({car: f184("var ", f208(v923)), cdr: v917});
2432             })(f215(v922, v873));
2433         }));
2434     })();
2435     return l273;
2436 })();
2437 var l275 = f122("%COMPILE-DEFMACRO");
2438 var l274 = f122("MACRO");
2439 var f219;
2440 (function(){
2441     (function(){
2442         return f219 = (function(v924){
2443             ((v924)["fname"] = "%COMPILE-DEFMACRO");
2444             return v924;
2445         })((function (v925,v926){
2446             if (arguments.length < 2) throw 'too few arguments';
2447             if (arguments.length > 2) throw 'too many arguments';
2448             return v873 = ({car: f205(v925, l274, v926, v635), cdr: v873});
2449         }));
2450     })();
2451     return l275;
2452 })();
2453 var l276 = f122("*COMPILATIONS*");
2454 var v927;
2455 (function(){
2456     (function(){
2457         return v927 = v634;
2458     })();
2459     return l276;
2460 })();
2461 var l277 = f122("LS-COMPILE-BLOCK");
2462 var f220;
2463 (function(){
2464     (function(){
2465         return f220 = (function(v928){
2466             ((v928)["fname"] = "LS-COMPILE-BLOCK");
2467             return v928;
2468         })((function (v929,v930,v931){
2469             if (arguments.length < 3) throw 'too few arguments';
2470             if (arguments.length > 3) throw 'too many arguments';
2471             return f186(f176((function (v932){
2472                 if (arguments.length < 1) throw 'too few arguments';
2473                 if (arguments.length > 1) throw 'too many arguments';
2474                 return (function(v933){
2475                     return (v933 !== v634 ? v933 : (((typeof(v932) == "string")?v635: v634) !== v634 ? f133(f162(v932)) : v634));
2476                 })(f120(v932));
2477             }), f164((function (v934){
2478                 if (arguments.length < 1) throw 'too few arguments';
2479                 if (arguments.length > 1) throw 'too many arguments';
2480                 return f221(v934, v930, v931);
2481             }), v929)), f184(";", v796));
2482         }));
2483     })();
2484     return l277;
2485 })();
2486 var l278 = f122("IF");
2487 v927 = ({car: f152(l278, (function (v935,v936,v937,v938,v939){
2488     if (arguments.length < 5) throw 'too few arguments';
2489     if (arguments.length > 5) throw 'too many arguments';
2490     return f184("(", f221(v937, v935, v936), " !== ", f221(v634, v634, v634), " ? ", f221(v938, v935, v936), " : ", f221(v939, v935, v936), ")");
2491 })), cdr: v927});
2492 var l280 = f122("*LAMBDA-LIST-KEYWORDS*");
2493 var l279 = {car: f122("&OPTIONAL"), cdr: {car: f122("&REST"), cdr: f122("NIL")}};
2494 var v940;
2495 (function(){
2496     (function(){
2497         return v940 = l279;
2498     })();
2499     return l280;
2500 })();
2501 var l281 = f122("LIST-UNTIL-KEYWORD");
2502 var f222;
2503 (function(){
2504     (function(){
2505         return f222 = (function(v941){
2506             ((v941)["fname"] = "LIST-UNTIL-KEYWORD");
2507             return v941;
2508         })((function (v942){
2509             if (arguments.length < 1) throw 'too few arguments';
2510             if (arguments.length > 1) throw 'too many arguments';
2511             return ((function(v943){
2512                 return (v943 !== v634 ? v943 : f174((function(){
2513                     var tmp = v942;
2514                     return tmp === v634? v634: tmp.car;
2515                 })(), v940));
2516             })(f120(v942)) !== v634 ? v634 : ({car: (function(){
2517                 var tmp = v942;
2518                 return tmp === v634? v634: tmp.car;
2519             })(), cdr: f222((function(){
2520                 var tmp = v942;
2521                 return tmp === v634? v634: tmp.cdr;
2522             })())}));
2523         }));
2524     })();
2525     return l281;
2526 })();
2527 var l282 = f122("LAMBDA-LIST-REQUIRED-ARGUMENTS");
2528 var f223;
2529 (function(){
2530     (function(){
2531         return f223 = (function(v944){
2532             ((v944)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
2533             return v944;
2534         })((function (v945){
2535             if (arguments.length < 1) throw 'too few arguments';
2536             if (arguments.length > 1) throw 'too many arguments';
2537             return f222(v945);
2538         }));
2539     })();
2540     return l282;
2541 })();
2542 var l284 = f122("LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
2543 var l283 = f122("&OPTIONAL");
2544 var f224;
2545 (function(){
2546     (function(){
2547         return f224 = (function(v946){
2548             ((v946)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
2549             return v946;
2550         })((function (v947){
2551             if (arguments.length < 1) throw 'too few arguments';
2552             if (arguments.length > 1) throw 'too many arguments';
2553             return f164(f154, f222((function(){
2554                 var tmp = f174(l283, v947);
2555                 return tmp === v634? v634: tmp.cdr;
2556             })()));
2557         }));
2558     })();
2559     return l284;
2560 })();
2561 var l285 = f122("LAMBDA-LIST-OPTIONAL-ARGUMENTS");
2562 var f225;
2563 (function(){
2564     (function(){
2565         return f225 = (function(v948){
2566             ((v948)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
2567             return v948;
2568         })((function (v949){
2569             if (arguments.length < 1) throw 'too few arguments';
2570             if (arguments.length > 1) throw 'too many arguments';
2571             return f164(f139, f224(v949));
2572         }));
2573     })();
2574     return l285;
2575 })();
2576 var l287 = f122("LAMBDA-LIST-REST-ARGUMENT");
2577 var l286 = f122("&REST");
2578 var f226;
2579 (function(){
2580     (function(){
2581         return f226 = (function(v950){
2582             ((v950)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
2583             return v950;
2584         })((function (v951){
2585             if (arguments.length < 1) throw 'too few arguments';
2586             if (arguments.length > 1) throw 'too many arguments';
2587             return (function(v952){
2588                 ((function(){
2589                     var tmp = v952;
2590                     return tmp === v634? v634: tmp.cdr;
2591                 })() !== v634 ? (function(){
2592                     return (function (){ throw "Bad lambda-list";return 0;})();
2593                 })() : v634);
2594                 return (function(){
2595                     var tmp = v952;
2596                     return tmp === v634? v634: tmp.car;
2597                 })();
2598             })(f222((function(){
2599                 var tmp = f174(l286, v951);
2600                 return tmp === v634? v634: tmp.cdr;
2601             })()));
2602         }));
2603     })();
2604     return l287;
2605 })();
2606 var l288 = f122("LAMBDA");
2607 v927 = ({car: f152(l288, (function (v954,v955,v956){
2608     if (arguments.length < 3) throw 'too few arguments';
2609     var v953= v634;
2610     for (var i = arguments.length-1; i>=3; i--)
2611         v953 = {car: arguments[i], cdr: v953};
2612     return (function(v957,v958,v959){
2613         return (function(v960,v961,v962){
2614             return f184("(function (", f185(f164((function (v963){
2615                 if (arguments.length < 1) throw 'too few arguments';
2616                 if (arguments.length > 1) throw 'too many arguments';
2617                 return f213(v963, v962);
2618             }), f158(v957, v958)), ","), "){", v796, f187((v957 !== v634 ? f184("if (arguments.length < ", f125(v960), ") throw 'too few arguments';", v796) : ""), (f136(v959) !== v634 ? f184("if (arguments.length > ", f125((function(){
2619                 var x = v960;
2620                 var y = v961;
2621                 if (typeof x != 'number')
2622                     throw 'The value ' + x + ' is not a type number.';
2623                 if (typeof y != 'number')
2624                     throw 'The value ' + y + ' is not a type number.';
2625                 return x+y;
2626             })()), ") throw 'too many arguments';", v796) : ""), (v958 !== v634 ? f184("switch(arguments.length){", v796, (function(v964,v965,v966){
2627                 return (function(){
2628                     (function(){
2629                         while(((function(){
2630                             var x = v966;
2631                             var y = v961;
2632                             if (typeof x != 'number')
2633                                 throw 'The value ' + x + ' is not a type number.';
2634                             if (typeof y != 'number')
2635                                 throw 'The value ' + y + ' is not a type number.';
2636                             return x<y;
2637                         })()?v635: v634) !== v634){
2638                             (function(v967){
2639                                 v965 = ({car: f184("case ", f125((function(){
2640                                     var x = v966;
2641                                     var y = v960;
2642                                     if (typeof x != 'number')
2643                                         throw 'The value ' + x + ' is not a type number.';
2644                                     if (typeof y != 'number')
2645                                         throw 'The value ' + y + ' is not a type number.';
2646                                     return x+y;
2647                                 })()), ":", v796, f213((function(){
2648                                     var tmp = v967;
2649                                     return tmp === v634? v634: tmp.car;
2650                                 })(), v962), "=", f221(f142(v967), v962, v955), ";", v796), cdr: v965});
2651                                 return v966 = (function(){
2652                                     var x = v966;
2653                                     var y = 1;
2654                                     if (typeof x != 'number')
2655                                         throw 'The value ' + x + ' is not a type number.';
2656                                     if (typeof y != 'number')
2657                                         throw 'The value ' + y + ' is not a type number.';
2658                                     return x+y;
2659                                 })();
2660                             })(f171(v966, v964));
2661                     }})();
2662                     v965 = ({car: f184("default: break;", v796), cdr: v965});
2663                     return f185(f160(v965));
2664                 })();
2665             })(f224(v956),v634,0), "}", v796) : ""), (v959 !== v634 ? (function(v968){
2666                 return f184("var ", v968, "= ", f221(v634, v954, v955), ";", v796, "for (var i = arguments.length-1; i>=", f125((function(){
2667                     var x = v960;
2668                     var y = v961;
2669                     if (typeof x != 'number')
2670                         throw 'The value ' + x + ' is not a type number.';
2671                     if (typeof y != 'number')
2672                         throw 'The value ' + y + ' is not a type number.';
2673                     return x+y;
2674                 })()), "; i--)", v796, f187(v968, " = ", "{car: arguments[i], cdr: "), v968, "};", v796);
2675             })(f213(v959, v962)) : ""), f184(f220(f173(v953), v962, v955), "return ", f221((function(){
2676                 var tmp = f172(v953);
2677                 return tmp === v634? v634: tmp.car;
2678             })(), v962, v955), ";")), v796, "})");
2679         })(f162(v957),f162(v958),f214(f158(f154(v959), v957, v958), v954));
2680     })(f223(v956),f225(v956),f226(v956));
2681 })), cdr: v927});
2682 var l289 = f122("FSETQ");
2683 v927 = ({car: f152(l289, (function (v969,v970,v971,v972){
2684     if (arguments.length < 4) throw 'too few arguments';
2685     if (arguments.length > 4) throw 'too many arguments';
2686     return f184(f216(v971, v970), " = ", f221(v972, v969, v970));
2687 })), cdr: v927});
2688 var l290 = f122("SETQ");
2689 v927 = ({car: f152(l290, (function (v973,v974,v975,v976){
2690     if (arguments.length < 4) throw 'too few arguments';
2691     if (arguments.length > 4) throw 'too many arguments';
2692     return f184(f213(v975, v973), " = ", f221(v976, v973, v974));
2693 })), cdr: v927});
2694 var l291 = f122("ESCAPE-STRING");
2695 var f189;
2696 (function(){
2697     (function(){
2698         return f189 = (function(v977){
2699             ((v977)["fname"] = "ESCAPE-STRING");
2700             return v977;
2701         })((function (v978){
2702             if (arguments.length < 1) throw 'too few arguments';
2703             if (arguments.length > 1) throw 'too many arguments';
2704             return (function(v979,v980,v981){
2705                 (function(){
2706                     while(((function(){
2707                         var x = v980;
2708                         var y = v981;
2709                         if (typeof x != 'number')
2710                             throw 'The value ' + x + ' is not a type number.';
2711                         if (typeof y != 'number')
2712                             throw 'The value ' + y + ' is not a type number.';
2713                         return x<y;
2714                     })()?v635: v634) !== v634){
2715                         (function(v982){
2716                             ((function(v983){
2717                                 return (v983 !== v634 ? v983 : f167(v982, 92));
2718                             })(f167(v982, 34)) !== v634 ? (function(){
2719                                 return v979 = f184(v979, "\\");
2720                             })() : v634);
2721                             (f167(v982, 10) !== v634 ? (function(){
2722                                 v979 = f184(v979, "\\");
2723                                 return v982 = 110;
2724                             })() : v634);
2725                             return v979 = f184(v979, (function(){
2726                                 var x = v982;
2727                                 if (typeof x != 'number')
2728                                     throw 'The value ' + x + ' is not a type number.';
2729                                 return String.fromCharCode(x);
2730                             })());
2731                         })((function(){
2732                             var string = v978;
2733                             var index = v980;
2734                             if (typeof string != 'string')
2735                                 throw 'The value ' + string + ' is not a type string.';
2736                             if (typeof index != 'number')
2737                                 throw 'The value ' + index + ' is not a type number.';
2738                             return string.charCodeAt(index);
2739                         })());
2740                         v980 = (function(){
2741                             var x = v980;
2742                             var y = 1;
2743                             if (typeof x != 'number')
2744                                 throw 'The value ' + x + ' is not a type number.';
2745                             if (typeof y != 'number')
2746                                 throw 'The value ' + y + ' is not a type number.';
2747                             return x+y;
2748                         })();
2749                 }})();
2750                 return v979;
2751             })("",0,f162(v978));
2752         }));
2753     })();
2754     return l291;
2755 })();
2756 var l293 = f122("LITERAL->JS");
2757 var l292 = f122("INTERN");
2758 var f227;
2759 (function(){
2760     (function(){
2761         return f227 = (function(v984){
2762             ((v984)["fname"] = "LITERAL->JS");
2763             return v984;
2764         })((function (v985){
2765             if (arguments.length < 1) throw 'too few arguments';
2766             if (arguments.length > 1) throw 'too many arguments';
2767             return (f168(v985) !== v634 ? (function(){
2768                 return f125(v985);
2769             })() : (((typeof(v985) == "string")?v635: v634) !== v634 ? (function(){
2770                 return f184("\"", f189(v985), "\"");
2771             })() : (((function(){
2772                 var tmp = v985;
2773                 return (typeof tmp == 'object' && 'name' in tmp);
2774             })()?v635: v634) !== v634 ? (function(){
2775                 return f221(f158(f152(l292), f152(f189((v985).name))), v872, v873);
2776             })() : (((function(){
2777                 var tmp = v985;
2778                 return (typeof tmp == 'object' && 'car' in tmp);
2779             })()?v635: v634) !== v634 ? (function(){
2780                 return f184("{car: ", f227((function(){
2781                     var tmp = v985;
2782                     return tmp === v634? v634: tmp.car;
2783                 })()), ", cdr: ", f227((function(){
2784                     var tmp = v985;
2785                     return tmp === v634? v634: tmp.cdr;
2786                 })()), "}");
2787             })() : v634))));
2788         }));
2789     })();
2790     return l293;
2791 })();
2792 var l294 = f122("*LITERAL-COUNTER*");
2793 var v986;
2794 (function(){
2795     (function(){
2796         return v986 = 0;
2797     })();
2798     return l294;
2799 })();
2800 var l295 = f122("LITERAL");
2801 var f228;
2802 (function(){
2803     (function(){
2804         return f228 = (function(v987){
2805             ((v987)["fname"] = "LITERAL");
2806             return v987;
2807         })((function (v988){
2808             if (arguments.length < 1) throw 'too few arguments';
2809             if (arguments.length > 1) throw 'too many arguments';
2810             return (function(v989){
2811                 v917 = ({car: f184("var ", v989, " = ", f227(v988)), cdr: v917});
2812                 return v989;
2813             })(f184("l", f125(v986 = (function(){
2814                 var x = v986;
2815                 var y = 1;
2816                 if (typeof x != 'number')
2817                     throw 'The value ' + x + ' is not a type number.';
2818                 if (typeof y != 'number')
2819                     throw 'The value ' + y + ' is not a type number.';
2820                 return x+y;
2821             })())));
2822         }));
2823     })();
2824     return l295;
2825 })();
2826 var l296 = f122("QUOTE");
2827 v927 = ({car: f152(l296, (function (v990,v991,v992){
2828     if (arguments.length < 3) throw 'too few arguments';
2829     if (arguments.length > 3) throw 'too many arguments';
2830     return f228(v992);
2831 })), cdr: v927});
2832 var l297 = f122("WHILE");
2833 v927 = ({car: f152(l297, (function (v994,v995,v996){
2834     if (arguments.length < 3) throw 'too few arguments';
2835     var v993= v634;
2836     for (var i = arguments.length-1; i>=3; i--)
2837         v993 = {car: arguments[i], cdr: v993};
2838     return f184("(function(){", v796, f187("while(", f221(v996, v994, v995), " !== ", f221(v634, v634, v634), "){", v796, f187(f220(v993, v994, v995))), "}})()");
2839 })), cdr: v927});
2840 var l299 = f122("LAMBDA");
2841 var l298 = f122("FUNCTION");
2842 v927 = ({car: f152(l298, (function (v997,v998,v999){
2843     if (arguments.length < 3) throw 'too few arguments';
2844     if (arguments.length > 3) throw 'too many arguments';
2845     return ((f155(v999) !== v634 ? (((function(){
2846         var tmp = v999;
2847         return tmp === v634? v634: tmp.car;
2848     })() === l299)?v635: v634) : v634) !== v634 ? (function(){
2849         return f221(v999, v997, v998);
2850     })() : (((function(){
2851         var tmp = v999;
2852         return (typeof tmp == 'object' && 'name' in tmp);
2853     })()?v635: v634) !== v634 ? (function(){
2854         return f216(v999, v998);
2855     })() : v634));
2856 })), cdr: v927});
2857 var l301 = f122("PROGN");
2858 var l300 = f122("EVAL-WHEN-COMPILE");
2859 v927 = ({car: f152(l300, (function (v1001,v1002){
2860     if (arguments.length < 2) throw 'too few arguments';
2861     var v1000= v634;
2862     for (var i = arguments.length-1; i>=2; i--)
2863         v1000 = {car: arguments[i], cdr: v1000};
2864     f229(({car: l301, cdr: v1000}));
2865     return "";
2866 })), cdr: v927});
2867 var l302 = f122("PROGN");
2868 v927 = ({car: f152(l302, (function (v1004,v1005){
2869     if (arguments.length < 2) throw 'too few arguments';
2870     var v1003= v634;
2871     for (var i = arguments.length-1; i>=2; i--)
2872         v1003 = {car: arguments[i], cdr: v1003};
2873     return f184("(function(){", v796, f187(f220(f173(v1003), v1004, v1005), "return ", f221((function(){
2874         var tmp = f172(v1003);
2875         return tmp === v634? v634: tmp.car;
2876     })(), v1004, v1005), ";", v796), "})()");
2877 })), cdr: v927});
2878 var l303 = f122("LET");
2879 v927 = ({car: f152(l303, (function (v1007,v1008,v1009){
2880     if (arguments.length < 3) throw 'too few arguments';
2881     var v1006= v634;
2882     for (var i = arguments.length-1; i>=3; i--)
2883         v1006 = {car: arguments[i], cdr: v1006};
2884     return (function(v1010){
2885         return (function(v1011,v1012){
2886             return (function(v1013){
2887                 return f184("(function(", f185(f164((function (v1014){
2888                     if (arguments.length < 1) throw 'too few arguments';
2889                     if (arguments.length > 1) throw 'too many arguments';
2890                     return f213(v1014, v1013);
2891                 }), v1011), ","), "){", v796, f187(f220(f173(v1006), v1013, v1008), "return ", f221((function(){
2892                     var tmp = f172(v1006);
2893                     return tmp === v634? v634: tmp.car;
2894                 })(), v1013, v1008), ";", v796), "})(", f185(f164((function (v1015){
2895                     if (arguments.length < 1) throw 'too few arguments';
2896                     if (arguments.length > 1) throw 'too many arguments';
2897                     return f221(v1015, v1007, v1008);
2898                 }), v1012), ","), ")");
2899             })(f214(v1011, v1007));
2900         })(f164(f148, v1010),f164(f149, v1010));
2901     })(f164(f154, v1009));
2902 })), cdr: v927});
2903 var l312 = f122("BACKQUOTE-EXPAND-1");
2904 var l311 = f122("LIST");
2905 var l310 = f122("UNQUOTE-SPLICING");
2906 var l309 = f122("LIST");
2907 var l308 = f122("UNQUOTE");
2908 var l307 = f122("APPEND");
2909 var l306 = f122("BACKQUOTE");
2910 var l305 = f122("UNQUOTE");
2911 var l304 = f122("QUOTE");
2912 var f230;
2913 (function(){
2914     (function(){
2915         return f230 = (function(v1016){
2916             ((v1016)["fname"] = "BACKQUOTE-EXPAND-1");
2917             return v1016;
2918         })((function (v1017){
2919             if (arguments.length < 1) throw 'too few arguments';
2920             if (arguments.length > 1) throw 'too many arguments';
2921             return (((function(){
2922                 var tmp = v1017;
2923                 return (typeof tmp == 'object' && 'name' in tmp);
2924             })()?v635: v634) !== v634 ? (function(){
2925                 return f152(l304, v1017);
2926             })() : (f153(v1017) !== v634 ? (function(){
2927                 return v1017;
2928             })() : ((((function(){
2929                 var tmp = v1017;
2930                 return tmp === v634? v634: tmp.car;
2931             })() === l305)?v635: v634) !== v634 ? (function(){
2932                 return (function(){
2933                     var tmp = v1017;
2934                     return tmp === v634? v634: tmp.car;
2935                 })();
2936             })() : ((((function(){
2937                 var tmp = v1017;
2938                 return tmp === v634? v634: tmp.car;
2939             })() === l306)?v635: v634) !== v634 ? (function(){
2940                 return f230(f230(f142(v1017)));
2941             })() : (function(){
2942                 return ({car: l307, cdr: f164((function (v1018){
2943                     if (arguments.length < 1) throw 'too few arguments';
2944                     if (arguments.length > 1) throw 'too many arguments';
2945                     return ((f155(v1018) !== v634 ? (((function(){
2946                         var tmp = v1018;
2947                         return tmp === v634? v634: tmp.car;
2948                     })() === l308)?v635: v634) : v634) !== v634 ? (function(){
2949                         return f152(l309, f142(v1018));
2950                     })() : ((f155(v1018) !== v634 ? (((function(){
2951                         var tmp = v1018;
2952                         return tmp === v634? v634: tmp.car;
2953                     })() === l310)?v635: v634) : v634) !== v634 ? (function(){
2954                         return f142(v1018);
2955                     })() : (function(){
2956                         return f152(l311, f230(v1018));
2957                     })()));
2958                 }), v1017)});
2959             })()))));
2960         }));
2961     })();
2962     return l312;
2963 })();
2964 var l314 = f122("BACKQUOTE-EXPAND");
2965 var l313 = f122("BACKQUOTE");
2966 var f231;
2967 (function(){
2968     (function(){
2969         return f231 = (function(v1019){
2970             ((v1019)["fname"] = "BACKQUOTE-EXPAND");
2971             return v1019;
2972         })((function (v1020){
2973             if (arguments.length < 1) throw 'too few arguments';
2974             if (arguments.length > 1) throw 'too many arguments';
2975             return ((f155(v1020) !== v634 ? (((function(){
2976                 var tmp = v1020;
2977                 return tmp === v634? v634: tmp.car;
2978             })() === l313)?v635: v634) : v634) !== v634 ? f230(f142(v1020)) : v1020);
2979         }));
2980     })();
2981     return l314;
2982 })();
2983 var l315 = f122("BACKQUOTE");
2984 v927 = ({car: f152(l315, (function (v1021,v1022,v1023){
2985     if (arguments.length < 3) throw 'too few arguments';
2986     if (arguments.length > 3) throw 'too many arguments';
2987     return f221(f230(v1023), v1021, v1022);
2988 })), cdr: v927});
2989 var l316 = f122("COMPILE-BOOL");
2990 var f232;
2991 (function(){
2992     (function(){
2993         return f232 = (function(v1024){
2994             ((v1024)["fname"] = "COMPILE-BOOL");
2995             return v1024;
2996         })((function (v1025){
2997             if (arguments.length < 1) throw 'too few arguments';
2998             if (arguments.length > 1) throw 'too many arguments';
2999             return f184("(", v1025, "?", f221(v635, v634, v634), ": ", f221(v634, v634, v634), ")");
3000         }));
3001     })();
3002     return l316;
3003 })();
3004 var l317 = f122("NUM-OP-NUM");
3005 var f233;
3006 (function(){
3007     (function(){
3008         return f233 = (function(v1026){
3009             ((v1026)["fname"] = "NUM-OP-NUM");
3010             return v1026;
3011         })((function (v1027,v1028,v1029){
3012             if (arguments.length < 3) throw 'too few arguments';
3013             if (arguments.length > 3) throw 'too many arguments';
3014             return f184("(function(){", v796, f187(f184("var ", "x", " = ", v1027, ";", v796), f184("var ", "y", " = ", v1029, ";", v796), f184("if (typeof ", "x", " != '", "number", "')", v796, f187("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", v796)), f184("if (typeof ", "y", " != '", "number", "')", v796, f187("throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", v796)), f184("return ", (function(){
3015                 return f184("x", v1028, "y");
3016             })(), ";", v796)), "})()");
3017         }));
3018     })();
3019     return l317;
3020 })();
3021 var l318 = f122("+");
3022 v927 = ({car: f152(l318, (function (v1030,v1031,v1032,v1033){
3023     if (arguments.length < 4) throw 'too few arguments';
3024     if (arguments.length > 4) throw 'too many arguments';
3025     return (function(v1034,v1035){
3026         return f233(v1034, "+", v1035);
3027     })(f221(v1032, v1030, v1031),f221(v1033, v1030, v1031));
3028 })), cdr: v927});
3029 var l319 = f122("-");
3030 v927 = ({car: f152(l319, (function (v1036,v1037,v1038,v1039){
3031     if (arguments.length < 4) throw 'too few arguments';
3032     if (arguments.length > 4) throw 'too many arguments';
3033     return (function(v1040,v1041){
3034         return f233(v1040, "-", v1041);
3035     })(f221(v1038, v1036, v1037),f221(v1039, v1036, v1037));
3036 })), cdr: v927});
3037 var l320 = f122("*");
3038 v927 = ({car: f152(l320, (function (v1042,v1043,v1044,v1045){
3039     if (arguments.length < 4) throw 'too few arguments';
3040     if (arguments.length > 4) throw 'too many arguments';
3041     return (function(v1046,v1047){
3042         return f233(v1046, "*", v1047);
3043     })(f221(v1044, v1042, v1043),f221(v1045, v1042, v1043));
3044 })), cdr: v927});
3045 var l321 = f122("/");
3046 v927 = ({car: f152(l321, (function (v1048,v1049,v1050,v1051){
3047     if (arguments.length < 4) throw 'too few arguments';
3048     if (arguments.length > 4) throw 'too many arguments';
3049     return (function(v1052,v1053){
3050         return f233(v1052, "/", v1053);
3051     })(f221(v1050, v1048, v1049),f221(v1051, v1048, v1049));
3052 })), cdr: v927});
3053 var l322 = f122("MOD");
3054 v927 = ({car: f152(l322, (function (v1054,v1055,v1056,v1057){
3055     if (arguments.length < 4) throw 'too few arguments';
3056     if (arguments.length > 4) throw 'too many arguments';
3057     return (function(v1058,v1059){
3058         return f233(v1058, "%", v1059);
3059     })(f221(v1056, v1054, v1055),f221(v1057, v1054, v1055));
3060 })), cdr: v927});
3061 var l323 = f122("<");
3062 v927 = ({car: f152(l323, (function (v1060,v1061,v1062,v1063){
3063     if (arguments.length < 4) throw 'too few arguments';
3064     if (arguments.length > 4) throw 'too many arguments';
3065     return (function(v1064,v1065){
3066         return f232(f233(v1064, "<", v1065));
3067     })(f221(v1062, v1060, v1061),f221(v1063, v1060, v1061));
3068 })), cdr: v927});
3069 var l324 = f122(">");
3070 v927 = ({car: f152(l324, (function (v1066,v1067,v1068,v1069){
3071     if (arguments.length < 4) throw 'too few arguments';
3072     if (arguments.length > 4) throw 'too many arguments';
3073     return (function(v1070,v1071){
3074         return f232(f233(v1070, ">", v1071));
3075     })(f221(v1068, v1066, v1067),f221(v1069, v1066, v1067));
3076 })), cdr: v927});
3077 var l325 = f122("=");
3078 v927 = ({car: f152(l325, (function (v1072,v1073,v1074,v1075){
3079     if (arguments.length < 4) throw 'too few arguments';
3080     if (arguments.length > 4) throw 'too many arguments';
3081     return (function(v1076,v1077){
3082         return f232(f233(v1076, "==", v1077));
3083     })(f221(v1074, v1072, v1073),f221(v1075, v1072, v1073));
3084 })), cdr: v927});
3085 var l326 = f122("<=");
3086 v927 = ({car: f152(l326, (function (v1078,v1079,v1080,v1081){
3087     if (arguments.length < 4) throw 'too few arguments';
3088     if (arguments.length > 4) throw 'too many arguments';
3089     return (function(v1082,v1083){
3090         return f232(f233(v1082, "<=", v1083));
3091     })(f221(v1080, v1078, v1079),f221(v1081, v1078, v1079));
3092 })), cdr: v927});
3093 var l327 = f122(">=");
3094 v927 = ({car: f152(l327, (function (v1084,v1085,v1086,v1087){
3095     if (arguments.length < 4) throw 'too few arguments';
3096     if (arguments.length > 4) throw 'too many arguments';
3097     return (function(v1088,v1089){
3098         return f232(f233(v1088, ">=", v1089));
3099     })(f221(v1086, v1084, v1085),f221(v1087, v1084, v1085));
3100 })), cdr: v927});
3101 var l328 = f122("NUMBERP");
3102 v927 = ({car: f152(l328, (function (v1090,v1091,v1092){
3103     if (arguments.length < 3) throw 'too few arguments';
3104     if (arguments.length > 3) throw 'too many arguments';
3105     return (function(v1093){
3106         return f232(f184("(typeof (", v1093, ") == \"number\")"));
3107     })(f221(v1092, v1090, v1091));
3108 })), cdr: v927});
3109 var l329 = f122("FLOOR");
3110 v927 = ({car: f152(l329, (function (v1094,v1095,v1096){
3111     if (arguments.length < 3) throw 'too few arguments';
3112     if (arguments.length > 3) throw 'too many arguments';
3113     return (function(v1097){
3114         return f184("(function(){", v796, f187(f184("var ", "x", " = ", v1097, ";", v796), f184("if (typeof ", "x", " != '", "number", "')", v796, f187("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", v796)), f184("return ", (function(){
3115             return "Math.floor(x)";
3116         })(), ";", v796)), "})()");
3117     })(f221(v1096, v1094, v1095));
3118 })), cdr: v927});
3119 var l330 = f122("CONS");
3120 v927 = ({car: f152(l330, (function (v1098,v1099,v1100,v1101){
3121     if (arguments.length < 4) throw 'too few arguments';
3122     if (arguments.length > 4) throw 'too many arguments';
3123     return (function(v1102,v1103){
3124         return f184("({car: ", v1102, ", cdr: ", v1103, "})");
3125     })(f221(v1100, v1098, v1099),f221(v1101, v1098, v1099));
3126 })), cdr: v927});
3127 var l331 = f122("CONSP");
3128 v927 = ({car: f152(l331, (function (v1104,v1105,v1106){
3129     if (arguments.length < 3) throw 'too few arguments';
3130     if (arguments.length > 3) throw 'too many arguments';
3131     return (function(v1107){
3132         return f232(f184("(function(){", v796, f187("var tmp = ", v1107, ";", v796, "return (typeof tmp == 'object' && 'car' in tmp);", v796), "})()"));
3133     })(f221(v1106, v1104, v1105));
3134 })), cdr: v927});
3135 var l332 = f122("CAR");
3136 v927 = ({car: f152(l332, (function (v1108,v1109,v1110){
3137     if (arguments.length < 3) throw 'too few arguments';
3138     if (arguments.length > 3) throw 'too many arguments';
3139     return (function(v1111){
3140         return f184("(function(){", v796, f187("var tmp = ", v1111, ";", v796, "return tmp === ", f221(v634, v634, v634), "? ", f221(v634, v634, v634), ": tmp.car;", v796), "})()");
3141     })(f221(v1110, v1108, v1109));
3142 })), cdr: v927});
3143 var l333 = f122("CDR");
3144 v927 = ({car: f152(l333, (function (v1112,v1113,v1114){
3145     if (arguments.length < 3) throw 'too few arguments';
3146     if (arguments.length > 3) throw 'too many arguments';
3147     return (function(v1115){
3148         return f184("(function(){", v796, f187("var tmp = ", v1115, ";", v796, "return tmp === ", f221(v634, v634, v634), "? ", f221(v634, v634, v634), ": tmp.cdr;", v796), "})()");
3149     })(f221(v1114, v1112, v1113));
3150 })), cdr: v927});
3151 var l334 = f122("SETCAR");
3152 v927 = ({car: f152(l334, (function (v1116,v1117,v1118,v1119){
3153     if (arguments.length < 4) throw 'too few arguments';
3154     if (arguments.length > 4) throw 'too many arguments';
3155     return (function(v1120,v1121){
3156         return f184("(function(){", v796, f187(f184("var ", "x", " = ", v1120, ";", v796), f184("if (typeof ", "x", " != '", "object", "')", v796, f187("throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", v796)), f184("return ", (function(){
3157             return f184("(x.car = ", v1121, ")");
3158         })(), ";", v796)), "})()");
3159     })(f221(v1118, v1116, v1117),f221(v1119, v1116, v1117));
3160 })), cdr: v927});
3161 var l335 = f122("SETCDR");
3162 v927 = ({car: f152(l335, (function (v1122,v1123,v1124,v1125){
3163     if (arguments.length < 4) throw 'too few arguments';
3164     if (arguments.length > 4) throw 'too many arguments';
3165     return (function(v1126,v1127){
3166         return f184("(function(){", v796, f187(f184("var ", "x", " = ", v1126, ";", v796), f184("if (typeof ", "x", " != '", "object", "')", v796, f187("throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", v796)), f184("return ", (function(){
3167             return f184("(x.cdr = ", v1127, ")");
3168         })(), ";", v796)), "})()");
3169     })(f221(v1124, v1122, v1123),f221(v1125, v1122, v1123));
3170 })), cdr: v927});
3171 var l336 = f122("SYMBOLP");
3172 v927 = ({car: f152(l336, (function (v1128,v1129,v1130){
3173     if (arguments.length < 3) throw 'too few arguments';
3174     if (arguments.length > 3) throw 'too many arguments';
3175     return (function(v1131){
3176         return f232(f184("(function(){", v796, f187("var tmp = ", v1131, ";", v796, "return (typeof tmp == 'object' && 'name' in tmp);", v796), "})()"));
3177     })(f221(v1130, v1128, v1129));
3178 })), cdr: v927});
3179 var l337 = f122("MAKE-SYMBOL");
3180 v927 = ({car: f152(l337, (function (v1132,v1133,v1134){
3181     if (arguments.length < 3) throw 'too few arguments';
3182     if (arguments.length > 3) throw 'too many arguments';
3183     return (function(v1135){
3184         return f184("(function(){", v796, f187(f184("var ", "name", " = ", v1135, ";", v796), f184("if (typeof ", "name", " != '", "string", "')", v796, f187("throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", v796)), f184("return ", (function(){
3185             return "({name: name})";
3186         })(), ";", v796)), "})()");
3187     })(f221(v1134, v1132, v1133));
3188 })), cdr: v927});
3189 var l338 = f122("SYMBOL-NAME");
3190 v927 = ({car: f152(l338, (function (v1136,v1137,v1138){
3191     if (arguments.length < 3) throw 'too few arguments';
3192     if (arguments.length > 3) throw 'too many arguments';
3193     return (function(v1139){
3194         return f184("(", v1139, ").name");
3195     })(f221(v1138, v1136, v1137));
3196 })), cdr: v927});
3197 var l339 = f122("EQ");
3198 v927 = ({car: f152(l339, (function (v1140,v1141,v1142,v1143){
3199     if (arguments.length < 4) throw 'too few arguments';
3200     if (arguments.length > 4) throw 'too many arguments';
3201     return (function(v1144,v1145){
3202         return f232(f184("(", v1144, " === ", v1145, ")"));
3203     })(f221(v1142, v1140, v1141),f221(v1143, v1140, v1141));
3204 })), cdr: v927});
3205 var l340 = f122("EQUAL");
3206 v927 = ({car: f152(l340, (function (v1146,v1147,v1148,v1149){
3207     if (arguments.length < 4) throw 'too few arguments';
3208     if (arguments.length > 4) throw 'too many arguments';
3209     return (function(v1150,v1151){
3210         return f232(f184("(", v1150, " == ", v1151, ")"));
3211     })(f221(v1148, v1146, v1147),f221(v1149, v1146, v1147));
3212 })), cdr: v927});
3213 var l341 = f122("STRING");
3214 v927 = ({car: f152(l341, (function (v1152,v1153,v1154){
3215     if (arguments.length < 3) throw 'too few arguments';
3216     if (arguments.length > 3) throw 'too many arguments';
3217     return (function(v1155){
3218         return f184("(function(){", v796, f187(f184("var ", "x", " = ", v1155, ";", v796), f184("if (typeof ", "x", " != '", "number", "')", v796, f187("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", v796)), f184("return ", (function(){
3219             return "String.fromCharCode(x)";
3220         })(), ";", v796)), "})()");
3221     })(f221(v1154, v1152, v1153));
3222 })), cdr: v927});
3223 var l342 = f122("STRINGP");
3224 v927 = ({car: f152(l342, (function (v1156,v1157,v1158){
3225     if (arguments.length < 3) throw 'too few arguments';
3226     if (arguments.length > 3) throw 'too many arguments';
3227     return (function(v1159){
3228         return f232(f184("(typeof(", v1159, ") == \"string\")"));
3229     })(f221(v1158, v1156, v1157));
3230 })), cdr: v927});
3231 var l343 = f122("STRING-UPCASE");
3232 v927 = ({car: f152(l343, (function (v1160,v1161,v1162){
3233     if (arguments.length < 3) throw 'too few arguments';
3234     if (arguments.length > 3) throw 'too many arguments';
3235     return (function(v1163){
3236         return f184("(function(){", v796, f187(f184("var ", "x", " = ", v1163, ";", v796), f184("if (typeof ", "x", " != '", "string", "')", v796, f187("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", v796)), f184("return ", (function(){
3237             return "x.toUpperCase()";
3238         })(), ";", v796)), "})()");
3239     })(f221(v1162, v1160, v1161));
3240 })), cdr: v927});
3241 var l344 = f122("STRING-LENGTH");
3242 v927 = ({car: f152(l344, (function (v1164,v1165,v1166){
3243     if (arguments.length < 3) throw 'too few arguments';
3244     if (arguments.length > 3) throw 'too many arguments';
3245     return (function(v1167){
3246         return f184("(function(){", v796, f187(f184("var ", "x", " = ", v1167, ";", v796), f184("if (typeof ", "x", " != '", "string", "')", v796, f187("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", v796)), f184("return ", (function(){
3247             return "x.length";
3248         })(), ";", v796)), "})()");
3249     })(f221(v1166, v1164, v1165));
3250 })), cdr: v927});
3251 var l345 = f122("SLICE");
3252 v927 = ({car: f152(l345, (function (v1168,v1169,v1170,v1171,v1172){
3253     if (arguments.length < 4) throw 'too few arguments';
3254     if (arguments.length > 5) throw 'too many arguments';
3255     switch(arguments.length){
3256     case 4:
3257     v1172=v634;
3258     default: break;
3259     }
3260     return f184("(function(){", v796, f187("var str = ", f221(v1170, v1168, v1169), ";", v796, "var a = ", f221(v1171, v1168, v1169), ";", v796, "var b;", v796, (v1172 !== v634 ? f184("b = ", f221(v1172, v1168, v1169), ";", v796) : ""), "return str.slice(a,b);", v796), "})()");
3261 })), cdr: v927});
3262 var l346 = f122("CHAR");
3263 v927 = ({car: f152(l346, (function (v1173,v1174,v1175,v1176){
3264     if (arguments.length < 4) throw 'too few arguments';
3265     if (arguments.length > 4) throw 'too many arguments';
3266     return (function(v1177,v1178){
3267         return f184("(function(){", v796, f187(f184("var ", "string", " = ", v1177, ";", v796), f184("var ", "index", " = ", v1178, ";", v796), f184("if (typeof ", "string", " != '", "string", "')", v796, f187("throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", v796)), f184("if (typeof ", "index", " != '", "number", "')", v796, f187("throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", v796)), f184("return ", (function(){
3268             return "string.charCodeAt(index)";
3269         })(), ";", v796)), "})()");
3270     })(f221(v1175, v1173, v1174),f221(v1176, v1173, v1174));
3271 })), cdr: v927});
3272 var l347 = f122("CONCAT-TWO");
3273 v927 = ({car: f152(l347, (function (v1179,v1180,v1181,v1182){
3274     if (arguments.length < 4) throw 'too few arguments';
3275     if (arguments.length > 4) throw 'too many arguments';
3276     return (function(v1183,v1184){
3277         return f184("(function(){", v796, f187(f184("var ", "string1", " = ", v1183, ";", v796), f184("var ", "string2", " = ", v1184, ";", v796), f184("if (typeof ", "string1", " != '", "string", "')", v796, f187("throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", v796)), f184("if (typeof ", "string2", " != '", "string", "')", v796, f187("throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", v796)), f184("return ", (function(){
3278             return "string1.concat(string2)";
3279         })(), ";", v796)), "})()");
3280     })(f221(v1181, v1179, v1180),f221(v1182, v1179, v1180));
3281 })), cdr: v927});
3282 var l348 = f122("FUNCALL");
3283 v927 = ({car: f152(l348, (function (v1186,v1187,v1188){
3284     if (arguments.length < 3) throw 'too few arguments';
3285     var v1185= v634;
3286     for (var i = arguments.length-1; i>=3; i--)
3287         v1185 = {car: arguments[i], cdr: v1185};
3288     return f184("(", f221(v1188, v1186, v1187), ")(", f185(f164((function (v1189){
3289         if (arguments.length < 1) throw 'too few arguments';
3290         if (arguments.length > 1) throw 'too many arguments';
3291         return f221(v1189, v1186, v1187);
3292     }), v1185), ", "), ")");
3293 })), cdr: v927});
3294 var l349 = f122("APPLY");
3295 v927 = ({car: f152(l349, (function (v1191,v1192,v1193){
3296     if (arguments.length < 3) throw 'too few arguments';
3297     var v1190= v634;
3298     for (var i = arguments.length-1; i>=3; i--)
3299         v1190 = {car: arguments[i], cdr: v1190};
3300     return (f120(v1190) !== v634 ? f184("(", f221(v1193, v1191, v1192), ")()") : (function(v1194,v1195){
3301         return f184("(function(){", v796, f187("var f = ", f221(v1193, v1191, v1192), ";", v796, "var args = [", f185(f164((function (v1196){
3302             if (arguments.length < 1) throw 'too few arguments';
3303             if (arguments.length > 1) throw 'too many arguments';
3304             return f221(v1196, v1191, v1192);
3305         }), v1194), ", "), "];", v796, "var tail = (", f221(v1195, v1191, v1192), ");", v796, f187("while (tail != ", f221(v634, v1191, v1192), "){", v796, "    args.push(tail.car);", v796, "    tail = tail.cdr;", v796, "}", v796, "return f.apply(this, args);", v796), "})()"));
3306     })(f173(v1190),(function(){
3307         var tmp = f172(v1190);
3308         return tmp === v634? v634: tmp.car;
3309     })()));
3310 })), cdr: v927});
3311 var l350 = f122("JS-EVAL");
3312 v927 = ({car: f152(l350, (function (v1197,v1198,v1199){
3313     if (arguments.length < 3) throw 'too few arguments';
3314     if (arguments.length > 3) throw 'too many arguments';
3315     return (function(v1200){
3316         return f184("(function(){", v796, f187(f184("var ", "string", " = ", v1200, ";", v796), f184("if (typeof ", "string", " != '", "string", "')", v796, f187("throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", v796)), f184("return ", (function(){
3317             return "eval.apply(window, [string])";
3318         })(), ";", v796)), "})()");
3319     })(f221(v1199, v1197, v1198));
3320 })), cdr: v927});
3321 var l351 = f122("ERROR");
3322 v927 = ({car: f152(l351, (function (v1201,v1202,v1203){
3323     if (arguments.length < 3) throw 'too few arguments';
3324     if (arguments.length > 3) throw 'too many arguments';
3325     return (function(v1204){
3326         return f184("(function (){ throw ", v1204, ";", "return 0;})()");
3327     })(f221(v1203, v1201, v1202));
3328 })), cdr: v927});
3329 var l352 = f122("NEW");
3330 v927 = ({car: f152(l352, (function (v1205,v1206){
3331     if (arguments.length < 2) throw 'too few arguments';
3332     if (arguments.length > 2) throw 'too many arguments';
3333     return (function(){
3334         return "{}";
3335     })();
3336 })), cdr: v927});
3337 var l353 = f122("GET");
3338 v927 = ({car: f152(l353, (function (v1207,v1208,v1209,v1210){
3339     if (arguments.length < 4) throw 'too few arguments';
3340     if (arguments.length > 4) throw 'too many arguments';
3341     return (function(v1211,v1212){
3342         return f184("(function(){", v796, f187("var tmp = ", "(", v1211, ")[", v1212, "];", v796, "return tmp == undefined? ", f221(v634, v634, v634), ": tmp ;", v796), "})()");
3343     })(f221(v1209, v1207, v1208),f221(v1210, v1207, v1208));
3344 })), cdr: v927});
3345 var l354 = f122("SET");
3346 v927 = ({car: f152(l354, (function (v1213,v1214,v1215,v1216,v1217){
3347     if (arguments.length < 5) throw 'too few arguments';
3348     if (arguments.length > 5) throw 'too many arguments';
3349     return (function(v1218,v1219,v1220){
3350         return f184("((", v1218, ")[", v1219, "] = ", v1220, ")");
3351     })(f221(v1215, v1213, v1214),f221(v1216, v1213, v1214),f221(v1217, v1213, v1214));
3352 })), cdr: v927});
3353 var l355 = f122("IN");
3354 v927 = ({car: f152(l355, (function (v1221,v1222,v1223,v1224){
3355     if (arguments.length < 4) throw 'too few arguments';
3356     if (arguments.length > 4) throw 'too many arguments';
3357     return (function(v1225,v1226){
3358         return f232(f184("((", v1225, ") in (", v1226, "))"));
3359     })(f221(v1223, v1221, v1222),f221(v1224, v1221, v1222));
3360 })), cdr: v927});
3361 var l356 = f122("FUNCTIONP");
3362 v927 = ({car: f152(l356, (function (v1227,v1228,v1229){
3363     if (arguments.length < 3) throw 'too few arguments';
3364     if (arguments.length > 3) throw 'too many arguments';
3365     return (function(v1230){
3366         return f232(f184("(typeof ", v1230, " == 'function')"));
3367     })(f221(v1229, v1227, v1228));
3368 })), cdr: v927});
3369 var l357 = f122("WRITE-STRING");
3370 v927 = ({car: f152(l357, (function (v1231,v1232,v1233){
3371     if (arguments.length < 3) throw 'too few arguments';
3372     if (arguments.length > 3) throw 'too many arguments';
3373     return (function(v1234){
3374         return f184("(function(){", v796, f187(f184("var ", "x", " = ", v1234, ";", v796), f184("if (typeof ", "x", " != '", "string", "')", v796, f187("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", v796)), f184("return ", (function(){
3375             return "lisp.write(x)";
3376         })(), ";", v796)), "})()");
3377     })(f221(v1233, v1231, v1232));
3378 })), cdr: v927});
3379 var l359 = f122("MACROP");
3380 var l358 = f122("MACRO");
3381 var f234;
3382 (function(){
3383     (function(){
3384         return f234 = (function(v1235){
3385             ((v1235)["fname"] = "MACROP");
3386             return v1235;
3387         })((function (v1236){
3388             if (arguments.length < 1) throw 'too few arguments';
3389             if (arguments.length > 1) throw 'too many arguments';
3390             return (((function(){
3391                 var tmp = v1236;
3392                 return (typeof tmp == 'object' && 'name' in tmp);
3393             })()?v635: v634) !== v634 ? ((f207(f215(v1236, v873)) === l358)?v635: v634) : v634);
3394         }));
3395     })();
3396     return l359;
3397 })();
3398 var l361 = f122("LS-MACROEXPAND-1");
3399 var l360 = f122("MACRO");
3400 var f235;
3401 (function(){
3402     (function(){
3403         return f235 = (function(v1237){
3404             ((v1237)["fname"] = "LS-MACROEXPAND-1");
3405             return v1237;
3406         })((function (v1238,v1239,v1240){
3407             if (arguments.length < 3) throw 'too few arguments';
3408             if (arguments.length > 3) throw 'too many arguments';
3409             return (f234((function(){
3410                 var tmp = v1238;
3411                 return tmp === v634? v634: tmp.car;
3412             })()) !== v634 ? (function(v1241){
3413                 return (((f207(v1241) === l360)?v635: v634) !== v634 ? (function(){
3414                     var f = f229(f208(v1241));
3415                     var args = [];
3416                     var tail = ((function(){
3417                         var tmp = v1238;
3418                         return tmp === v634? v634: tmp.cdr;
3419                     })());
3420                         while (tail != v634){
3421                             args.push(tail.car);
3422                             tail = tail.cdr;
3423                         }
3424                         return f.apply(this, args);
3425                     })() : v1238);
3426             })(f215((function(){
3427                 var tmp = v1238;
3428                 return tmp === v634? v634: tmp.car;
3429             })(), v872)) : v1238);
3430         }));
3431     })();
3432     return l361;
3433 })();
3434 var l363 = f122("COMPILE-FUNCALL");
3435 var l362 = f122("LAMBDA");
3436 var f236;
3437 (function(){
3438     (function(){
3439         return f236 = (function(v1242){
3440             ((v1242)["fname"] = "COMPILE-FUNCALL");
3441             return v1242;
3442         })((function (v1243,v1244,v1245,v1246){
3443             if (arguments.length < 4) throw 'too few arguments';
3444             if (arguments.length > 4) throw 'too many arguments';
3445             return (((function(){
3446                 var tmp = v1243;
3447                 return (typeof tmp == 'object' && 'name' in tmp);
3448             })()?v635: v634) !== v634 ? (function(){
3449                 return f184(f216(v1243, v1246), "(", f185(f164((function (v1247){
3450                     if (arguments.length < 1) throw 'too few arguments';
3451                     if (arguments.length > 1) throw 'too many arguments';
3452                     return f221(v1247, v1245, v1246);
3453                 }), v1244), ", "), ")");
3454             })() : ((f155(v1243) !== v634 ? (((function(){
3455                 var tmp = v1243;
3456                 return tmp === v634? v634: tmp.car;
3457             })() === l362)?v635: v634) : v634) !== v634 ? (function(){
3458                 return f184("(", f221(v1243, v1245, v1246), ")(", f185(f164((function (v1248){
3459                     if (arguments.length < 1) throw 'too few arguments';
3460                     if (arguments.length > 1) throw 'too many arguments';
3461                     return f221(v1248, v1245, v1246);
3462                 }), v1244), ", "), ")");
3463             })() : (function(){
3464                 return (function (){ throw f184("Invalid function designator ", (v1243).name);return 0;})();
3465             })()));
3466         }));
3467     })();
3468     return l363;
3469 })();
3470 var l364 = f122("LS-COMPILE");
3471 var f221;
3472 (function(){
3473     (function(){
3474         return f221 = (function(v1249){
3475             ((v1249)["fname"] = "LS-COMPILE");
3476             return v1249;
3477         })((function (v1250,v1251,v1252){
3478             if (arguments.length < 3) throw 'too few arguments';
3479             if (arguments.length > 3) throw 'too many arguments';
3480             return (((function(){
3481                 var tmp = v1250;
3482                 return (typeof tmp == 'object' && 'name' in tmp);
3483             })()?v635: v634) !== v634 ? (function(){
3484                 return f213(v1250, v1251);
3485             })() : (f168(v1250) !== v634 ? (function(){
3486                 return f125(v1250);
3487             })() : (((typeof(v1250) == "string")?v635: v634) !== v634 ? (function(){
3488                 return f184("\"", f189(v1250), "\"");
3489             })() : (f155(v1250) !== v634 ? (function(){
3490                 return (f182((function(){
3491                     var tmp = v1250;
3492                     return tmp === v634? v634: tmp.car;
3493                 })(), v927) !== v634 ? (function(v1253){
3494                     return (function(){
3495                         var f = v1253;
3496                         var args = [v1251, v1252];
3497                         var tail = ((function(){
3498                             var tmp = v1250;
3499                             return tmp === v634? v634: tmp.cdr;
3500                         })());
3501                             while (tail != v634){
3502                                 args.push(tail.car);
3503                                 tail = tail.cdr;
3504                             }
3505                             return f.apply(this, args);
3506                         })();
3507                 })(f149(f182((function(){
3508                     var tmp = v1250;
3509                     return tmp === v634? v634: tmp.car;
3510                 })(), v927))) : (f234((function(){
3511                     var tmp = v1250;
3512                     return tmp === v634? v634: tmp.car;
3513                 })()) !== v634 ? f221(f235(v1250, v1251, v1252), v1251, v1252) : f236((function(){
3514                     var tmp = v1250;
3515                     return tmp === v634? v634: tmp.car;
3516                 })(), (function(){
3517                     var tmp = v1250;
3518                     return tmp === v634? v634: tmp.cdr;
3519                 })(), v1251, v1252)));
3520             })() : v634))));
3521         }));
3522     })();
3523     return l364;
3524 })();
3525 var l365 = f122("LS-COMPILE-TOPLEVEL");
3526 var f237;
3527 (function(){
3528     (function(){
3529         return f237 = (function(v1254){
3530             ((v1254)["fname"] = "LS-COMPILE-TOPLEVEL");
3531             return v1254;
3532         })((function (v1255){
3533             if (arguments.length < 1) throw 'too few arguments';
3534             if (arguments.length > 1) throw 'too many arguments';
3535             v917 = v634;
3536             return (function(v1256){
3537                 return (function(v1257){
3538                     v917 = v634;
3539                     return v1257;
3540                 })(f184(f185(f164((function (v1258){
3541                     if (arguments.length < 1) throw 'too few arguments';
3542                     if (arguments.length > 1) throw 'too many arguments';
3543                     return f184(v1258, ";", v796);
3544                 }), v917)), v1256));
3545             })(f221(v1255, v634, v634));
3546         }));
3547     })();
3548     return l365;
3549 })();
3550 var l376 = f122("LS-COMPILE-TOPLEVEL");
3551 var l375 = f122("EVAL");
3552 var l374 = f122("PRINT-TO-STRING");
3553 var l373 = f122("LS-READ-FROM-STRING");
3554 var l372 = 1303;
3555 var l371 = 370;
3556 var l370 = 237;
3557 var l369 = 1264;
3558 var l368 = {car: {car: f122("*LITERAL-COUNTER*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v986", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*LAMBDA-LIST-KEYWORDS*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v940", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*COMPILATIONS*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v927", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*TOPLEVEL-COMPILATIONS*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v917", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*FUNCTION-COUNTER*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v906", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*VARIABLE-COUNTER*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v889", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*FENV*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v873", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*ENV*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v872", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*COMPILATION-UNIT-CHECKS*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v871", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*EOF*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v864", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*NEWLINE*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v796", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*GENSYM-COUNTER*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v644", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("T"), cdr: {car: f122("VARIABLE"), cdr: {car: "v635", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("NIL"), cdr: {car: f122("VARIABLE"), cdr: {car: "v634", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*PACKAGE*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v633", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}}}}}}}}}}}}};
3559 var l367 = {car: {car: f122("WITH-COMPILATION-UNIT"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("PROG1"), cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("SETQ"), cdr: {car: f122("*COMPILATION-UNIT-CHECKS*"), cdr: {car: f122("NIL"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("SETQ"), cdr: {car: f122("*ENV*"), cdr: {car: {car: f122("REMOVE-IF-NOT"), cdr: {car: {car: f122("FUNCTION"), cdr: {car: f122("BINDING-DECLARED"), cdr: f122("NIL")}}, cdr: {car: f122("*ENV*"), cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("SETQ"), cdr: {car: f122("*FENV*"), cdr: {car: {car: f122("REMOVE-IF-NOT"), cdr: {car: {car: f122("FUNCTION"), cdr: {car: f122("BINDING-DECLARED"), cdr: f122("NIL")}}, cdr: {car: f122("*FENV*"), cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}}}, cdr: {car: {car: f122("DOLIST"), cdr: {car: {car: f122("CHECK"), cdr: {car: f122("*COMPILATION-UNIT-CHECKS*"), cdr: f122("NIL")}}, cdr: {car: {car: f122("FUNCALL"), cdr: {car: f122("CHECK"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LS-COMPILE-TOPLEVEL"), cdr: {car: f122("FUNCTION"), cdr: {car: "f237", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("COMPILE-FUNCALL"), cdr: {car: f122("FUNCTION"), cdr: {car: "f236", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LS-MACROEXPAND-1"), cdr: {car: f122("FUNCTION"), cdr: {car: "f235", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("MACROP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f234", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("NUM-OP-NUM"), cdr: {car: f122("FUNCTION"), cdr: {car: "f233", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("TYPE-CHECK"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("DECLS"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("CONCAT"), cdr: {car: "(function(){", cdr: {car: f122("*NEWLINE*"), cdr: {car: {car: f122("INDENT"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("MAPCAR"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("DECL"), cdr: f122("NIL")}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("CONCAT"), cdr: {car: "var ", cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("FIRST"), cdr: {car: f122("DECL"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: " = ", cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("THIRD"), cdr: {car: f122("DECL"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: ";", cdr: {car: f122("*NEWLINE*"), cdr: f122("NIL")}}}}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("DECLS"), cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("MAPCAR"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("DECL"), cdr: f122("NIL")}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("CONCAT"), cdr: {car: "if (typeof ", cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("FIRST"), cdr: {car: f122("DECL"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: " != '", cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("SECOND"), cdr: {car: f122("DECL"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: "')", cdr: {car: f122("*NEWLINE*"), cdr: {car: {car: f122("INDENT"), cdr: {car: "throw 'The value ' + ", cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("FIRST"), cdr: {car: f122("DECL"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: " + ' is not a type ", cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("SECOND"), cdr: {car: f122("DECL"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: ".';", cdr: {car: f122("*NEWLINE*"), cdr: f122("NIL")}}}}}}}, cdr: f122("NIL")}}}}}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("DECLS"), cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("CONCAT"), cdr: {car: "return ", cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: ";", cdr: {car: f122("*NEWLINE*"), cdr: f122("NIL")}}}}}, cdr: f122("NIL")}}}}, cdr: {car: "})()", cdr: f122("NIL")}}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("COMPILE-BOOL"), cdr: {car: f122("FUNCTION"), cdr: {car: "f232", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DEFINE-BUILTIN"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("ARGS"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("DEFINE-COMPILATION"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("ARGS"), cdr: f122("NIL")}}, cdr: {car: {car: f122("LET"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("MAPCAR"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("ARG"), cdr: f122("NIL")}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: {car: f122("UNQUOTE"), cdr: {car: f122("ARG"), cdr: f122("NIL")}}, cdr: {car: {car: f122("LS-COMPILE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("ARG"), cdr: f122("NIL")}}, cdr: {car: f122("ENV"), cdr: {car: f122("FENV"), cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("ARGS"), cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("FORM"), cdr: f122("NIL")}, cdr: {car: {car: f122("BACKQUOTE-EXPAND-1"), cdr: {car: f122("FORM"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE-EXPAND"), cdr: {car: f122("FUNCTION"), cdr: {car: "f231", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE-EXPAND-1"), cdr: {car: f122("FUNCTION"), cdr: {car: "f230", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DEFINE-TRANSFORMATION"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("ARGS"), cdr: {car: f122("FORM"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("DEFINE-COMPILATION"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("ARGS"), cdr: f122("NIL")}}, cdr: {car: {car: f122("LS-COMPILE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("FORM"), cdr: f122("NIL")}}, cdr: {car: f122("ENV"), cdr: {car: f122("FENV"), cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("EVAL"), cdr: {car: f122("FUNCTION"), cdr: {car: "f229", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LITERAL"), cdr: {car: f122("FUNCTION"), cdr: {car: "f228", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LITERAL->JS"), cdr: {car: f122("FUNCTION"), cdr: {car: "f227", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LAMBDA-LIST-REST-ARGUMENT"), cdr: {car: f122("FUNCTION"), cdr: {car: "f226", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LAMBDA-LIST-OPTIONAL-ARGUMENTS"), cdr: {car: f122("FUNCTION"), cdr: {car: "f225", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"), cdr: {car: f122("FUNCTION"), cdr: {car: "f224", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LAMBDA-LIST-REQUIRED-ARGUMENTS"), cdr: {car: f122("FUNCTION"), cdr: {car: "f223", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LIST-UNTIL-KEYWORD"), cdr: {car: f122("FUNCTION"), cdr: {car: "f222", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DEFINE-COMPILATION"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("ARGS"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("PUSH"), cdr: {car: {car: f122("LIST"), cdr: {car: {car: f122("QUOTE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("ENV"), cdr: {car: f122("FENV"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("ARGS"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: {car: f122("*COMPILATIONS*"), cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LS-COMPILE"), cdr: {car: f122("FUNCTION"), cdr: {car: "f221", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LS-COMPILE-BLOCK"), cdr: {car: f122("FUNCTION"), cdr: {car: "f220", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("%COMPILE-DEFMACRO"), cdr: {car: f122("FUNCTION"), cdr: {car: "f219", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("%COMPILE-DEFUN"), cdr: {car: f122("FUNCTION"), cdr: {car: "f218", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("%COMPILE-DEFVAR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f217", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LOOKUP-FUNCTION-TRANSLATION"), cdr: {car: f122("FUNCTION"), cdr: {car: "f216", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LOOKUP-FUNCTION"), cdr: {car: f122("FUNCTION"), cdr: {car: "f215", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("EXTEND-LOCAL-ENV"), cdr: {car: f122("FUNCTION"), cdr: {car: "f214", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LOOKUP-VARIABLE-TRANSLATION"), cdr: {car: f122("FUNCTION"), cdr: {car: "f213", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LOOKUP-VARIABLE"), cdr: {car: f122("FUNCTION"), cdr: {car: "f212", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("GVARNAME"), cdr: {car: f122("FUNCTION"), cdr: {car: "f211", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("MARK-BINDING-AS-DECLARED"), cdr: {car: f122("FUNCTION"), cdr: {car: "f210", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BINDING-DECLARED"), cdr: {car: f122("FUNCTION"), cdr: {car: "f209", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BINDING-TRANSLATION"), cdr: {car: f122("FUNCTION"), cdr: {car: "f208", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BINDING-TYPE"), cdr: {car: f122("FUNCTION"), cdr: {car: "f207", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BINDING-NAME"), cdr: {car: f122("FUNCTION"), cdr: {car: "f206", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("MAKE-BINDING"), cdr: {car: f122("FUNCTION"), cdr: {car: "f205", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LS-READ-FROM-STRING"), cdr: {car: f122("FUNCTION"), cdr: {car: "f204", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("READ-SHARP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f203", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("READ-STRING"), cdr: {car: f122("FUNCTION"), cdr: {car: "f202", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LS-READ"), cdr: {car: f122("FUNCTION"), cdr: {car: "f201", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("%READ-LIST"), cdr: {car: f122("FUNCTION"), cdr: {car: "f200", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("SKIP-WHITESPACES-AND-COMMENTS"), cdr: {car: f122("FUNCTION"), cdr: {car: "f199", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("READ-UNTIL"), cdr: {car: f122("FUNCTION"), cdr: {car: "f198", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("TERMINALP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f197", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("SKIP-WHITESPACES"), cdr: {car: f122("FUNCTION"), cdr: {car: "f196", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("WHITESPACEP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f195", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("%READ-CHAR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f194", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("%PEEK-CHAR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f193", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("MAKE-STRING-STREAM"), cdr: {car: f122("FUNCTION"), cdr: {car: "f192", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("PRINT"), cdr: {car: f122("FUNCTION"), cdr: {car: "f191", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("WRITE-LINE"), cdr: {car: f122("FUNCTION"), cdr: {car: "f190", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("ESCAPE-STRING"), cdr: {car: f122("FUNCTION"), cdr: {car: "f189", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("PRINT-TO-STRING"), cdr: {car: f122("FUNCTION"), cdr: {car: "f188", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("INDENT"), cdr: {car: f122("FUNCTION"), cdr: {car: "f187", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("JOIN-TRAILING"), cdr: {car: f122("FUNCTION"), cdr: {car: "f186", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("JOIN"), cdr: {car: f122("FUNCTION"), cdr: {car: "f185", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CONCAT"), cdr: {car: f122("FUNCTION"), cdr: {car: "f184", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("STRING="), cdr: {car: f122("FUNCTION"), cdr: {car: "f183", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("ASSOC"), cdr: {car: f122("FUNCTION"), cdr: {car: "f182", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("EVERY"), cdr: {car: f122("FUNCTION"), cdr: {car: "f181", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("PARSE-INTEGER"), cdr: {car: f122("FUNCTION"), cdr: {car: "f180", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("SUBSEQ"), cdr: {car: f122("FUNCTION"), cdr: {car: "f179", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DIGIT-CHAR-P"), cdr: {car: f122("FUNCTION"), cdr: {car: "f178", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("REMOVE-IF-NOT"), cdr: {car: f122("FUNCTION"), cdr: {car: "f177", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("REMOVE-IF"), cdr: {car: f122("FUNCTION"), cdr: {car: "f176", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("REMOVE"), cdr: {car: f122("FUNCTION"), cdr: {car: "f175", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("MEMBER"), cdr: {car: f122("FUNCTION"), cdr: {car: "f174", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BUTLAST"), cdr: {car: f122("FUNCTION"), cdr: {car: "f173", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LAST"), cdr: {car: f122("FUNCTION"), cdr: {car: "f172", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("NTH"), cdr: {car: f122("FUNCTION"), cdr: {car: "f171", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("MINUSP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f170", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("PLUSP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f169", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("INTEGERP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f168", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CHAR="), cdr: {car: f122("FUNCTION"), cdr: {car: "f167", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CHAR-CODE"), cdr: {car: f122("FUNCTION"), cdr: {car: "f166", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CODE-CHAR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f165", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("MAPCAR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f164", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CONCAT-TWO"), cdr: {car: f122("FUNCTION"), cdr: {car: "f163", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LENGTH"), cdr: {car: f122("FUNCTION"), cdr: {car: "f162", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LIST-LENGTH"), cdr: {car: f122("FUNCTION"), cdr: {car: "f161", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("REVERSE"), cdr: {car: f122("FUNCTION"), cdr: {car: "f160", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("REVERSE-AUX"), cdr: {car: f122("FUNCTION"), cdr: {car: "f159", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("APPEND"), cdr: {car: f122("FUNCTION"), cdr: {car: "f158", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("APPEND-TWO"), cdr: {car: f122("FUNCTION"), cdr: {car: "f157", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DEFVAR"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("&OPTIONAL"), cdr: {car: f122("VALUE"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("%DEFVAR"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VALUE"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("QUOTE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DEFUN"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("ARGS"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("%DEFUN"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("ARGS"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: {car: {car: f122("QUOTE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("!REDUCE"), cdr: {car: f122("FUNCTION"), cdr: {car: "f156", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LISTP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f155", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("ENSURE-LIST"), cdr: {car: f122("FUNCTION"), cdr: {car: "f154", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("PROG1"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("FORM"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: f122("VALUE"), cdr: {car: {car: f122("GENSYM"), cdr: f122("NIL")}, cdr: f122("NIL")}}, cdr: f122("NIL")}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VALUE"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("FORM"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VALUE"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("OR"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("&REST"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: {car: {car: f122("COND"), cdr: {car: {car: {car: f122("NULL"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: {car: f122("NIL"), cdr: f122("NIL")}}, cdr: {car: {car: {car: f122("NULL"), cdr: {car: {car: f122("CDR"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("CAR"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("T"), cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: f122("G"), cdr: {car: {car: f122("GENSYM"), cdr: f122("NIL")}, cdr: f122("NIL")}}, cdr: f122("NIL")}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("CAR"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}, cdr: {car: {car: f122("IF"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G"), cdr: f122("NIL")}}, cdr: {car: {car: f122("OR"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("CDR"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("AND"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("&REST"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: {car: {car: f122("COND"), cdr: {car: {car: {car: f122("NULL"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: {car: f122("T"), cdr: f122("NIL")}}, cdr: {car: {car: {car: f122("NULL"), cdr: {car: {car: f122("CDR"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("CAR"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("T"), cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("IF"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("CAR"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("AND"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("CDR"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: f122("NIL"), cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("ECASE"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("FORM"), cdr: {car: f122("&REST"), cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("CASE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("FORM"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("APPEND"), cdr: {car: f122("CLAUSULES"), cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: {car: f122("T"), cdr: {car: {car: f122("ERROR"), cdr: {car: "ECASE expression failed.", cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CASE"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("FORM"), cdr: {car: f122("&REST"), cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: f122("!FORM"), cdr: {car: {car: f122("GENSYM"), cdr: f122("NIL")}, cdr: f122("NIL")}}, cdr: f122("NIL")}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: {car: f122("UNQUOTE"), cdr: {car: f122("!FORM"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("FORM"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}, cdr: {car: {car: f122("COND"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("MAPCAR"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("CLAUSULE"), cdr: f122("NIL")}, cdr: {car: {car: f122("IF"), cdr: {car: {car: f122("EQ"), cdr: {car: {car: f122("CAR"), cdr: {car: f122("CLAUSULE"), cdr: f122("NIL")}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}, cdr: {car: f122("CLAUSULE"), cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: {car: f122("EQL"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("!FORM"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("CAR"), cdr: {car: f122("CLAUSULE"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("CDR"), cdr: {car: f122("CLAUSULE"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}, cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("COND"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("&REST"), cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}, cdr: {car: {car: f122("IF"), cdr: {car: {car: f122("NULL"), cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}, cdr: {car: f122("NIL"), cdr: {car: {car: f122("IF"), cdr: {car: {car: f122("EQ"), cdr: {car: {car: f122("CAAR"), cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("CDAR"), cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("IF"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("CAAR"), cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("CDAR"), cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("COND"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("CDR"), cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DOTIMES"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("ITER"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: f122("G!TO"), cdr: {car: {car: f122("GENSYM"), cdr: f122("NIL")}, cdr: f122("NIL")}}, cdr: {car: {car: f122("VAR"), cdr: {car: {car: f122("FIRST"), cdr: {car: f122("ITER"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("TO"), cdr: {car: {car: f122("SECOND"), cdr: {car: f122("ITER"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("RESULT"), cdr: {car: {car: f122("THIRD"), cdr: {car: f122("ITER"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VAR"), cdr: f122("NIL")}}, cdr: {car: 0, cdr: f122("NIL")}}, cdr: {car: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G!TO"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("TO"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("WHILE"), cdr: {car: {car: f122("<"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VAR"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G!TO"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: {car: {car: f122("INCF"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VAR"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("RESULT"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DOLIST"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("ITER"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: f122("VAR"), cdr: {car: {car: f122("FIRST"), cdr: {car: f122("ITER"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("G!LIST"), cdr: {car: {car: f122("GENSYM"), cdr: f122("NIL")}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G!LIST"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("SECOND"), cdr: {car: f122("ITER"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VAR"), cdr: f122("NIL")}}, cdr: {car: f122("NIL"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("WHILE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G!LIST"), cdr: f122("NIL")}}, cdr: {car: {car: f122("SETQ"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VAR"), cdr: f122("NIL")}}, cdr: {car: {car: f122("CAR"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G!LIST"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: {car: {car: f122("SETQ"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G!LIST"), cdr: f122("NIL")}}, cdr: {car: {car: f122("CDR"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G!LIST"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("UNLESS"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("CONDITION"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("IF"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("CONDITION"), cdr: f122("NIL")}}, cdr: {car: f122("NIL"), cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("WHEN"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("CONDITION"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("IF"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("CONDITION"), cdr: f122("NIL")}}, cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: f122("NIL"), cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("PUSH"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("X"), cdr: {car: f122("PLACE"), cdr: f122("NIL")}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("SETQ"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("PLACE"), cdr: f122("NIL")}}, cdr: {car: {car: f122("CONS"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("X"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("PLACE"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DECF"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("X"), cdr: {car: f122("&OPTIONAL"), cdr: {car: {car: f122("DELTA"), cdr: {car: 1, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("SETQ"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("X"), cdr: f122("NIL")}}, cdr: {car: {car: f122("-"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("X"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("DELTA"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("INCF"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("X"), cdr: {car: f122("&OPTIONAL"), cdr: {car: {car: f122("DELTA"), cdr: {car: 1, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("SETQ"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("X"), cdr: f122("NIL")}}, cdr: {car: {car: f122("+"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("X"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("DELTA"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("ATOM"), cdr: {car: f122("FUNCTION"), cdr: {car: "f153", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LIST"), cdr: {car: f122("FUNCTION"), cdr: {car: "f152", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("FOURTH"), cdr: {car: f122("FUNCTION"), cdr: {car: "f151", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("THIRD"), cdr: {car: f122("FUNCTION"), cdr: {car: "f150", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("SECOND"), cdr: {car: f122("FUNCTION"), cdr: {car: "f149", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("FIRST"), cdr: {car: f122("FUNCTION"), cdr: {car: "f148", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CADDDR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f147", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CDDDR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f146", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CADDR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f145", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CDDR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f144", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CDAR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f143", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CADR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f142", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CAAR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f141", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CDR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f140", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CAR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f139", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CONSP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f138", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CONS"), cdr: {car: f122("FUNCTION"), cdr: {car: "f137", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("NOT"), cdr: {car: f122("FUNCTION"), cdr: {car: "f136", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("EQL"), cdr: {car: f122("FUNCTION"), cdr: {car: "f135", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("TRUNCATE"), cdr: {car: f122("FUNCTION"), cdr: {car: "f134", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("ZEROP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f133", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("1-"), cdr: {car: f122("FUNCTION"), cdr: {car: "f132", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("1+"), cdr: {car: f122("FUNCTION"), cdr: {car: "f131", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("/"), cdr: {car: f122("FUNCTION"), cdr: {car: "f130", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*"), cdr: {car: f122("FUNCTION"), cdr: {car: "f129", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("-"), cdr: {car: f122("FUNCTION"), cdr: {car: "f128", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("+"), cdr: {car: f122("FUNCTION"), cdr: {car: "f127", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("="), cdr: {car: f122("FUNCTION"), cdr: {car: "f126", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("INTEGER-TO-STRING"), cdr: {car: f122("FUNCTION"), cdr: {car: "f125", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("GENSYM"), cdr: {car: f122("FUNCTION"), cdr: {car: "f124", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("FIND-SYMBOL"), cdr: {car: f122("FUNCTION"), cdr: {car: "f123", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("INTERN"), cdr: {car: f122("FUNCTION"), cdr: {car: "f122", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("INTERNP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f121", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("NULL"), cdr: {car: f122("FUNCTION"), cdr: {car: "f120", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DEFUN"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("ARGS"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("%DEFUN"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("ARGS"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("%DEFUN"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("ARGS"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("EVAL-WHEN-COMPILE"), cdr: {car: {car: f122("%COMPILE-DEFUN"), cdr: {car: {car: f122("QUOTE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("FSETQ"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: {car: {car: f122("NAMED-LAMBDA"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("SYMBOL-NAME"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("ARGS"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("NAMED-LAMBDA"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("ARGS"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: f122("X"), cdr: {car: {car: f122("GENSYM"), cdr: {car: "FN", cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: {car: f122("UNQUOTE"), cdr: {car: f122("X"), cdr: f122("NIL")}}, cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("ARGS"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}, cdr: {car: {car: f122("SET"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("X"), cdr: f122("NIL")}}, cdr: {car: "fname", cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("X"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DEFVAR"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("&OPTIONAL"), cdr: {car: f122("VALUE"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("%DEFVAR"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VALUE"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("%DEFVAR"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("VALUE"), cdr: f122("NIL")}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("EVAL-WHEN-COMPILE"), cdr: {car: {car: f122("%COMPILE-DEFVAR"), cdr: {car: {car: f122("QUOTE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("SETQ"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VALUE"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DEFMACRO"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("ARGS"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("EVAL-WHEN-COMPILE"), cdr: {car: {car: f122("%COMPILE-DEFMACRO"), cdr: {car: {car: f122("QUOTE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("QUOTE"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("MAPCAR"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("X"), cdr: f122("NIL")}, cdr: {car: {car: f122("IF"), cdr: {car: {car: f122("EQ"), cdr: {car: f122("X"), cdr: {car: {car: f122("QUOTE"), cdr: {car: f122("&BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("QUOTE"), cdr: {car: f122("&REST"), cdr: f122("NIL")}}, cdr: {car: f122("X"), cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}, cdr: {car: f122("ARGS"), cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}};
3560 var l366 = f122("EVAL");
3561 var f229;
3562 v873 = l367;
3563 v872 = l368;
3564 v889 = l369;
3565 v906 = l370;
3566 v986 = l371;
3567 v644 = l372;
3568 (function(){
3569     (function(){
3570         (function(){
3571             return f229 = (function(v1259){
3572                 ((v1259)["fname"] = "EVAL");
3573                 return v1259;
3574             })((function (v1260){
3575                 if (arguments.length < 1) throw 'too few arguments';
3576                 if (arguments.length > 1) throw 'too many arguments';
3577                 return (function(v1261){
3578                     return (function(){
3579                         var string = v1261;
3580                         if (typeof string != 'string')
3581                             throw 'The value ' + string + ' is not a type string.';
3582                         return eval.apply(window, [string]);
3583                     })();
3584                 })((function(v1262){
3585                     (function(v1263,v1264){
3586                         return (function(){
3587                             while(v1263 !== v634){
3588                                 v1264 = (function(){
3589                                     var tmp = v1263;
3590                                     return tmp === v634? v634: tmp.car;
3591                                 })();
3592                                 (v1264)();
3593                                 v1263 = (function(){
3594                                     var tmp = v1263;
3595                                     return tmp === v634? v634: tmp.cdr;
3596                                 })();
3597                         }})();
3598                     })(v871,v634);
3599                     return v1262;
3600                 })((function(){
3601                     v871 = v634;
3602                     v872 = f177(f209, v872);
3603                     v873 = f177(f209, v873);
3604                     return f237(v1260);
3605                 })()));
3606             }));
3607         })();
3608         return l366;
3609     })();
3610     return (function(){
3611         var string = f184("var lisp = {};", "lisp.read = ", f216(l373, v634), ";", v796, "lisp.print = ", f216(l374, v634), ";", v796, "lisp.eval = ", f216(l375, v634), ";", v796, "lisp.compile = ", f216(l376, v634), ";", v796, "lisp.evalString = function(str){", v796, "   return lisp.eval(lisp.read(str));", v796, "}", v796, "lisp.compileString = function(str){", v796, "   return lisp.compile(lisp.read(str));", v796, "}", v796);
3612         if (typeof string != 'string')
3613             throw 'The value ' + string + ' is not a type string.';
3614         return eval.apply(window, [string]);
3615     })();
3616 })();