ecmalisp.js

   1 var f34;
   2 var f33;
   3 var f32;
   4 var f31;
   5 var f30;
   6 var f29;
   7 var f28;
   8 var f27;
   9 var f26;
  10 var f25;
  11 var f24;
  12 var f23;
  13 var f22;
  14 var f21;
  15 var f20;
  16 var f19;
  17 var f18;
  18 var f17;
  19 var f16;
  20 var f15;
  21 var f14;
  22 var f13;
  23 var f12;
  24 var f11;
  25 var f10;
  26 var f9;
  27 var f8;
  28 var f7;
  29 var f5;
  30 var v12;
  31 var f4;
  32 var f3;
  33 var f2;
  34 var f1;
  35 var v3;
  36 var v2;
  37 var v1;
  38 (function(){
  39     (function(){
  40         return v1 = {};
  41     })();
  42     (function(){
  43         return v2 = (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     ((v1)["NIL"] = v2);
  51     (function(){
  52         return v3 = (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     ((v1)["T"] = v3);
  60     (function(){
  61         return f1 = (function(v4){
  62             ((v4)["fname"] = "NULL");
  63             return v4;
  64         })((function (v5){
  65             if (arguments.length < 1) throw 'too few arguments';
  66             if (arguments.length > 1) throw 'too many arguments';
  67             return ((v5 === v2)?v3: v2);
  68         }));
  69     })();
  70     (function(){
  71         return f2 = (function(v6){
  72             ((v6)["fname"] = "INTERNP");
  73             return v6;
  74         })((function (v7){
  75             if (arguments.length < 1) throw 'too few arguments';
  76             if (arguments.length > 1) throw 'too many arguments';
  77             return (((v7) in (v1))?v3: v2);
  78         }));
  79     })();
  80     (function(){
  81         return f3 = (function(v8){
  82             ((v8)["fname"] = "INTERN");
  83             return v8;
  84         })((function (v9){
  85             if (arguments.length < 1) throw 'too few arguments';
  86             if (arguments.length > 1) throw 'too many arguments';
  87             return (f2(v9) !== v2 ? (function(){
  88                 var tmp = (v1)[v9];
  89                 return tmp == undefined? v2: tmp ;
  90             })() : ((v1)[v9] = (function(){
  91                 var name = v9;
  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 f4 = (function(v10){
 100             ((v10)["fname"] = "FIND-SYMBOL");
 101             return v10;
 102         })((function (v11){
 103             if (arguments.length < 1) throw 'too few arguments';
 104             if (arguments.length > 1) throw 'too many arguments';
 105             return (function(){
 106                 var tmp = (v1)[v11];
 107                 return tmp == undefined? v2: tmp ;
 108             })();
 109         }));
 110     })();
 111     (function(){
 112         return v12 = 0;
 113     })();
 114     (function(){
 115         return f5 = (function(v13){
 116             ((v13)["fname"] = "GENSYM");
 117             return v13;
 118         })((function (v14){
 119             if (arguments.length > 1) throw 'too many arguments';
 120             switch(arguments.length){
 121             case 0:
 122             v14="G";
 123             default: break;
 124             }
 125             v12 = (function(){
 126                 var x = v12;
 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 = v14;
 137                     var string2 = f6(v12);
 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 f7 = (function(v15){
 152             ((v15)["fname"] = "=");
 153             return v15;
 154         })((function (v16,v17){
 155             if (arguments.length < 2) throw 'too few arguments';
 156             if (arguments.length > 2) throw 'too many arguments';
 157             return ((function(){
 158                 var x = v16;
 159                 var y = v17;
 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             })()?v3: v2);
 166         }));
 167     })();
 168     (function(){
 169         return f8 = (function(v18){
 170             ((v18)["fname"] = "+");
 171             return v18;
 172         })((function (v19,v20){
 173             if (arguments.length < 2) throw 'too few arguments';
 174             if (arguments.length > 2) throw 'too many arguments';
 175             return (function(){
 176                 var x = v19;
 177                 var y = v20;
 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 f9 = (function(v21){
 188             ((v21)["fname"] = "-");
 189             return v21;
 190         })((function (v22,v23){
 191             if (arguments.length < 2) throw 'too few arguments';
 192             if (arguments.length > 2) throw 'too many arguments';
 193             return (function(){
 194                 var x = v22;
 195                 var y = v23;
 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 f10 = (function(v24){
 206             ((v24)["fname"] = "*");
 207             return v24;
 208         })((function (v25,v26){
 209             if (arguments.length < 2) throw 'too few arguments';
 210             if (arguments.length > 2) throw 'too many arguments';
 211             return (function(){
 212                 var x = v25;
 213                 var y = v26;
 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 f11 = (function(v27){
 224             ((v27)["fname"] = "/");
 225             return v27;
 226         })((function (v28,v29){
 227             if (arguments.length < 2) throw 'too few arguments';
 228             if (arguments.length > 2) throw 'too many arguments';
 229             return (function(){
 230                 var x = v28;
 231                 var y = v29;
 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 f12 = (function(v30){
 242             ((v30)["fname"] = "1+");
 243             return v30;
 244         })((function (v31){
 245             if (arguments.length < 1) throw 'too few arguments';
 246             if (arguments.length > 1) throw 'too many arguments';
 247             return (function(){
 248                 var x = v31;
 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 f13 = (function(v32){
 260             ((v32)["fname"] = "1-");
 261             return v32;
 262         })((function (v33){
 263             if (arguments.length < 1) throw 'too few arguments';
 264             if (arguments.length > 1) throw 'too many arguments';
 265             return (function(){
 266                 var x = v33;
 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 f14 = (function(v34){
 278             ((v34)["fname"] = "ZEROP");
 279             return v34;
 280         })((function (v35){
 281             if (arguments.length < 1) throw 'too few arguments';
 282             if (arguments.length > 1) throw 'too many arguments';
 283             return ((function(){
 284                 var x = v35;
 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             })()?v3: v2);
 292         }));
 293     })();
 294     (function(){
 295         return f15 = (function(v36){
 296             ((v36)["fname"] = "TRUNCATE");
 297             return v36;
 298         })((function (v37,v38){
 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 = v37;
 304                     var y = v38;
 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 f16 = (function(v39){
 319             ((v39)["fname"] = "EQL");
 320             return v39;
 321         })((function (v40,v41){
 322             if (arguments.length < 2) throw 'too few arguments';
 323             if (arguments.length > 2) throw 'too many arguments';
 324             return ((v40 === v41)?v3: v2);
 325         }));
 326     })();
 327     (function(){
 328         return f17 = (function(v42){
 329             ((v42)["fname"] = "NOT");
 330             return v42;
 331         })((function (v43){
 332             if (arguments.length < 1) throw 'too few arguments';
 333             if (arguments.length > 1) throw 'too many arguments';
 334             return (v43 !== v2 ? v2 : v3);
 335         }));
 336     })();
 337     (function(){
 338         return f18 = (function(v44){
 339             ((v44)["fname"] = "CONS");
 340             return v44;
 341         })((function (v45,v46){
 342             if (arguments.length < 2) throw 'too few arguments';
 343             if (arguments.length > 2) throw 'too many arguments';
 344             return ({car: v45, cdr: v46});
 345         }));
 346     })();
 347     (function(){
 348         return f19 = (function(v47){
 349             ((v47)["fname"] = "CONSP");
 350             return v47;
 351         })((function (v48){
 352             if (arguments.length < 1) throw 'too few arguments';
 353             if (arguments.length > 1) throw 'too many arguments';
 354             return ((function(){
 355                 var tmp = v48;
 356                 return (typeof tmp == 'object' && 'car' in tmp);
 357             })()?v3: v2);
 358         }));
 359     })();
 360     (function(){
 361         return f20 = (function(v49){
 362             ((v49)["fname"] = "CAR");
 363             return v49;
 364         })((function (v50){
 365             if (arguments.length < 1) throw 'too few arguments';
 366             if (arguments.length > 1) throw 'too many arguments';
 367             return (function(){
 368                 var tmp = v50;
 369                 return tmp === v2? v2: tmp.car;
 370             })();
 371         }));
 372     })();
 373     (function(){
 374         return f21 = (function(v51){
 375             ((v51)["fname"] = "CDR");
 376             return v51;
 377         })((function (v52){
 378             if (arguments.length < 1) throw 'too few arguments';
 379             if (arguments.length > 1) throw 'too many arguments';
 380             return (function(){
 381                 var tmp = v52;
 382                 return tmp === v2? v2: tmp.cdr;
 383             })();
 384         }));
 385     })();
 386     (function(){
 387         return f22 = (function(v53){
 388             ((v53)["fname"] = "CAAR");
 389             return v53;
 390         })((function (v54){
 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 = v54;
 396                     return tmp === v2? v2: tmp.car;
 397                 })();
 398                 return tmp === v2? v2: tmp.car;
 399             })();
 400         }));
 401     })();
 402     (function(){
 403         return f23 = (function(v55){
 404             ((v55)["fname"] = "CADR");
 405             return v55;
 406         })((function (v56){
 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 = v56;
 412                     return tmp === v2? v2: tmp.cdr;
 413                 })();
 414                 return tmp === v2? v2: tmp.car;
 415             })();
 416         }));
 417     })();
 418     (function(){
 419         return f24 = (function(v57){
 420             ((v57)["fname"] = "CDAR");
 421             return v57;
 422         })((function (v58){
 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 = v58;
 428                     return tmp === v2? v2: tmp.car;
 429                 })();
 430                 return tmp === v2? v2: tmp.cdr;
 431             })();
 432         }));
 433     })();
 434     (function(){
 435         return f25 = (function(v59){
 436             ((v59)["fname"] = "CDDR");
 437             return v59;
 438         })((function (v60){
 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 = v60;
 444                     return tmp === v2? v2: tmp.cdr;
 445                 })();
 446                 return tmp === v2? v2: tmp.cdr;
 447             })();
 448         }));
 449     })();
 450     (function(){
 451         return f26 = (function(v61){
 452             ((v61)["fname"] = "CADDR");
 453             return v61;
 454         })((function (v62){
 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 = v62;
 461                         return tmp === v2? v2: tmp.cdr;
 462                     })();
 463                     return tmp === v2? v2: tmp.cdr;
 464                 })();
 465                 return tmp === v2? v2: tmp.car;
 466             })();
 467         }));
 468     })();
 469     (function(){
 470         return f27 = (function(v63){
 471             ((v63)["fname"] = "CDDDR");
 472             return v63;
 473         })((function (v64){
 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 = v64;
 480                         return tmp === v2? v2: tmp.cdr;
 481                     })();
 482                     return tmp === v2? v2: tmp.cdr;
 483                 })();
 484                 return tmp === v2? v2: tmp.cdr;
 485             })();
 486         }));
 487     })();
 488     (function(){
 489         return f28 = (function(v65){
 490             ((v65)["fname"] = "CADDDR");
 491             return v65;
 492         })((function (v66){
 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 = v66;
 500                             return tmp === v2? v2: tmp.cdr;
 501                         })();
 502                         return tmp === v2? v2: tmp.cdr;
 503                     })();
 504                     return tmp === v2? v2: tmp.cdr;
 505                 })();
 506                 return tmp === v2? v2: tmp.car;
 507             })();
 508         }));
 509     })();
 510     (function(){
 511         return f29 = (function(v67){
 512             ((v67)["fname"] = "FIRST");
 513             return v67;
 514         })((function (v68){
 515             if (arguments.length < 1) throw 'too few arguments';
 516             if (arguments.length > 1) throw 'too many arguments';
 517             return (function(){
 518                 var tmp = v68;
 519                 return tmp === v2? v2: tmp.car;
 520             })();
 521         }));
 522     })();
 523     (function(){
 524         return f30 = (function(v69){
 525             ((v69)["fname"] = "SECOND");
 526             return v69;
 527         })((function (v70){
 528             if (arguments.length < 1) throw 'too few arguments';
 529             if (arguments.length > 1) throw 'too many arguments';
 530             return f23(v70);
 531         }));
 532     })();
 533     (function(){
 534         return f31 = (function(v71){
 535             ((v71)["fname"] = "THIRD");
 536             return v71;
 537         })((function (v72){
 538             if (arguments.length < 1) throw 'too few arguments';
 539             if (arguments.length > 1) throw 'too many arguments';
 540             return f26(v72);
 541         }));
 542     })();
 543     (function(){
 544         return f32 = (function(v73){
 545             ((v73)["fname"] = "FOURTH");
 546             return v73;
 547         })((function (v74){
 548             if (arguments.length < 1) throw 'too few arguments';
 549             if (arguments.length > 1) throw 'too many arguments';
 550             return f28(v74);
 551         }));
 552     })();
 553     (function(){
 554         return f33 = (function(v75){
 555             ((v75)["fname"] = "LIST");
 556             return v75;
 557         })((function (){
 558             var v76= v2;
 559             for (var i = arguments.length-1; i>=0; i--)
 560                 v76 = {car: arguments[i], cdr: v76};
 561             return v76;
 562         }));
 563     })();
 564     (function(){
 565         return f34 = (function(v77){
 566             ((v77)["fname"] = "ATOM");
 567             return v77;
 568         })((function (v78){
 569             if (arguments.length < 1) throw 'too few arguments';
 570             if (arguments.length > 1) throw 'too many arguments';
 571             return f17(((function(){
 572                 var tmp = v78;
 573                 return (typeof tmp == 'object' && 'car' in tmp);
 574             })()?v3: v2));
 575         }));
 576     })();
 577     return ;
 578 })();
 579 var f35;
 580 (function(){
 581     return f35 = (function(v79){
 582         ((v79)["fname"] = "ENSURE-LIST");
 583         return v79;
 584     })((function (v80){
 585         if (arguments.length < 1) throw 'too few arguments';
 586         if (arguments.length > 1) throw 'too many arguments';
 587         return (f36(v80) !== v2 ? v80 : f33(v80));
 588     }));
 589 })();
 590 var f37;
 591 (function(){
 592     return f37 = (function(v81){
 593         ((v81)["fname"] = "!REDUCE");
 594         return v81;
 595     })((function (v82,v83,v84){
 596         if (arguments.length < 3) throw 'too few arguments';
 597         if (arguments.length > 3) throw 'too many arguments';
 598         return (f1(v83) !== v2 ? v84 : f37(v82, (function(){
 599             var tmp = v83;
 600             return tmp === v2? v2: tmp.cdr;
 601         })(), (v82)(v84, (function(){
 602             var tmp = v83;
 603             return tmp === v2? v2: tmp.car;
 604         })())));
 605     }));
 606 })();
 607 var l33 = f3("STRING=");
 608 var f66;
 609 var l32 = f3("ASSOC");
 610 var f65;
 611 var l31 = f3("EVERY");
 612 var f64;
 613 var l30 = f3("PARSE-INTEGER");
 614 var f63;
 615 var l29 = f3("SUBSEQ");
 616 var f62;
 617 var l28 = f3("DIGIT-CHAR-P");
 618 var f61;
 619 var l27 = f3("REMOVE-IF-NOT");
 620 var f60;
 621 var l26 = f3("REMOVE-IF");
 622 var f59;
 623 var l25 = f3("REMOVE");
 624 var f58;
 625 var l24 = f3("MEMBER");
 626 var f57;
 627 var l23 = f3("BUTLAST");
 628 var f56;
 629 var l22 = f3("LAST");
 630 var f55;
 631 var l21 = f3("NTH");
 632 var f54;
 633 var l20 = f3("LISTP");
 634 var f36;
 635 var l19 = f3("MINUSP");
 636 var f53;
 637 var l18 = f3("PLUSP");
 638 var f52;
 639 var l17 = f3("INTEGERP");
 640 var f51;
 641 var l16 = f3("CHAR=");
 642 var f50;
 643 var l15 = f3("CHAR-CODE");
 644 var f49;
 645 var l14 = f3("CODE-CHAR");
 646 var f48;
 647 var l13 = f3("COPY-LIST");
 648 var f47;
 649 var l12 = f3("IDENTITY");
 650 var f46;
 651 var l11 = f3("MAPCAR");
 652 var l10 = f3("NIL");
 653 var f45;
 654 var l9 = f3("CONCAT-TWO");
 655 var f44;
 656 var l8 = f3("LENGTH");
 657 var f43;
 658 var l7 = f3("LIST-LENGTH");
 659 var f42;
 660 var l6 = f3("REVERSE");
 661 var l5 = f3("NIL");
 662 var f41;
 663 var l4 = f3("REVERSE-AUX");
 664 var f40;
 665 var l3 = f3("APPEND");
 666 var l2 = f3("NIL");
 667 var f39;
 668 var l1 = f3("APPEND-TWO");
 669 var f38;
 670 (function(){
 671     (function(){
 672         (function(){
 673             return f38 = (function(v85){
 674                 ((v85)["fname"] = "APPEND-TWO");
 675                 return v85;
 676             })((function (v86,v87){
 677                 if (arguments.length < 2) throw 'too few arguments';
 678                 if (arguments.length > 2) throw 'too many arguments';
 679                 return (f1(v86) !== v2 ? v87 : ({car: (function(){
 680                     var tmp = v86;
 681                     return tmp === v2? v2: tmp.car;
 682                 })(), cdr: f39((function(){
 683                     var tmp = v86;
 684                     return tmp === v2? v2: tmp.cdr;
 685                 })(), v87)}));
 686             }));
 687         })();
 688         return l1;
 689     })();
 690     (function(){
 691         (function(){
 692             return f39 = (function(v88){
 693                 ((v88)["fname"] = "APPEND");
 694                 return v88;
 695             })((function (){
 696                 var v89= v2;
 697                 for (var i = arguments.length-1; i>=0; i--)
 698                     v89 = {car: arguments[i], cdr: v89};
 699                 return f37(f38, v89, l2);
 700             }));
 701         })();
 702         return l3;
 703     })();
 704     (function(){
 705         (function(){
 706             return f40 = (function(v90){
 707                 ((v90)["fname"] = "REVERSE-AUX");
 708                 return v90;
 709             })((function (v91,v92){
 710                 if (arguments.length < 2) throw 'too few arguments';
 711                 if (arguments.length > 2) throw 'too many arguments';
 712                 return (f1(v91) !== v2 ? v92 : f40((function(){
 713                     var tmp = v91;
 714                     return tmp === v2? v2: tmp.cdr;
 715                 })(), ({car: (function(){
 716                     var tmp = v91;
 717                     return tmp === v2? v2: tmp.car;
 718                 })(), cdr: v92})));
 719             }));
 720         })();
 721         return l4;
 722     })();
 723     (function(){
 724         (function(){
 725             return f41 = (function(v93){
 726                 ((v93)["fname"] = "REVERSE");
 727                 return v93;
 728             })((function (v94){
 729                 if (arguments.length < 1) throw 'too few arguments';
 730                 if (arguments.length > 1) throw 'too many arguments';
 731                 return f40(v94, l5);
 732             }));
 733         })();
 734         return l6;
 735     })();
 736     (function(){
 737         (function(){
 738             return f42 = (function(v95){
 739                 ((v95)["fname"] = "LIST-LENGTH");
 740                 return v95;
 741             })((function (v96){
 742                 if (arguments.length < 1) throw 'too few arguments';
 743                 if (arguments.length > 1) throw 'too many arguments';
 744                 return (function(v97){
 745                     (function(){
 746                         while(f17(f1(v96)) !== v2){
 747                             v97 = (function(){
 748                                 var x = v97;
 749                                 var y = 1;
 750                                 if (typeof x != 'number')
 751                                     throw 'The value ' + x + ' is not a type number.';
 752                                 if (typeof y != 'number')
 753                                     throw 'The value ' + y + ' is not a type number.';
 754                                 return x+y;
 755                             })();
 756                             v96 = (function(){
 757                                 var tmp = v96;
 758                                 return tmp === v2? v2: tmp.cdr;
 759                             })();
 760                     }})();
 761                     return v97;
 762                 })(0);
 763             }));
 764         })();
 765         return l7;
 766     })();
 767     (function(){
 768         (function(){
 769             return f43 = (function(v98){
 770                 ((v98)["fname"] = "LENGTH");
 771                 return v98;
 772             })((function (v99){
 773                 if (arguments.length < 1) throw 'too few arguments';
 774                 if (arguments.length > 1) throw 'too many arguments';
 775                 return (((typeof(v99) == "string")?v3: v2) !== v2 ? (function(){
 776                     var x = v99;
 777                     if (typeof x != 'string')
 778                         throw 'The value ' + x + ' is not a type string.';
 779                     return x.length;
 780                 })() : f42(v99));
 781             }));
 782         })();
 783         return l8;
 784     })();
 785     (function(){
 786         (function(){
 787             return f44 = (function(v100){
 788                 ((v100)["fname"] = "CONCAT-TWO");
 789                 return v100;
 790             })((function (v101,v102){
 791                 if (arguments.length < 2) throw 'too few arguments';
 792                 if (arguments.length > 2) throw 'too many arguments';
 793                 return (function(){
 794                     var string1 = v101;
 795                     var string2 = v102;
 796                     if (typeof string1 != 'string')
 797                         throw 'The value ' + string1 + ' is not a type string.';
 798                     if (typeof string2 != 'string')
 799                         throw 'The value ' + string2 + ' is not a type string.';
 800                     return string1.concat(string2);
 801                 })();
 802             }));
 803         })();
 804         return l9;
 805     })();
 806     (function(){
 807         (function(){
 808             return f45 = (function(v103){
 809                 ((v103)["fname"] = "MAPCAR");
 810                 return v103;
 811             })((function (v104,v105){
 812                 if (arguments.length < 2) throw 'too few arguments';
 813                 if (arguments.length > 2) throw 'too many arguments';
 814                 return (f1(v105) !== v2 ? l10 : ({car: (v104)((function(){
 815                     var tmp = v105;
 816                     return tmp === v2? v2: tmp.car;
 817                 })()), cdr: f45(v104, (function(){
 818                     var tmp = v105;
 819                     return tmp === v2? v2: tmp.cdr;
 820                 })())}));
 821             }));
 822         })();
 823         return l11;
 824     })();
 825     (function(){
 826         (function(){
 827             return f46 = (function(v106){
 828                 ((v106)["fname"] = "IDENTITY");
 829                 return v106;
 830             })((function (v107){
 831                 if (arguments.length < 1) throw 'too few arguments';
 832                 if (arguments.length > 1) throw 'too many arguments';
 833                 return v107;
 834             }));
 835         })();
 836         return l12;
 837     })();
 838     (function(){
 839         (function(){
 840             return f47 = (function(v108){
 841                 ((v108)["fname"] = "COPY-LIST");
 842                 return v108;
 843             })((function (v109){
 844                 if (arguments.length < 1) throw 'too few arguments';
 845                 if (arguments.length > 1) throw 'too many arguments';
 846                 return f45(f46, v109);
 847             }));
 848         })();
 849         return l13;
 850     })();
 851     (function(){
 852         (function(){
 853             return f48 = (function(v110){
 854                 ((v110)["fname"] = "CODE-CHAR");
 855                 return v110;
 856             })((function (v111){
 857                 if (arguments.length < 1) throw 'too few arguments';
 858                 if (arguments.length > 1) throw 'too many arguments';
 859                 return v111;
 860             }));
 861         })();
 862         return l14;
 863     })();
 864     (function(){
 865         (function(){
 866             return f49 = (function(v112){
 867                 ((v112)["fname"] = "CHAR-CODE");
 868                 return v112;
 869             })((function (v113){
 870                 if (arguments.length < 1) throw 'too few arguments';
 871                 if (arguments.length > 1) throw 'too many arguments';
 872                 return v113;
 873             }));
 874         })();
 875         return l15;
 876     })();
 877     (function(){
 878         (function(){
 879             return f50 = (function(v114){
 880                 ((v114)["fname"] = "CHAR=");
 881                 return v114;
 882             })((function (v115,v116){
 883                 if (arguments.length < 2) throw 'too few arguments';
 884                 if (arguments.length > 2) throw 'too many arguments';
 885                 return ((function(){
 886                     var x = v115;
 887                     var y = v116;
 888                     if (typeof x != 'number')
 889                         throw 'The value ' + x + ' is not a type number.';
 890                     if (typeof y != 'number')
 891                         throw 'The value ' + y + ' is not a type number.';
 892                     return x==y;
 893                 })()?v3: v2);
 894             }));
 895         })();
 896         return l16;
 897     })();
 898     (function(){
 899         (function(){
 900             return f51 = (function(v117){
 901                 ((v117)["fname"] = "INTEGERP");
 902                 return v117;
 903             })((function (v118){
 904                 if (arguments.length < 1) throw 'too few arguments';
 905                 if (arguments.length > 1) throw 'too many arguments';
 906                 return (((typeof (v118) == "number")?v3: v2) !== v2 ? ((function(){
 907                     var x = (function(){
 908                         var x = v118;
 909                         if (typeof x != 'number')
 910                             throw 'The value ' + x + ' is not a type number.';
 911                         return Math.floor(x);
 912                     })();
 913                     var y = v118;
 914                     if (typeof x != 'number')
 915                         throw 'The value ' + x + ' is not a type number.';
 916                     if (typeof y != 'number')
 917                         throw 'The value ' + y + ' is not a type number.';
 918                     return x==y;
 919                 })()?v3: v2) : v2);
 920             }));
 921         })();
 922         return l17;
 923     })();
 924     (function(){
 925         (function(){
 926             return f52 = (function(v119){
 927                 ((v119)["fname"] = "PLUSP");
 928                 return v119;
 929             })((function (v120){
 930                 if (arguments.length < 1) throw 'too few arguments';
 931                 if (arguments.length > 1) throw 'too many arguments';
 932                 return ((function(){
 933                     var x = 0;
 934                     var y = v120;
 935                     if (typeof x != 'number')
 936                         throw 'The value ' + x + ' is not a type number.';
 937                     if (typeof y != 'number')
 938                         throw 'The value ' + y + ' is not a type number.';
 939                     return x<y;
 940                 })()?v3: v2);
 941             }));
 942         })();
 943         return l18;
 944     })();
 945     (function(){
 946         (function(){
 947             return f53 = (function(v121){
 948                 ((v121)["fname"] = "MINUSP");
 949                 return v121;
 950             })((function (v122){
 951                 if (arguments.length < 1) throw 'too few arguments';
 952                 if (arguments.length > 1) throw 'too many arguments';
 953                 return ((function(){
 954                     var x = v122;
 955                     var y = 0;
 956                     if (typeof x != 'number')
 957                         throw 'The value ' + x + ' is not a type number.';
 958                     if (typeof y != 'number')
 959                         throw 'The value ' + y + ' is not a type number.';
 960                     return x<y;
 961                 })()?v3: v2);
 962             }));
 963         })();
 964         return l19;
 965     })();
 966     (function(){
 967         (function(){
 968             return f36 = (function(v123){
 969                 ((v123)["fname"] = "LISTP");
 970                 return v123;
 971             })((function (v124){
 972                 if (arguments.length < 1) throw 'too few arguments';
 973                 if (arguments.length > 1) throw 'too many arguments';
 974                 return (function(v125){
 975                     return (v125 !== v2 ? v125 : f1(v124));
 976                 })(((function(){
 977                     var tmp = v124;
 978                     return (typeof tmp == 'object' && 'car' in tmp);
 979                 })()?v3: v2));
 980             }));
 981         })();
 982         return l20;
 983     })();
 984     (function(){
 985         (function(){
 986             return f54 = (function(v126){
 987                 ((v126)["fname"] = "NTH");
 988                 return v126;
 989             })((function (v127,v128){
 990                 if (arguments.length < 2) throw 'too few arguments';
 991                 if (arguments.length > 2) throw 'too many arguments';
 992                 return (f1(v128) !== v2 ? (function(){
 993                     return v128;
 994                 })() : (f14(v127) !== v2 ? (function(){
 995                     return (function(){
 996                         var tmp = v128;
 997                         return tmp === v2? v2: tmp.car;
 998                     })();
 999                 })() : (function(){
1000                     return f54(f13(v127), (function(){
1001                         var tmp = v128;
1002                         return tmp === v2? v2: tmp.cdr;
1003                     })());
1004                 })()));
1005             }));
1006         })();
1007         return l21;
1008     })();
1009     (function(){
1010         (function(){
1011             return f55 = (function(v129){
1012                 ((v129)["fname"] = "LAST");
1013                 return v129;
1014             })((function (v130){
1015                 if (arguments.length < 1) throw 'too few arguments';
1016                 if (arguments.length > 1) throw 'too many arguments';
1017                 return (((function(){
1018                     var tmp = (function(){
1019                         var tmp = v130;
1020                         return tmp === v2? v2: tmp.cdr;
1021                     })();
1022                     return (typeof tmp == 'object' && 'car' in tmp);
1023                 })()?v3: v2) !== v2 ? f55((function(){
1024                     var tmp = v130;
1025                     return tmp === v2? v2: tmp.cdr;
1026                 })()) : v130);
1027             }));
1028         })();
1029         return l22;
1030     })();
1031     (function(){
1032         (function(){
1033             return f56 = (function(v131){
1034                 ((v131)["fname"] = "BUTLAST");
1035                 return v131;
1036             })((function (v132){
1037                 if (arguments.length < 1) throw 'too few arguments';
1038                 if (arguments.length > 1) throw 'too many arguments';
1039                 return (((function(){
1040                     var tmp = (function(){
1041                         var tmp = v132;
1042                         return tmp === v2? v2: tmp.cdr;
1043                     })();
1044                     return (typeof tmp == 'object' && 'car' in tmp);
1045                 })()?v3: v2) !== v2 ? ({car: (function(){
1046                     var tmp = v132;
1047                     return tmp === v2? v2: tmp.car;
1048                 })(), cdr: f56((function(){
1049                     var tmp = v132;
1050                     return tmp === v2? v2: tmp.cdr;
1051                 })())}) : v2);
1052             }));
1053         })();
1054         return l23;
1055     })();
1056     (function(){
1057         (function(){
1058             return f57 = (function(v133){
1059                 ((v133)["fname"] = "MEMBER");
1060                 return v133;
1061             })((function (v134,v135){
1062                 if (arguments.length < 2) throw 'too few arguments';
1063                 if (arguments.length > 2) throw 'too many arguments';
1064                 return (f1(v135) !== v2 ? (function(){
1065                     return v2;
1066                 })() : (f16(v134, (function(){
1067                     var tmp = v135;
1068                     return tmp === v2? v2: tmp.car;
1069                 })()) !== v2 ? (function(){
1070                     return v135;
1071                 })() : (function(){
1072                     return f57(v134, (function(){
1073                         var tmp = v135;
1074                         return tmp === v2? v2: tmp.cdr;
1075                     })());
1076                 })()));
1077             }));
1078         })();
1079         return l24;
1080     })();
1081     (function(){
1082         (function(){
1083             return f58 = (function(v136){
1084                 ((v136)["fname"] = "REMOVE");
1085                 return v136;
1086             })((function (v137,v138){
1087                 if (arguments.length < 2) throw 'too few arguments';
1088                 if (arguments.length > 2) throw 'too many arguments';
1089                 return (f1(v138) !== v2 ? (function(){
1090                     return v2;
1091                 })() : (f16(v137, (function(){
1092                     var tmp = v138;
1093                     return tmp === v2? v2: tmp.car;
1094                 })()) !== v2 ? (function(){
1095                     return f58(v137, (function(){
1096                         var tmp = v138;
1097                         return tmp === v2? v2: tmp.cdr;
1098                     })());
1099                 })() : (function(){
1100                     return ({car: (function(){
1101                         var tmp = v138;
1102                         return tmp === v2? v2: tmp.car;
1103                     })(), cdr: f58(v137, (function(){
1104                         var tmp = v138;
1105                         return tmp === v2? v2: tmp.cdr;
1106                     })())});
1107                 })()));
1108             }));
1109         })();
1110         return l25;
1111     })();
1112     (function(){
1113         (function(){
1114             return f59 = (function(v139){
1115                 ((v139)["fname"] = "REMOVE-IF");
1116                 return v139;
1117             })((function (v140,v141){
1118                 if (arguments.length < 2) throw 'too few arguments';
1119                 if (arguments.length > 2) throw 'too many arguments';
1120                 return (f1(v141) !== v2 ? (function(){
1121                     return v2;
1122                 })() : ((v140)((function(){
1123                     var tmp = v141;
1124                     return tmp === v2? v2: tmp.car;
1125                 })()) !== v2 ? (function(){
1126                     return f59(v140, (function(){
1127                         var tmp = v141;
1128                         return tmp === v2? v2: tmp.cdr;
1129                     })());
1130                 })() : (function(){
1131                     return ({car: (function(){
1132                         var tmp = v141;
1133                         return tmp === v2? v2: tmp.car;
1134                     })(), cdr: f59(v140, (function(){
1135                         var tmp = v141;
1136                         return tmp === v2? v2: tmp.cdr;
1137                     })())});
1138                 })()));
1139             }));
1140         })();
1141         return l26;
1142     })();
1143     (function(){
1144         (function(){
1145             return f60 = (function(v142){
1146                 ((v142)["fname"] = "REMOVE-IF-NOT");
1147                 return v142;
1148             })((function (v143,v144){
1149                 if (arguments.length < 2) throw 'too few arguments';
1150                 if (arguments.length > 2) throw 'too many arguments';
1151                 return (f1(v144) !== v2 ? (function(){
1152                     return v2;
1153                 })() : ((v143)((function(){
1154                     var tmp = v144;
1155                     return tmp === v2? v2: tmp.car;
1156                 })()) !== v2 ? (function(){
1157                     return ({car: (function(){
1158                         var tmp = v144;
1159                         return tmp === v2? v2: tmp.car;
1160                     })(), cdr: f60(v143, (function(){
1161                         var tmp = v144;
1162                         return tmp === v2? v2: tmp.cdr;
1163                     })())});
1164                 })() : (function(){
1165                     return f60(v143, (function(){
1166                         var tmp = v144;
1167                         return tmp === v2? v2: tmp.cdr;
1168                     })());
1169                 })()));
1170             }));
1171         })();
1172         return l27;
1173     })();
1174     (function(){
1175         (function(){
1176             return f61 = (function(v145){
1177                 ((v145)["fname"] = "DIGIT-CHAR-P");
1178                 return v145;
1179             })((function (v146){
1180                 if (arguments.length < 1) throw 'too few arguments';
1181                 if (arguments.length > 1) throw 'too many arguments';
1182                 return ((((function(){
1183                     var x = 48;
1184                     var y = v146;
1185                     if (typeof x != 'number')
1186                         throw 'The value ' + x + ' is not a type number.';
1187                     if (typeof y != 'number')
1188                         throw 'The value ' + y + ' is not a type number.';
1189                     return x<=y;
1190                 })()?v3: v2) !== v2 ? ((function(){
1191                     var x = v146;
1192                     var y = 57;
1193                     if (typeof x != 'number')
1194                         throw 'The value ' + x + ' is not a type number.';
1195                     if (typeof y != 'number')
1196                         throw 'The value ' + y + ' is not a type number.';
1197                     return x<=y;
1198                 })()?v3: v2) : v2) !== v2 ? (function(){
1199                     var x = v146;
1200                     var y = 48;
1201                     if (typeof x != 'number')
1202                         throw 'The value ' + x + ' is not a type number.';
1203                     if (typeof y != 'number')
1204                         throw 'The value ' + y + ' is not a type number.';
1205                     return x-y;
1206                 })() : v2);
1207             }));
1208         })();
1209         return l28;
1210     })();
1211     (function(){
1212         (function(){
1213             return f62 = (function(v147){
1214                 ((v147)["fname"] = "SUBSEQ");
1215                 return v147;
1216             })((function (v148,v149,v150){
1217                 if (arguments.length < 2) throw 'too few arguments';
1218                 if (arguments.length > 3) throw 'too many arguments';
1219                 switch(arguments.length){
1220                 case 2:
1221                 v150=v2;
1222                 default: break;
1223                 }
1224                 return (((typeof(v148) == "string")?v3: v2) !== v2 ? (function(){
1225                     return (v150 !== v2 ? (function(){
1226                         var str = v148;
1227                         var a = v149;
1228                         var b;
1229                         b = v150;
1230                         return str.slice(a,b);
1231                     })() : (function(){
1232                         var str = v148;
1233                         var a = v149;
1234                         var b;
1235                         return str.slice(a,b);
1236                     })());
1237                 })() : (function(){
1238                     return (function (){ throw "Unsupported argument."; })();
1239                 })());
1240             }));
1241         })();
1242         return l29;
1243     })();
1244     (function(){
1245         (function(){
1246             return f63 = (function(v151){
1247                 ((v151)["fname"] = "PARSE-INTEGER");
1248                 return v151;
1249             })((function (v152){
1250                 if (arguments.length < 1) throw 'too few arguments';
1251                 if (arguments.length > 1) throw 'too many arguments';
1252                 return (function(v153,v154,v155){
1253                     (function(){
1254                         while(((function(){
1255                             var x = v154;
1256                             var y = v155;
1257                             if (typeof x != 'number')
1258                                 throw 'The value ' + x + ' is not a type number.';
1259                             if (typeof y != 'number')
1260                                 throw 'The value ' + y + ' is not a type number.';
1261                             return x<y;
1262                         })()?v3: v2) !== v2){
1263                             v153 = (function(){
1264                                 var x = (function(){
1265                                     var x = v153;
1266                                     var y = 10;
1267                                     if (typeof x != 'number')
1268                                         throw 'The value ' + x + ' is not a type number.';
1269                                     if (typeof y != 'number')
1270                                         throw 'The value ' + y + ' is not a type number.';
1271                                     return x*y;
1272                                 })();
1273                                 var y = f61((function(){
1274                                     var string = v152;
1275                                     var index = v154;
1276                                     if (typeof string != 'string')
1277                                         throw 'The value ' + string + ' is not a type string.';
1278                                     if (typeof index != 'number')
1279                                         throw 'The value ' + index + ' is not a type number.';
1280                                     return string.charCodeAt(index);
1281                                 })());
1282                                 if (typeof x != 'number')
1283                                     throw 'The value ' + x + ' is not a type number.';
1284                                 if (typeof y != 'number')
1285                                     throw 'The value ' + y + ' is not a type number.';
1286                                 return x+y;
1287                             })();
1288                             v154 = (function(){
1289                                 var x = v154;
1290                                 var y = 1;
1291                                 if (typeof x != 'number')
1292                                     throw 'The value ' + x + ' is not a type number.';
1293                                 if (typeof y != 'number')
1294                                     throw 'The value ' + y + ' is not a type number.';
1295                                 return x+y;
1296                             })();
1297                     }})();
1298                     return v153;
1299                 })(0,0,f43(v152));
1300             }));
1301         })();
1302         return l30;
1303     })();
1304     (function(){
1305         (function(){
1306             return f64 = (function(v156){
1307                 ((v156)["fname"] = "EVERY");
1308                 return v156;
1309             })((function (v157,v158){
1310                 if (arguments.length < 2) throw 'too few arguments';
1311                 if (arguments.length > 2) throw 'too many arguments';
1312                 return (function(v159,v160,v161){
1313                     (function(){
1314                         while((v159 !== v2 ? ((function(){
1315                             var x = v160;
1316                             var y = v161;
1317                             if (typeof x != 'number')
1318                                 throw 'The value ' + x + ' is not a type number.';
1319                             if (typeof y != 'number')
1320                                 throw 'The value ' + y + ' is not a type number.';
1321                             return x<y;
1322                         })()?v3: v2) : v2) !== v2){
1323                             ((v157)((function(){
1324                                 var string = v158;
1325                                 var index = v160;
1326                                 if (typeof string != 'string')
1327                                     throw 'The value ' + string + ' is not a type string.';
1328                                 if (typeof index != 'number')
1329                                     throw 'The value ' + index + ' is not a type number.';
1330                                 return string.charCodeAt(index);
1331                             })()) !== v2 ? v2 : (function(){
1332                                 return v159 = v2;
1333                             })());
1334                             v160 = (function(){
1335                                 var x = v160;
1336                                 var y = 1;
1337                                 if (typeof x != 'number')
1338                                     throw 'The value ' + x + ' is not a type number.';
1339                                 if (typeof y != 'number')
1340                                     throw 'The value ' + y + ' is not a type number.';
1341                                 return x+y;
1342                             })();
1343                     }})();
1344                     return v159;
1345                 })(v3,0,f43(v158));
1346             }));
1347         })();
1348         return l31;
1349     })();
1350     (function(){
1351         (function(){
1352             return f65 = (function(v162){
1353                 ((v162)["fname"] = "ASSOC");
1354                 return v162;
1355             })((function (v163,v164){
1356                 if (arguments.length < 2) throw 'too few arguments';
1357                 if (arguments.length > 2) throw 'too many arguments';
1358                 return (function(v165){
1359                     (function(){
1360                         while((v164 !== v2 ? f17(v165) : v2) !== v2){
1361                             (f16(v163, f22(v164)) !== v2 ? v165 = v3 : v164 = (function(){
1362                                 var tmp = v164;
1363                                 return tmp === v2? v2: tmp.cdr;
1364                             })());
1365                     }})();
1366                     return (function(){
1367                         var tmp = v164;
1368                         return tmp === v2? v2: tmp.car;
1369                     })();
1370                 })(v2);
1371             }));
1372         })();
1373         return l32;
1374     })();
1375     return (function(){
1376         (function(){
1377             return f66 = (function(v166){
1378                 ((v166)["fname"] = "STRING=");
1379                 return v166;
1380             })((function (v167,v168){
1381                 if (arguments.length < 2) throw 'too few arguments';
1382                 if (arguments.length > 2) throw 'too many arguments';
1383                 return ((v167 == v168)?v3: v2);
1384             }));
1385         })();
1386         return l33;
1387     })();
1388 })();
1389 var l34 = f3("*NEWLINE*");
1390 var v169;
1391 (function(){
1392     (function(){
1393         return v169 = (function(){
1394             var x = f48(10);
1395             if (typeof x != 'number')
1396                 throw 'The value ' + x + ' is not a type number.';
1397             return String.fromCharCode(x);
1398         })();
1399     })();
1400     return l34;
1401 })();
1402 var l35 = f3("CONCAT");
1403 var f67;
1404 (function(){
1405     (function(){
1406         return f67 = (function(v170){
1407             ((v170)["fname"] = "CONCAT");
1408             return v170;
1409         })((function (){
1410             var v171= v2;
1411             for (var i = arguments.length-1; i>=0; i--)
1412                 v171 = {car: arguments[i], cdr: v171};
1413             return f37(f44, v171, "");
1414         }));
1415     })();
1416     return l35;
1417 })();
1418 var l36 = f3("JOIN");
1419 var f68;
1420 (function(){
1421     (function(){
1422         return f68 = (function(v172){
1423             ((v172)["fname"] = "JOIN");
1424             return v172;
1425         })((function (v173,v174){
1426             if (arguments.length < 1) throw 'too few arguments';
1427             if (arguments.length > 2) throw 'too many arguments';
1428             switch(arguments.length){
1429             case 1:
1430             v174="";
1431             default: break;
1432             }
1433             return (f1(v173) !== v2 ? (function(){
1434                 return "";
1435             })() : (f1((function(){
1436                 var tmp = v173;
1437                 return tmp === v2? v2: tmp.cdr;
1438             })()) !== v2 ? (function(){
1439                 return (function(){
1440                     var tmp = v173;
1441                     return tmp === v2? v2: tmp.car;
1442                 })();
1443             })() : (function(){
1444                 return f67((function(){
1445                     var tmp = v173;
1446                     return tmp === v2? v2: tmp.car;
1447                 })(), v174, f68((function(){
1448                     var tmp = v173;
1449                     return tmp === v2? v2: tmp.cdr;
1450                 })(), v174));
1451             })()));
1452         }));
1453     })();
1454     return l36;
1455 })();
1456 var l37 = f3("JOIN-TRAILING");
1457 var f69;
1458 (function(){
1459     (function(){
1460         return f69 = (function(v175){
1461             ((v175)["fname"] = "JOIN-TRAILING");
1462             return v175;
1463         })((function (v176,v177){
1464             if (arguments.length < 1) throw 'too few arguments';
1465             if (arguments.length > 2) throw 'too many arguments';
1466             switch(arguments.length){
1467             case 1:
1468             v177="";
1469             default: break;
1470             }
1471             return (f1(v176) !== v2 ? "" : f67((function(){
1472                 var tmp = v176;
1473                 return tmp === v2? v2: tmp.car;
1474             })(), v177, f69((function(){
1475                 var tmp = v176;
1476                 return tmp === v2? v2: tmp.cdr;
1477             })(), v177)));
1478         }));
1479     })();
1480     return l37;
1481 })();
1482 var l38 = f3("INDENT");
1483 var f70;
1484 (function(){
1485     (function(){
1486         return f70 = (function(v178){
1487             ((v178)["fname"] = "INDENT");
1488             return v178;
1489         })((function (){
1490             var v179= v2;
1491             for (var i = arguments.length-1; i>=0; i--)
1492                 v179 = {car: arguments[i], cdr: v179};
1493             return (function(v180){
1494                 return (function(v181,v182,v183){
1495                     (f52(v183) !== v2 ? (function(){
1496                         return v181 = "    ";
1497                     })() : v2);
1498                     (function(){
1499                         while(((function(){
1500                             var x = v182;
1501                             var y = v183;
1502                             if (typeof x != 'number')
1503                                 throw 'The value ' + x + ' is not a type number.';
1504                             if (typeof y != 'number')
1505                                 throw 'The value ' + y + ' is not a type number.';
1506                             return x<y;
1507                         })()?v3: v2) !== v2){
1508                             v181 = f67(v181, ((f50((function(){
1509                                 var string = v180;
1510                                 var index = v182;
1511                                 if (typeof string != 'string')
1512                                     throw 'The value ' + string + ' is not a type string.';
1513                                 if (typeof index != 'number')
1514                                     throw 'The value ' + index + ' is not a type number.';
1515                                 return string.charCodeAt(index);
1516                             })(), 10) !== v2 ? (((function(){
1517                                 var x = v182;
1518                                 var y = f13(v183);
1519                                 if (typeof x != 'number')
1520                                     throw 'The value ' + x + ' is not a type number.';
1521                                 if (typeof y != 'number')
1522                                     throw 'The value ' + y + ' is not a type number.';
1523                                 return x<y;
1524                             })()?v3: v2) !== v2 ? f17(f50((function(){
1525                                 var string = v180;
1526                                 var index = f12(v182);
1527                                 if (typeof string != 'string')
1528                                     throw 'The value ' + string + ' is not a type string.';
1529                                 if (typeof index != 'number')
1530                                     throw 'The value ' + index + ' is not a type number.';
1531                                 return string.charCodeAt(index);
1532                             })(), 10)) : v2) : v2) !== v2 ? f67((function(){
1533                                 var x = 10;
1534                                 if (typeof x != 'number')
1535                                     throw 'The value ' + x + ' is not a type number.';
1536                                 return String.fromCharCode(x);
1537                             })(), "    ") : f62(v180, v182, f12(v182))));
1538                             v182 = (function(){
1539                                 var x = v182;
1540                                 var y = 1;
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                     }})();
1548                     return v181;
1549                 })("",0,f43(v180));
1550             })(f68(v179));
1551         }));
1552     })();
1553     return l38;
1554 })();
1555 var l39 = f3("INTEGER-TO-STRING");
1556 var f6;
1557 (function(){
1558     (function(){
1559         return f6 = (function(v184){
1560             ((v184)["fname"] = "INTEGER-TO-STRING");
1561             return v184;
1562         })((function (v185){
1563             if (arguments.length < 1) throw 'too few arguments';
1564             if (arguments.length > 1) throw 'too many arguments';
1565             return (f14(v185) !== v2 ? (function(){
1566                 return "0";
1567             })() : (f53(v185) !== v2 ? (function(){
1568                 return f67("-", f6((function(){
1569                     var x = 0;
1570                     var y = v185;
1571                     if (typeof x != 'number')
1572                         throw 'The value ' + x + ' is not a type number.';
1573                     if (typeof y != 'number')
1574                         throw 'The value ' + y + ' is not a type number.';
1575                     return x-y;
1576                 })()));
1577             })() : (function(){
1578                 return (function(v186){
1579                     (function(){
1580                         while(f17(f14(v185)) !== v2){
1581                             v186 = ({car: (function(){
1582                                 var x = v185;
1583                                 var y = 10;
1584                                 if (typeof x != 'number')
1585                                     throw 'The value ' + x + ' is not a type number.';
1586                                 if (typeof y != 'number')
1587                                     throw 'The value ' + y + ' is not a type number.';
1588                                 return x%y;
1589                             })(), cdr: v186});
1590                             v185 = f15(v185, 10);
1591                     }})();
1592                     return f68(f45((function (v187){
1593                         if (arguments.length < 1) throw 'too few arguments';
1594                         if (arguments.length > 1) throw 'too many arguments';
1595                         return (function(){
1596                             var x = (function(){
1597                                 var string = "0123456789";
1598                                 var index = v187;
1599                                 if (typeof string != 'string')
1600                                     throw 'The value ' + string + ' is not a type string.';
1601                                 if (typeof index != 'number')
1602                                     throw 'The value ' + index + ' is not a type number.';
1603                                 return string.charCodeAt(index);
1604                             })();
1605                             if (typeof x != 'number')
1606                                 throw 'The value ' + x + ' is not a type number.';
1607                             return String.fromCharCode(x);
1608                         })();
1609                     }), v186));
1610                 })(v2);
1611             })()));
1612         }));
1613     })();
1614     return l39;
1615 })();
1616 var l42 = f3("PRINT");
1617 var f74;
1618 var l41 = f3("WRITE-LINE");
1619 var f73;
1620 var l40 = f3("PRINT-TO-STRING");
1621 var f71;
1622 (function(){
1623     (function(){
1624         (function(){
1625             return f71 = (function(v188){
1626                 ((v188)["fname"] = "PRINT-TO-STRING");
1627                 return v188;
1628             })((function (v189){
1629                 if (arguments.length < 1) throw 'too few arguments';
1630                 if (arguments.length > 1) throw 'too many arguments';
1631                 return (((function(){
1632                     var tmp = v189;
1633                     return (typeof tmp == 'object' && 'name' in tmp);
1634                 })()?v3: v2) !== v2 ? (function(){
1635                     return (v189).name;
1636                 })() : (f51(v189) !== v2 ? (function(){
1637                     return f6(v189);
1638                 })() : (((typeof(v189) == "string")?v3: v2) !== v2 ? (function(){
1639                     return f67("\"", f72(v189), "\"");
1640                 })() : (((typeof v189 == 'function')?v3: v2) !== v2 ? (function(){
1641                     return (function(v190){
1642                         return (v190 !== v2 ? f67("#<FUNCTION ", v190, ">") : f67("#<FUNCTION>"));
1643                     })((function(){
1644                         var tmp = (v189)["fname"];
1645                         return tmp == undefined? v2: tmp ;
1646                     })());
1647                 })() : (f36(v189) !== v2 ? (function(){
1648                     return f67("(", f69(f45(f71, f56(v189)), " "), (function(v191){
1649                         return (f1((function(){
1650                             var tmp = v191;
1651                             return tmp === v2? v2: tmp.cdr;
1652                         })()) !== v2 ? f71((function(){
1653                             var tmp = v191;
1654                             return tmp === v2? v2: tmp.car;
1655                         })()) : f67(f71((function(){
1656                             var tmp = v191;
1657                             return tmp === v2? v2: tmp.car;
1658                         })()), " . ", f71((function(){
1659                             var tmp = v191;
1660                             return tmp === v2? v2: tmp.cdr;
1661                         })())));
1662                     })(f55(v189)), ")");
1663                 })() : v2)))));
1664             }));
1665         })();
1666         return l40;
1667     })();
1668     (function(){
1669         (function(){
1670             return f73 = (function(v192){
1671                 ((v192)["fname"] = "WRITE-LINE");
1672                 return v192;
1673             })((function (v193){
1674                 if (arguments.length < 1) throw 'too few arguments';
1675                 if (arguments.length > 1) throw 'too many arguments';
1676                 (function(){
1677                     var x = v193;
1678                     if (typeof x != 'string')
1679                         throw 'The value ' + x + ' is not a type string.';
1680                     return lisp.write(x);
1681                 })();
1682                 (function(){
1683                     var x = v169;
1684                     if (typeof x != 'string')
1685                         throw 'The value ' + x + ' is not a type string.';
1686                     return lisp.write(x);
1687                 })();
1688                 return v193;
1689             }));
1690         })();
1691         return l41;
1692     })();
1693     return (function(){
1694         (function(){
1695             return f74 = (function(v194){
1696                 ((v194)["fname"] = "PRINT");
1697                 return v194;
1698             })((function (v195){
1699                 if (arguments.length < 1) throw 'too few arguments';
1700                 if (arguments.length > 1) throw 'too many arguments';
1701                 return f73(f71(v195));
1702             }));
1703         })();
1704         return l42;
1705     })();
1706 })();
1707 var l43 = f3("MAKE-STRING-STREAM");
1708 var f75;
1709 (function(){
1710     (function(){
1711         return f75 = (function(v196){
1712             ((v196)["fname"] = "MAKE-STRING-STREAM");
1713             return v196;
1714         })((function (v197){
1715             if (arguments.length < 1) throw 'too few arguments';
1716             if (arguments.length > 1) throw 'too many arguments';
1717             return ({car: v197, cdr: 0});
1718         }));
1719     })();
1720     return l43;
1721 })();
1722 var l44 = f3("%PEEK-CHAR");
1723 var f76;
1724 (function(){
1725     (function(){
1726         return f76 = (function(v198){
1727             ((v198)["fname"] = "%PEEK-CHAR");
1728             return v198;
1729         })((function (v199){
1730             if (arguments.length < 1) throw 'too few arguments';
1731             if (arguments.length > 1) throw 'too many arguments';
1732             return (((function(){
1733                 var x = (function(){
1734                     var tmp = v199;
1735                     return tmp === v2? v2: tmp.cdr;
1736                 })();
1737                 var y = f43((function(){
1738                     var tmp = v199;
1739                     return tmp === v2? v2: tmp.car;
1740                 })());
1741                 if (typeof x != 'number')
1742                     throw 'The value ' + x + ' is not a type number.';
1743                 if (typeof y != 'number')
1744                     throw 'The value ' + y + ' is not a type number.';
1745                 return x<y;
1746             })()?v3: v2) !== v2 ? (function(){
1747                 var string = (function(){
1748                     var tmp = v199;
1749                     return tmp === v2? v2: tmp.car;
1750                 })();
1751                 var index = (function(){
1752                     var tmp = v199;
1753                     return tmp === v2? v2: tmp.cdr;
1754                 })();
1755                 if (typeof string != 'string')
1756                     throw 'The value ' + string + ' is not a type string.';
1757                 if (typeof index != 'number')
1758                     throw 'The value ' + index + ' is not a type number.';
1759                 return string.charCodeAt(index);
1760             })() : v2);
1761         }));
1762     })();
1763     return l44;
1764 })();
1765 var l45 = f3("%READ-CHAR");
1766 var f77;
1767 (function(){
1768     (function(){
1769         return f77 = (function(v200){
1770             ((v200)["fname"] = "%READ-CHAR");
1771             return v200;
1772         })((function (v201){
1773             if (arguments.length < 1) throw 'too few arguments';
1774             if (arguments.length > 1) throw 'too many arguments';
1775             return (((function(){
1776                 var x = (function(){
1777                     var tmp = v201;
1778                     return tmp === v2? v2: tmp.cdr;
1779                 })();
1780                 var y = f43((function(){
1781                     var tmp = v201;
1782                     return tmp === v2? v2: tmp.car;
1783                 })());
1784                 if (typeof x != 'number')
1785                     throw 'The value ' + x + ' is not a type number.';
1786                 if (typeof y != 'number')
1787                     throw 'The value ' + y + ' is not a type number.';
1788                 return x<y;
1789             })()?v3: v2) !== v2 ? (function(v202){
1790                 (function(){
1791                     var x = v201;
1792                     if (typeof x != 'object')
1793                         throw 'The value ' + x + ' is not a type object.';
1794                     return (x.cdr = f12((function(){
1795                         var tmp = v201;
1796                         return tmp === v2? v2: tmp.cdr;
1797                     })()));
1798                 })();
1799                 return v202;
1800             })((function(){
1801                 var string = (function(){
1802                     var tmp = v201;
1803                     return tmp === v2? v2: tmp.car;
1804                 })();
1805                 var index = (function(){
1806                     var tmp = v201;
1807                     return tmp === v2? v2: tmp.cdr;
1808                 })();
1809                 if (typeof string != 'string')
1810                     throw 'The value ' + string + ' is not a type string.';
1811                 if (typeof index != 'number')
1812                     throw 'The value ' + index + ' is not a type number.';
1813                 return string.charCodeAt(index);
1814             })()) : v2);
1815         }));
1816     })();
1817     return l45;
1818 })();
1819 var l46 = f3("WHITESPACEP");
1820 var f78;
1821 (function(){
1822     (function(){
1823         return f78 = (function(v203){
1824             ((v203)["fname"] = "WHITESPACEP");
1825             return v203;
1826         })((function (v204){
1827             if (arguments.length < 1) throw 'too few arguments';
1828             if (arguments.length > 1) throw 'too many arguments';
1829             return (function(v205){
1830                 return (v205 !== v2 ? v205 : (function(v206){
1831                     return (v206 !== v2 ? v206 : f50(v204, 9));
1832                 })(f50(v204, 10)));
1833             })(f50(v204, 32));
1834         }));
1835     })();
1836     return l46;
1837 })();
1838 var l47 = f3("SKIP-WHITESPACES");
1839 var f79;
1840 (function(){
1841     (function(){
1842         return f79 = (function(v207){
1843             ((v207)["fname"] = "SKIP-WHITESPACES");
1844             return v207;
1845         })((function (v208){
1846             if (arguments.length < 1) throw 'too few arguments';
1847             if (arguments.length > 1) throw 'too many arguments';
1848             return (function(v209){
1849                 v209 = f76(v208);
1850                 return (function(){
1851                     while((v209 !== v2 ? f78(v209) : v2) !== v2){
1852                         f77(v208);
1853                         v209 = f76(v208);
1854                 }})();
1855             })(v2);
1856         }));
1857     })();
1858     return l47;
1859 })();
1860 var l48 = f3("TERMINALP");
1861 var f80;
1862 (function(){
1863     (function(){
1864         return f80 = (function(v210){
1865             ((v210)["fname"] = "TERMINALP");
1866             return v210;
1867         })((function (v211){
1868             if (arguments.length < 1) throw 'too few arguments';
1869             if (arguments.length > 1) throw 'too many arguments';
1870             return (function(v212){
1871                 return (v212 !== v2 ? v212 : (function(v213){
1872                     return (v213 !== v2 ? v213 : (function(v214){
1873                         return (v214 !== v2 ? v214 : f50(40, v211));
1874                     })(f50(41, v211)));
1875                 })(f78(v211)));
1876             })(f1(v211));
1877         }));
1878     })();
1879     return l48;
1880 })();
1881 var l49 = f3("READ-UNTIL");
1882 var f81;
1883 (function(){
1884     (function(){
1885         return f81 = (function(v215){
1886             ((v215)["fname"] = "READ-UNTIL");
1887             return v215;
1888         })((function (v216,v217){
1889             if (arguments.length < 2) throw 'too few arguments';
1890             if (arguments.length > 2) throw 'too many arguments';
1891             return (function(v218,v219){
1892                 v219 = f76(v216);
1893                 (function(){
1894                     while((v219 !== v2 ? f17((v217)(v219)) : v2) !== v2){
1895                         v218 = f67(v218, (function(){
1896                             var x = v219;
1897                             if (typeof x != 'number')
1898                                 throw 'The value ' + x + ' is not a type number.';
1899                             return String.fromCharCode(x);
1900                         })());
1901                         f77(v216);
1902                         v219 = f76(v216);
1903                 }})();
1904                 return v218;
1905             })("",v2);
1906         }));
1907     })();
1908     return l49;
1909 })();
1910 var l50 = f3("SKIP-WHITESPACES-AND-COMMENTS");
1911 var f82;
1912 (function(){
1913     (function(){
1914         return f82 = (function(v220){
1915             ((v220)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
1916             return v220;
1917         })((function (v221){
1918             if (arguments.length < 1) throw 'too few arguments';
1919             if (arguments.length > 1) throw 'too many arguments';
1920             return (function(v222){
1921                 f79(v221);
1922                 v222 = f76(v221);
1923                 return (function(){
1924                     while((v222 !== v2 ? f50(v222, 59) : v2) !== v2){
1925                         f81(v221, (function (v223){
1926                             if (arguments.length < 1) throw 'too few arguments';
1927                             if (arguments.length > 1) throw 'too many arguments';
1928                             return f50(v223, 10);
1929                         }));
1930                         f79(v221);
1931                         v222 = f76(v221);
1932                 }})();
1933             })(v2);
1934         }));
1935     })();
1936     return l50;
1937 })();
1938 var l51 = f3("%READ-LIST");
1939 var f83;
1940 (function(){
1941     (function(){
1942         return f83 = (function(v224){
1943             ((v224)["fname"] = "%READ-LIST");
1944             return v224;
1945         })((function (v225){
1946             if (arguments.length < 1) throw 'too few arguments';
1947             if (arguments.length > 1) throw 'too many arguments';
1948             f82(v225);
1949             return (function(v226){
1950                 return (f1(v226) !== v2 ? (function(){
1951                     return (function (){ throw "Unspected EOF"; })();
1952                 })() : (f50(v226, 41) !== v2 ? (function(){
1953                     f77(v225);
1954                     return v2;
1955                 })() : (f50(v226, 46) !== v2 ? (function(){
1956                     f77(v225);
1957                     return (function(v227){
1958                         f82(v225);
1959                         (f50(f77(v225), 41) !== v2 ? v2 : (function(){
1960                             return (function (){ throw "')' was expected."; })();
1961                         })());
1962                         return v227;
1963                     })(f84(v225));
1964                 })() : (function(){
1965                     return ({car: f84(v225), cdr: f83(v225)});
1966                 })())));
1967             })(f76(v225));
1968         }));
1969     })();
1970     return l51;
1971 })();
1972 var l52 = f3("READ-STRING");
1973 var f85;
1974 (function(){
1975     (function(){
1976         return f85 = (function(v228){
1977             ((v228)["fname"] = "READ-STRING");
1978             return v228;
1979         })((function (v229){
1980             if (arguments.length < 1) throw 'too few arguments';
1981             if (arguments.length > 1) throw 'too many arguments';
1982             return (function(v230,v231){
1983                 v231 = f77(v229);
1984                 (function(){
1985                     while(f17(f16(v231, 34)) !== v2){
1986                         (f1(v231) !== v2 ? (function(){
1987                             return (function (){ throw "Unexpected EOF"; })();
1988                         })() : v2);
1989                         (f16(v231, 92) !== v2 ? (function(){
1990                             return v231 = f77(v229);
1991                         })() : v2);
1992                         v230 = f67(v230, (function(){
1993                             var x = v231;
1994                             if (typeof x != 'number')
1995                                 throw 'The value ' + x + ' is not a type number.';
1996                             return String.fromCharCode(x);
1997                         })());
1998                         v231 = f77(v229);
1999                 }})();
2000                 return v230;
2001             })("",v2);
2002         }));
2003     })();
2004     return l52;
2005 })();
2006 var l57 = f3("READ-SHARP");
2007 var l56 = 43;
2008 var l55 = 92;
2009 var l54 = f3("FUNCTION");
2010 var l53 = 39;
2011 var f86;
2012 (function(){
2013     (function(){
2014         return f86 = (function(v232){
2015             ((v232)["fname"] = "READ-SHARP");
2016             return v232;
2017         })((function (v233){
2018             if (arguments.length < 1) throw 'too few arguments';
2019             if (arguments.length > 1) throw 'too many arguments';
2020             f77(v233);
2021             return (function(v234){
2022                 return (f16(v234, l53) !== v2 ? (function(){
2023                     return f33(l54, f84(v233));
2024                 })() : (f16(v234, l55) !== v2 ? (function(){
2025                     return (function(v235){
2026                         return (f66(v235, "space") !== v2 ? (function(){
2027                             return f49(32);
2028                         })() : (f66(v235, "tab") !== v2 ? (function(){
2029                             return f49(9);
2030                         })() : (f66(v235, "newline") !== v2 ? (function(){
2031                             return f49(10);
2032                         })() : (function(){
2033                             return f49((function(){
2034                                 var string = v235;
2035                                 var index = 0;
2036                                 if (typeof string != 'string')
2037                                     throw 'The value ' + string + ' is not a type string.';
2038                                 if (typeof index != 'number')
2039                                     throw 'The value ' + index + ' is not a type number.';
2040                                 return string.charCodeAt(index);
2041                             })());
2042                         })())));
2043                     })(f67((function(){
2044                         var x = f77(v233);
2045                         if (typeof x != 'number')
2046                             throw 'The value ' + x + ' is not a type number.';
2047                         return String.fromCharCode(x);
2048                     })(), f81(v233, f80)));
2049                 })() : (f16(v234, l56) !== v2 ? (function(){
2050                     return (function(v236){
2051                         return (f66(v236, "common-lisp") !== v2 ? (function(){
2052                             f84(v233);
2053                             return f84(v233);
2054                         })() : (f66(v236, "ecmalisp") !== v2 ? (function(){
2055                             return f84(v233);
2056                         })() : (function(){
2057                             return (function (){ throw "Unknown reader form."; })();
2058                         })()));
2059                     })(f81(v233, f80));
2060                 })() : (function(){
2061                     return (function (){ throw "ECASE expression failed."; })();
2062                 })())));
2063             })(f77(v233));
2064         }));
2065     })();
2066     return l57;
2067 })();
2068 var l58 = f3("*EOF*");
2069 var v237;
2070 (function(){
2071     (function(){
2072         return v237 = (function(){
2073             var name = "EOF";
2074             if (typeof name != 'string')
2075                 throw 'The value ' + name + ' is not a type string.';
2076             return ({name: name});
2077         })();
2078     })();
2079     return l58;
2080 })();
2081 var l63 = f3("LS-READ");
2082 var l62 = f3("UNQUOTE");
2083 var l61 = f3("UNQUOTE-SPLICING");
2084 var l60 = f3("BACKQUOTE");
2085 var l59 = f3("QUOTE");
2086 var f84;
2087 (function(){
2088     (function(){
2089         return f84 = (function(v238){
2090             ((v238)["fname"] = "LS-READ");
2091             return v238;
2092         })((function (v239){
2093             if (arguments.length < 1) throw 'too few arguments';
2094             if (arguments.length > 1) throw 'too many arguments';
2095             f82(v239);
2096             return (function(v240){
2097                 return (f1(v240) !== v2 ? (function(){
2098                     return v237;
2099                 })() : (f50(v240, 40) !== v2 ? (function(){
2100                     f77(v239);
2101                     return f83(v239);
2102                 })() : (f50(v240, 39) !== v2 ? (function(){
2103                     f77(v239);
2104                     return f33(l59, f84(v239));
2105                 })() : (f50(v240, 96) !== v2 ? (function(){
2106                     f77(v239);
2107                     return f33(l60, f84(v239));
2108                 })() : (f50(v240, 34) !== v2 ? (function(){
2109                     f77(v239);
2110                     return f85(v239);
2111                 })() : (f50(v240, 44) !== v2 ? (function(){
2112                     f77(v239);
2113                     return (f16(f76(v239), 64) !== v2 ? (function(){
2114                         f77(v239);
2115                         return f33(l61, f84(v239));
2116                     })() : f33(l62, f84(v239)));
2117                 })() : (f50(v240, 35) !== v2 ? (function(){
2118                     return f86(v239);
2119                 })() : (function(){
2120                     return (function(v241){
2121                         return (f64(f61, v241) !== v2 ? f63(v241) : f3((function(){
2122                             var x = v241;
2123                             if (typeof x != 'string')
2124                                 throw 'The value ' + x + ' is not a type string.';
2125                             return x.toUpperCase();
2126                         })()));
2127                     })(f81(v239, f80));
2128                 })())))))));
2129             })(f76(v239));
2130         }));
2131     })();
2132     return l63;
2133 })();
2134 var l64 = f3("LS-READ-FROM-STRING");
2135 var f87;
2136 (function(){
2137     (function(){
2138         return f87 = (function(v242){
2139             ((v242)["fname"] = "LS-READ-FROM-STRING");
2140             return v242;
2141         })((function (v243){
2142             if (arguments.length < 1) throw 'too few arguments';
2143             if (arguments.length > 1) throw 'too many arguments';
2144             return f84(f75(v243));
2145         }));
2146     })();
2147     return l64;
2148 })();
2149 var l66 = f3("*COMPILATION-UNIT-CHECKS*");
2150 var l65 = f3("NIL");
2151 var v244;
2152 (function(){
2153     (function(){
2154         return v244 = l65;
2155     })();
2156     return l66;
2157 })();
2158 var l67 = f3("MAKE-BINDING");
2159 var f88;
2160 (function(){
2161     (function(){
2162         return f88 = (function(v245){
2163             ((v245)["fname"] = "MAKE-BINDING");
2164             return v245;
2165         })((function (v246,v247,v248,v249){
2166             if (arguments.length < 4) throw 'too few arguments';
2167             if (arguments.length > 4) throw 'too many arguments';
2168             return f33(v246, v247, v248, v249);
2169         }));
2170     })();
2171     return l67;
2172 })();
2173 var l68 = f3("BINDING-NAME");
2174 var f89;
2175 (function(){
2176     (function(){
2177         return f89 = (function(v250){
2178             ((v250)["fname"] = "BINDING-NAME");
2179             return v250;
2180         })((function (v251){
2181             if (arguments.length < 1) throw 'too few arguments';
2182             if (arguments.length > 1) throw 'too many arguments';
2183             return f29(v251);
2184         }));
2185     })();
2186     return l68;
2187 })();
2188 var l69 = f3("BINDING-TYPE");
2189 var f90;
2190 (function(){
2191     (function(){
2192         return f90 = (function(v252){
2193             ((v252)["fname"] = "BINDING-TYPE");
2194             return v252;
2195         })((function (v253){
2196             if (arguments.length < 1) throw 'too few arguments';
2197             if (arguments.length > 1) throw 'too many arguments';
2198             return f30(v253);
2199         }));
2200     })();
2201     return l69;
2202 })();
2203 var l70 = f3("BINDING-TRANSLATION");
2204 var f91;
2205 (function(){
2206     (function(){
2207         return f91 = (function(v254){
2208             ((v254)["fname"] = "BINDING-TRANSLATION");
2209             return v254;
2210         })((function (v255){
2211             if (arguments.length < 1) throw 'too few arguments';
2212             if (arguments.length > 1) throw 'too many arguments';
2213             return f31(v255);
2214         }));
2215     })();
2216     return l70;
2217 })();
2218 var l71 = f3("BINDING-DECLARED");
2219 var f92;
2220 (function(){
2221     (function(){
2222         return f92 = (function(v256){
2223             ((v256)["fname"] = "BINDING-DECLARED");
2224             return v256;
2225         })((function (v257){
2226             if (arguments.length < 1) throw 'too few arguments';
2227             if (arguments.length > 1) throw 'too many arguments';
2228             return (v257 !== v2 ? f32(v257) : v2);
2229         }));
2230     })();
2231     return l71;
2232 })();
2233 var l72 = f3("MARK-BINDING-AS-DECLARED");
2234 var f93;
2235 (function(){
2236     (function(){
2237         return f93 = (function(v258){
2238             ((v258)["fname"] = "MARK-BINDING-AS-DECLARED");
2239             return v258;
2240         })((function (v259){
2241             if (arguments.length < 1) throw 'too few arguments';
2242             if (arguments.length > 1) throw 'too many arguments';
2243             return (function(){
2244                 var x = f27(v259);
2245                 if (typeof x != 'object')
2246                     throw 'The value ' + x + ' is not a type object.';
2247                 return (x.car = v3);
2248             })();
2249         }));
2250     })();
2251     return l72;
2252 })();
2253 var l73 = f3("MAKE-LEXENV");
2254 var f94;
2255 (function(){
2256     (function(){
2257         return f94 = (function(v260){
2258             ((v260)["fname"] = "MAKE-LEXENV");
2259             return v260;
2260         })((function (){
2261             if (arguments.length > 0) throw 'too many arguments';
2262             return f33(v2, v2);
2263         }));
2264     })();
2265     return l73;
2266 })();
2267 var l74 = f3("COPY-LEXENV");
2268 var f95;
2269 (function(){
2270     (function(){
2271         return f95 = (function(v261){
2272             ((v261)["fname"] = "COPY-LEXENV");
2273             return v261;
2274         })((function (v262){
2275             if (arguments.length < 1) throw 'too few arguments';
2276             if (arguments.length > 1) throw 'too many arguments';
2277             return f47(v262);
2278         }));
2279     })();
2280     return l74;
2281 })();
2282 var l77 = f3("PUSH-TO-LEXENV");
2283 var l76 = f3("FUNCTION");
2284 var l75 = f3("VARIABLE");
2285 var f96;
2286 (function(){
2287     (function(){
2288         return f96 = (function(v263){
2289             ((v263)["fname"] = "PUSH-TO-LEXENV");
2290             return v263;
2291         })((function (v264,v265,v266){
2292             if (arguments.length < 3) throw 'too few arguments';
2293             if (arguments.length > 3) throw 'too many arguments';
2294             return (function(v267){
2295                 return (f16(v267, l75) !== v2 ? (function(){
2296                     return (function(){
2297                         var x = v265;
2298                         if (typeof x != 'object')
2299                             throw 'The value ' + x + ' is not a type object.';
2300                         return (x.car = ({car: v264, cdr: (function(){
2301                             var tmp = v265;
2302                             return tmp === v2? v2: tmp.car;
2303                         })()}));
2304                     })();
2305                 })() : (f16(v267, l76) !== v2 ? (function(){
2306                     return (function(){
2307                         var x = (function(){
2308                             var tmp = v265;
2309                             return tmp === v2? v2: tmp.cdr;
2310                         })();
2311                         if (typeof x != 'object')
2312                             throw 'The value ' + x + ' is not a type object.';
2313                         return (x.car = ({car: v264, cdr: f23(v265)}));
2314                     })();
2315                 })() : (function(){
2316                     return (function (){ throw "ECASE expression failed."; })();
2317                 })()));
2318             })(v266);
2319         }));
2320     })();
2321     return l77;
2322 })();
2323 var l78 = f3("EXTEND-LEXENV");
2324 var f97;
2325 (function(){
2326     (function(){
2327         return f97 = (function(v268){
2328             ((v268)["fname"] = "EXTEND-LEXENV");
2329             return v268;
2330         })((function (v269,v270,v271){
2331             if (arguments.length < 3) throw 'too few arguments';
2332             if (arguments.length > 3) throw 'too many arguments';
2333             return (function(v272){
2334                 f96(v269, v272, v271);
2335                 return v272;
2336             })(f95(v270));
2337         }));
2338     })();
2339     return l78;
2340 })();
2341 var l81 = f3("LOOKUP-IN-LEXENV");
2342 var l80 = f3("FUNCTION");
2343 var l79 = f3("VARIABLE");
2344 var f98;
2345 (function(){
2346     (function(){
2347         return f98 = (function(v273){
2348             ((v273)["fname"] = "LOOKUP-IN-LEXENV");
2349             return v273;
2350         })((function (v274,v275,v276){
2351             if (arguments.length < 3) throw 'too few arguments';
2352             if (arguments.length > 3) throw 'too many arguments';
2353             return f65(v274, (function(v277){
2354                 return (f16(v277, l79) !== v2 ? (function(){
2355                     return (function(){
2356                         var tmp = v275;
2357                         return tmp === v2? v2: tmp.car;
2358                     })();
2359                 })() : (f16(v277, l80) !== v2 ? (function(){
2360                     return f23(v275);
2361                 })() : (function(){
2362                     return (function (){ throw "ECASE expression failed."; })();
2363                 })()));
2364             })(v276));
2365         }));
2366     })();
2367     return l81;
2368 })();
2369 var l82 = f3("*ENVIRONMENT*");
2370 var v278;
2371 (function(){
2372     (function(){
2373         return v278 = f94();
2374     })();
2375     return l82;
2376 })();
2377 var l83 = f3("CLEAR-UNDECLARED-GLOBAL-BINDINGS");
2378 var f99;
2379 (function(){
2380     (function(){
2381         return f99 = (function(v279){
2382             ((v279)["fname"] = "CLEAR-UNDECLARED-GLOBAL-BINDINGS");
2383             return v279;
2384         })((function (){
2385             if (arguments.length > 0) throw 'too many arguments';
2386             return (function(v280,v281){
2387                 return f33(v280, v281);
2388             })(f29(v278),f30(v278));
2389         }));
2390     })();
2391     return l83;
2392 })();
2393 var l84 = f3("*VARIABLE-COUNTER*");
2394 var v282;
2395 (function(){
2396     (function(){
2397         return v282 = 0;
2398     })();
2399     return l84;
2400 })();
2401 var l85 = f3("GVARNAME");
2402 var f100;
2403 (function(){
2404     (function(){
2405         return f100 = (function(v283){
2406             ((v283)["fname"] = "GVARNAME");
2407             return v283;
2408         })((function (v284){
2409             if (arguments.length < 1) throw 'too few arguments';
2410             if (arguments.length > 1) throw 'too many arguments';
2411             return f67("v", f6(v282 = (function(){
2412                 var x = v282;
2413                 var y = 1;
2414                 if (typeof x != 'number')
2415                     throw 'The value ' + x + ' is not a type number.';
2416                 if (typeof y != 'number')
2417                     throw 'The value ' + y + ' is not a type number.';
2418                 return x+y;
2419             })()));
2420         }));
2421     })();
2422     return l85;
2423 })();
2424 var l91 = f3("LOOKUP-VARIABLE");
2425 var l90 = f3("VARIABLE");
2426 var l89 = f3("VARIABLE");
2427 var l88 = f3("VARIABLE");
2428 var l87 = f3("VARIABLE");
2429 var l86 = f3("VARIABLE");
2430 var f101;
2431 (function(){
2432     (function(){
2433         return f101 = (function(v285){
2434             ((v285)["fname"] = "LOOKUP-VARIABLE");
2435             return v285;
2436         })((function (v286,v287){
2437             if (arguments.length < 2) throw 'too few arguments';
2438             if (arguments.length > 2) throw 'too many arguments';
2439             return (function(v288){
2440                 return (v288 !== v2 ? v288 : (function(v289){
2441                     return (v289 !== v2 ? v289 : (function(v290,v291){
2442                         f96(v291, v278, l86);
2443                         v244 = ({car: (function (){
2444                             if (arguments.length > 0) throw 'too many arguments';
2445                             return (f98(v286, v278, l87) !== v2 ? v2 : (function(){
2446                                 return (function (){ throw f67("Undefined variable `", v290, "'"); })();
2447                             })());
2448                         }), cdr: v244});
2449                         return v291;
2450                     })((v286).name,f88(v286, l88, f100(v286), v2)));
2451                 })(f98(v286, v278, l89)));
2452             })(f98(v286, v287, l90));
2453         }));
2454     })();
2455     return l91;
2456 })();
2457 var l92 = f3("LOOKUP-VARIABLE-TRANSLATION");
2458 var f102;
2459 (function(){
2460     (function(){
2461         return f102 = (function(v292){
2462             ((v292)["fname"] = "LOOKUP-VARIABLE-TRANSLATION");
2463             return v292;
2464         })((function (v293,v294){
2465             if (arguments.length < 2) throw 'too few arguments';
2466             if (arguments.length > 2) throw 'too many arguments';
2467             return f91(f101(v293, v294));
2468         }));
2469     })();
2470     return l92;
2471 })();
2472 var l95 = f3("EXTEND-LOCAL-ENV");
2473 var l94 = f3("VARIABLE");
2474 var l93 = f3("VARIABLE");
2475 var f103;
2476 (function(){
2477     (function(){
2478         return f103 = (function(v295){
2479             ((v295)["fname"] = "EXTEND-LOCAL-ENV");
2480             return v295;
2481         })((function (v296,v297){
2482             if (arguments.length < 2) throw 'too few arguments';
2483             if (arguments.length > 2) throw 'too many arguments';
2484             return (function(v298){
2485                 return (function(v299,v300){
2486                     (function(){
2487                         while(v299 !== v2){
2488                             v300 = (function(){
2489                                 var tmp = v299;
2490                                 return tmp === v2? v2: tmp.car;
2491                             })();
2492                             (function(v301){
2493                                 return f96(v301, v298, l93);
2494                             })(f88(v300, l94, f100(v300), v3));
2495                             v299 = (function(){
2496                                 var tmp = v299;
2497                                 return tmp === v2? v2: tmp.cdr;
2498                             })();
2499                     }})();
2500                     return v298;
2501                 })(v296,v2);
2502             })(f95(v297));
2503         }));
2504     })();
2505     return l95;
2506 })();
2507 var l96 = f3("*FUNCTION-COUNTER*");
2508 var v302;
2509 (function(){
2510     (function(){
2511         return v302 = 0;
2512     })();
2513     return l96;
2514 })();
2515 var l102 = f3("LOOKUP-FUNCTION");
2516 var l101 = f3("FUNCTION");
2517 var l100 = f3("FUNCTION");
2518 var l99 = f3("FUNCTION");
2519 var l98 = f3("FUNCTION");
2520 var l97 = f3("FUNCTION");
2521 var f104;
2522 (function(){
2523     (function(){
2524         return f104 = (function(v303){
2525             ((v303)["fname"] = "LOOKUP-FUNCTION");
2526             return v303;
2527         })((function (v304,v305){
2528             if (arguments.length < 2) throw 'too few arguments';
2529             if (arguments.length > 2) throw 'too many arguments';
2530             return (function(v306){
2531                 return (v306 !== v2 ? v306 : (function(v307){
2532                     return (v307 !== v2 ? v307 : (function(v308,v309){
2533                         f96(v309, v278, l97);
2534                         v244 = ({car: (function (){
2535                             if (arguments.length > 0) throw 'too many arguments';
2536                             return (f92(f98(v304, v278, l98)) !== v2 ? v2 : (function(){
2537                                 return (function (){ throw f67("Undefined function `", v308, "'"); })();
2538                             })());
2539                         }), cdr: v244});
2540                         return v309;
2541                     })((v304).name,f88(v304, l99, f67("f", f6(v302 = (function(){
2542                         var x = v302;
2543                         var y = 1;
2544                         if (typeof x != 'number')
2545                             throw 'The value ' + x + ' is not a type number.';
2546                         if (typeof y != 'number')
2547                             throw 'The value ' + y + ' is not a type number.';
2548                         return x+y;
2549                     })())), v2)));
2550                 })(f98(v304, v278, l100)));
2551             })(f98(v304, v305, l101));
2552         }));
2553     })();
2554     return l102;
2555 })();
2556 var l103 = f3("LOOKUP-FUNCTION-TRANSLATION");
2557 var f105;
2558 (function(){
2559     (function(){
2560         return f105 = (function(v310){
2561             ((v310)["fname"] = "LOOKUP-FUNCTION-TRANSLATION");
2562             return v310;
2563         })((function (v311,v312){
2564             if (arguments.length < 2) throw 'too few arguments';
2565             if (arguments.length > 2) throw 'too many arguments';
2566             return f91(f104(v311, v312));
2567         }));
2568     })();
2569     return l103;
2570 })();
2571 var l104 = f3("*TOPLEVEL-COMPILATIONS*");
2572 var v313;
2573 (function(){
2574     (function(){
2575         return v313 = v2;
2576     })();
2577     return l104;
2578 })();
2579 var l105 = f3("%COMPILE-DEFVAR");
2580 var f106;
2581 (function(){
2582     (function(){
2583         return f106 = (function(v314){
2584             ((v314)["fname"] = "%COMPILE-DEFVAR");
2585             return v314;
2586         })((function (v315){
2587             if (arguments.length < 1) throw 'too few arguments';
2588             if (arguments.length > 1) throw 'too many arguments';
2589             return (function(v316){
2590                 f93(v316);
2591                 return v313 = ({car: f67("var ", f91(v316)), cdr: v313});
2592             })(f101(v315, v278));
2593         }));
2594     })();
2595     return l105;
2596 })();
2597 var l106 = f3("%COMPILE-DEFUN");
2598 var f107;
2599 (function(){
2600     (function(){
2601         return f107 = (function(v317){
2602             ((v317)["fname"] = "%COMPILE-DEFUN");
2603             return v317;
2604         })((function (v318){
2605             if (arguments.length < 1) throw 'too few arguments';
2606             if (arguments.length > 1) throw 'too many arguments';
2607             return (function(v319){
2608                 f93(v319);
2609                 return v313 = ({car: f67("var ", f91(v319)), cdr: v313});
2610             })(f104(v318, v278));
2611         }));
2612     })();
2613     return l106;
2614 })();
2615 var l109 = f3("%COMPILE-DEFMACRO");
2616 var l108 = f3("FUNCTION");
2617 var l107 = f3("MACRO");
2618 var f108;
2619 (function(){
2620     (function(){
2621         return f108 = (function(v320){
2622             ((v320)["fname"] = "%COMPILE-DEFMACRO");
2623             return v320;
2624         })((function (v321,v322){
2625             if (arguments.length < 2) throw 'too few arguments';
2626             if (arguments.length > 2) throw 'too many arguments';
2627             return f96(f88(v321, l107, v322, v3), v278, l108);
2628         }));
2629     })();
2630     return l109;
2631 })();
2632 var l110 = f3("*COMPILATIONS*");
2633 var v323;
2634 (function(){
2635     (function(){
2636         return v323 = v2;
2637     })();
2638     return l110;
2639 })();
2640 var l111 = f3("LS-COMPILE-BLOCK");
2641 var f109;
2642 (function(){
2643     (function(){
2644         return f109 = (function(v324){
2645             ((v324)["fname"] = "LS-COMPILE-BLOCK");
2646             return v324;
2647         })((function (v325,v326){
2648             if (arguments.length < 2) throw 'too few arguments';
2649             if (arguments.length > 2) throw 'too many arguments';
2650             return f69(f59((function (v327){
2651                 if (arguments.length < 1) throw 'too few arguments';
2652                 if (arguments.length > 1) throw 'too many arguments';
2653                 return (function(v328){
2654                     return (v328 !== v2 ? v328 : (((typeof(v327) == "string")?v3: v2) !== v2 ? f14(f43(v327)) : v2));
2655                 })(f1(v327));
2656             }), f45((function (v329){
2657                 if (arguments.length < 1) throw 'too few arguments';
2658                 if (arguments.length > 1) throw 'too many arguments';
2659                 return f110(v329, v326);
2660             }), v325)), f67(";", v169));
2661         }));
2662     })();
2663     return l111;
2664 })();
2665 var l112 = f3("IF");
2666 v323 = ({car: f33(l112, (function (v330,v331,v332,v333){
2667     if (arguments.length < 4) throw 'too few arguments';
2668     if (arguments.length > 4) throw 'too many arguments';
2669     return f67("(", f110(v331, v330), " !== ", f110(v2), " ? ", f110(v332, v330), " : ", f110(v333, v330), ")");
2670 })), cdr: v323});
2671 var l114 = f3("*LAMBDA-LIST-KEYWORDS*");
2672 var l113 = {car: f3("&OPTIONAL"), cdr: {car: f3("&REST"), cdr: f3("NIL")}};
2673 var v334;
2674 (function(){
2675     (function(){
2676         return v334 = l113;
2677     })();
2678     return l114;
2679 })();
2680 var l115 = f3("LIST-UNTIL-KEYWORD");
2681 var f111;
2682 (function(){
2683     (function(){
2684         return f111 = (function(v335){
2685             ((v335)["fname"] = "LIST-UNTIL-KEYWORD");
2686             return v335;
2687         })((function (v336){
2688             if (arguments.length < 1) throw 'too few arguments';
2689             if (arguments.length > 1) throw 'too many arguments';
2690             return ((function(v337){
2691                 return (v337 !== v2 ? v337 : f57((function(){
2692                     var tmp = v336;
2693                     return tmp === v2? v2: tmp.car;
2694                 })(), v334));
2695             })(f1(v336)) !== v2 ? v2 : ({car: (function(){
2696                 var tmp = v336;
2697                 return tmp === v2? v2: tmp.car;
2698             })(), cdr: f111((function(){
2699                 var tmp = v336;
2700                 return tmp === v2? v2: tmp.cdr;
2701             })())}));
2702         }));
2703     })();
2704     return l115;
2705 })();
2706 var l116 = f3("LAMBDA-LIST-REQUIRED-ARGUMENTS");
2707 var f112;
2708 (function(){
2709     (function(){
2710         return f112 = (function(v338){
2711             ((v338)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
2712             return v338;
2713         })((function (v339){
2714             if (arguments.length < 1) throw 'too few arguments';
2715             if (arguments.length > 1) throw 'too many arguments';
2716             return f111(v339);
2717         }));
2718     })();
2719     return l116;
2720 })();
2721 var l118 = f3("LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
2722 var l117 = f3("&OPTIONAL");
2723 var f113;
2724 (function(){
2725     (function(){
2726         return f113 = (function(v340){
2727             ((v340)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
2728             return v340;
2729         })((function (v341){
2730             if (arguments.length < 1) throw 'too few arguments';
2731             if (arguments.length > 1) throw 'too many arguments';
2732             return f45(f35, f111((function(){
2733                 var tmp = f57(l117, v341);
2734                 return tmp === v2? v2: tmp.cdr;
2735             })()));
2736         }));
2737     })();
2738     return l118;
2739 })();
2740 var l119 = f3("LAMBDA-LIST-OPTIONAL-ARGUMENTS");
2741 var f114;
2742 (function(){
2743     (function(){
2744         return f114 = (function(v342){
2745             ((v342)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
2746             return v342;
2747         })((function (v343){
2748             if (arguments.length < 1) throw 'too few arguments';
2749             if (arguments.length > 1) throw 'too many arguments';
2750             return f45(f20, f113(v343));
2751         }));
2752     })();
2753     return l119;
2754 })();
2755 var l121 = f3("LAMBDA-LIST-REST-ARGUMENT");
2756 var l120 = f3("&REST");
2757 var f115;
2758 (function(){
2759     (function(){
2760         return f115 = (function(v344){
2761             ((v344)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
2762             return v344;
2763         })((function (v345){
2764             if (arguments.length < 1) throw 'too few arguments';
2765             if (arguments.length > 1) throw 'too many arguments';
2766             return (function(v346){
2767                 ((function(){
2768                     var tmp = v346;
2769                     return tmp === v2? v2: tmp.cdr;
2770                 })() !== v2 ? (function(){
2771                     return (function (){ throw "Bad lambda-list"; })();
2772                 })() : v2);
2773                 return (function(){
2774                     var tmp = v346;
2775                     return tmp === v2? v2: tmp.car;
2776                 })();
2777             })(f111((function(){
2778                 var tmp = f57(l120, v345);
2779                 return tmp === v2? v2: tmp.cdr;
2780             })()));
2781         }));
2782     })();
2783     return l121;
2784 })();
2785 var l122 = f3("LAMBDA");
2786 v323 = ({car: f33(l122, (function (v348,v349){
2787     if (arguments.length < 2) throw 'too few arguments';
2788     var v347= v2;
2789     for (var i = arguments.length-1; i>=2; i--)
2790         v347 = {car: arguments[i], cdr: v347};
2791     return (function(v350,v351,v352){
2792         return (function(v353,v354,v355){
2793             return f67("(function (", f68(f45((function (v356){
2794                 if (arguments.length < 1) throw 'too few arguments';
2795                 if (arguments.length > 1) throw 'too many arguments';
2796                 return f102(v356, v355);
2797             }), f39(v350, v351)), ","), "){", v169, f70((v350 !== v2 ? f67("if (arguments.length < ", f6(v353), ") throw 'too few arguments';", v169) : ""), (f17(v352) !== v2 ? f67("if (arguments.length > ", f6((function(){
2798                 var x = v353;
2799                 var y = v354;
2800                 if (typeof x != 'number')
2801                     throw 'The value ' + x + ' is not a type number.';
2802                 if (typeof y != 'number')
2803                     throw 'The value ' + y + ' is not a type number.';
2804                 return x+y;
2805             })()), ") throw 'too many arguments';", v169) : ""), (v351 !== v2 ? f67("switch(arguments.length){", v169, (function(v357,v358,v359){
2806                 return (function(){
2807                     (function(){
2808                         while(((function(){
2809                             var x = v359;
2810                             var y = v354;
2811                             if (typeof x != 'number')
2812                                 throw 'The value ' + x + ' is not a type number.';
2813                             if (typeof y != 'number')
2814                                 throw 'The value ' + y + ' is not a type number.';
2815                             return x<y;
2816                         })()?v3: v2) !== v2){
2817                             (function(v360){
2818                                 v358 = ({car: f67("case ", f6((function(){
2819                                     var x = v359;
2820                                     var y = v353;
2821                                     if (typeof x != 'number')
2822                                         throw 'The value ' + x + ' is not a type number.';
2823                                     if (typeof y != 'number')
2824                                         throw 'The value ' + y + ' is not a type number.';
2825                                     return x+y;
2826                                 })()), ":", v169, f102((function(){
2827                                     var tmp = v360;
2828                                     return tmp === v2? v2: tmp.car;
2829                                 })(), v355), "=", f110(f23(v360), v355), ";", v169), cdr: v358});
2830                                 return v359 = (function(){
2831                                     var x = v359;
2832                                     var y = 1;
2833                                     if (typeof x != 'number')
2834                                         throw 'The value ' + x + ' is not a type number.';
2835                                     if (typeof y != 'number')
2836                                         throw 'The value ' + y + ' is not a type number.';
2837                                     return x+y;
2838                                 })();
2839                             })(f54(v359, v357));
2840                     }})();
2841                     v358 = ({car: f67("default: break;", v169), cdr: v358});
2842                     return f68(f41(v358));
2843                 })();
2844             })(f113(v349),v2,0), "}", v169) : ""), (v352 !== v2 ? (function(v361){
2845                 return f67("var ", v361, "= ", f110(v2), ";", v169, "for (var i = arguments.length-1; i>=", f6((function(){
2846                     var x = v353;
2847                     var y = v354;
2848                     if (typeof x != 'number')
2849                         throw 'The value ' + x + ' is not a type number.';
2850                     if (typeof y != 'number')
2851                         throw 'The value ' + y + ' is not a type number.';
2852                     return x+y;
2853                 })()), "; i--)", v169, f70(v361, " = ", "{car: arguments[i], cdr: "), v361, "};", v169);
2854             })(f102(v352, v355)) : ""), f67(f109(f56(v347), v355), "return ", f110((function(){
2855                 var tmp = f55(v347);
2856                 return tmp === v2? v2: tmp.car;
2857             })(), v355), ";")), v169, "})");
2858         })(f43(v350),f43(v351),f103(f39(f35(v352), v350, v351), v348));
2859     })(f112(v349),f114(v349),f115(v349));
2860 })), cdr: v323});
2861 var l123 = f3("FSETQ");
2862 v323 = ({car: f33(l123, (function (v362,v363,v364){
2863     if (arguments.length < 3) throw 'too few arguments';
2864     if (arguments.length > 3) throw 'too many arguments';
2865     return f67(f105(v363, v362), " = ", f110(v364, v362));
2866 })), cdr: v323});
2867 var l124 = f3("SETQ");
2868 v323 = ({car: f33(l124, (function (v365,v366,v367){
2869     if (arguments.length < 3) throw 'too few arguments';
2870     if (arguments.length > 3) throw 'too many arguments';
2871     return f67(f102(v366, v365), " = ", f110(v367, v365));
2872 })), cdr: v323});
2873 var l125 = f3("ESCAPE-STRING");
2874 var f72;
2875 (function(){
2876     (function(){
2877         return f72 = (function(v368){
2878             ((v368)["fname"] = "ESCAPE-STRING");
2879             return v368;
2880         })((function (v369){
2881             if (arguments.length < 1) throw 'too few arguments';
2882             if (arguments.length > 1) throw 'too many arguments';
2883             return (function(v370,v371,v372){
2884                 (function(){
2885                     while(((function(){
2886                         var x = v371;
2887                         var y = v372;
2888                         if (typeof x != 'number')
2889                             throw 'The value ' + x + ' is not a type number.';
2890                         if (typeof y != 'number')
2891                             throw 'The value ' + y + ' is not a type number.';
2892                         return x<y;
2893                     })()?v3: v2) !== v2){
2894                         (function(v373){
2895                             ((function(v374){
2896                                 return (v374 !== v2 ? v374 : f50(v373, 92));
2897                             })(f50(v373, 34)) !== v2 ? (function(){
2898                                 return v370 = f67(v370, "\\");
2899                             })() : v2);
2900                             (f50(v373, 10) !== v2 ? (function(){
2901                                 v370 = f67(v370, "\\");
2902                                 return v373 = 110;
2903                             })() : v2);
2904                             return v370 = f67(v370, (function(){
2905                                 var x = v373;
2906                                 if (typeof x != 'number')
2907                                     throw 'The value ' + x + ' is not a type number.';
2908                                 return String.fromCharCode(x);
2909                             })());
2910                         })((function(){
2911                             var string = v369;
2912                             var index = v371;
2913                             if (typeof string != 'string')
2914                                 throw 'The value ' + string + ' is not a type string.';
2915                             if (typeof index != 'number')
2916                                 throw 'The value ' + index + ' is not a type number.';
2917                             return string.charCodeAt(index);
2918                         })());
2919                         v371 = (function(){
2920                             var x = v371;
2921                             var y = 1;
2922                             if (typeof x != 'number')
2923                                 throw 'The value ' + x + ' is not a type number.';
2924                             if (typeof y != 'number')
2925                                 throw 'The value ' + y + ' is not a type number.';
2926                             return x+y;
2927                         })();
2928                 }})();
2929                 return v370;
2930             })("",0,f43(v369));
2931         }));
2932     })();
2933     return l125;
2934 })();
2935 var l127 = f3("LITERAL->JS");
2936 var l126 = f3("INTERN");
2937 var f116;
2938 (function(){
2939     (function(){
2940         return f116 = (function(v375){
2941             ((v375)["fname"] = "LITERAL->JS");
2942             return v375;
2943         })((function (v376){
2944             if (arguments.length < 1) throw 'too few arguments';
2945             if (arguments.length > 1) throw 'too many arguments';
2946             return (f51(v376) !== v2 ? (function(){
2947                 return f6(v376);
2948             })() : (((typeof(v376) == "string")?v3: v2) !== v2 ? (function(){
2949                 return f67("\"", f72(v376), "\"");
2950             })() : (((function(){
2951                 var tmp = v376;
2952                 return (typeof tmp == 'object' && 'name' in tmp);
2953             })()?v3: v2) !== v2 ? (function(){
2954                 return f110(f39(f33(l126), f33(f72((v376).name))), v278);
2955             })() : (((function(){
2956                 var tmp = v376;
2957                 return (typeof tmp == 'object' && 'car' in tmp);
2958             })()?v3: v2) !== v2 ? (function(){
2959                 return f67("{car: ", f116((function(){
2960                     var tmp = v376;
2961                     return tmp === v2? v2: tmp.car;
2962                 })()), ", cdr: ", f116((function(){
2963                     var tmp = v376;
2964                     return tmp === v2? v2: tmp.cdr;
2965                 })()), "}");
2966             })() : v2))));
2967         }));
2968     })();
2969     return l127;
2970 })();
2971 var l128 = f3("*LITERAL-COUNTER*");
2972 var v377;
2973 (function(){
2974     (function(){
2975         return v377 = 0;
2976     })();
2977     return l128;
2978 })();
2979 var l129 = f3("LITERAL");
2980 var f117;
2981 (function(){
2982     (function(){
2983         return f117 = (function(v378){
2984             ((v378)["fname"] = "LITERAL");
2985             return v378;
2986         })((function (v379){
2987             if (arguments.length < 1) throw 'too few arguments';
2988             if (arguments.length > 1) throw 'too many arguments';
2989             return (function(v380){
2990                 v313 = ({car: f67("var ", v380, " = ", f116(v379)), cdr: v313});
2991                 return v380;
2992             })(f67("l", f6(v377 = (function(){
2993                 var x = v377;
2994                 var y = 1;
2995                 if (typeof x != 'number')
2996                     throw 'The value ' + x + ' is not a type number.';
2997                 if (typeof y != 'number')
2998                     throw 'The value ' + y + ' is not a type number.';
2999                 return x+y;
3000             })())));
3001         }));
3002     })();
3003     return l129;
3004 })();
3005 var l130 = f3("QUOTE");
3006 v323 = ({car: f33(l130, (function (v381,v382){
3007     if (arguments.length < 2) throw 'too few arguments';
3008     if (arguments.length > 2) throw 'too many arguments';
3009     return f117(v382);
3010 })), cdr: v323});
3011 var l131 = f3("WHILE");
3012 v323 = ({car: f33(l131, (function (v384,v385){
3013     if (arguments.length < 2) throw 'too few arguments';
3014     var v383= v2;
3015     for (var i = arguments.length-1; i>=2; i--)
3016         v383 = {car: arguments[i], cdr: v383};
3017     return f67("(function(){", v169, f70("while(", f110(v385, v384), " !== ", f110(v2), "){", v169, f70(f109(v383, v384))), "}})()");
3018 })), cdr: v323});
3019 var l133 = f3("LAMBDA");
3020 var l132 = f3("FUNCTION");
3021 v323 = ({car: f33(l132, (function (v386,v387){
3022     if (arguments.length < 2) throw 'too few arguments';
3023     if (arguments.length > 2) throw 'too many arguments';
3024     return ((f36(v387) !== v2 ? (((function(){
3025         var tmp = v387;
3026         return tmp === v2? v2: tmp.car;
3027     })() === l133)?v3: v2) : v2) !== v2 ? (function(){
3028         return f110(v387, v386);
3029     })() : (((function(){
3030         var tmp = v387;
3031         return (typeof tmp == 'object' && 'name' in tmp);
3032     })()?v3: v2) !== v2 ? (function(){
3033         return f105(v387, v386);
3034     })() : v2));
3035 })), cdr: v323});
3036 var l135 = f3("PROGN");
3037 var l134 = f3("EVAL-WHEN-COMPILE");
3038 v323 = ({car: f33(l134, (function (v389){
3039     if (arguments.length < 1) throw 'too few arguments';
3040     var v388= v2;
3041     for (var i = arguments.length-1; i>=1; i--)
3042         v388 = {car: arguments[i], cdr: v388};
3043     f118(({car: l135, cdr: v388}));
3044     return "";
3045 })), cdr: v323});
3046 var l136 = f3("PROGN");
3047 v323 = ({car: f33(l136, (function (v391){
3048     if (arguments.length < 1) throw 'too few arguments';
3049     var v390= v2;
3050     for (var i = arguments.length-1; i>=1; i--)
3051         v390 = {car: arguments[i], cdr: v390};
3052     return f67("(function(){", v169, f70(f109(f56(v390), v391), "return ", f110((function(){
3053         var tmp = f55(v390);
3054         return tmp === v2? v2: tmp.car;
3055     })(), v391), ";", v169), "})()");
3056 })), cdr: v323});
3057 var l137 = f3("LET");
3058 v323 = ({car: f33(l137, (function (v393,v394){
3059     if (arguments.length < 2) throw 'too few arguments';
3060     var v392= v2;
3061     for (var i = arguments.length-1; i>=2; i--)
3062         v392 = {car: arguments[i], cdr: v392};
3063     return (function(v395){
3064         return (function(v396,v397){
3065             return (function(v398){
3066                 return f67("(function(", f68(f45((function (v399){
3067                     if (arguments.length < 1) throw 'too few arguments';
3068                     if (arguments.length > 1) throw 'too many arguments';
3069                     return f102(v399, v398);
3070                 }), v396), ","), "){", v169, f70(f109(f56(v392), v398), "return ", f110((function(){
3071                     var tmp = f55(v392);
3072                     return tmp === v2? v2: tmp.car;
3073                 })(), v398), ";", v169), "})(", f68(f45((function (v400){
3074                     if (arguments.length < 1) throw 'too few arguments';
3075                     if (arguments.length > 1) throw 'too many arguments';
3076                     return f110(v400, v393);
3077                 }), v397), ","), ")");
3078             })(f103(v396, v393));
3079         })(f45(f29, v395),f45(f30, v395));
3080     })(f45(f35, v394));
3081 })), cdr: v323});
3082 var l146 = f3("BACKQUOTE-EXPAND-1");
3083 var l145 = f3("LIST");
3084 var l144 = f3("UNQUOTE-SPLICING");
3085 var l143 = f3("LIST");
3086 var l142 = f3("UNQUOTE");
3087 var l141 = f3("APPEND");
3088 var l140 = f3("BACKQUOTE");
3089 var l139 = f3("UNQUOTE");
3090 var l138 = f3("QUOTE");
3091 var f119;
3092 (function(){
3093     (function(){
3094         return f119 = (function(v401){
3095             ((v401)["fname"] = "BACKQUOTE-EXPAND-1");
3096             return v401;
3097         })((function (v402){
3098             if (arguments.length < 1) throw 'too few arguments';
3099             if (arguments.length > 1) throw 'too many arguments';
3100             return (((function(){
3101                 var tmp = v402;
3102                 return (typeof tmp == 'object' && 'name' in tmp);
3103             })()?v3: v2) !== v2 ? (function(){
3104                 return f33(l138, v402);
3105             })() : (f34(v402) !== v2 ? (function(){
3106                 return v402;
3107             })() : ((((function(){
3108                 var tmp = v402;
3109                 return tmp === v2? v2: tmp.car;
3110             })() === l139)?v3: v2) !== v2 ? (function(){
3111                 return (function(){
3112                     var tmp = v402;
3113                     return tmp === v2? v2: tmp.car;
3114                 })();
3115             })() : ((((function(){
3116                 var tmp = v402;
3117                 return tmp === v2? v2: tmp.car;
3118             })() === l140)?v3: v2) !== v2 ? (function(){
3119                 return f119(f119(f23(v402)));
3120             })() : (function(){
3121                 return ({car: l141, cdr: f45((function (v403){
3122                     if (arguments.length < 1) throw 'too few arguments';
3123                     if (arguments.length > 1) throw 'too many arguments';
3124                     return ((f36(v403) !== v2 ? (((function(){
3125                         var tmp = v403;
3126                         return tmp === v2? v2: tmp.car;
3127                     })() === l142)?v3: v2) : v2) !== v2 ? (function(){
3128                         return f33(l143, f23(v403));
3129                     })() : ((f36(v403) !== v2 ? (((function(){
3130                         var tmp = v403;
3131                         return tmp === v2? v2: tmp.car;
3132                     })() === l144)?v3: v2) : v2) !== v2 ? (function(){
3133                         return f23(v403);
3134                     })() : (function(){
3135                         return f33(l145, f119(v403));
3136                     })()));
3137                 }), v402)});
3138             })()))));
3139         }));
3140     })();
3141     return l146;
3142 })();
3143 var l148 = f3("BACKQUOTE-EXPAND");
3144 var l147 = f3("BACKQUOTE");
3145 var f120;
3146 (function(){
3147     (function(){
3148         return f120 = (function(v404){
3149             ((v404)["fname"] = "BACKQUOTE-EXPAND");
3150             return v404;
3151         })((function (v405){
3152             if (arguments.length < 1) throw 'too few arguments';
3153             if (arguments.length > 1) throw 'too many arguments';
3154             return ((f36(v405) !== v2 ? (((function(){
3155                 var tmp = v405;
3156                 return tmp === v2? v2: tmp.car;
3157             })() === l147)?v3: v2) : v2) !== v2 ? f119(f23(v405)) : v405);
3158         }));
3159     })();
3160     return l148;
3161 })();
3162 var l149 = f3("BACKQUOTE");
3163 v323 = ({car: f33(l149, (function (v406,v407){
3164     if (arguments.length < 2) throw 'too few arguments';
3165     if (arguments.length > 2) throw 'too many arguments';
3166     return f110(f119(v407), v406);
3167 })), cdr: v323});
3168 var l150 = f3("COMPILE-BOOL");
3169 var f121;
3170 (function(){
3171     (function(){
3172         return f121 = (function(v408){
3173             ((v408)["fname"] = "COMPILE-BOOL");
3174             return v408;
3175         })((function (v409){
3176             if (arguments.length < 1) throw 'too few arguments';
3177             if (arguments.length > 1) throw 'too many arguments';
3178             return f67("(", v409, "?", f110(v3), ": ", f110(v2), ")");
3179         }));
3180     })();
3181     return l150;
3182 })();
3183 var l151 = f3("NUM-OP-NUM");
3184 var f122;
3185 (function(){
3186     (function(){
3187         return f122 = (function(v410){
3188             ((v410)["fname"] = "NUM-OP-NUM");
3189             return v410;
3190         })((function (v411,v412,v413){
3191             if (arguments.length < 3) throw 'too few arguments';
3192             if (arguments.length > 3) throw 'too many arguments';
3193             return f67("(function(){", v169, f70(f67("var ", "x", " = ", v411, ";", v169), f67("var ", "y", " = ", v413, ";", v169), f67("if (typeof ", "x", " != '", "number", "')", v169, f70("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", v169)), f67("if (typeof ", "y", " != '", "number", "')", v169, f70("throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", v169)), f67("return ", (function(){
3194                 return f67("x", v412, "y");
3195             })(), ";", v169)), "})()");
3196         }));
3197     })();
3198     return l151;
3199 })();
3200 var l152 = f3("+");
3201 v323 = ({car: f33(l152, (function (v414,v415,v416){
3202     if (arguments.length < 3) throw 'too few arguments';
3203     if (arguments.length > 3) throw 'too many arguments';
3204     return (function(v417,v418){
3205         return f122(v417, "+", v418);
3206     })(f110(v415, v414),f110(v416, v414));
3207 })), cdr: v323});
3208 var l153 = f3("-");
3209 v323 = ({car: f33(l153, (function (v419,v420,v421){
3210     if (arguments.length < 3) throw 'too few arguments';
3211     if (arguments.length > 3) throw 'too many arguments';
3212     return (function(v422,v423){
3213         return f122(v422, "-", v423);
3214     })(f110(v420, v419),f110(v421, v419));
3215 })), cdr: v323});
3216 var l154 = f3("*");
3217 v323 = ({car: f33(l154, (function (v424,v425,v426){
3218     if (arguments.length < 3) throw 'too few arguments';
3219     if (arguments.length > 3) throw 'too many arguments';
3220     return (function(v427,v428){
3221         return f122(v427, "*", v428);
3222     })(f110(v425, v424),f110(v426, v424));
3223 })), cdr: v323});
3224 var l155 = f3("/");
3225 v323 = ({car: f33(l155, (function (v429,v430,v431){
3226     if (arguments.length < 3) throw 'too few arguments';
3227     if (arguments.length > 3) throw 'too many arguments';
3228     return (function(v432,v433){
3229         return f122(v432, "/", v433);
3230     })(f110(v430, v429),f110(v431, v429));
3231 })), cdr: v323});
3232 var l156 = f3("MOD");
3233 v323 = ({car: f33(l156, (function (v434,v435,v436){
3234     if (arguments.length < 3) throw 'too few arguments';
3235     if (arguments.length > 3) throw 'too many arguments';
3236     return (function(v437,v438){
3237         return f122(v437, "%", v438);
3238     })(f110(v435, v434),f110(v436, v434));
3239 })), cdr: v323});
3240 var l157 = f3("<");
3241 v323 = ({car: f33(l157, (function (v439,v440,v441){
3242     if (arguments.length < 3) throw 'too few arguments';
3243     if (arguments.length > 3) throw 'too many arguments';
3244     return (function(v442,v443){
3245         return f121(f122(v442, "<", v443));
3246     })(f110(v440, v439),f110(v441, v439));
3247 })), cdr: v323});
3248 var l158 = f3(">");
3249 v323 = ({car: f33(l158, (function (v444,v445,v446){
3250     if (arguments.length < 3) throw 'too few arguments';
3251     if (arguments.length > 3) throw 'too many arguments';
3252     return (function(v447,v448){
3253         return f121(f122(v447, ">", v448));
3254     })(f110(v445, v444),f110(v446, v444));
3255 })), cdr: v323});
3256 var l159 = f3("=");
3257 v323 = ({car: f33(l159, (function (v449,v450,v451){
3258     if (arguments.length < 3) throw 'too few arguments';
3259     if (arguments.length > 3) throw 'too many arguments';
3260     return (function(v452,v453){
3261         return f121(f122(v452, "==", v453));
3262     })(f110(v450, v449),f110(v451, v449));
3263 })), cdr: v323});
3264 var l160 = f3("<=");
3265 v323 = ({car: f33(l160, (function (v454,v455,v456){
3266     if (arguments.length < 3) throw 'too few arguments';
3267     if (arguments.length > 3) throw 'too many arguments';
3268     return (function(v457,v458){
3269         return f121(f122(v457, "<=", v458));
3270     })(f110(v455, v454),f110(v456, v454));
3271 })), cdr: v323});
3272 var l161 = f3(">=");
3273 v323 = ({car: f33(l161, (function (v459,v460,v461){
3274     if (arguments.length < 3) throw 'too few arguments';
3275     if (arguments.length > 3) throw 'too many arguments';
3276     return (function(v462,v463){
3277         return f121(f122(v462, ">=", v463));
3278     })(f110(v460, v459),f110(v461, v459));
3279 })), cdr: v323});
3280 var l162 = f3("NUMBERP");
3281 v323 = ({car: f33(l162, (function (v464,v465){
3282     if (arguments.length < 2) throw 'too few arguments';
3283     if (arguments.length > 2) throw 'too many arguments';
3284     return (function(v466){
3285         return f121(f67("(typeof (", v466, ") == \"number\")"));
3286     })(f110(v465, v464));
3287 })), cdr: v323});
3288 var l163 = f3("FLOOR");
3289 v323 = ({car: f33(l163, (function (v467,v468){
3290     if (arguments.length < 2) throw 'too few arguments';
3291     if (arguments.length > 2) throw 'too many arguments';
3292     return (function(v469){
3293         return f67("(function(){", v169, f70(f67("var ", "x", " = ", v469, ";", v169), f67("if (typeof ", "x", " != '", "number", "')", v169, f70("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", v169)), f67("return ", (function(){
3294             return "Math.floor(x)";
3295         })(), ";", v169)), "})()");
3296     })(f110(v468, v467));
3297 })), cdr: v323});
3298 var l164 = f3("CONS");
3299 v323 = ({car: f33(l164, (function (v470,v471,v472){
3300     if (arguments.length < 3) throw 'too few arguments';
3301     if (arguments.length > 3) throw 'too many arguments';
3302     return (function(v473,v474){
3303         return f67("({car: ", v473, ", cdr: ", v474, "})");
3304     })(f110(v471, v470),f110(v472, v470));
3305 })), cdr: v323});
3306 var l165 = f3("CONSP");
3307 v323 = ({car: f33(l165, (function (v475,v476){
3308     if (arguments.length < 2) throw 'too few arguments';
3309     if (arguments.length > 2) throw 'too many arguments';
3310     return (function(v477){
3311         return f121(f67("(function(){", v169, f70("var tmp = ", v477, ";", v169, "return (typeof tmp == 'object' && 'car' in tmp);", v169), "})()"));
3312     })(f110(v476, v475));
3313 })), cdr: v323});
3314 var l166 = f3("CAR");
3315 v323 = ({car: f33(l166, (function (v478,v479){
3316     if (arguments.length < 2) throw 'too few arguments';
3317     if (arguments.length > 2) throw 'too many arguments';
3318     return (function(v480){
3319         return f67("(function(){", v169, f70("var tmp = ", v480, ";", v169, "return tmp === ", f110(v2), "? ", f110(v2), ": tmp.car;", v169), "})()");
3320     })(f110(v479, v478));
3321 })), cdr: v323});
3322 var l167 = f3("CDR");
3323 v323 = ({car: f33(l167, (function (v481,v482){
3324     if (arguments.length < 2) throw 'too few arguments';
3325     if (arguments.length > 2) throw 'too many arguments';
3326     return (function(v483){
3327         return f67("(function(){", v169, f70("var tmp = ", v483, ";", v169, "return tmp === ", f110(v2), "? ", f110(v2), ": tmp.cdr;", v169), "})()");
3328     })(f110(v482, v481));
3329 })), cdr: v323});
3330 var l168 = f3("SETCAR");
3331 v323 = ({car: f33(l168, (function (v484,v485,v486){
3332     if (arguments.length < 3) throw 'too few arguments';
3333     if (arguments.length > 3) throw 'too many arguments';
3334     return (function(v487,v488){
3335         return f67("(function(){", v169, f70(f67("var ", "x", " = ", v487, ";", v169), f67("if (typeof ", "x", " != '", "object", "')", v169, f70("throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", v169)), f67("return ", (function(){
3336             return f67("(x.car = ", v488, ")");
3337         })(), ";", v169)), "})()");
3338     })(f110(v485, v484),f110(v486, v484));
3339 })), cdr: v323});
3340 var l169 = f3("SETCDR");
3341 v323 = ({car: f33(l169, (function (v489,v490,v491){
3342     if (arguments.length < 3) throw 'too few arguments';
3343     if (arguments.length > 3) throw 'too many arguments';
3344     return (function(v492,v493){
3345         return f67("(function(){", v169, f70(f67("var ", "x", " = ", v492, ";", v169), f67("if (typeof ", "x", " != '", "object", "')", v169, f70("throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", v169)), f67("return ", (function(){
3346             return f67("(x.cdr = ", v493, ")");
3347         })(), ";", v169)), "})()");
3348     })(f110(v490, v489),f110(v491, v489));
3349 })), cdr: v323});
3350 var l170 = f3("SYMBOLP");
3351 v323 = ({car: f33(l170, (function (v494,v495){
3352     if (arguments.length < 2) throw 'too few arguments';
3353     if (arguments.length > 2) throw 'too many arguments';
3354     return (function(v496){
3355         return f121(f67("(function(){", v169, f70("var tmp = ", v496, ";", v169, "return (typeof tmp == 'object' && 'name' in tmp);", v169), "})()"));
3356     })(f110(v495, v494));
3357 })), cdr: v323});
3358 var l171 = f3("MAKE-SYMBOL");
3359 v323 = ({car: f33(l171, (function (v497,v498){
3360     if (arguments.length < 2) throw 'too few arguments';
3361     if (arguments.length > 2) throw 'too many arguments';
3362     return (function(v499){
3363         return f67("(function(){", v169, f70(f67("var ", "name", " = ", v499, ";", v169), f67("if (typeof ", "name", " != '", "string", "')", v169, f70("throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", v169)), f67("return ", (function(){
3364             return "({name: name})";
3365         })(), ";", v169)), "})()");
3366     })(f110(v498, v497));
3367 })), cdr: v323});
3368 var l172 = f3("SYMBOL-NAME");
3369 v323 = ({car: f33(l172, (function (v500,v501){
3370     if (arguments.length < 2) throw 'too few arguments';
3371     if (arguments.length > 2) throw 'too many arguments';
3372     return (function(v502){
3373         return f67("(", v502, ").name");
3374     })(f110(v501, v500));
3375 })), cdr: v323});
3376 var l173 = f3("EQ");
3377 v323 = ({car: f33(l173, (function (v503,v504,v505){
3378     if (arguments.length < 3) throw 'too few arguments';
3379     if (arguments.length > 3) throw 'too many arguments';
3380     return (function(v506,v507){
3381         return f121(f67("(", v506, " === ", v507, ")"));
3382     })(f110(v504, v503),f110(v505, v503));
3383 })), cdr: v323});
3384 var l174 = f3("EQUAL");
3385 v323 = ({car: f33(l174, (function (v508,v509,v510){
3386     if (arguments.length < 3) throw 'too few arguments';
3387     if (arguments.length > 3) throw 'too many arguments';
3388     return (function(v511,v512){
3389         return f121(f67("(", v511, " == ", v512, ")"));
3390     })(f110(v509, v508),f110(v510, v508));
3391 })), cdr: v323});
3392 var l175 = f3("STRING");
3393 v323 = ({car: f33(l175, (function (v513,v514){
3394     if (arguments.length < 2) throw 'too few arguments';
3395     if (arguments.length > 2) throw 'too many arguments';
3396     return (function(v515){
3397         return f67("(function(){", v169, f70(f67("var ", "x", " = ", v515, ";", v169), f67("if (typeof ", "x", " != '", "number", "')", v169, f70("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", v169)), f67("return ", (function(){
3398             return "String.fromCharCode(x)";
3399         })(), ";", v169)), "})()");
3400     })(f110(v514, v513));
3401 })), cdr: v323});
3402 var l176 = f3("STRINGP");
3403 v323 = ({car: f33(l176, (function (v516,v517){
3404     if (arguments.length < 2) throw 'too few arguments';
3405     if (arguments.length > 2) throw 'too many arguments';
3406     return (function(v518){
3407         return f121(f67("(typeof(", v518, ") == \"string\")"));
3408     })(f110(v517, v516));
3409 })), cdr: v323});
3410 var l177 = f3("STRING-UPCASE");
3411 v323 = ({car: f33(l177, (function (v519,v520){
3412     if (arguments.length < 2) throw 'too few arguments';
3413     if (arguments.length > 2) throw 'too many arguments';
3414     return (function(v521){
3415         return f67("(function(){", v169, f70(f67("var ", "x", " = ", v521, ";", v169), f67("if (typeof ", "x", " != '", "string", "')", v169, f70("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", v169)), f67("return ", (function(){
3416             return "x.toUpperCase()";
3417         })(), ";", v169)), "})()");
3418     })(f110(v520, v519));
3419 })), cdr: v323});
3420 var l178 = f3("STRING-LENGTH");
3421 v323 = ({car: f33(l178, (function (v522,v523){
3422     if (arguments.length < 2) throw 'too few arguments';
3423     if (arguments.length > 2) throw 'too many arguments';
3424     return (function(v524){
3425         return f67("(function(){", v169, f70(f67("var ", "x", " = ", v524, ";", v169), f67("if (typeof ", "x", " != '", "string", "')", v169, f70("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", v169)), f67("return ", (function(){
3426             return "x.length";
3427         })(), ";", v169)), "})()");
3428     })(f110(v523, v522));
3429 })), cdr: v323});
3430 var l179 = f3("SLICE");
3431 v323 = ({car: f33(l179, (function (v525,v526,v527,v528){
3432     if (arguments.length < 3) throw 'too few arguments';
3433     if (arguments.length > 4) throw 'too many arguments';
3434     switch(arguments.length){
3435     case 3:
3436     v528=v2;
3437     default: break;
3438     }
3439     return f67("(function(){", v169, f70("var str = ", f110(v526, v525), ";", v169, "var a = ", f110(v527, v525), ";", v169, "var b;", v169, (v528 !== v2 ? f67("b = ", f110(v528, v525), ";", v169) : ""), "return str.slice(a,b);", v169), "})()");
3440 })), cdr: v323});
3441 var l180 = f3("CHAR");
3442 v323 = ({car: f33(l180, (function (v529,v530,v531){
3443     if (arguments.length < 3) throw 'too few arguments';
3444     if (arguments.length > 3) throw 'too many arguments';
3445     return (function(v532,v533){
3446         return f67("(function(){", v169, f70(f67("var ", "string", " = ", v532, ";", v169), f67("var ", "index", " = ", v533, ";", v169), f67("if (typeof ", "string", " != '", "string", "')", v169, f70("throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", v169)), f67("if (typeof ", "index", " != '", "number", "')", v169, f70("throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", v169)), f67("return ", (function(){
3447             return "string.charCodeAt(index)";
3448         })(), ";", v169)), "})()");
3449     })(f110(v530, v529),f110(v531, v529));
3450 })), cdr: v323});
3451 var l181 = f3("CONCAT-TWO");
3452 v323 = ({car: f33(l181, (function (v534,v535,v536){
3453     if (arguments.length < 3) throw 'too few arguments';
3454     if (arguments.length > 3) throw 'too many arguments';
3455     return (function(v537,v538){
3456         return f67("(function(){", v169, f70(f67("var ", "string1", " = ", v537, ";", v169), f67("var ", "string2", " = ", v538, ";", v169), f67("if (typeof ", "string1", " != '", "string", "')", v169, f70("throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", v169)), f67("if (typeof ", "string2", " != '", "string", "')", v169, f70("throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", v169)), f67("return ", (function(){
3457             return "string1.concat(string2)";
3458         })(), ";", v169)), "})()");
3459     })(f110(v535, v534),f110(v536, v534));
3460 })), cdr: v323});
3461 var l182 = f3("FUNCALL");
3462 v323 = ({car: f33(l182, (function (v540,v541){
3463     if (arguments.length < 2) throw 'too few arguments';
3464     var v539= v2;
3465     for (var i = arguments.length-1; i>=2; i--)
3466         v539 = {car: arguments[i], cdr: v539};
3467     return f67("(", f110(v541, v540), ")(", f68(f45((function (v542){
3468         if (arguments.length < 1) throw 'too few arguments';
3469         if (arguments.length > 1) throw 'too many arguments';
3470         return f110(v542, v540);
3471     }), v539), ", "), ")");
3472 })), cdr: v323});
3473 var l183 = f3("APPLY");
3474 v323 = ({car: f33(l183, (function (v544,v545){
3475     if (arguments.length < 2) throw 'too few arguments';
3476     var v543= v2;
3477     for (var i = arguments.length-1; i>=2; i--)
3478         v543 = {car: arguments[i], cdr: v543};
3479     return (f1(v543) !== v2 ? f67("(", f110(v545, v544), ")()") : (function(v546,v547){
3480         return f67("(function(){", v169, f70("var f = ", f110(v545, v544), ";", v169, "var args = [", f68(f45((function (v548){
3481             if (arguments.length < 1) throw 'too few arguments';
3482             if (arguments.length > 1) throw 'too many arguments';
3483             return f110(v548, v544);
3484         }), v546), ", "), "];", v169, "var tail = (", f110(v547, v544), ");", v169, f70("while (tail != ", f110(v2), "){", v169, "    args.push(tail.car);", v169, "    tail = tail.cdr;", v169, "}", v169, "return f.apply(this, args);", v169), "})()"));
3485     })(f56(v543),(function(){
3486         var tmp = f55(v543);
3487         return tmp === v2? v2: tmp.car;
3488     })()));
3489 })), cdr: v323});
3490 var l184 = f3("JS-EVAL");
3491 v323 = ({car: f33(l184, (function (v549,v550){
3492     if (arguments.length < 2) throw 'too few arguments';
3493     if (arguments.length > 2) throw 'too many arguments';
3494     return (function(v551){
3495         return f67("(function(){", v169, f70(f67("var ", "string", " = ", v551, ";", v169), f67("if (typeof ", "string", " != '", "string", "')", v169, f70("throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", v169)), f67("return ", (function(){
3496             return "eval.apply(window, [string])";
3497         })(), ";", v169)), "})()");
3498     })(f110(v550, v549));
3499 })), cdr: v323});
3500 var l185 = f3("ERROR");
3501 v323 = ({car: f33(l185, (function (v552,v553){
3502     if (arguments.length < 2) throw 'too few arguments';
3503     if (arguments.length > 2) throw 'too many arguments';
3504     return (function(v554){
3505         return f67("(function (){ throw ", v554, "; })()");
3506     })(f110(v553, v552));
3507 })), cdr: v323});
3508 var l186 = f3("NEW");
3509 v323 = ({car: f33(l186, (function (v555){
3510     if (arguments.length < 1) throw 'too few arguments';
3511     if (arguments.length > 1) throw 'too many arguments';
3512     return (function(){
3513         return "{}";
3514     })();
3515 })), cdr: v323});
3516 var l187 = f3("GET");
3517 v323 = ({car: f33(l187, (function (v556,v557,v558){
3518     if (arguments.length < 3) throw 'too few arguments';
3519     if (arguments.length > 3) throw 'too many arguments';
3520     return (function(v559,v560){
3521         return f67("(function(){", v169, f70("var tmp = ", "(", v559, ")[", v560, "];", v169, "return tmp == undefined? ", f110(v2), ": tmp ;", v169), "})()");
3522     })(f110(v557, v556),f110(v558, v556));
3523 })), cdr: v323});
3524 var l188 = f3("SET");
3525 v323 = ({car: f33(l188, (function (v561,v562,v563,v564){
3526     if (arguments.length < 4) throw 'too few arguments';
3527     if (arguments.length > 4) throw 'too many arguments';
3528     return (function(v565,v566,v567){
3529         return f67("((", v565, ")[", v566, "] = ", v567, ")");
3530     })(f110(v562, v561),f110(v563, v561),f110(v564, v561));
3531 })), cdr: v323});
3532 var l189 = f3("IN");
3533 v323 = ({car: f33(l189, (function (v568,v569,v570){
3534     if (arguments.length < 3) throw 'too few arguments';
3535     if (arguments.length > 3) throw 'too many arguments';
3536     return (function(v571,v572){
3537         return f121(f67("((", v571, ") in (", v572, "))"));
3538     })(f110(v569, v568),f110(v570, v568));
3539 })), cdr: v323});
3540 var l190 = f3("FUNCTIONP");
3541 v323 = ({car: f33(l190, (function (v573,v574){
3542     if (arguments.length < 2) throw 'too few arguments';
3543     if (arguments.length > 2) throw 'too many arguments';
3544     return (function(v575){
3545         return f121(f67("(typeof ", v575, " == 'function')"));
3546     })(f110(v574, v573));
3547 })), cdr: v323});
3548 var l191 = f3("WRITE-STRING");
3549 v323 = ({car: f33(l191, (function (v576,v577){
3550     if (arguments.length < 2) throw 'too few arguments';
3551     if (arguments.length > 2) throw 'too many arguments';
3552     return (function(v578){
3553         return f67("(function(){", v169, f70(f67("var ", "x", " = ", v578, ";", v169), f67("if (typeof ", "x", " != '", "string", "')", v169, f70("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", v169)), f67("return ", (function(){
3554             return "lisp.write(x)";
3555         })(), ";", v169)), "})()");
3556     })(f110(v577, v576));
3557 })), cdr: v323});
3558 var l193 = f3("MACROP");
3559 var l192 = f3("MACRO");
3560 var f123;
3561 (function(){
3562     (function(){
3563         return f123 = (function(v579){
3564             ((v579)["fname"] = "MACROP");
3565             return v579;
3566         })((function (v580){
3567             if (arguments.length < 1) throw 'too few arguments';
3568             if (arguments.length > 1) throw 'too many arguments';
3569             return (((function(){
3570                 var tmp = v580;
3571                 return (typeof tmp == 'object' && 'name' in tmp);
3572             })()?v3: v2) !== v2 ? ((f90(f104(v580, v278)) === l192)?v3: v2) : v2);
3573         }));
3574     })();
3575     return l193;
3576 })();
3577 var l195 = f3("LS-MACROEXPAND-1");
3578 var l194 = f3("MACRO");
3579 var f124;
3580 (function(){
3581     (function(){
3582         return f124 = (function(v581){
3583             ((v581)["fname"] = "LS-MACROEXPAND-1");
3584             return v581;
3585         })((function (v582,v583){
3586             if (arguments.length < 2) throw 'too few arguments';
3587             if (arguments.length > 2) throw 'too many arguments';
3588             return (f123((function(){
3589                 var tmp = v582;
3590                 return tmp === v2? v2: tmp.car;
3591             })()) !== v2 ? (function(v584){
3592                 return (((f90(v584) === l194)?v3: v2) !== v2 ? (function(){
3593                     var f = f118(f91(v584));
3594                     var args = [];
3595                     var tail = ((function(){
3596                         var tmp = v582;
3597                         return tmp === v2? v2: tmp.cdr;
3598                     })());
3599                         while (tail != v2){
3600                             args.push(tail.car);
3601                             tail = tail.cdr;
3602                         }
3603                         return f.apply(this, args);
3604                     })() : v582);
3605             })(f104((function(){
3606                 var tmp = v582;
3607                 return tmp === v2? v2: tmp.car;
3608             })(), v278)) : v582);
3609         }));
3610     })();
3611     return l195;
3612 })();
3613 var l197 = f3("COMPILE-FUNCALL");
3614 var l196 = f3("LAMBDA");
3615 var f125;
3616 (function(){
3617     (function(){
3618         return f125 = (function(v585){
3619             ((v585)["fname"] = "COMPILE-FUNCALL");
3620             return v585;
3621         })((function (v586,v587,v588){
3622             if (arguments.length < 3) throw 'too few arguments';
3623             if (arguments.length > 3) throw 'too many arguments';
3624             return (((function(){
3625                 var tmp = v586;
3626                 return (typeof tmp == 'object' && 'name' in tmp);
3627             })()?v3: v2) !== v2 ? (function(){
3628                 return f67(f105(v586, v588), "(", f68(f45((function (v589){
3629                     if (arguments.length < 1) throw 'too few arguments';
3630                     if (arguments.length > 1) throw 'too many arguments';
3631                     return f110(v589, v588);
3632                 }), v587), ", "), ")");
3633             })() : ((f36(v586) !== v2 ? (((function(){
3634                 var tmp = v586;
3635                 return tmp === v2? v2: tmp.car;
3636             })() === l196)?v3: v2) : v2) !== v2 ? (function(){
3637                 return f67("(", f110(v586, v588), ")(", f68(f45((function (v590){
3638                     if (arguments.length < 1) throw 'too few arguments';
3639                     if (arguments.length > 1) throw 'too many arguments';
3640                     return f110(v590, v588);
3641                 }), v587), ", "), ")");
3642             })() : (function(){
3643                 return (function (){ throw f67("Invalid function designator ", (v586).name); })();
3644             })()));
3645         }));
3646     })();
3647     return l197;
3648 })();
3649 var l198 = f3("LS-COMPILE");
3650 var f110;
3651 (function(){
3652     (function(){
3653         return f110 = (function(v591){
3654             ((v591)["fname"] = "LS-COMPILE");
3655             return v591;
3656         })((function (v592,v593){
3657             if (arguments.length < 1) throw 'too few arguments';
3658             if (arguments.length > 2) throw 'too many arguments';
3659             switch(arguments.length){
3660             case 1:
3661             v593=f94();
3662             default: break;
3663             }
3664             return (((function(){
3665                 var tmp = v592;
3666                 return (typeof tmp == 'object' && 'name' in tmp);
3667             })()?v3: v2) !== v2 ? (function(){
3668                 return f102(v592, v593);
3669             })() : (f51(v592) !== v2 ? (function(){
3670                 return f6(v592);
3671             })() : (((typeof(v592) == "string")?v3: v2) !== v2 ? (function(){
3672                 return f67("\"", f72(v592), "\"");
3673             })() : (f36(v592) !== v2 ? (function(){
3674                 return (f65((function(){
3675                     var tmp = v592;
3676                     return tmp === v2? v2: tmp.car;
3677                 })(), v323) !== v2 ? (function(v594){
3678                     return (function(){
3679                         var f = v594;
3680                         var args = [v593];
3681                         var tail = ((function(){
3682                             var tmp = v592;
3683                             return tmp === v2? v2: tmp.cdr;
3684                         })());
3685                             while (tail != v2){
3686                                 args.push(tail.car);
3687                                 tail = tail.cdr;
3688                             }
3689                             return f.apply(this, args);
3690                         })();
3691                 })(f30(f65((function(){
3692                     var tmp = v592;
3693                     return tmp === v2? v2: tmp.car;
3694                 })(), v323))) : (f123((function(){
3695                     var tmp = v592;
3696                     return tmp === v2? v2: tmp.car;
3697                 })()) !== v2 ? f110(f124(v592, v593), v593) : f125((function(){
3698                     var tmp = v592;
3699                     return tmp === v2? v2: tmp.car;
3700                 })(), (function(){
3701                     var tmp = v592;
3702                     return tmp === v2? v2: tmp.cdr;
3703                 })(), v593)));
3704             })() : v2))));
3705         }));
3706     })();
3707     return l198;
3708 })();
3709 var l199 = f3("LS-COMPILE-TOPLEVEL");
3710 var f126;
3711 (function(){
3712     (function(){
3713         return f126 = (function(v595){
3714             ((v595)["fname"] = "LS-COMPILE-TOPLEVEL");
3715             return v595;
3716         })((function (v596){
3717             if (arguments.length < 1) throw 'too few arguments';
3718             if (arguments.length > 1) throw 'too many arguments';
3719             v313 = v2;
3720             return (function(v597){
3721                 return (function(v598){
3722                     v313 = v2;
3723                     return v598;
3724                 })(f67(f68(f45((function (v599){
3725                     if (arguments.length < 1) throw 'too few arguments';
3726                     if (arguments.length > 1) throw 'too many arguments';
3727                     return f67(v599, ";", v169);
3728                 }), v313)), v597));
3729             })(f110(v596));
3730         }));
3731     })();
3732     return l199;
3733 })();
3734 var l209 = f3("LS-COMPILE-TOPLEVEL");
3735 var l208 = f3("EVAL");
3736 var l207 = f3("PRINT-TO-STRING");
3737 var l206 = f3("LS-READ-FROM-STRING");
3738 var l205 = 148;
3739 var l204 = 200;
3740 var l203 = 126;
3741 var l202 = 605;
3742 var l201 = {car: {car: {car: f3("*LITERAL-COUNTER*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v377", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*LAMBDA-LIST-KEYWORDS*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v334", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*COMPILATIONS*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v323", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*TOPLEVEL-COMPILATIONS*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v313", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*FUNCTION-COUNTER*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v302", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*VARIABLE-COUNTER*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v282", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*ENVIRONMENT*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v278", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*COMPILATION-UNIT-CHECKS*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v244", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*EOF*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v237", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*NEWLINE*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v169", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*GENSYM-COUNTER*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v12", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("T"), cdr: {car: f3("VARIABLE"), cdr: {car: "v3", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("NIL"), cdr: {car: f3("VARIABLE"), cdr: {car: "v2", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*PACKAGE*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v1", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}}}}}}}}}}}}, cdr: {car: {car: {car: f3("WITH-COMPILATION-UNIT"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("PROG1"), cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("SETQ"), cdr: {car: f3("*COMPILATION-UNIT-CHECKS*"), cdr: {car: f3("NIL"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("CLEAR-UNDECLARED-GLOBAL-BINDINGS"), cdr: f3("NIL")}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DOLIST"), cdr: {car: {car: f3("CHECK"), cdr: {car: f3("*COMPILATION-UNIT-CHECKS*"), cdr: f3("NIL")}}, cdr: {car: {car: f3("FUNCALL"), cdr: {car: f3("CHECK"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LS-COMPILE-TOPLEVEL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f126", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("COMPILE-FUNCALL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f125", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LS-MACROEXPAND-1"), cdr: {car: f3("FUNCTION"), cdr: {car: "f124", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("MACROP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f123", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("NUM-OP-NUM"), cdr: {car: f3("FUNCTION"), cdr: {car: "f122", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("TYPE-CHECK"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("DECLS"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("CONCAT"), cdr: {car: "(function(){", cdr: {car: f3("*NEWLINE*"), cdr: {car: {car: f3("INDENT"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("MAPCAR"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("DECL"), cdr: f3("NIL")}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("CONCAT"), cdr: {car: "var ", cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("FIRST"), cdr: {car: f3("DECL"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: " = ", cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("THIRD"), cdr: {car: f3("DECL"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: ";", cdr: {car: f3("*NEWLINE*"), cdr: f3("NIL")}}}}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("DECLS"), cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("MAPCAR"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("DECL"), cdr: f3("NIL")}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("CONCAT"), cdr: {car: "if (typeof ", cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("FIRST"), cdr: {car: f3("DECL"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: " != '", cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("SECOND"), cdr: {car: f3("DECL"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: "')", cdr: {car: f3("*NEWLINE*"), cdr: {car: {car: f3("INDENT"), cdr: {car: "throw 'The value ' + ", cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("FIRST"), cdr: {car: f3("DECL"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: " + ' is not a type ", cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("SECOND"), cdr: {car: f3("DECL"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: ".';", cdr: {car: f3("*NEWLINE*"), cdr: f3("NIL")}}}}}}}, cdr: f3("NIL")}}}}}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("DECLS"), cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("CONCAT"), cdr: {car: "return ", cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: ";", cdr: {car: f3("*NEWLINE*"), cdr: f3("NIL")}}}}}, cdr: f3("NIL")}}}}, cdr: {car: "})()", cdr: f3("NIL")}}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("COMPILE-BOOL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f121", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DEFINE-BUILTIN"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("ARGS"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("DEFINE-COMPILATION"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("ARGS"), cdr: f3("NIL")}}, cdr: {car: {car: f3("LET"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("MAPCAR"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("ARG"), cdr: f3("NIL")}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: {car: f3("UNQUOTE"), cdr: {car: f3("ARG"), cdr: f3("NIL")}}, cdr: {car: {car: f3("LS-COMPILE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("ARG"), cdr: f3("NIL")}}, cdr: {car: f3("ENV"), cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("ARGS"), cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("FORM"), cdr: f3("NIL")}, cdr: {car: {car: f3("BACKQUOTE-EXPAND-1"), cdr: {car: f3("FORM"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE-EXPAND"), cdr: {car: f3("FUNCTION"), cdr: {car: "f120", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE-EXPAND-1"), cdr: {car: f3("FUNCTION"), cdr: {car: "f119", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DEFINE-TRANSFORMATION"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("ARGS"), cdr: {car: f3("FORM"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("DEFINE-COMPILATION"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("ARGS"), cdr: f3("NIL")}}, cdr: {car: {car: f3("LS-COMPILE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("FORM"), cdr: f3("NIL")}}, cdr: {car: f3("ENV"), cdr: f3("NIL")}}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("EVAL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f118", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LITERAL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f117", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LITERAL->JS"), cdr: {car: f3("FUNCTION"), cdr: {car: "f116", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LAMBDA-LIST-REST-ARGUMENT"), cdr: {car: f3("FUNCTION"), cdr: {car: "f115", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LAMBDA-LIST-OPTIONAL-ARGUMENTS"), cdr: {car: f3("FUNCTION"), cdr: {car: "f114", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"), cdr: {car: f3("FUNCTION"), cdr: {car: "f113", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LAMBDA-LIST-REQUIRED-ARGUMENTS"), cdr: {car: f3("FUNCTION"), cdr: {car: "f112", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LIST-UNTIL-KEYWORD"), cdr: {car: f3("FUNCTION"), cdr: {car: "f111", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DEFINE-COMPILATION"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("ARGS"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("PUSH"), cdr: {car: {car: f3("LIST"), cdr: {car: {car: f3("QUOTE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("ENV"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("ARGS"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: {car: f3("*COMPILATIONS*"), cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LS-COMPILE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f110", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LS-COMPILE-BLOCK"), cdr: {car: f3("FUNCTION"), cdr: {car: "f109", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%COMPILE-DEFMACRO"), cdr: {car: f3("FUNCTION"), cdr: {car: "f108", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%COMPILE-DEFUN"), cdr: {car: f3("FUNCTION"), cdr: {car: "f107", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%COMPILE-DEFVAR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f106", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LOOKUP-FUNCTION-TRANSLATION"), cdr: {car: f3("FUNCTION"), cdr: {car: "f105", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LOOKUP-FUNCTION"), cdr: {car: f3("FUNCTION"), cdr: {car: "f104", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("EXTEND-LOCAL-ENV"), cdr: {car: f3("FUNCTION"), cdr: {car: "f103", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LOOKUP-VARIABLE-TRANSLATION"), cdr: {car: f3("FUNCTION"), cdr: {car: "f102", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LOOKUP-VARIABLE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f101", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("GVARNAME"), cdr: {car: f3("FUNCTION"), cdr: {car: "f100", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CLEAR-UNDECLARED-GLOBAL-BINDINGS"), cdr: {car: f3("FUNCTION"), cdr: {car: "f99", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LOOKUP-IN-LEXENV"), cdr: {car: f3("FUNCTION"), cdr: {car: "f98", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("EXTEND-LEXENV"), cdr: {car: f3("FUNCTION"), cdr: {car: "f97", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("PUSH-TO-LEXENV"), cdr: {car: f3("FUNCTION"), cdr: {car: "f96", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("COPY-LEXENV"), cdr: {car: f3("FUNCTION"), cdr: {car: "f95", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("MAKE-LEXENV"), cdr: {car: f3("FUNCTION"), cdr: {car: "f94", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("MARK-BINDING-AS-DECLARED"), cdr: {car: f3("FUNCTION"), cdr: {car: "f93", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BINDING-DECLARED"), cdr: {car: f3("FUNCTION"), cdr: {car: "f92", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BINDING-TRANSLATION"), cdr: {car: f3("FUNCTION"), cdr: {car: "f91", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BINDING-TYPE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f90", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BINDING-NAME"), cdr: {car: f3("FUNCTION"), cdr: {car: "f89", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("MAKE-BINDING"), cdr: {car: f3("FUNCTION"), cdr: {car: "f88", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LS-READ-FROM-STRING"), cdr: {car: f3("FUNCTION"), cdr: {car: "f87", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("READ-SHARP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f86", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("READ-STRING"), cdr: {car: f3("FUNCTION"), cdr: {car: "f85", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LS-READ"), cdr: {car: f3("FUNCTION"), cdr: {car: "f84", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%READ-LIST"), cdr: {car: f3("FUNCTION"), cdr: {car: "f83", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("SKIP-WHITESPACES-AND-COMMENTS"), cdr: {car: f3("FUNCTION"), cdr: {car: "f82", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("READ-UNTIL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f81", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("TERMINALP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f80", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("SKIP-WHITESPACES"), cdr: {car: f3("FUNCTION"), cdr: {car: "f79", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("WHITESPACEP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f78", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%READ-CHAR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f77", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%PEEK-CHAR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f76", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("MAKE-STRING-STREAM"), cdr: {car: f3("FUNCTION"), cdr: {car: "f75", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("PRINT"), cdr: {car: f3("FUNCTION"), cdr: {car: "f74", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("WRITE-LINE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f73", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("ESCAPE-STRING"), cdr: {car: f3("FUNCTION"), cdr: {car: "f72", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("PRINT-TO-STRING"), cdr: {car: f3("FUNCTION"), cdr: {car: "f71", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("INDENT"), cdr: {car: f3("FUNCTION"), cdr: {car: "f70", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("JOIN-TRAILING"), cdr: {car: f3("FUNCTION"), cdr: {car: "f69", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("JOIN"), cdr: {car: f3("FUNCTION"), cdr: {car: "f68", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CONCAT"), cdr: {car: f3("FUNCTION"), cdr: {car: "f67", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("STRING="), cdr: {car: f3("FUNCTION"), cdr: {car: "f66", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("ASSOC"), cdr: {car: f3("FUNCTION"), cdr: {car: "f65", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("EVERY"), cdr: {car: f3("FUNCTION"), cdr: {car: "f64", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("PARSE-INTEGER"), cdr: {car: f3("FUNCTION"), cdr: {car: "f63", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("SUBSEQ"), cdr: {car: f3("FUNCTION"), cdr: {car: "f62", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DIGIT-CHAR-P"), cdr: {car: f3("FUNCTION"), cdr: {car: "f61", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("REMOVE-IF-NOT"), cdr: {car: f3("FUNCTION"), cdr: {car: "f60", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("REMOVE-IF"), cdr: {car: f3("FUNCTION"), cdr: {car: "f59", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("REMOVE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f58", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("MEMBER"), cdr: {car: f3("FUNCTION"), cdr: {car: "f57", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BUTLAST"), cdr: {car: f3("FUNCTION"), cdr: {car: "f56", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LAST"), cdr: {car: f3("FUNCTION"), cdr: {car: "f55", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("NTH"), cdr: {car: f3("FUNCTION"), cdr: {car: "f54", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("MINUSP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f53", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("PLUSP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f52", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("INTEGERP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f51", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CHAR="), cdr: {car: f3("FUNCTION"), cdr: {car: "f50", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CHAR-CODE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f49", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CODE-CHAR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f48", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("COPY-LIST"), cdr: {car: f3("FUNCTION"), cdr: {car: "f47", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("IDENTITY"), cdr: {car: f3("FUNCTION"), cdr: {car: "f46", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("MAPCAR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f45", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CONCAT-TWO"), cdr: {car: f3("FUNCTION"), cdr: {car: "f44", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LENGTH"), cdr: {car: f3("FUNCTION"), cdr: {car: "f43", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LIST-LENGTH"), cdr: {car: f3("FUNCTION"), cdr: {car: "f42", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("REVERSE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f41", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("REVERSE-AUX"), cdr: {car: f3("FUNCTION"), cdr: {car: "f40", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("APPEND"), cdr: {car: f3("FUNCTION"), cdr: {car: "f39", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("APPEND-TWO"), cdr: {car: f3("FUNCTION"), cdr: {car: "f38", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DEFVAR"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("&OPTIONAL"), cdr: {car: f3("VALUE"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("%DEFVAR"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VALUE"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: {car: f3("QUOTE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DEFUN"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("ARGS"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("%DEFUN"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("ARGS"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: {car: {car: f3("QUOTE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("!REDUCE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f37", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LISTP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f36", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("ENSURE-LIST"), cdr: {car: f3("FUNCTION"), cdr: {car: "f35", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("PROG1"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("FORM"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: f3("VALUE"), cdr: {car: {car: f3("GENSYM"), cdr: f3("NIL")}, cdr: f3("NIL")}}, cdr: f3("NIL")}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VALUE"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("FORM"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VALUE"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("OR"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("&REST"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: {car: {car: f3("COND"), cdr: {car: {car: {car: f3("NULL"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: {car: f3("NIL"), cdr: f3("NIL")}}, cdr: {car: {car: {car: f3("NULL"), cdr: {car: {car: f3("CDR"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("CAR"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("T"), cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: f3("G"), cdr: {car: {car: f3("GENSYM"), cdr: f3("NIL")}, cdr: f3("NIL")}}, cdr: f3("NIL")}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("CAR"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}, cdr: {car: {car: f3("IF"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G"), cdr: f3("NIL")}}, cdr: {car: {car: f3("OR"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("CDR"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("AND"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("&REST"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: {car: {car: f3("COND"), cdr: {car: {car: {car: f3("NULL"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: {car: f3("T"), cdr: f3("NIL")}}, cdr: {car: {car: {car: f3("NULL"), cdr: {car: {car: f3("CDR"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("CAR"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("T"), cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("IF"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("CAR"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("AND"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("CDR"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: f3("NIL"), cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("ECASE"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("FORM"), cdr: {car: f3("&REST"), cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("CASE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("FORM"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("APPEND"), cdr: {car: f3("CLAUSULES"), cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: {car: f3("T"), cdr: {car: {car: f3("ERROR"), cdr: {car: "ECASE expression failed.", cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CASE"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("FORM"), cdr: {car: f3("&REST"), cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: f3("!FORM"), cdr: {car: {car: f3("GENSYM"), cdr: f3("NIL")}, cdr: f3("NIL")}}, cdr: f3("NIL")}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: {car: f3("UNQUOTE"), cdr: {car: f3("!FORM"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("FORM"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}, cdr: {car: {car: f3("COND"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("MAPCAR"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("CLAUSULE"), cdr: f3("NIL")}, cdr: {car: {car: f3("IF"), cdr: {car: {car: f3("EQ"), cdr: {car: {car: f3("CAR"), cdr: {car: f3("CLAUSULE"), cdr: f3("NIL")}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}, cdr: {car: f3("CLAUSULE"), cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: {car: f3("EQL"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("!FORM"), cdr: f3("NIL")}}, cdr: {car: {car: f3("QUOTE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("CAR"), cdr: {car: f3("CLAUSULE"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("CDR"), cdr: {car: f3("CLAUSULE"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}, cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("COND"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("&REST"), cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}, cdr: {car: {car: f3("IF"), cdr: {car: {car: f3("NULL"), cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}, cdr: {car: f3("NIL"), cdr: {car: {car: f3("IF"), cdr: {car: {car: f3("EQ"), cdr: {car: {car: f3("CAAR"), cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("CDAR"), cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("IF"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("CAAR"), cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("CDAR"), cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("COND"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("CDR"), cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DOTIMES"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("ITER"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: f3("G!TO"), cdr: {car: {car: f3("GENSYM"), cdr: f3("NIL")}, cdr: f3("NIL")}}, cdr: {car: {car: f3("VAR"), cdr: {car: {car: f3("FIRST"), cdr: {car: f3("ITER"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("TO"), cdr: {car: {car: f3("SECOND"), cdr: {car: f3("ITER"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("RESULT"), cdr: {car: {car: f3("THIRD"), cdr: {car: f3("ITER"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VAR"), cdr: f3("NIL")}}, cdr: {car: 0, cdr: f3("NIL")}}, cdr: {car: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G!TO"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("TO"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("WHILE"), cdr: {car: {car: f3("<"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VAR"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G!TO"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: {car: {car: f3("INCF"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VAR"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("RESULT"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DOLIST"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("ITER"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: f3("VAR"), cdr: {car: {car: f3("FIRST"), cdr: {car: f3("ITER"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("G!LIST"), cdr: {car: {car: f3("GENSYM"), cdr: f3("NIL")}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G!LIST"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("SECOND"), cdr: {car: f3("ITER"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VAR"), cdr: f3("NIL")}}, cdr: {car: f3("NIL"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("WHILE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G!LIST"), cdr: f3("NIL")}}, cdr: {car: {car: f3("SETQ"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VAR"), cdr: f3("NIL")}}, cdr: {car: {car: f3("CAR"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G!LIST"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: {car: {car: f3("SETQ"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G!LIST"), cdr: f3("NIL")}}, cdr: {car: {car: f3("CDR"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G!LIST"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("THIRD"), cdr: {car: f3("ITER"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("UNLESS"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("CONDITION"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("IF"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("CONDITION"), cdr: f3("NIL")}}, cdr: {car: f3("NIL"), cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("WHEN"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("CONDITION"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("IF"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("CONDITION"), cdr: f3("NIL")}}, cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: f3("NIL"), cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("PUSH"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("X"), cdr: {car: f3("PLACE"), cdr: f3("NIL")}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("SETQ"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("PLACE"), cdr: f3("NIL")}}, cdr: {car: {car: f3("CONS"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("X"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("PLACE"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DECF"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("X"), cdr: {car: f3("&OPTIONAL"), cdr: {car: {car: f3("DELTA"), cdr: {car: 1, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("SETQ"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("X"), cdr: f3("NIL")}}, cdr: {car: {car: f3("-"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("X"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("DELTA"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("INCF"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("X"), cdr: {car: f3("&OPTIONAL"), cdr: {car: {car: f3("DELTA"), cdr: {car: 1, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("SETQ"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("X"), cdr: f3("NIL")}}, cdr: {car: {car: f3("+"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("X"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("DELTA"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("ATOM"), cdr: {car: f3("FUNCTION"), cdr: {car: "f34", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LIST"), cdr: {car: f3("FUNCTION"), cdr: {car: "f33", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("FOURTH"), cdr: {car: f3("FUNCTION"), cdr: {car: "f32", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("THIRD"), cdr: {car: f3("FUNCTION"), cdr: {car: "f31", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("SECOND"), cdr: {car: f3("FUNCTION"), cdr: {car: "f30", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("FIRST"), cdr: {car: f3("FUNCTION"), cdr: {car: "f29", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CADDDR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f28", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CDDDR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f27", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CADDR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f26", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CDDR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f25", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CDAR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f24", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CADR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f23", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CAAR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f22", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CDR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f21", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CAR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f20", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CONSP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f19", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CONS"), cdr: {car: f3("FUNCTION"), cdr: {car: "f18", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("NOT"), cdr: {car: f3("FUNCTION"), cdr: {car: "f17", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("EQL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f16", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("TRUNCATE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f15", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("ZEROP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f14", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("1-"), cdr: {car: f3("FUNCTION"), cdr: {car: "f13", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("1+"), cdr: {car: f3("FUNCTION"), cdr: {car: "f12", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("/"), cdr: {car: f3("FUNCTION"), cdr: {car: "f11", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*"), cdr: {car: f3("FUNCTION"), cdr: {car: "f10", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("-"), cdr: {car: f3("FUNCTION"), cdr: {car: "f9", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("+"), cdr: {car: f3("FUNCTION"), cdr: {car: "f8", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("="), cdr: {car: f3("FUNCTION"), cdr: {car: "f7", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("INTEGER-TO-STRING"), cdr: {car: f3("FUNCTION"), cdr: {car: "f6", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("GENSYM"), cdr: {car: f3("FUNCTION"), cdr: {car: "f5", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("FIND-SYMBOL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f4", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("INTERN"), cdr: {car: f3("FUNCTION"), cdr: {car: "f3", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("INTERNP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f2", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("NULL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f1", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DEFUN"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("ARGS"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("%DEFUN"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("ARGS"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%DEFUN"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("ARGS"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("EVAL-WHEN-COMPILE"), cdr: {car: {car: f3("%COMPILE-DEFUN"), cdr: {car: {car: f3("QUOTE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("FSETQ"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: {car: {car: f3("NAMED-LAMBDA"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("SYMBOL-NAME"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("ARGS"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("NAMED-LAMBDA"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("ARGS"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: f3("X"), cdr: {car: {car: f3("GENSYM"), cdr: {car: "FN", cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: {car: f3("UNQUOTE"), cdr: {car: f3("X"), cdr: f3("NIL")}}, cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("ARGS"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}, cdr: {car: {car: f3("SET"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("X"), cdr: f3("NIL")}}, cdr: {car: "fname", cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("X"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DEFVAR"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("&OPTIONAL"), cdr: {car: f3("VALUE"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("%DEFVAR"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VALUE"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%DEFVAR"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("VALUE"), cdr: f3("NIL")}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("EVAL-WHEN-COMPILE"), cdr: {car: {car: f3("%COMPILE-DEFVAR"), cdr: {car: {car: f3("QUOTE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("SETQ"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VALUE"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DEFMACRO"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("ARGS"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("EVAL-WHEN-COMPILE"), cdr: {car: {car: f3("%COMPILE-DEFMACRO"), cdr: {car: {car: f3("QUOTE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("QUOTE"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("MAPCAR"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("X"), cdr: f3("NIL")}, cdr: {car: {car: f3("IF"), cdr: {car: {car: f3("EQ"), cdr: {car: f3("X"), cdr: {car: {car: f3("QUOTE"), cdr: {car: f3("&BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: {car: f3("QUOTE"), cdr: {car: f3("&REST"), cdr: f3("NIL")}}, cdr: {car: f3("X"), cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}, cdr: {car: f3("ARGS"), cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}, cdr: f3("NIL")}};
3743 var l200 = f3("EVAL");
3744 var f118;
3745 (function(){
3746     v278 = l201;
3747     v282 = l202;
3748     v302 = l203;
3749     v377 = l204;
3750     return v12 = l205;
3751 })();
3752 (function(){
3753     (function(){
3754         (function(){
3755             return f118 = (function(v600){
3756                 ((v600)["fname"] = "EVAL");
3757                 return v600;
3758             })((function (v601){
3759                 if (arguments.length < 1) throw 'too few arguments';
3760                 if (arguments.length > 1) throw 'too many arguments';
3761                 return (function(v602){
3762                     return (function(){
3763                         var string = v602;
3764                         if (typeof string != 'string')
3765                             throw 'The value ' + string + ' is not a type string.';
3766                         return eval.apply(window, [string]);
3767                     })();
3768                 })((function(v603){
3769                     (function(v604,v605){
3770                         (function(){
3771                             while(v604 !== v2){
3772                                 v605 = (function(){
3773                                     var tmp = v604;
3774                                     return tmp === v2? v2: tmp.car;
3775                                 })();
3776                                 (v605)();
3777                                 v604 = (function(){
3778                                     var tmp = v604;
3779                                     return tmp === v2? v2: tmp.cdr;
3780                                 })();
3781                         }})();
3782                         return v2;
3783                     })(v244,v2);
3784                     return v603;
3785                 })((function(){
3786                     v244 = v2;
3787                     f99();
3788                     return f126(v601);
3789                 })()));
3790             }));
3791         })();
3792         return l200;
3793     })();
3794     return (function(){
3795         var string = f67("var lisp = {};", "lisp.read = ", f105(l206, v2), ";", v169, "lisp.print = ", f105(l207, v2), ";", v169, "lisp.eval = ", f105(l208, v2), ";", v169, "lisp.compile = ", f105(l209, v2), ";", v169, "lisp.evalString = function(str){", v169, "   return lisp.eval(lisp.read(str));", v169, "}", v169, "lisp.compileString = function(str){", v169, "   return lisp.compile(lisp.read(str));", v169, "}", v169);
3796         if (typeof string != 'string')
3797             throw 'The value ' + string + ' is not a type string.';
3798         return eval.apply(window, [string]);
3799     })();
3800 })();